on *:TEXT:!setworld *:#:{
 if ($nick isop $chan) { 
 set %world $2
 var %w = 0
 while (%w < $chan(0)) {
 inc %w 1
 msg $chan $nick has changed the pc world press !world to see it.
 }
}
}
on *:TEXT:!world:#:{
 /notice $Nick world is %world
}