on *:TEXT:!ivoiceoff*:#:{ if ($nick == zWill88) {
msg $chan 4Pest Off
set %pestscript OFF } }
on *:TEXT:!ivoiceon*:#:{ if ($nick == zWill88) {
msg $chan 4Pest On
set %pestscript ON } }
on *:TEXT:!change*:#aspc:{ if (%pestscript == OFF) { HALT }
if (%pestscript == ON) && ($2 isnum 1-138) && ($nick isop #aspc) || ($nick ishop #aspc) {
msg #aspc 4New PCW1 - !pcw to view
set %settime $ctime
set %pcworld $2
set %pcsetter $nick } }
on *:TEXT:!change*:#Peststaff:{ if (%pestscript == OFF) { HALT }
if (%pestscript == ON) && ($2 isnum 1-138) && ($nick isop #aspc) || ($nick ishop #aspc) {
msg #aspc 4New PCW1 - !pcw to view
set %settime $ctime
set %pcworld $2
set %pcsetter $nick } }
on *:TEXT:!pcw*:#aspc:{ if (%pestscript == OFF) { HALT }
elseif (%pestscript == ON) {
notice $nick 7World:2 %pcworld 7 World for:2 $duration($calc($ctime - %settime)) 14World set by:2 %pcsetter 4scripted by [-God-] } }
on *:TEXT:!pcw*:#Peststaff:{ if (%pestscript == OFF) { HALT }
elseif (%pestscript == ON) {
notice $nick 7World:2 %pcworld 7 World for:2 $duration($calc($ctime - %settime)) 14World set by:2 %pcsetter } }
on *:TEXT:!suggest*:#aspc:{ if ($2 !isnum 2-138) { halt }
elseif (%suggestedw) { notice $nick There is already a suggested world }
elseif ($2 isnum 2-138) && (!%suggestedw) {
msg #Peststaff 4 $nick has suggested world: $2 Type !checking !accept <worldhere> or !decline <worldhere>
notice [-God-] $nick suggested world: $2
notice zWill88 $nick suggested world: $2
set %suggestedw $2
set %suggester $nick
}
}
on *:TEXT:!decline*:#Peststaff:{ if ($2 !isnum 2-138) { halt }
elseif (!$2) {
msg #Peststaff Use !decline <worldhere> }
elseif ($2 isnum 2-138) && ($nick isop #aspc) || ($nick ishop #aspc) {
msg #aspc 4World %suggestedw was DECLINED..
unset %suggestedw
unset %suggester
}
}
on *:TEXT:!accept*:#Peststaff:{ if ($2 !isnum 2-138) { halt }
if (!$2) {
msg #Peststaff Use accept <worldhere> }
if ($2 isnum 2-138) && ($nick isop #aspc) || ($nick ishop #aspc) {
msg #aspc World %suggestedw was suggested by %suggester . It has been accepted
msg #aspc 4New PCW1 - !pcw to view
unset %suggestedw
unset %suggester
set %settime $ctime
set %pcworld $2
set %pcsetter $nick
msg #peststaff 4World changed to %pcworld
}
}
on *:TEXT:!checking*:#peststaff:{ if ($nick isop #aspc) || ($nick ishop #aspc) {
msg #aspc 4Suggested1 world is being checked
}
}
on *:TEXT:!setworld*:#Peststaff:{ if (%pestscript == OFF) { HALT }
elseif (%pestscript == ON) && ($nick isop #aspc) || ($nick ishop #aspc) {
notice $nick use !change please }
}
on *:TEXT:!new*:#Peststaff:{ if ($nick isop #aspc) || ($nick ishop #aspc) {
msg #aspc 1Fed up with the 4world?1 Suggest a new world by typing !suggest <worldhere>
}
}