Mine

on $*:TEXT:!suggest:#:{
  if ($chan == #bots) { HALT }
  writeini -n suggest.ini suggest $chan suggest
  $iif($2 != $null,writeini -n suggest.ini suggest $chan $2,writeini -n suggest.ini suggestion $chan No suggestions)
  .msg $chan 4 $nick 14has suggest world4 $2 
}

on $*:TEXT:/^(!setpcw|!setworld)/Si:#:{
  if ($chan == #bots) { HALT }
  writeini -n world.ini pcw $chan pcw
  $iif($2 != $null,writeini -n world.ini pc $chan $2,writeini -n world.ini pc $chan No world set)
  writeini -n world.ini time $chan $ctime
  .msg $chan 14The 4pc world14 has been updated by4 $nick 
}

on $*:TEXT:/^(!pcw|!world)/Si:#:{
  if ($readini(world.ini,n,pcw,$chan)) {
    notice $nick 14The current 4pestcontrol14 world is4 $readini(world.ini,n,pc,$chan) 14the suggested world is4 $readini(suggest.ini,n,suggest,$chan) 

  }
}

on *:TEXT:!showon*:#: { 
  if ($nick isop $chan) { 
    timerhi 0 40 msg $chan 14The current pestcontrol word is4 $readini(world.ini,n,pc,$chan)  
  } 
} 

on *:TEXT:!showoff*:#: { 
  if ($nick isop $chan) { 
    timerhi off 
  } 
} 

on $*:TEXT:/^(!setcraigs|!set#craigs)/Si:#:{
  if ($chan == #craigs-staff) {
    writeini -n world.ini pcw #craigs pcw
    $iif($2 != $null,writeini -n world.ini pc #craigs $2,writeini -n world.ini pc #craigs No world set)
    writeini -n world.ini time #craigs $ctime
    .msg #craigs 14The 4pc world14 has been updated by4 $nick 
  }
}

on $*:TEXT:/^(!pcw|!world)/Si:#:{
  if ($readini(world.ini,n,pcw,#craigs)) {
    notice $nick 14The current 4pestcontrol14 world is4 $readini(world.ini,n,pc,#craigs)  

  }
}