All pastes #958391 Raw Edit

Something

public text v1 · immutable
#958391 ·published 2008-03-26 18:15 UTC
rendered paste body
on *:TEXT:!nguess*:#Numbertest:{
  if (%numberz == $null) goto this
  if (%numberz != $null) goto that 
  :this
  msg $chan 7 $Nick 4heeft een nummer raad spel gestart! raad door !ng NUMMER te zeggen.
  set %numberz $rand(0,100)
  echo 3 -a %numberz
  /notice Sjefke 4het antwoord is7 %numberz
  halt
  :that
  .notice $Nick 4a Spel is bezig. Wacht totdat het spel voorbij is, of type !stopnumber.
  halt
}

on *:TEXT:!stopnumber*:#:{ 
  if (%numberz != $null) goto not
  if (%numberz == $null) goto yup
  :not
  msg $chan 4Nummer raden is gestopt7 $nick $+ .4 Het antwoord was7 %numberz $+ .
  unset %numberz
  halt
  :yup
  .notice 7 $nick 4 er is momenteel geen spelletje bezig.
  halt
}
on *:TEXT:!ng *:#:{
  if ($2 > %numberz) goto greater
  if ($2 < %numberz) goto lesser
  if ($2 == %numberz) goto equal
  if (%numberz == $null) goto whom
  else goto what
  :greater
  msg $chan 7 $Nick $+ ,4 Dat antwoord is fout! Maar ga wel door met gokken. 7Probeer een lager nummer!
  halt
  :lesser
  msg $chan 7 $nick $+ ,4 Dat antwoord is fout! Maar ga wel door met gokken. 7Probeer een hoger nummer!
  halt
  :equal
  msg $chan 7 $nick 4Heeft het goede antwoord geraden, namelijk7 %numberz $+ 4!!!
  unset %numberz    
  halt
  :what
  halt
  :whom .notice $nick 4Momenteel is er geen spel bezig. Type !nguess om een potje te starten.
  halt
}