on *:text:!pk on:#:{
  if ($nick isop $chan) || ($nick ishop $chan) {
    if (%pcw. [ $+ [ $chan ] ] == $null) {
      set %pkw. [ $+ [ $chan ] ] on
      set %checker. [ $+ [ $chan ] ] on
      msg $chan 11 My !PKW World script for2 $chan 11is now: on.
    }
    else notice $nick it is already on.
  }
  else notice $nick you need to be op or hop to use this.
}
on *:text:!pk off:#:{
  if ($nick isop $chan) || ($nick ishop $chan) {
    if (%pcw. [ $+ [ $chan ] ] != $null) {
      unset %pkw. [ $+ [ $chan ] ]
      set %checker. [ $+ [ $chan ] ] off
      msg $chan 11My !PKW script for2 $chan 11is now: off.
    }
    else notice $nick it is already off.
  }
  else notice $nick you need to be op or hop to use this.
}
#pkw on
on *:TEXT:!setmpc*:#:{
  if ( $nick isop $chan ) || ( $nick ishop $chan ) {
    if ($2 > 144) {
      notice $nick The Maximum World Is 144, Input a smaller Number.
      halt
    }
    elseif ($2 < 145) {
      msg $chan 9,1 The PeeKay world has changed to %mpkw [ $+ [ $chan ] ] !
    }
    set %mpkw [ $+ [ $chan ] ] $2-
  }
}
on *:TEXT:!set4pk*:#:{
  if ( $nick isop $chan ) || ( $nick ishop $chan ) {
    if ($2 > 144) {
      notice $nick The Maximum World Is 144, Input a smaller Number.
      halt
    }
    elseif ($2 < 145) {
      msg $chan 9,1 The 40+ PC world has changed to %4pcw [ $+ [ $chan ] ] !
    }
    set %4pcw [ $+ [ $chan ] ] $2-
  }
}

on *:TEXT:!set7pc*:#:{
  if ( $nick isop $chan ) || ( $nick ishop $chan ) {
    if ($2 > 144) {
      notice $nick The Maximum World Is 144, Input a smaller Number.
      halt
    }
    elseif ($2 < 145) {
      msg $chan 9,1 The 70+ PC world has changed to %7pcw [ $+ [ $chan ] ] !
    }
    set %7pcw [ $+ [ $chan ] ] $2-
  }
}

on *:TEXT:!set1pc*:#:{
  if ( $nick isop $chan ) || ( $nick ishop $chan ) {
    if ($2 > 144) {
      notice $nick The Maximum World Is 144, Input a smaller Number.
      halt
    }
    elseif ($2 < 145) {
      msg $chan 9,1 The 100+ PC world has changed to %1pcw [ $+ [ $chan ] ] !
    }
    set %1pcw [ $+ [ $chan ] ] $2-
  }
}
on *:TEXT:!pcw:#:{
  if (%pcw [ $+ [ $chan ] ] != $null) {
    notice $nick 4,1 ¯`°²º¤æ=¬«.,¸_ 9,1The main PKW is %mpcw [ $+ [ $chan ] ] . The 40+ PCW is %4pcw [ $+ [ $chan ] ] . The 70+ PCW is %7pcw [ $+ [ $chan ] ] . The 100+ PCW is %1pcw [ $+ [ $chan ] ] . 4,1_¸,.»¬=椺²°`¯
  }
}
on *:TEXT:!world:#:{
  if (%pcw [ $+ [ $chan ] ] != $null) {
    notice $nick 4,1 ¯`°²º¤æ=¬«.,¸_ 9,1The main PKW is %mpcw [ $+ [ $chan ] ] . The 40+ PCW is %4pcw [ $+ [ $chan ] ] . The 70+ PCW is %7pcw [ $+ [ $chan ] ] . The 100+ PCW is %1pcw [ $+ [ $chan ] ] . 4,1_¸,.»¬=椺²°`¯
  }
}
on *:TEXT:@pcw:#:{ 
  if (%pcw [ $+ [ $chan ] ] != $null) {
    msg $chan 4,1 ¯`°²º¤æ=¬«.,¸_ 9,1The main PKW is %mpcw [ $+ [ $chan ] ] . The 40+ PCW is %4pcw [ $+ [ $chan ] ] . The 70+ PCW is %7pcw [ $+ [ $chan ] ] . The 100+ PCW is %1pcw [ $+ [ $chan ] ] . 4,1_¸,.»¬=椺²°`¯
  }
}
on *:TEXT:@world:#:{ 
  if (%pcw [ $+ [ $chan ] ] != $null) {
    msg $chan 4,1 ¯`°²º¤æ=¬«.,¸_ 9,1The main PKW is %mpcw [ $+ [ $chan ] ] . The 40+ PCW is %4pcw [ $+ [ $chan ] ] . The 70+ PCW is %7pcw [ $+ [ $chan ] ] . The 100+ PCW is %1pcw [ $+ [ $chan ] ] . 4,1_¸,.»¬=椺²°`¯
  }