on *:TEXT:!pcc*:#PC,#PCStaff:{ if ($nick isreg $chan) { halt } msg $nick !pc on/off msg $nick !setnov For The Novice (40+) World msg $nick !setint For The Intermediate (70+) World msg $nick !setvet For The Vetran (100+) World msg $nick /ctcp $me World to msg #pc the PCW } on *:TEXT:!pc on:#: { if ($nick isop $chan) || ($nick ishop $chan) || ($nick == Morbid) { if (%pcon == off) { set %pcon on set %nov N/A set %int N/A set %vet N/A notice $nick 14Pest Control Scripts are now3 Enabled 14for7 $chan $+ 14. } else { notice $nick 14Pest Control Scripts are already 3on 14for7 $chan $+ 14. } } } on *:TEXT:!pc off:#: { if ($nick isop $chan) || ($nick ishop $chan) || ($nick == Morbid) { if (%pcon == on) { set %pcon off notice $nick 14Pest Control Scripts are now4 Disabled 14for7 $chan $+ 14. } else { notice $nick 14Pest Control Scripts are already 4off 14for7 $chan $+ 14. } } } on $*:TEXT:/^[!.](pcw|world)/Si:#:{ if (%pcon == on) { notice $nick 7[«» 14Official World - 0788 «»] 7[«» 2Novice (40+) - %nov 7«»] 7[«» Intermediate (70+) - %int «»] 7[7«» 4Veteran (100+) - %vet 7«»] } } on *:TEXT:!setnov *:#: { if ($nick !isreg $chan) { if ($2 == %nov ) { notice $nick 14Your setting a world that is already set! } else { if (%pcon == on) { set %nov $2 msg #PC 14The 2Novice (40+)14 world has ben set to02 %nov $+ 14. } } } } on *:TEXT:!setint *:#: { if ($nick !isreg $chan) { if (%int == $2) { notice $nick 14Your setting a world that is already set! } else { if (%pcon == on) { set %int $2 msg #PC 14The 7Intermediate (70+)14 world has ben set to07 %int $+ 14. } } } } on *:TEXT:!setvet *:#: { if ($nick !isreg $chan) { if (%vet == $2) { notice $nick 14Your setting a world that is already set! } else { if (%pcon == on) { set %vet $2 msg #PC 14The 4Vetran (100+)14 world has ben set to04 %vet $+ 14. } } } } on $*:TEXT:/^[!](suggest?(40|70|100)+)/Si:#:{ if (!$2) || ($2 !isnum 2-144) { halt } if (40 isin $1) msg #pcstaff 7 $nick 14Suggested2 $2 14for the 2Novice (40+) 14World if (70 isin $1) msg #pcstaff 7 $nick Suggested7 $2 14for the 7Intermediate (70+) 14World if (100 isin $1) msg #pcstaff 7 $nick 14Suggested4 $2 14for the 4Vetran (100+) 14World } on $*:TEXT:/^[!](suggest) ((40|70|100)+)/Si:#:{ if (!$3) || ($3 !isnum 2-144) { halt } if (40 isin $2) msg #pcstaff 7 $nick 14Suggested2 $3 14for the 2Novice (40+) 14World if (70 isin $2) msg #pcstaff 7 $nick 14Suggested7 $3 14for the 7Intermediate (70+) 14World if (100 isin $2) msg #pcstaff 7 $nick 14Suggested4 $3 14for the 4Vetran (100+) 14World } ctcp *:WORLD:*: { if ($nick isreg $chan) || (%pcon == off) { halt } msg #PC 7[«» 14Official World - 0788 «»] 7[«» 2Novice (40+) - %nov 7«»] 7[«» 7Intermediate (70+) - %int «»7] 7[7«» 4Veteran (100+) - %vet 7«»] }