All pastes #753737 Raw Edit

Unnamed

public text v1 · immutable
#753737 ·published 2007-10-29 14:42 UTC
rendered paste body
on *:TEXT:!math *:#:{
  if (%level [ $+ [ $2 ] ] == $null) set %level [ $+ [ $2 ] ] 1
  if (%level [ $+ [ $2 ] ] == 1) var %nnnone = $rand(100,900)
  if (%level [ $+ [ $2 ] ] == 1) var %nnntwo = $rand(100,900)
  if (%level [ $+ [ $2 ] ] == 1) notice $2 Hi $2 $+ , Do you know math? If you do,
  if (%level [ $+ [ $2 ] ] == 1) notice $2 Can you please tell me how much is %nnnone + %nnntwo = ?
  if (%level [ $+ [ $2 ] ] == 1) notice $2 Type !answer YourAnswer to answer me.
  if (%level [ $+ [ $2 ] ] == 1) set %answer [ $+ [ $2 ] ] $calc(%nnnone + %nnntwo)
  if (%level [ $+ [ $2 ] ] == 1) set %checky [ $+ [ $2 ] ] 1

  if (%level [ $+ [ $2 ] ] == 2) var %nnnone2 = $rand(100,900)
  if (%level [ $+ [ $2 ] ] == 2) var %nnntwo2 = $rand(100,900)
  if (%level [ $+ [ $2 ] ] == 2) notice $2 We are in - Level (2/5) Questions!
  if (%level [ $+ [ $2 ] ] == 2) notice $2 Can you please tell me how much is %nnnone2 - %nnntwo2 = ?
  if (%level [ $+ [ $2 ] ] == 2) notice $2 Type !answer YourAnswer to answer me.
  if (%level [ $+ [ $2 ] ] == 2) set %answer [ $+ [ $2 ] ] $calc(%nnnone2 - %nnntwo2)
  if (%level [ $+ [ $2 ] ] == 2) set %checky [ $+ [ $2 ] ] 1

  if (%level [ $+ [ $2 ] ] == 3) var %nnnone3 = $rand(5,15)
  if (%level [ $+ [ $2 ] ] == 3) var %nnntwo3 = $rand(5,15)
  if (%level [ $+ [ $2 ] ] == 3) notice $2 We are in - Level (3/5) Questions!
  if (%level [ $+ [ $2 ] ] == 3) notice $2 Can you please tell me how much is %nnnone2 $chr(42) %nnntwo2 = ?
  if (%level [ $+ [ $2 ] ] == 3) notice $2 Type !answer YourAnswer to answer me.
  if (%level [ $+ [ $2 ] ] == 3) set %answer [ $+ [ $2 ] ] $calc(%nnnone3 * %nnntwo3)
  if (%level [ $+ [ $2 ] ] == 3) set %checky [ $+ [ $2 ] ] 1
}

on *:TEXT:!answer *:#:{
  if ($2 == %answer [ $+ [ $nick ] ]) && (%checky [ $+ [ $nick ] ] != $null) notice $nick Thats right, Well done!
  if ($2 == %answer [ $+ [ $nick ] ]) && (%checky [ $+ [ $nick ] ] != $null) && (%level [ $+ [ $nick ] ] == 1) set %level [ $+ [ $nick ] ] 2
  if ($2 == %answer [ $+ [ $nick ] ]) && (%checky [ $+ [ $nick ] ] != $null) && (%level [ $+ [ $nick ] ] == 2) set %level [ $+ [ $nick ] ] 3
  if ($2 == %answer [ $+ [ $nick ] ]) && (%checky [ $+ [ $nick ] ] != $null) notice $nick From now, I will ask you harder questions!
  if ($2 != %answer [ $+ [ $nick ] ]) && (%checky [ $+ [ $nick ] ] != $null) notice $nick I'm sorry, But it's not right!
  if (%checky [ $+ [ $nick ] ] == $null) notice $nick I didn't ask you any question!
  unset %checky [ $+ [ $nick ] ]