All pastes #773120 Raw Edit

Miscellany

public text v1 · immutable
·published 2007-11-14 08:39 UTC
rendered paste body
on *:TEXT:!numbergame*:#: { 
  if (%numbergame [ $+ [ $chan ] ] == on) { notice $nick 3game already in play -.- | Halt } 
  set %number [ $+ [ $chan ] ] $rand(1,1000) 
  set %game [ $+ [ $chan ] ] active 
  msg $chan 3 $me 4has thought of a random number between3 1 4and3 1000
  msg $chan 4You can now guess using4 !guess <number>
  set %numbergame [ $+ [ $chan ] ] on 
} 
on *:TEXT:!guess*:#: { 
  if (%game [ $+ [ $chan ] ] == active) { set %numberguesses [ $+ [ $nick ] ] 0 } 
  if (%numberguesses [ $+ [ $nick ] ] == 15) { notice $nick Only 5 guesses allowed | Halt } 
  if ($2 == %number [ $+ [ $chan ] ]) { msg $chan 8,1W1,8I8,1N1,8N8,1E1,8R 8,1 $nick owns u all 8,1W1,8I8,1N1,8N8,1E1,8R | unset %numbergame [ $+ [ $chan ] ] } 
  if ($2 < %number [ $+ [ $chan ] ]) { msg $chan 3 $nick $+ , 4The Number Is Higher Than3 $2 } 
  if ($2 == %number [ $+ [ $chan ] ]) { unset %number  [ $+ [ $chan ] ] } 
  if ($2 > %number [ $+ [ $chan ] ]) { msg $chan 3 $nick $+ , 4The Number Is Lower than3 $2 } 
  set %game [ $+ [ $chan ] ] inactive 
  inc %numberguesses [ $+ [ $nick ] ] 
}