!Box

By Majin-Vegeta on Jul 16, 2011

A simple game for a bot.
Didn't know what to do, was kinda bored, so just done this.
Edit if you like.

== The box game, made by Majin-Vegeta ==

on 1:TEXT:!Box*:#:{
  set %Box $rand(1,40)
  if (%Box == 1) describe $chan pulls out a... Gameboy Advance SP from the cardboard box and gives it to $nick ^_^
  if (%Box == 2) describe $chan pulls out a... Steel chair from the cardboard box and hits it against the skull of $nick
  if (%Box == 3) describe $chan pulls out a... Bag of money from the cardboard box and gives it to $nick
  if (%Box == 4) describe $chan pulls out a... Candy bar from the cardboard box and gives it to $nick :)
  if (%Box == 5) describe $chan pulls out a... Trout from the cardboard box and slaps $nick around with it
  if (%Box == 6) describe $chan pulls out a... Michael Jackson album from the cardboard box and gives it to $nick
  if (%Box == 7) describe $chan pulls out a... Bottle of water from the cardboard box and wets $nick with all the water!
  if (%Box == 8) describe $chan pulls out a... Pack of Chewing Gum from the cardboard box and gives it to $nick
  if (%Box == 9) describe $chan pulls out a... Bomb from the cardboard box and plants it on the head of $nick
  if (%Box == 10) describe $chan pulls out a... Wig from the cardboard box and puts it on the head of $nick - "Damn you look sexy with that on! 8D"
  if (%Box == 11) describe $chan pulls out a... smelly sock from the cardboard box and stuffs it $nick 's mouth
  if (%Box == 12) describe $chan pulls out a... Unicorn from the cardboard box and gives it to $nick as a present!
  if (%Box == 13) describe $chan pulls out a... Rose from the cardboard box and gives it to $nick .. <3 5@3}-;---
  if (%Box == 14) describe $chan pulls out a... Twister game from the cardboard box and gives it to $nick to play with his/her friends!
  if (%Box == 15) describe $chan pulls out a... Togepi egg from the cardboard box and gives it to $nick
  if (%Box == 16) describe $chan pulls out a... RPG launcher from the cardboard box and shoots $nick with it
  if (%Box == 17) describe $chan pulls out a... Golf ball from the cardboard box and throws it at $nick 's head
  if (%Box == 18) describe $chan pulls out a... Pie from the cardboard box and throws it at $nick 's face
  if (%Box == 19) describe $chan pulls out a... Bulldog from the cardboard box and orders it to chase $nick around the channel
  if (%Box == 20) describe $chan pulls out a... Blackberry from the cardboard box and gives it to $nick with BBM!
  if (%Box == 21) describe $chan pulls out a... Laughing cow from the cardboard box and makes it annoy $nick with it's annoying laugh
  if (%Box == 22) describe $chan pulls out a... Knife from the cardboard box and stabs $nick with it!
  if (%Box == 23) describe $chan pulls out a... Free ticket to Eminems concert from the cardboard box and gives it to $nick
  if (%Box == 24) describe $chan pulls out a... Sword out from the cardboard box and slashes $nick with it
  if (%Box == 25) describe $chan pulls out a... Justin Beiber mask from the cardboard box and makes $nick wear it
  if (%Box == 26) describe $chan pulls out a... Magic Wand from the cardboard box and turns $nick into a Frog!
  if (%Box == 27) describe $chan pulls out a... Magic Carpet from the cardboard box and gives it to $nick
  if (%Box == 28) describe $chan pulls out a... Pachirisu plushie from the cardboard box and gives it to $nick :3
  if (%Box == 29) describe $chan pulls out a... Harry Potter book set from the cardboard box and gives it to $nick
  if (%Box == 30) describe $chan pulls out a... Rotten apple out of the cardboard box and gives it to $nick to eat
  if (%Box == 31) describe $chan pulls out a... Frisbee/Flying disc from the cardboard box and starts playing with it with $nick ^_^
  if (%Box == 32) describe $chan pulls out a... Dr Dre poster with his headphones out of the cardboard box and gives it to $nick
  if (%Box == 33) describe $chan pulls out a... Cardboard box from the cardboard box and throws it at $nick
  if (%Box == 34) describe $chan pulls out a... Pen from the cardboard box and writes on $nick 's shirt "I love Beiber"
  if (%Box == 35) describe $chan pulls out a... Piano from the cardboard box and drops it on $nick
  if (%Box == 36) describe $chan pulls out a... Trumpet from the cardboard box and annoys $nick with it
  if (%Box == 37) describe $chan pulls out a... Treasure map from the cardboard box and gives it to $nick
  if (%Box == 38) describe $chan pulls out a... Samurai Sword from the cardboard box and slices $nick 's head off
  if (%Box == 39) describe $chan pulls out a... Flying pig from the cardboard box and throws it up $nick 's ass
  if (%Box == 40) describe $chan pulls out a... Rubberband ball from the cardboard box and gives it to $nick ^_^
}

Comments

Sign in to comment.
napa182   -  Jul 19, 2011

you shouldn't use set %Box $rand(1,40) in ur snippet as it is a global var you should have used var %Box $rand(1,40) .

here is a different take on your snippet using a socket.
Image

just a working example:

  • &Cartman grabs a 1234 Xinweibitai Antacid from a bag then tosses it at FailedReHab hitting them in the back
  • &Cartman grabs a GlaxoSmithKline Panadol from a bag then tosses it at H0LLYWOOD hitting them in the chin

uses the menu nicklist hit so just right click a nick in the nicklist nicklist + Random item hit, but make sure you have access to botserv in the channel you use this on.

menu nicklist {
  - 
  Random Item hit $+([,$$1,]) {
    if ($sock(item))  sockclose item
    sockopen item www.globalpackagegallery.com 80
    sockmark item $$1 .bs act # grabs a 
  }
  -
}
on *:sockopen:item: {
  sockwrite -nt item GET /main.php/random?g2_albumId= HTTP/1.1
  sockwrite -nt item Host: $+($sock(item).addr,$str($crlf,2))
}
on *:sockread:item: {
  var %item | sockread %item
  if ($regex(%item,/^Album:(.+?)\50/)) {
    $gettok($sock(item).mark,2-,32) $replace($regml(1),&amp;,&)$&
      from a bag then tosses it at $gettok($sock(item).mark,1,32)$&
      hitting them in the $gettok(back of the head.face.ass crack.back.forehead.neck.chin,$r(1,7),46)
    sockclose item
  }
}

enjoy...

 Respond  
KilllerX   -  Jul 16, 2011

Might work better without the $rand if you did

on 1:TEXT:!Box*:#:{
 describe # pulls out a ... $read(box.txt)
}

have a file named box.txt in the Application Data\mIRC folder. With the stuff after ... and it will randomly read one of them. And it would keep your ini file alot neater.

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.