Miscellany

on *:TEXT:!warn *:#:{
  if ((%warn. [ $+ [ $+($2,.,$chan) ] ] == $null) && ($3 != $null)) { /set %warn. [ $+ [ $+($2,.,$chan) ] ] 1 | /notice $2 You've been warned %warn. [ $+ [ $+($2,.,$chan) ] ] Times. $calc(3 - %warn. [ $+ [ $+($2,.,$chan) ] ] ) warnings left till ban. Reason: $3 | halt }
  if ((%warn. [ $+ [ $+($2,.,$chan) ] ] == $null) && ($3 == $null)) { /set %warn. [ $+ [ $+($2,.,$chan) ] ] 1 | /notice $2 You've been warned %warn. [ $+ [ $+($2,.,$chan) ] ] Times. $calc(3 - %warn. [ $+ [ $+($2,.,$chan) ] ] ) warnings left till ban. Reason: (undefined) | halt }
  if ((%warn. [ $+ [ $+($2,.,$chan) ] ] < 3) && ($3 != $null)) { /inc %warn. [ $+ [ $+($2,.,$chan) ] ] 1 | /notice $2 You've been warned %warn. [ $+ [ $+($2,.,$chan) ] ] Times. $calc(3 - %warn. [ $+ [ $+($2,.,$chan) ] ] ) warnings left till ban. Reason: $3 }
  if ((%warn. [ $+ [ $+($2,.,$chan) ] ] < 3) && ($3 == $null)) { /inc %warn. [ $+ [ $+($2,.,$chan) ] ] 1 | /notice $2 You've been warned %warn. [ $+ [ $+($2,.,$chan) ] ] Times. $calc(3 - %warn. [ $+ [ $+($2,.,$chan) ] ] ) warnings left till ban. Reason: (undefined) }
  if (%warn. [ $+ [ $+($2,.,$chan) ] ] >= 3) { /ban $chan $2 | /kick $chan $2 3 warnings your finished. | /notice $2 I wasn't joking... | unset %warn. [ $+ [ $+($2,.,$chan) ] ] }
}