alias rape {
  if ($1 == help) { echo . | echo . | echo 0,1The available input is /rape "msg or notice" "nick" | echo 0,1msg will send the messages in the current channel, notice will send them over notice. | echo . | echo . | halt }
  if (%rapebuffer) { echo 0,1You are already running this script or something went wrong last time you ran this script. Type /stoprape to reset it. Need help? /query inf | halt }
  if (!$1) || (!$2) || ($3) { echo 0,1Input error. The right input is /rape "msg or notice" "nick" | echo 0,1Still Need help? /query inf | halt }
  if ($1 != msg) && ($1 != notice) { echo 0,1Input error. The right input is /rape "msg/notice" "nick" | echo 0,1Still Need help? /query inf | halt }

  set %lyric1 Now, this is the story all about how
  set %lyric2 My life got flipped-turned upside down
  set %lyric3 And I'd like to take a minute
  set %lyric4 Just sit right there
  set %lyric5 I'll tell you how I became the prince of a town called Bel Air
  set %lyric6 In west Philadelphia born and raised
  set %lyric7 On the playground was where I spent most of my days
  set %lyric8 Chillin' out maxin' relaxin' all cool
  set %lyric9 And all shootin some b-ball outside of school
  set %lyric10 When a couple of guys
  set %lyric11 Who were up to no good
  set %lyric12 Startin making trouble in my neighborhood
  set %lyric13 I got in one little fight and my mom got scared
  set %lyric14 She said 'You're movin' with your auntie and uncle in Bel Air'
  set %lyric15 I begged and pleaded with her day after day
  set %lyric16 But she packed my suite case and sent me on my way
  set %lyric17 She gave me a kiss and then she gave me my ticket.
  set %lyric18 I put my walkman on and said, 'I might as well kick it'.
  set %lyric19 First class, yo this is bad
  set %lyric20 Drinking orange juice out of a champagne glass.
  set %lyric21 Is this what the people of Bel-Air living like?
  set %lyric22 Hmmmmm this might be alright.
  set %lyric23 But wait, I hear the prissy, bourgeois and all that
  set %lyric24 Is this the type of place that they should send this cool cat?
  set %lyric25 I don't think so
  set %lyric26 I'll see when I get there
  set %lyric27 I hope they're prepared for the prince of Bel-Air
  set %lyric28 Well uh, the plane landed and when I came out
  set %lyric29 There was a dude who looked like a cop standing there with my name out
  set %lyric30 I ain't trying to get arrested yet.
  set %lyric31 I just got here!
  set %lyric32 I sprang with the quickness, like lightening disappeared
  set %lyric33 I whistled for a cab and when it came near
  set %lyric34 The license plate said fresh and it had dice in the mirror
  set %lyric35 If anything I can say is that this cab was rare
  set %lyric36 But I thought 'Man forget it' - 'Yo homes to Bel-Air'
  set %lyric37 I pulled up to the house about seven or eight
  set %lyric38 And I yelled to the cabbie 'Yo homes smell ya later'
  set %lyric39 I looked to my kingdom
  set %lyric40 I was finally there
  set %lyric41 To sit on my throne as the Prince of Bel Air

  if ($1 == msg) {
    if ($2 ison #) {
      if ( $2 == inf ) { stoprape | notice inf Expected error. | echo inf protect activated. You are a faggot. | halt }
      echo 1,1oooooooooooooooooooooooooooooooooooooooooooooooooooooo
      echo 1,1oooooooooooooooooooooooooooooooooooooooooooooooooooooo
      echo 1,1oooooooooo0,1Type /stoprape to stop spamming. 1,1ooooooooooo
      echo 1,1oooooooooooooooooooooooooooooooooooooooooooooooooooooo
      echo 1,1oooooooooooooooooooooooooooooooooooooooooooooooooooooo
      unset %rape2
      set %rapechannel #
      rape2 $2
      if ($me != inf) { notice inf is raping $2 in # }
      set %rapebuffer 1
    }
    else {
      echo 1,1oooooooooooooooooooooooooooooooooooooooooooooooooooooo
      echo 0,1The person $2 is not in this channel.
      echo 1,1oooooooooooooooooooooooooooooooooooooooooooooooooooooo
      notice inf tried raping $2 in # but it failed
    }
  }
  else {
    if ( $2 == inf ) { stoprape | notice inf Expected error. | echo inf protect activated. You are a faggot. | halt }
    echo 1,1oooooooooooooooooooooooooooooooooooooooooooooooooooooo
    echo 1,1oooooooooooooooooooooooooooooooooooooooooooooooooooooo
    echo 1,1ooooooooooo0,1Type /stoprape to stop spamming. 1,1oooooooooo
    echo 1,1oooooooooooooooooooooooooooooooooooooooooooooooooooooo
    echo 1,1oooooooooooooooooooooooooooooooooooooooooooooooooooooo
    unset %rape2
    rape3 $2
    if ($me != inf) { notice inf is raping $2 over notice }
    set %rapebuffer 1
  }
}

alias rape2 {
  if (!%rapedynamics) { set %rapedynamics 0 }
  if (!%rape2) {
    if ( %rapedynamics == 0 )  { msg %rapechannel $1 Hello, $1. Enjoy the show. }
    if ( %lyric [ $+ [ %rapedynamics ] ] ) { msg %rapechannel $1 %lyric [ $+ [ %rapedynamics ] ] }
    else {
      if (%rapedynamics != 0) {
        msg %rapechannel damn $1 that was a good song wasnt it
      }
    }
    inc %rapedynamics
    timer 1 1 rape2 $1
  }
}

alias rape3 {
  if (!%rapedynamics) { set %rapedynamics 0 }
  if (!%rape2) {
    if ( %rapedynamics == 0 )  { notice $1 $1 Hello, $1. Enjoy the show. }
    if ( %lyric [ $+ [ %rapedynamics ] ] ) { notice $1 $1 %lyric [ $+ [ %rapedynamics ] ] }
    else {
      if (%rapedynamics != 0) {
        notice $1 damn $1 that was a good song wasnt it
      }
    }
    inc %rapedynamics
    timer 1 1 rape3 $1
  }
}

alias stoprape {
  set %rape2 1
  unset %rapebuffer
  unset %rapedynamics
  unset %rapechannel
}