Miscellany

on *:TEXT:!warn *:#:{
  if (( $nick isop $chan ) || ( $nick ishop $chan )) && ( $2 ison $chan ) {
    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 | /notice $nick You have just warned $2 $+ , this is his\her Warning Number: %warn. [ $+ [ $+($2,.,$chan) ] ] | 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) | /notice $nick You have just warned $2 $+ , this is his\her Warning Number: %warn. [ $+ [ $+($2,.,$chan) ] ] | 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 | /notice $nick You have just warned $2 $+ , this is his\her Warning Number: %warn. [ $+ [ $+( $2,.,$chan) ] ] }
    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) | /notice $nick You have just warned $2 $+ , this is his\her Warning Number: %warn. [ $+ [ $+( $2,.,$chan) ] ] }
    if (%warn. [ $+ [ $+( $2,.,$chan) ] ] >= 3) { /ban $chan $2 | / $chan $2 3 warnings your finished. | /notice $2 I wasn't joking... | You have just banned $2 because he\she has been warned 3 times. | unset %warn. [ $+ [ $+( $2,.,$chan) ] ] }
  }
}

on $*:TEXT:!count:#: { 
  notice $nick There are: [ $nick($chan,0) ] people on $chan !
}