Fun little cookie jar game to keep your users entertained.




Paste into the remotes section of your bot and type !cookie help to get the commands.




Enjoy.

on *:TEXT:!cookie*:#: {
  if ($2 == $null) { msg $chan Unknown cookie command. Type !cookie help to get a list of available cookie commands } 
  elseif ($2 == help) { notice $nick Cookie commands: !cookie fill - !cookie eat <number> - !cookie add <number> - !cookie guess start - !cookie guess stop - !cookie guess score - !cookie stats }
  elseif ($2 == stats) {
    msg $chan Last person to fill cookie jar: %cookiefiller
    .timer 1 1 msg $chan Last person to eat cookie: $+(,%cookieeater,)
    .timer 1 2 msg $chan Last person to add cookie: $+(,%cookieadder,)
    .timer 1 3 msg $chan Cookies left in cookie jar: $+(,%cookiejar,)
    .timer 1 4 msg $chan Type !cookie help to get a list of cookie commands.
  }
  elseif ($2 == guess) && ($3 == score) && (% [ $+ [ cookiescore [ $+ [ . [ $+ [ $nick ] ] ] ] ] ] == $null) { 
    set % [ $+ [ cookiescore [ $+ [ . [ $+ [ $nick ] ] ] ] ] ] 0
    msg $chan $+(,$nick,) $+ : Your current cookie guessing score is $+(,% [ $+ [ cookiescore [ $+ [ . [ $+ [ $nick ] ] ] ] ] ],) $+ . 
  }
  elseif ($2 == guess) && ($3 == score) { msg $chan $+(,$nick,) $+ : Your current cookie guessing score is $+(,% [ $+ [ cookiescore [ $+ [ . [ $+ [ $nick ] ] ] ] ] ],) $+ . }
  elseif ($2 == guess) && ($3 == stop) && (%cookieguess != ON) { msg $chan There is no cookie guessing game in progress $+(,$nick,) $+ . }  
  elseif ($2 == guess) && ($3 == stop) { 
    set %cookieguess OFF
    set %cookiejar 0
    msg $chan Cookie Guessing Game has stopped. The cookie jar has been emptied.
  }
  elseif ($2 == guess) && ($3 == start) && (%cookieguess == ON) { msg $chan Cookie Guessing Game is already going $+(,$nick,) $+ . }
  elseif ($2 == guess) && ($3 == start) {
    set %cookieguess ON
    set %cookiejar $rand(1,1000)
    msg $chan Cookie Guessing Game has started.
    .timer 1 1 msg $chan Type !cookie guess <number> to guess how many cookies are in the cookie jar.
  }
  elseif ($2 == guess) && ($3 !isnum) && (%cookieguess != ON) { msg $chan There is no cookie guessing game in progress $+(,$nick,) $+ . }
  elseif ($2 == guess) && ($3 isnum) && ($3 > %cookiejar) && (%cookieguess != ON) { msg $chan There is no cookie guessing game in progress $+(,$nick,) $+ . }
  elseif ($2 == guess) && ($3 isnum) && ($3 < %cookiejar) && (%cookieguess != ON) { msg $chan There is no cookie guessing game in progress $+(,$nick,) $+ . }
  elseif ($2 == guess) && ($3 isnum) && ($3 == %cookiejar) && (%cookieguess != ON) { msg $chan There is no cookie guessing game in progress $+(,$nick,) $+ . }
  elseif ($2 == guess) && ($3 !isnum) { msg $chan You need to specify the number of cookies you think are in the jar $+(,$nick,) $+ . }
  elseif ($2 == guess) && ($3 isnum) && ($3 > %cookiejar) && (%cookieguess == ON) { msg $chan Incorrect! Try a lower number $+(,$nick,) $+ . }
  elseif ($2 == guess) && ($3 isnum) && ($3 < %cookiejar) && (%cookieguess == ON) { msg $chan Incorrect! Try a higher number $+(,$nick,) $+ . }
  elseif ($2 == guess) && ($3 isnum) && ($3 == %cookiejar) && (%cookieguess == ON) { 
    set %cookiejar 0
    set %cookieguess OFF
    inc % [ $+ [ cookiescore [ $+ [ . [ $+ [ $nick ] ] ] ] ] ] 1
    msg $chan Yes! $+(,$nick,) got the answer correct with $+(,$3,) and is awarded 1 point.
    .timer 1 1 msg $chan The cookie jar has been emptied. Type !cookie guess start to start anew!
  }
  elseif ($2 == fill) && (%cookieguess == ON) { msg $chan You cannot fill the cookie jar while the cookie guessing game is in progress $+(,$nick,) $+ . }
  elseif ($2 == fill) && (%cookiejar == 1000) { msg $chan The cookie jar is already full $+(,$nick,) $+ . There are $+(,%cookiejar,) cookies in it. }
  elseif ($2 == fill) {
    set %cookiejar 1000
    set %cookiefiller $nick
    msg $chan The cookie jar has been filled by $+(,$nick,) $+ . There are now $+(,%cookiejar,) cookies in it.
  }
  elseif ($2 == eat) && (%cookieguess == ON) { msg $chan You cannot eat from the cookie jar while the cookie guessing game is in progress $+(,$nick,) $+ . }
  elseif ($2 == eat) && ($3 !isnum) { msg $chan You need to specify a number of cookies you want to eat $+(,$nick,) $+ . }
  elseif ($2 == eat) && ($left($3,1) == 0) { msg $chan You can't eat 0 cookies from the jar $+(,$nick,) $+ . }
  elseif ($2 == eat) && ($3 isnum) && ($calc(%cookiejar - $3) < 0) { msg $chan There aren't enough cookies for you to eat that much $+(,$nick,) $+ . }
  elseif ($2 == eat) && ($3 isnum) && ($calc(%cookiejar - $3) >= 0) {
    dec %cookiejar $3
    set %cookieeater $nick
    msg $chan Who stole the cookie(s) from the cookie jar?!
    .timer 1 1 msg $chan $+(,$nick,) stole the cookie(s) from the cookie jar! There are now $+(,%cookiejar,) cookies left.
  }
  elseif ($2 == add) && (%cookieguess == ON) { msg $chan You cannot add to the cookie jar while the cookie guessing game is in progress $+(,$nick,) $+ . }
  elseif ($2 == add) && ($3 !isnum) { msg $chan You need to specify a number of cookies you want to add to the jar $+(,$nick,) $+ . }
  elseif ($2 == add) && ($left($3,1) == 0) { msg $chan You can't add 0 cookies to the jar $+(,$nick,) $+ . }
  elseif ($2 == add) && ($3 isnum) && ($calc(%cookiejar + $3) <= 1000) {
    inc %cookiejar $3
    set %cookieadder $nick
    msg $chan $+(,$nick,) added $+(,$3,) cookie(s) to the cookie jar. There are now $+(,%cookiejar,) cookies in it.
  }
  elseif ($2 == add) && ($3 isnum) && ($calc(%cookiejar + $3) > 1000) { msg $chan The cookie jar can't hold that many cookies $+(,$nick,) $+ . }
  else { msg $chan Unknown cookie command. Type !cookie help to get a list of available cookie commands }
}