All pastes #640988 Raw Edit

Stuff

public text v1 · immutable
#640988 ·published 2007-07-31 20:53 UTC
rendered paste body
on *:text:*:#:{
  if ($nick isreg $chan && @ isin $1) || ($istok(#rsstaff #rshelp #ei #rspc #rspc-staff,$chan,32)) halt
  tokenize 32 $strip($1-) 
  if ($right($1,-1) == stats) var %style = astats 
  elseif ($regex($1,/co?mb(at)?/Si)) var %style = combat 
  elseif ($setskill($remove($1,@,!,.))) var %style = istat, %skill = $setskill($remove($1,@,!,.)) 
  elseif ($right($1,-1) == defname) && ($2) { 
    writeini DefRSN.ini RSNs $mask($fulladdress,3) $replace($2-,$chr(32),-) 
    .notice $nick Your default RSN for the host $mask($fulladdress,3) has been set to $2- 
    halt 
  } 
  else halt 
  inc %ID 
  if ($len($2-) > 12) { 
    $($+(%,stats.display.,%ID),2) $c1(Idiot,) $c2($2-) $c1(isn't a real RuneScape name.) 
    cleanup %ID 
    halt 
  } 
  elseif ($2) set $+(%,stats.rsn.,%ID) $replace($2-,$chr(32),-) 
  elseif ($readini(DefRSN.ini,RSNs,$mask($fulladdress,3))) set $+(%,stats.rsn.,%ID) $ifmatch 
  elseif ($readini(DefRSN.ini,RSNs,$nick)) set $+(%,stats.rsn.,%ID) $ifmatch 
  else set $+(%,stats.rsn.,%ID) $nick 
  set $+(%,stats.style.,%ID) %style 
  set $+(%,stats.skill.,%ID) %skill 
  set $+(%,stats.display.,%ID) $iif($left($1,1) == @,msg $chan,notice $nick) 
  sockopen $+(stats.,%ID) hiscore.runescape.com 80 
}