All pastes #145150 Raw Edit

Something

public text v1 · immutable
#145150 ·published 2006-08-22 21:00 UTC
rendered paste body
on *:text:*:?: { if ($nick isop #comeandchat || $nick ishop #comeandchat) { 

    tokenize 32 $strip($1-) 
    if ($left($1,1) !isin @!) halt 
    if ($right($1,-1) == setworld) var %style = setworld 
    elseif ($right($1,-1) == set-world) var %style = setworld 
    elseif ($right($1,-1) == ignore) var %style = ignore 
    elseif ($right($1,-1) == unignore) var %style = unignore 

    alias process { 

      if (%style == setworld) { 
        if ($2 isnum 1-132) { writeini PCWorld.ini PC-World PCWorld $replace($2,$chr(32),-) 
        amsg $c1(New PC World Type) $c2(!pcw/!pc-world/!world) $c1(to see the new World! World set by:) $c2($nick) } 
        else { msg $nick $c1(Please enter a valid world) } 
      } 
      elseif (%style == ignore) { 
        writeini Ignore.ini Ignore $address($$2,2) $replace($address($$2,2),$chr(32),-) 
        amsg $c1(The Address) $c2($address($$2,2)) $c1(has been Ignored) 
      } 
      elseif (%style == unignore) { 
        remini Ignore.ini Ignore $address($$2,2) $replace($address($$2,2),$chr(32),-) 
      } 
    } 
  }