All pastes #441900 Raw Edit

Someone

public text v1 · immutable
·published 2007-04-15 22:21 UTC
rendered paste body
on $*:TEXT:/^[!@.](next|nxt)(lvl|level)/Si:*: {
  var %x = $left($1,1) 
  var %id = $+($r(0,9),$r(0,9),$r(0,9),$r(0,9),$r(0,9),$r(0,9))
  set $+(%nextlvl.style.,%id) $iif(%x == @,msg $chan,notice $nick)
  set $+(%nextlvl.user.,%id) $iif($2,$replace($2-,$chr(32),+),$nick) 
  sockopen $+(nextlvl.,%id) parsers.o-ss.net 80 
}  
on *:SOCKOPEN:nextlvl.*:{ 
  var %id = $gettok($sockname,2,46) 
  sockwrite -nt $sockname GET /stats.php?user= $+ %nextlvl.user. [ $+ [ %id ] ]
  sockwrite -nt $sockname Host: parsers.o-ss.net 
  sockwrite -nt $sockname $+($crlf,$crlf) 
} 
on *:SOCKREAD:nextlvl.*: { 
  var %id = $gettok($sockname,2,46) 
  var %nextread
  sockread %nextread 
  tokenize 32 %nextread
  if ( ATTACK isin %nextread ) {
    var %attacklvl = $calc($3 + 1) 
    var %attackxp = $remove($4,$chr(44))
  }
  if ( STRENGTH isin %nextread ) {
    var %strengthlvl = $calc($3 + 1) 
    var %strengthxp = $remove($4,$chr(44))
  } 
  if ( DEFENCE isin %nextread ) {
    var %defencelvl = $calc($3 + 1) 
    var %defencexp = $remove($4,$chr(44))
  } 
  if ( HITPOINTS isin %nextread ) {
    var %hitpointslvl = $calc($3 + 1) 
    var %hitpointsxp = $remove($4,$chr(44))
  } 
  if ( RANGED isin %nextread ) {
    var %rangedlvl = $calc($3 + 1) 
    var %rangedxp = $remove($4,$chr(44))
  } 
  if ( PRAYER isin %nextread ) {
    var %prayerlvl = $calc($3 + 1) 
    var %prayerxp = $remove($4,$chr(44))
  } 
  if ( MAGIC isin %nextread ) {
    var %magiclvl = $calc($3 + 1) 
    var %magicxp = $remove($4,$chr(44))
  } 
  if ( COOKING isin %nextread ) {
    var %cookinglvl = $calc($3 + 1) 
    var %cookingxp = $remove($4,$chr(44))
  } 
  if ( WOODCUTTING isin %nextread ) {
    var %woodcuttinglvl = $calc($3 + 1) 
    var %woodcuttingxp = $remove($4,$chr(44))
  } 
  if ( FLETCHING isin %nextread ) {
    var %fletchinglvl = $calc($3 + 1) 
    var %fletchingxp = $remove($4,$chr(44))
  } 
  if ( FISHING isin %nextread ) {
    var %fishinglvl = $calc($3 + 1) 
    var %fishingxp = $remove($4,$chr(44))
  } 
  if ( FIREMAKING isin %nextread ) {
    var %firemakinglvl = $calc($3 + 1) 
    var %firemakingxp = $remove($4,$chr(44))
  } 
  if ( CRAFTING isin %nextread ) {
    var %craftinglvl = $calc($3 + 1) 
    var %craftingxp = $remove($4,$chr(44))
  } 
  if ( SMITHING isin %nextread ) {
    var %smithinglvl = $calc($3 + 1) 
    var %smithingxp = $remove($4,$chr(44))
  } 
  if ( MINING isin %nextread ) {
    var %mininglvl = $calc($3 + 1) 
    var %miningxp = $remove($4,$chr(44))
  } 
  if ( HERBLORE isin %nextread ) {
    var %herblorelvl = $calc($3 + 1) 
    var %herblorexp = $remove($4,$chr(44))
  } 
  if ( AGILITY isin %nextread ) {
    var %agilitylvl = $calc($3 + 1) 
    var %agilityxp = $remove($4,$chr(44))
  } 
  if ( THIEVING isin %nextread ) {
    var %thievinglvl = $calc($3 + 1) 
    var %thievingxp = $remove($4,$chr(44))
  } 
  if ( SLAYER isin %nextread ) {
    var %slayerlvl = $calc($3 + 1) 
    var %slayerxp = $remove($4,$chr(44))
  } 
  if ( FARMING isin %nextread ) {
    var %farminglvl = $calc($3 + 1) 
    var %farmingxp = $remove($4,$chr(44))
  } 
  if ( RUNECRAFT isin %nextread ) {
    var %runecraftlvl = $calc($3 + 1) 
    var %runecraftxp = $remove($4,$chr(44))
  } 
  if ( CONSTRUCTION isin %nextread ) {
    var %contructionlvl = $calc($3 + 1) 
    var %contructionxp = $remove($4,$chr(44))
  } 
  if ( HUNTER isin %nextread ) {
    var %hunterlvl = $calc($3 + 1) 
    var %hunterxp = $remove($4,$chr(44))
  } 
  var %attackfinal = $calc(($exp(%attacklvl)) - (%attackxp))
  var %strengthfinal = $calc(($exp(%strengthlvl)) - (%strengthxp))
  var %defencefinal = $calc(($exp(%defencelvl)) - (%defencexp))
  var %hitpointsfinal = $calc(($exp(%hitpointslvl)) - (%hitpointsxp))
  var %rangedfinal = $calc(($exp(%rangedlvl)) - (%rangedxp))
  var %prayerfinal = $calc(($exp(%prayerlvl)) - (%prayerxp))
  var %magicfinal = $calc(($exp(%magiclvl)) - (%magicxp))
  var %cookingfinal = $calc(($exp(%cookinglvl)) - (%cookingxp))
  var %woodcuttingfinal = $calc(($exp(%woodcuttinglvl)) - (%woodcuttingxp))
  var %fletchingfinal = $calc(($exp(%fletchinglvl)) - (%fletchingxp))
  var %fishingfinal = $calc(($exp(%fishinglvl)) - (%fishingxp))
  var %firemakingfinal = $calc(($exp(%firemakinglvl)) - (%firemakingxp))
  var %craftingfinal = $calc(($exp(%craftinglvl)) - (%craftingxp))
  var %smithingfinal = $calc(($exp(%smithinglvl)) - (%smithingxp))
  var %miningfinal = $calc(($exp(%mininglvl)) - (%miningxp))
  var %herblorefinal = $calc(($exp(%herblorelvl)) - (%herblorexp))
  var %agilityfinal = $calc(($exp(%agilitylvl)) - (%agilityxp))
  var %thievingfinal = $calc(($exp(%thievinglvl)) - (%thievingxp))
  var %slayerfinal = $calc(($exp(%slayerlvl)) - (%slayerxp))
  var %farmingfinal = $calc(($exp(%farminglvl)) - (%farmingxp))
  var %runecraftfinal = $calc(($exp(%runecraftlvl)) - (%runecraftxp))
  var %contructionfinal = $calc(($exp(%contructionlvl)) - (%contructionxp))
  var %hunterfinal = $calc(($exp(%hunterlvl)) - (%hunterxp))
  var %final = $int($sorttok(%attackfinal %strengthfinal ETC.))
  if (%final == %attackfinal) { 
    var %skll = $ifmatch 
  }