Mine

on *:TEXT:!change *:#:{ 
  elseif ($2 == n) && (%pestscript [ $+ [ $chan ] ] == ON) && ($3 isnum 2-144) && ($nick !isreg $chan) {
    /inc %worldsets [ $+ [ $nick ] ] [ $+ [ $chan ] ] 1
    /msg $chan 14][2The Novice World for4 $chan 2has been changed to4 $2 2by4 $nick $+ 14][
    /set %pcworldn [ $+ [ $chan ] ] $2
    /set %pcsettern [ $+ [ $chan ] ] $nick 
    /set %waittime [ $+ [ $chan ] ] 90
    /set %antiflood 3
    /dec -c %antiflood 1
    /dec -c %waittime [ $+ [ $chan ] ] 1
    /timer6969 [ $+ [ $chan  ] ] 0 300 [ $+ [ $chan ] ] /msg $chan 14][2Pest Control World:4 %pcworld [ $+ [ $chan  ] ] $+ 14][ 14][2World Set By:7 %pcsetter [ $+ [ $chan ] ] $+ 14][
  }
  elseif ($2 == i) && (%pestscript [ $+ [ $chan ] ] == ON) && ($3 isnum 2-144) && ($nick !isreg $chan) {
    /inc %worldsets [ $+ [ $nick ] ] [ $+ [ $chan ] ] 1
    /msg $chan 14][2The Intermediate World for4 $chan 2has been changed to4 $2 2by4 $nick $+ 14][
    /set %pcworldi [ $+ [ $chan ] ] $2
    /set %pcsetteri [ $+ [ $chan ] ] $nick 
    /set %waittime [ $+ [ $chan ] ] 90
    /set %antiflood 3
    /dec -c %antiflood 1
    /dec -c %waittime [ $+ [ $chan ] ] 1
    /timer6969 [ $+ [ $chan  ] ] 0 300 [ $+ [ $chan ] ] /msg $chan 14][2Novice World:4 %pcworldn [ $+ [ $chan ] ] 7-4 %pcsettern [ $+ [ $chan ] ] $+ 14][ 14][2Intermediate World:4 %pcworldi [ $+ [ $chan ] ] 7-4 %pcsetteri [ $+ [ $chan ] ] $+ 14][ 14][2Veteran World:4 %pcworldv [ $+ [ $chan ] ] 7-4 %pcsetterv [ $+ [ $chan ] ] $+ 14][
  }
  elseif ($2 == v) && (%pestscript [ $+ [ $chan ] ] == ON) && ($3 isnum 2-144) && ($nick !isreg $chan) {
    /inc %worldsets [ $+ [ $nick ] ] [ $+ [ $chan ] ] 1
    /msg $chan 14][2The Verteran World for4 $chan 2has been changed to4 $2 2by4 $nick $+ 14][
    /set %pcworldi [ $+ [ $chan ] ] $2
    /set %pcsetteri [ $+ [ $chan ] ] $nick 
    /set %waittime [ $+ [ $chan ] ] 90
    /set %antiflood 3
    /dec -c %antiflood 1
    /dec -c %waittime [ $+ [ $chan ] ] 1
    /timer6969 [ $+ [ $chan  ] ] 0 300 [ $+ [ $chan ] ] /msg $chan 14][2Novice World:4 %pcworldn [ $+ [ $chan ] ] 7-4 %pcsettern [ $+ [ $chan ] ] $+ 14][ 14][2Intermediate World:4 %pcworldi [ $+ [ $chan ] ] 7-4 %pcsetteri [ $+ [ $chan ] ] $+ 14][ 14][2Veteran World:4 %pcworldv [ $+ [ $chan ] ] 7-4 %pcsetterv [ $+ [ $chan ] ] $+ 14][
  }
  elseif ($2 == a) && (%pestscript [ $+ [ $chan ] ] == ON) && ($3 isnum 2-144) && ($nick !isreg $chan) {
    /inc %worldsets [ $+ [ $nick ] ] [ $+ [ $chan ] ] 1
    /msg $chan 14][2All the Worlds for4 $chan 2has been changed to4 $2 2by4 $nick $+ 14][
    /set %pcworldn [ $+ [ $chan ] ] $2
    /set %pcsettern [ $+ [ $chan ] ] $nick 
    /set %pcworldi [ $+ [ $chan ] ] $2
    /set %pcsetteri [ $+ [ $chan ] ] $nick 
    /set %pcworldv [ $+ [ $chan ] ] $2
    /set %pcsetterv [ $+ [ $chan ] ] $nick 
    /set %waittime [ $+ [ $chan ] ] 90
    /set %antiflood 3
    /dec -c %antiflood 1
    /dec -c %waittime [ $+ [ $chan ] ] 1
    /timer6969 [ $+ [ $chan  ] ] 0 300 [ $+ [ $chan ] ] /msg $chan 14][2Novice World:4 %pcworldn [ $+ [ $chan ] ] 7-4 %pcsettern [ $+ [ $chan ] ] $+ 14][ 14][2Intermediate World:4 %pcworldi [ $+ [ $chan ] ] 7-4 %pcsetteri [ $+ [ $chan ] ] $+ 14][ 14][2Veteran World:4 %pcworldv [ $+ [ $chan ] ] 7-4 %pcsetterv [ $+ [ $chan ] ] $+ 14][
  }
}

on *:TEXT:!pest on*:#:{
  if (%antiflood > 0) {
    /halt
  }
  elseif (* $chan * iswm %restrictedchans) {
    /halt
  }
  elseif ($nick !isreg $chan) && ($nick !isvoice $chan) && (%pestscript [ $+ [ $chan ] ] != cancel) {
    /msg $chan 14][2Pest Control Commands have been turned on for4 $chan $+ 14][
    /set %pestscript [ $+ [ $chan ] ] ON
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick isvoice $chan) || ($nick isreg $chan) {
    /notice $nick 14][2You must be atleast Half-Op to use this command14][ 
    /set %antiflood 3
    /dec -c %antiflood 1    
  }
}

on *:TEXT:!pest off*:#:{
  if (%antiflood > 0) {
    /halt
  }
  elseif ($nick !isreg $chan) && ($nick !isvoice $chan) {
    /msg $chan 14][2Pest Control Commands have been turned off for4 $chan $+ 14][
    /set %pestscript [ $+ [ $chan ] ] OFF
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick isvoice $chan) || ($nick isreg $chan) {
    /notice $nick 14][2You must be atleast Half-Op to use this command14][ 
    /set %antiflood 3
    /dec -c %antiflood 1 
  }
}

on $*:TEXT:/^!(pcw|world|pc|w)/Si:#:{
  if (%antiflood > 0) {
    /halt
  }
  elseif ($chan == #PCPlace) || ($chan == #IRCHelp) {
    /halt
  }
  elseif (%pestscript [ $+ [ $chan ] ] != on) {
    /HALT
  }
  elseif (%pestscript [ $+ [ $chan ] ] == ON) {
    /inc %pcsays 1
    /set %antiflood 3
    /dec -c %antiflood 1
    /notice $nick 14][2Novice World:4 %pcworldn [ $+ [ $chan ] ] 7-4 %pcsettern [ $+ [ $chan ] ] $+ 14][ 14][2Intermediate World:4 %pcworldi [ $+ [ $chan ] ] 7-4 %pcsetteri [ $+ [ $chan ] ] $+ 14][ 14][2Veteran World:4 %pcworldv [ $+ [ $chan ] ] 7-4 %pcsetterv [ $+ [ $chan ] ] $+ 14][ 3-6 %pcsays 3-
  }
}

on $*:TEXT:@pcw:#:{
  if (%antiflood > 0) {
    /halt
  }
  elseif (%pestscript [ $+ [ $chan ] ] == OFF) {
    /HALT
  }
  elseif (!%pcworld [ $+ [ $chan ] ]) {
    /notice $nick 14][2There is no world set for4 $chan $+ 14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif (%pestscript [ $+ [ $chan ] ] == ON) && ($nick !isreg $chan) {
    /inc %pcsays 1
    /set %antiflood 3
    /dec -c %antiflood 1
    /msg $chan 14][2Novice World:4 %pcworldn [ $+ [ $chan ] ] 7-4 %pcsettern [ $+ [ $chan ] ] $+ 14][ 14][2Intermediate World:4 %pcworldi [ $+ [ $chan ] ] 7-4 %pcsetteri [ $+ [ $chan ] ] $+ 14][ 14][2Veteran World:4 %pcworldv [ $+ [ $chan ] ] 7-4 %pcsetterv [ $+ [ $chan ] ] $+ 14][ 3-6 %pcsays 3-
  }
}

on *:TEXT:!suggest*:#: {
  if (%antiflood > 0) {
    /halt
  }
  elseif (%pestscript [ $+ [ $chan ] ] == OFF) { 
    /HALT
  }
  elseif ($2 == %pcworld [ $+ [ $chan ] ]) && (%pestscript [ $+ [ $chan ] ] == on) {
    /notice $nick 14][2That world has already been set14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif (%pestscript [ $+ [ $chan ] ] == on) && ($2 == %suggested [ $+ [ $chan ] ]) {
    /notice $nick 14][2That world has already been suggested14][
    /dec %worldsuggests [ $+ [ $nick ] ] [ $+ [ $chan ] ] 1
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif (*suggestn* iswm $1) && (%pestscript [ $+ [ $chan ] ] == on) && ($2 != %pcworld [ $+ [ $chan ] ]) && ($2 != %suggested [ $+ [ $chan ] ]) && ($2 isnum 1-144) && ($chan == #WildPC) {
    /notice $nick 14][2That world is being considered by staff14][
    /inc %worldsuggests [ $+ [ $nick ] ] [ $+ [ $chan ] ] 1
    /msg #PCZoneS 14][2The Novice World4 $2 2was suggested by7 $nick $+ 14][
    /set %suggestedn [ $+ [ $chan ] ] $2
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif (*suggesti* iswm $1) && (%pestscript [ $+ [ $chan ] ] == on) && ($2 != %pcworld [ $+ [ $chan ] ]) && ($2 != %suggested [ $+ [ $chan ] ]) && ($2 isnum 1-144) && ($chan == #WildPC) {
    /notice $nick 14][2That world is being considered by staff14][
    /inc %worldsuggests [ $+ [ $nick ] ] [ $+ [ $chan ] ] 1
    /msg #PCZoneS 14][2The Intermediate World4 $2 2was suggested by7 $nick $+ 14][
    /set %suggestedi [ $+ [ $chan ] ] $2
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif (*suggestv* iswm $1) && (%pestscript [ $+ [ $chan ] ] == on) && ($2 != %pcworld [ $+ [ $chan ] ]) && ($2 != %suggested [ $+ [ $chan ] ]) && ($2 isnum 1-144) && ($chan == #WildPC) {
    /notice $nick 14][2That world is being considered by staff14][
    /inc %worldsuggests [ $+ [ $nick ] ] [ $+ [ $chan ] ] 1
    /msg #WildPC.Staff 14][2The Veteran World4 $2 2was suggested by7 $nick $+ 14][
    /set %suggestedv [ $+ [ $chan ] ] $2
    /set %antiflood 3
    /dec -c %antiflood 1
  }
}

on *:TEXT:!mute*:#:{
  if (%antiflood > 0) {
    /halt
  }
  elseif ($address($nick,4) == $address($me,4)) {
    /ban -u $+ $calc(60*$3) $chan ~q: $+ $address($2,3)
    /msg $chan 14][2 $+ $2 has been muted for4 $3 2minutes because7 $4- $+ 14][ 3-6 %mutes 3-
    /inc %mutes 1
    /cs devoice $chan $nick
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick !isreg $chan) && ($3 <= 10) && ($4- != $null) && ($2 isreg $chan) {
    /ban -u $+ $calc(60*$3) $chan ~q: $+ $address($2,3)
    /msg $chan 14][2 $+ $2 has been muted for4 $3 2minutes because7 $4- $+ 14][ 3-6 %mutes 3-
    /inc %mutes 1
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick !isreg $chan) && ($3 <= 10) && ($4- == $null) {
    /notice $nick 14][2Please add a reason to the mute14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick !isreg $chan) && ($3 > 10) && ($4- != $null) {
    /notice $nick 14][2Please reduce the time to be 10 minutes or less14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick !isreg $chan) && ($3 > 10) && ($4- == $null) {
    /notice $nick 14][2Please reduce the time to be 10 minutes or less and add a reason14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($2 !isreg $chan) {
    /notice $nick 14][2ERROR - Either the user is staff or not in the channel14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
}

on *:TEXT:!tb*:#:{
  if (%antiflood > 0) {
    /halt
  }
  elseif ($nick !isreg $chan) && ($3 <= 10) && ($4- != $null) && ($2 isreg $chan) && (%TBVoice == on) && ($nick !isreg $chan) {
    /ban -ku $+ $calc(60*$3) $chan $2 3 14][2You have been Time-Banned for4 $3 2minutes because7 $4- $+ 14][ 3-6 %mutes 3-
    /inc %mutes 1
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($address($nick,4) == $address($me,4)) {
    /ban -ku $+ $calc(60*$3) $chan $2 3 14][2You have been Time-Banned for4 $3 2minutes because7 $4- $+ 14][ 3-6 %mutes 3-
    /inc %mutes 1
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($3 <= 10) && ($4- != $null) && ($2 isreg $chan) && ($nick !isvoice $chan) && ($nick !isreg $chan) {
    /ban -ku $+ $calc(60*$3) $chan $2 3 14][2You have been Time-Banned for4 $3 2minutes because7 $4- $+ 14][ 3-6 %mutes 3-
    /inc %mutes 1
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick !isreg $chan) && ($3 <= 10) && ($4- == $null) {
    /notice $nick 14][2Please add a reason to the mute14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick !isreg $chan) && ($3 > 10) && ($4- != $null) {
    /notice $nick 14][2Please reduce the time to be 10 minutes or less14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick !isreg $chan) && ($3 > 10) && ($4- == $null) {
    /notice $nick 14][2Please reduce the time to be 10 minutes or less and add a reason14][ 
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($2 !isreg $chan) {
    /notice $nick 14][2ERROR - Either the user is staff or not in the channel14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick isvoice $chan) || ($nick isreg $chan) {
    /notice $nick 14][2You must be Half-Op+ to use this command14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
}

on *:TEXT:!k *:#:{
  if (%antiflood > 0) {
    /halt
  }
  elseif ($nick !isreg $chan) && ($2 isreg $chan) {
    /cs kick $chan $2 14][2You have been kicked by4 $nick 2because7 $3- $+ 14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick isvoice $chan) {
    /cs kick $chan $nick 14][2Voices cannot use this command14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
}

on *:TEXT:!cban*:#:{
  if (%antiflood > 0) {
    /halt
  }
  elseif ($nick isreg $chan) || ($nick isvoice $chan) {
    /msg $chan 14][2Access Denied14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
  elseif ($nick !isreg $chan) && ($nick !isvoice $chan) {
    /mode $chan +b ~c: $+ $2
    /msg $chan 14][2Now CBanning4 $2 $+ 14][ 14][2Banned by:7 $nick $+ 14][
    /set %antiflood 3
    /dec -c %antiflood 1
  }
}