Stuff

on *:text:!change*:#: { 
  if (($nick isop $chan || $nick ishop $chan) && ($2 isnum 2-140)) {
    set %lastworld %world
    set %world $2
    set %pcnick $nick
    set %suggest $null 
    set %timeset. $ctime
    set %sugnick. == $null
    msg $chan 4,0 $nick 2,0 has updated the 4,0Pest-Control 2,0world.
    msg $chan 2,0 Type 4,0!pcw 2,0or 4,0!world 2,0to see it.
  } 
  else { 
    notice $nick 2,0 $nick , $2 is an invalid world.  
  } 
}
} 
on *:text:!setworld*:#: { 
  if (($nick isop $chan || $nick ishop $chan) && ($2 isnum 2-140)) {
    set %lworld %world
    set %world $2
    set %pcnick $nick
    set %suggest $null
    set %timeset. $ctime
    set %stimeset. == $null
    set %sugnick. == $null
    msg $chan 4,0 $nick 2,0 has updated the 4,0Pest-Control 2,0world.
    msg $chan 2,0 Type 4,0!pcw 2,0or 4,0!world 2,0to see it.
  } 
  else { 
    notice $nick 2,0 $nick , $2 is an invalid world.  
  } 
}
} 
on *:text:!setpcw*:#: { 
  if (($nick isop $chan || $nick ishop $chan) && ($2 isnum 2-140)) {
    set %lworld %world
    set %world $2
    set %pcnick $nick
    set %suggest $null 
    set %timeset. $ctime
    set %stimeset. == $null
    set %sugnick. == $null
    msg $chan 4,0 $nick 2,0 has updated the 4,0Pest-Control 2,0world.
    msg $chan 2,0 Type 4,0!pcw 2,0or 4,0!world 2,0to see it.
  } 
  else { 
    notice $nick 2,0 $nick , $2 is an invalid world.  
  } 
}
} 
on *:text:!world*:#: { 
  notice $nick 7,0[4,0«7,0]1,0§7,0[ 4,0World :2,0 %world 7,0]1,0§7,0[4,0 Set by:2,0 %pcnick 7,0]1,0§7,0[2,0 $duration($calc( $ctime - %timeset. )) 4,0ago ] %suggest 7,0]1,0§7,0[4,0 Last World:2,0 %lworld 7,0]1,0§7,0[4,0»7,0] 
} 
on *:text:!pcw*:#: { 
    notice $nick 7,0[4,0«7,0]1,0§7,0[ 4,0World :2,0 %world 7,0]1,0§7,0[4,0 Set by:2,0 %pcnick 7,0]1,0§7,0[2,0 $duration($calc( $ctime - %timeset. )) 4,0ago ] %suggest 7,0]1,0§7,0[4,0 Last World:2,0 %lworld 7,0]1,0§7,0[4,0»7,0]
} 
on *:text:!pest*:#: { 
  notice $nick 7,0[4,0«7,0]1,0§7,0[ 4,0World :2,0 %world 7,0]1,0§7,0[4,0 Set by:2,0 %pcnick 7,0]1,0§7,0[2,0 $duration($calc( $ctime - %timeset. )) 4,0ago ] %suggest 7,0]1,0§7,0[4,0 Last World:2,0 %lworld 7,0]1,0§7,0[4,0»7,0]
} 
on *:text:!suggest*:#: { 
    if ($2 isnum 2-140) {
    set %suggest 7,0]1,0§7,0[2,0 $nick 4,0suggested2,0 $2 
    notice $nick 2,0You have suggested the world4,0 $2 2,0.Dont abuse this command or you will find yourself banned from4,0 $chan .
    }
    else {
    notice $nick 2,0 Oi Noobo, suggest a propper world.
}
}  
on *:text:!wsuggest*:#: { 
    if ($2 isnum 2-140) {
    set %suggest 7,0]1,0§7,0[2,0 $nick 4,0suggested2,0 $2 
    notice $nick 2,0You have suggested the world4,0 $2 2,0.Dont abuse this command or you will find yourself banned from4,0 $chan .
    }
    else {
    notice $nick 2,0 Oi Noobo, suggest a propper world.
}