Mine

on *:TEXT:!change*:#:{ 
  if (%pestscript [ $+ [ $chan ] ] == OFF) || ($2 !isnum 1-144) { HALT } 
  if ($2 == %pcworld [ $+ [ $chan ] ]) { notice $nick 1515]12§15[12 Sorry world 14 $2 12is already set 1515]12§15[ | halt } 
  if (%pestscript [ $+ [ $chan ] ] == ON) && ($2 isnum 2-144) && ($nick !isreg $chan)

  || inc %pcwcount [ $+ [ $nick ] ] | /writeini worldsSet.ini PCW $nick %pcwcount [ $+ [ $nick ] ] 
  msg $chan 15]12§15[12World Changed1515]12§15[12Type !PCW15]12§15[ 
  unset %settime [ $+ [ $chan ] ] 
  unset %pcworld [ $+ [ $chan ] ] 
  unset %pcsetter [ $+ [ $chan ] ] 
  set %oldpcw %pcw 
  set %settime [ $+ [ $chan ] ] $ctime 
  set %pcworld [ $+ [ $chan ] ] $2 
  set %pcsetter [ $+ [ $chan ] ] $nick 
  set %pcw $2- 
}