on *:TEXT:!online1*:#:{
  if ($nick ishop $chan) || ($nick isop $chan) {
    set %pcwonline1 $nick
  }
}

on *:TEXT:!online2*:#:{
  if ($nick ishop $chan) || ($nick isop $chan) {
    set %pcwonline2 $nick
  }
}

on *:TEXT:!online3*:#:{
  if ($nick ishop $chan) || ($nick isop $chan) {
    set %pcwonline3 $nick
  }
}

on *:TEXT:!setpcw*:#:{
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($2 isnum 1-140) {
      set %pcw $2
      set %pcwnick $nick
      set %pcwtime $ctime
      msg $chan 15[7«15 PCW Updated, type !pcw to view 7»15] [7»15 By: %pcwnick 7»15]
    }
  }
}

on *:TEXT:!suggest*:#:{
  if ($2 isnum 1-140) {
    set %pcwsuggest World: $2 Discription: $3-
    notice $nick Thanks for the suggestion an operator is now reading the suggestion.
    msg %online1 %pcwsuggest
    msg %online2 %pcwsuggest
    msg %online3 %pcwsuggest
  }
}


on *:TEXT:!pcw*:#:{
  if ($nick isvoice $chan) || ($nick ishop $chan) || ($nick isop $chan) {
    notice $nick 15[7«15 Current world: %pcw 7»15] [7»15 By: %pcwnick 7»15] [7«15 Set $duration($calc($ctime - %pcwtime)) ago. 7»15]
  }
  else {
    notice $nick Voice+ users may only use this command.
  }
}