Mine

on *:TEXT:!setworld*:#:{
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick isreg $chan) {
    set %pcw40 $2
    set %pcw70 $3
    set %pcw100 $4
    /msg $chan 14The new worlds for $chan are 10 40+ %pcw40 4 70+ %pcw70 7 100+ %pcw100
  }
  else {
    /notice $nick Access Denied
  }
}
on *:TEXT:!pcw:#:{
  /notice $nick The worlds for $chan are:
  /notice $nick The 40+ world is: %pcw40
  /notice $nick The 70+ world is: %pcw70
  /notice $nick The 100+ world is: %pcw100
}
on *:TEXT:!suggest*:#:{
  set %timeset $time
  set %suggest40 $2
  set %suggest70 $3
  set %suggest100 $4
  /ms send $chan 40+ 70+ 100+ %pcw40 %pcw70 %pcw100 Set at %timeset $+ !  /msg $chan There is a new suggested world! Type !view to see them!
  /ignore -u60 $nick
}
on *:TEXT:!view:#PC:{
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick isreg $chan) {
    /notice $nick The suggested worlds are:
    /notice $nick 40+ -  %suggest40
    /notice $nick 70+ - %suggest70
    /notice $nick 100+ - %suggest100
  }
  else {
    /notice $nick Access Denied
  }
}
alias pcw {
  /timer 0 120 msg $chan The PestControl Worlds are: 40+ - %pcw40 || 70+ - %pcw70 || 100+ - %pcw100
}