!Treat

By PyThOn on Jul 29, 2011

For a bot.
This snippet was just made for fun, has some rude comments.
Use in a place that allows this.
!Treat to activate it

on $*:text:/^!Treat$/iS:#:{
  if (!%f) { inc -u12 %f
    :pickagain
    var %nick = $nick(#,$r(1,$nick(#,0))), %treat = A Beer|Jello|Soda|Gum|Candy|$&
      Jelly to play with|Pizza|Fart|Piss to Drink|Cake|Popcorn|Gummy worms
    if ($istok($me $nick,%nick,32)) { goto pickagain }
    else {
      describe # Is thinking
      .timertreat1 1 3 msg # Who should i give a treat to
      .timertreat2 1 5 msg # Lemme think
      .timertreat3 1 9 msg # %nick $+ !
      .timertreat4 1 11 msg # Gives %nick $+($gettok(%treat,$r(1,$numtok(%treat,124)),124),!) 
    }
  }
}

Comments

Sign in to comment.
PyThOn   -  Dec 04, 2011

lol wtf.

 Respond  
The6PuffPack   -  Dec 02, 2011

. I'm no American! I'm up one contry foo! I spell color with a u like colour!

 Respond  
chachin   -  Nov 29, 2011

pacapacapaca

 Respond  
Jethro   -  Nov 26, 2011

Dude....I'm like...dude! That's how those kids from California talk.

 Respond  
The6PuffPack   -  Nov 26, 2011

No prob dude! :P

 Respond  
PyThOn   -  Nov 21, 2011

Lol nope. Thanks for bringing it up :)

 Respond  
The6PuffPack   -  Nov 20, 2011

Oh ok.. I just thought you messed up on it or something..

 Respond  
PyThOn   -  Nov 20, 2011

It doesnt need to be describe I rather it on msg. It's really w/e you like to do. If you like it as describe use it.
Personaly i rather it as a msg.

 Respond  
The6PuffPack   -  Nov 20, 2011

you put msg instead of describe. it should be:
.timertreat4 1 10 describe # gives %nick $+($gettok(%treat,$r(1,$numtok(%treat,124)), 124),!)

 Respond  
PyThOn   -  Nov 19, 2011

??? Whats the problem?

 Respond  
The6PuffPack   -  Nov 18, 2011

. This hates me.. I put four spaces..

 Respond  
The6PuffPack   -  Nov 18, 2011

Here..

 .timertreat4 1 10 Describe # Gives %nick $+($gettok(%treat,$r(1,$numtok(%treat,124)),124),!) 
 Respond  
The6PuffPack   -  Nov 18, 2011

err. I'm horrible at this..

 Respond  
The6PuffPack   -  Nov 18, 2011

on $*:text:/^!Treat$/iS:#:{
if (!%f) { inc -u12 %f
:pickagain
var %nick = $nick(#,$r(1,$nick(#,0))), %treat = A Beer|Jello|Soda|Gum|Candy|$&
Jelly to play with|Pizza|Fart|Friends|Cake|Popcorn|Gummy worms
if ($istok($me $nick,%nick,32)) { goto pickagain }
else {
describe # Is thinking
.timertreat1 1 3 msg # Who should i give a treat to
.timertreat2 1 5 msg # Lemme think
.timertreat3 1 9 msg # %nick $+ !
.timertreat4 1 10 Describe # Gives %nick $+($gettok(%treat,$r(1,$numtok(%treat,124)),124),!)
}
}
}

Ehem.. Just to fix it up.. It needs the describe thing.. and instead of Piss to drink I put Friends..

 Respond  
PyThOn   -  Sep 08, 2011

Ahh true

 Respond  
Jethro   -  Sep 08, 2011

Find a website that lists all the random stuffs and then make a socket script out of it. It's a lazy way to get the job done, so you don't have to.

 Respond  
PyThOn   -  Sep 07, 2011

lol Type it out and add it, (Lazy)

 Respond  
chachin   -  Sep 06, 2011

need to add 100+ treats so it gets fun :D

 Respond  
PyThOn   -  Jul 29, 2011

i put it back up dude.

 Respond  
PyThOn   -  Jul 29, 2011

Jethero_'s I deleted this on accident
on !@:rawmode:#:{
if ($regex($1,/([+][^-]
v)/)) && ($2 == $me) {
mode # $replace($regml(1),+,-) $2
msg # autodevoice activated.
}
}

 Respond  
Jethro   -  Jul 29, 2011

But why would you delete my example? It can serve as a reference for people who browse the comment section under your thread.

 Respond  
PyThOn   -  Jul 29, 2011

Thats Boss. Thanks

 Respond  
PyThOn   -  Jul 29, 2011

Jethro_ Would you be able to make a auto de voice script?
Ive seen some of thoes scripts where a user tries to voice an admin and the admin auto de voices and it gives a chan msg saying autodevoice activated.

 Respond  
napa182   -  Jul 29, 2011

not my fault people can't count to 12 =P jk

 Respond  
Jethro   -  Jul 29, 2011

I quote you as saying,> you seem to have 12 treats not 11No doubt there are people who miscount, so using $numtok() should prevent that mistake from being made...as $numtok always returns the exact token number.

 Respond  
napa182   -  Jul 29, 2011

true Jethro_ ,but if you know the number of tokens an you are not going to add anymore to it you can just use the $r(1,12)

 Respond  
PyThOn   -  Jul 29, 2011

updated

 Respond  
Jethro   -  Jul 29, 2011

I'll advise:

$+($gettok(%treat,$r(1,$numtok(%treat,124)),124),!)

so you don't have to specify the number of tokens being counted in $r() if you decide to add more items for %treat later.

 Respond  
PyThOn   -  Jul 29, 2011

Damn, Thanks Both of you. Lmao
Updated to Napa182 Version

 Respond  
napa182   -  Jul 29, 2011

you may want to make sure the bot does not give them selves the treat an maybe the one triggering it as well...also add some kind of trigger control so you don't get flooded...
you seem to have 12 treats not 11 as you put in ur gettok
Example only......

on $*:text:/^!Treat$/iS:#:{
  if (!%f) { inc -u12 %f
    :pickagain
    var %nick = $nick(#,$r(1,$nick(#,0))), %treat = A Beer|Jello|Soda|Gum|Candy|$&
      Jelly to play with|Pizza|Fart|Piss to Drink|Cake|Popcorn|Gummy worms
    if ($istok($me $nick,%nick,32)) { goto pickagain }
    else {
      describe # Is thinking
      .timertreat1 1 3 msg # Who should i give a treat to
      .timertreat2 1 5 msg # Lemme think
      .timertreat3 1 9 msg # %nick $+ !
      .timertreat4 1 11 msg # Gives %nick $+($gettok(%treat,$r(1,12),124),!)
    }
  }
}
 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.