Something

ON $*:TEXT:/[!@.](PC|Pest|World|PCW)off/Si:#:{
  if ($readini(PCW.ini,$chan,Status) == OFF) {
    notice $nick %output.error 10You cant turn soemthing off that is not on.
    halt
  }
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    remini PCW.ini $chan
    writeini PCW.ini $chan Status OFF
    msg $chan %output.pcw 10The PestControl services have been halted by14 $nick 
    halt
  }
  else {
    notice $nick %output.error 10You must be Halfop Plus to use this command.
  }
}
ON $*:TEXT:/[!@.](PC|Pest|World|PCW)On/Si:#:{
  if (($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) && ($readini(PCW.ini,$chan,Status) == OFF)) {
    remini PCW.ini $chan
    msg $chan %output.pcw 10The PestControl services have been continued by14 $nick 
    halt
  }
  if ($readini(PCW.ini,$chan,Status) != OFF) {
    notice $nick %output.error 10You cant turn ON whats not off.
    halt
  }
  else {
    notice $nick %output.error 10You must be 14Halfop10 Plus to use this command.
  }
}
ON $*:TEXT:/[!@.](SetPCW|setWorld)/Si:#:{
  if ($readini(PCW.ini,$chan,Status) == OFF) { halt }
  if ($3 != $null) { halt }
  if (!$2) {
    notice $nick %output.error 14Error:10 $1 <World> 
    halt
  }
  if (($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) && ($2 isnum 2-138)) {
    writeini PCW.ini $chan World $2
    writeini PCW.ini $chan Nick $nick
    writeini PCW.ini $chan Time $CTime
    notice $chan 10 NEW PCW!!
    notice $chan 10 NEW PCW!!
    notice $chan 10 NEW PCW!!
    notice $chan 10 NEW PCW!!
    notice $chan 10 NEW PCW!!
    msg $chan %output.pcw 10The PestControl world has been changed by14 $nick 
    halt
  }
  if ($nick isvoice $chan || $nick isreg $chan) {
    notice $nick %output.error 10You must be Halfop Plus to use this command.
    halt
  }
  if ($2 >= 139) {
    notice $nick %output.error 10The world must be Between14 210 and14 138
    halt
  }
  else {
    notice $nick %output.error 10A PestControl world must be a number.

  }
}
ON $*:TEXT:/[!@.](SetSecondary|ChangeSecondary|SetWorld2|SetPCW2|Set2)/Si:#:{
  if ($readini(PCW.ini,$chan,Status) == OFF) { halt }
  if ($3 != $null) { halt }
  if (!$2) {
    notice $nick %output.error 14Error:10 $1 <World> 
    halt
  }
  if (($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) && ($2 isnum 2-138)) {
    writeini PCW.ini $chan Secondary $2
    notice $chan 10 NEW SECONDARY PC WORLD!!
    notice $chan 10 NEW SECONDARY PC WORLD!!
    msg $chan %output.pcw 10The PestControl world has been changed by14 $nick 
    halt
  }
  if ($nick isvoice $chan || $nick isreg $chan) {
    notice $nick %output.error 10You must be Halfop Plus to use this command.
    halt
  }
  if ($2 >= 139) {
    notice $nick %output.error 10The world must be Between14 210 and14 138
    halt
  }
  else {
    notice $nick %output.error 10A PestControl world must be a number.

  }
}
ON $*:TEXT:/[!@.](PCW|World|PestWorld)/Si:#:{
  if (OFF isin $1 || ON isin $1) { halt }
  if ($readini(PCW.ini,$chan,Status) == OFF) { halt }
  if ($readini(PCW.ini,$chan,World) == $null) {
    notice $nick %output.error 10There is no set world.
    halt
  }
  if ($nick !isreg $chan) {
    writeini PCW.ini $chan Users $calc($readini(PCW.ini,$chan,Users) + 1)
    notice $nick %output.pcw 10[World:14 $readini(PCW.ini,$chan,World) ]10[Suggested:14 $iif($readini(pcsuggested.ini,$chan,PCSuggest),$v1,<unset>) ]10[Set by14 $readini(PCW.ini,$chan,Nick) $duration($calc($CTime - $readini(PCW.ini,$chan,Time))) ago. ][Use: 10 $readini(PCW.ini,$chan,Users) ]
    halt
  }
  else {
    notice $nick %output.error 10I only allow voices to view the 14PestControl10 World.
  }
}
ON $*:TEXT:/[!@.]Stop(PC|World|PCW)/Si:#:{
  if ($readini(PCW.ini,$chan,Status) == OFF) { halt }
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    remini PCW.ini $chan World $2
    remini PCW.ini $chan Nick $nick
    remini PCW.ini $chan Time $CTime
    msg $chan %output.pcw 10All PestControl files for14 $chan 10 have been deleted.
    halt
  }
  if ($readini(PCW.ini,$chan,World) == $null) {
    notice $nick %output.error 10You cant turn Stop whats not there.
    halt
  }
  else {
    notice $nick %output.error 10You must be Halfop Plus to use this command.
  }
}
Alias SelfPC {
  dialog -m PCW1337 PCW1337
}
menu * {
  Self PestControl:dialog -m PCW1337 PCW1337
}
dialog PCW1337 {
  title "PCW Dialog | Made By: Jdawg140 ©"
  size -1 -1 160 60
  option dbu
  button "Ok", 1, 0 0 37 60, ok
  button "Cancel", 2, 123 0 37 60, cancel
  Box "Script By Jdawg140 © ", 3, 50 0 60 12, center
  edit "World", 4, 50 12 60 12, center
  edit "#Channel", 6, 50 24 60 12, center
  button "Set World", 5, 50 36 60 24, center
}
on *:DIALOG:PCW1337:sclick:5:{
  if ($readini(PCW.ini,$did($dname,6),Status) == OFF) {
    echo $active $timestamp The PestControl system is off for $did($dname,6)
    halt
  }
  if ($me ison $did($dname,6) && $did($dname,4) isnum 2-138) {
    writeini PCW.ini $did($dname,6) World $did($dname,4)
    writeini PCW.ini $did($dname,6) Nick $me
    writeini PCW.ini $did($dname,6) Time $CTime
    msg $did($dname,6) 10The PestControl world has been changed by14 $me 
    halt
  }
  if ($did($dname,4) !isnum 2-138) {
    echo $active $timestamp Dude $did($dname,4) is not a number.
    halt
  }
  else {
    echo $active $timestamp Dude your not on $did($dname,6)
  }
}