on $*:TEXT:/^[@!]rsworlds*$/Si:#: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($readini(worlds.ini,CHAN- $+ $chan,on) == false) || ($readini(worlds.ini,CHAN- $+ $chan,on) == $null) {
      writeini worlds.ini CHAN- $+ $chan on true
    $iif($left($1,1) == @,msg $chan,notice $nick) World Links for $chan are now: $readini(worlds.ini,CHAN- $+ $chan,on) }
  }
  elseif ($readini(worlds.ini,CHAN- $+ $chan,on) == true) {
    writeini worlds.ini CHAN- $+ $chan on false
  $iif($left($1,1) == @,msg $chan,notice $nick) World Links for $chan are now: $readini(worlds.ini,CHAN- $+ $chan,on) }
}

on $*:TEXT:/^[@!]world*$/Si:#: { 
  if ($readini(worlds.ini,CHAN- $+ $chan,on) == true) {
    $iif($left($1,1) == @,msg $chan,notice $nick) World $$2 link: $readini(worlds.ini,WORLD,World $+ $$2) 
  }
  else { notice $nick Error World list for $chan is not on. }
}