on *:text:!change*:#:{ if (%pestcontrol == on) {
if ($nick isvoice #) notice $nick You cannot change the world!
if ($nick isreg #) notice $nick You cannot change the world!
if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-138) set %oldpc %pcworld
if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-138) set %pctime $ctime
if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-138) set %pcnick $nick
if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-138) set %pcworld $2
if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-138) msg $chan 11,1|'|'|'|'|'|PC World is changed to 4 %pcworld 11 by 4 %pcnick 11 |'|'|'|'|'|
if ($nick isop $chan) || ($nick ishop $chan) && ($2 > 139) notice $nick Error! The PC World must be lower than 139!
}
}
on *:text:!setpcw*:#:{ if (%pestcontrol == on) {
if ($nick isvoice #) notice $nick You cannot change the world!
if ($nick isreg #) notice $nick You cannot change the world!
if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-138) set %oldpc %pcworld
if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-138) set %pctime $ctime
if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-138) set %pcnick $nick
if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-138) set %pcworld $2
if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-138) msg $chan 11,1|'|'|'|'|'|PC World is changed to 4 %pcworld 11 by 4 %pcnick 11 |'|'|'|'|'|
if ($nick isop $chan) || ($nick ishop $chan) && ($2 > 139) notice $nick Error! The PC World must be lower than 139!
}
}
on *:TEXT:!world:#:{ if (%pestcontrol == on) {
notice $nick 11,1 Current PC World: 4 %pcworld 11 --Last Update: 4 $+($duration($calc($ctime - %pctime)),) 11 ago , the last world was 4 %oldpc
notice $nick 11,1 This world was set by: 4 %pcnick
}
}
on *:TEXT:@world:#:{ if (%pestcontrol == on) {
if ($nick isop #) msg $chan 11,1 Current PC World: 4 %pcworld 11 --Last Update: 4 $+($duration($calc($ctime - %pctime)),) 11 ago , the last world was 4 %oldpc
if ($nick isop #) msg $chan 11,1 This world was set by: 4 %pcnick
}
}
on *:TEXT:!pcw:#:{ if (%pestcontrol == on) {
notice $nick 11,1 Current PC World: 4 %pcworld 11 --Last Update: 4 $+($duration($calc($ctime - %pctime)),) 11 ago , the last world was 4 %oldpc
notice $nick 11,1 This world was set by: 4 %pcnick
}
}
on *:text:!mutelock*:#:{
if ($nick isop #) set %mutelock on
if ($nick isop #) mode $chan +m
msg $chan 11,1 mutelock is now 4 on 11 this means the channel will be muted untill somebody uses !mlockoff
}
on *:text:!mlockoff*:#:{ if (%pestcontrol == on)
if ($nick isop $chan) set %mutelock off
if ($nick isop $chan) mode $chan -m
}
on *:RAWMODE:#:{ if (-m isin $1) && (%mutelock == on) {
mode $chan +m $2-
/notice $nick 11,1 mutelock is currently on if u want mode -m off do 4 !mlockoff
}
}
on *:text:!blockpc*:#:{ if ($address($nick,2) == $address($me,2)) || (nick isop $chan) {
set %pestcontrol off
msg $chan 11,1 pestcontrol is now 4 off 11 ( i wont tell pc world )
}
}
on *:text:!enablepc*:#:{ if ($address($nick,2) == $address($me,2)) || (nick isop $chan) {
set %pestcontrol on
msg $chan 11,1 pestcontrol is now 4 on 11 ( i will tell worlds now )
}
}