All pastes #143461 Raw Edit

rsstat1.72

public text v1 · immutable
#143461 ·published 2006-08-22 01:52 UTC
rendered paste body
[AGILITY]
Wilderness_Course=571
Werewolf_Course=540
Brimhaven_Tickets=240
[CONSTRUCTION]
Coming_Soon=
[COOKING]
Lobster=120
Swordfish=140
Shark=210
[CRAFTING]
Bowstrings=11
Green_Hides=62
Blue_Hides=70
Red_hides=78
Black_hides=86
[FARMING]
Coming_Soon=
[FIREMAKING]
Willow=90
Maple=135
Yew=202
Magic=303
[FISHING]
Salmon=70
Lobster=90
Swordfish=100
Shark=110
[FLETCHING]
Magic_Long_Bow=183
Yew_Long_Bow=150
Rune_Arrows=225
[HERBLORE]
Restore_Potion=22
Prayer_Potion=38
Super_Attack=100
Super_Strength=125
[MAGIC]
Coming_Soon=
[MINING]
Coal=50
Gold=65
Runite=120
[PRAYER]
Bones=4
Big_Bones=
Dragon_Bones=
[RANGING]
Coming_Soon=
[RUNECRAFT]
Air_Runes=5
Fire_Runes=7
Nature_Runes=9
Law_Runes=9.5
Death_Runes=10
[SLAYER]
Coming_Soon=
[SMITHING]
Iron_Bars=12.5
Smithing_Iron=25
Steel_Bars=17.5
Smithing_Steel=37.5
Mithril_Bars=30
Smithing_Mithril=50
[THIEVING]
Farmer=14.5
Guard(lvl_21)=46.5
Cake_Stall=16
Fur_Stall=36
[WOODCUTTING]
Tree=25
Oak_Tree=37.5
Willow_Tree=67.5
Maple_Tree=100
Yew_Tree=175
Magic_Tree=250
[ATTACK]
Damage=4
Bandits=204
Pes_Control=Coming_Soon
[STRENGTH]
Damage=4
Bandits=204
Pes_Control=Coming_Soon
[DEFENCE]
Damage=4
Bandits=204
Pes_Control=Coming_Soon
[HITPOINTS]
Damage=1.5
Bandits=204
Pes_Control=Coming_Soon
[NEXTLVL]
l1=0
l2=83 
l3=174  
l4=276
l5=388 
l6=512 
l7=650 
l8=801 
l9=969 
l10=1154 
l11=1358 
l12=1584 
l13=1833 
l14=2107 
l15=2411 
l16=2746 
l17=3115 
l18=3523 
l19=3973 
l20=4470 
l21=5018 
l22=5624 
l23=6291 
l24=7028 
l25=7842 
l26=8740 
l27=9730 
l28=10824 
l29=12031 
l30=13363 
l31=14833 
l32=16456 
l33=18247 
l34=20224 
l35=22406 
l36=24815 
l37=27473 
l38=30408 
l39=33648 
l40=37224 
l41=41171 
l42=45529 
l43=50339 
l44=55649 
l45=61512 
l46=67983
l47=75127 
l48=83014 
l49=91721 
l50=101333 
l51=111945 
l52=123660 
l53=136594 
l54=150872 
l55=166636 
l56=184040 
l57=203254 
l58=224466 
l59=247886 
l60=273742 
l61=302288 
l62=333804 
l63=368599 
l64=407015 
l65=449428 
l66=496254 
l67=547953 
l68=605032 
l69=668051 
l70=737627 
l71=814445 
l72=899257 
l73=992895 
l74=1096278 
l75=1210421 
l76=1336443 
l77=1475581 
l78=1629200
l79=1798808 
l80=1986068 
l81=2192818 
l82=2421087 
l83=2673114 
l84=2951373 
l85=3258594 
l86=3597792 
l87=3972294 
l88=4385776 
l89=4842295 
l90=5346332 
l91=5902831 
l92=6517253 
l93=7195629 
l94=7944614 
l95=8771558 
l96=9684577 
l97=10692629 
l98=11805606 
l99=13034431
[script]
n0=menu channel {
n1=  Stat:/stat
n2=}
n3=alias stat { dialog -m stat stat }
n4=dialog stat {
n5=  title "XS RuneScape Stat Lookup"
n6=  size -1 -1 300 350
n7=
n8=  text "Player:", 3, 100 10 50 50, right
n9=  edit %defrsn, 4, 155 7 80 20, limit 12
n10=  button "Look Up", 5, 240 7 50 20
n11=
n12=  text "COMBAT", 11, 125 30 50 20, center
n13=  text "Attack:", 12, 10 50 50 20, right
n14=  text "Strength:", 13, 100 50 50 20, right
n15=  text "Defence:", 14, 190 50 50 20, right
n16=  text "Hitpoints:", 15, 10 70 50 20, right
n17=  text "Magic:", 16, 100 70 50 20, right
n18=  text "Ranged:", 17, 190 70 50 20, right
n19=  text "Prayer:", 18, 10 90 50 20, right
n20=  text "Combat:", 19, 100 90 50 20, right
n21=  button "ReCalc", 20, 220 90 50 20
n22=
n23=  edit , 31, 70 48 25 20
n24=  edit , 32, 70 68 25 20
n25=  edit , 33, 70 88 25 20
n26=  edit , 34, 160 48 25 20
n27=  edit , 35, 160 68 25 20
n28=  edit , 36, 160 88 45 20
n29=  edit , 37, 250 48 25 20
n30=  edit , 38, 250 68 25 20
n31=
n32=  text "NONCOMBAT", 50, 115 120 70 20, center
n33=  text "Mining:", 51, 10 140 50 50, right
n34=  text "Smithing:", 52, 100 140 50 20, right
n35=  text "Crafting:", 53, 190 140 50 20, right
n36=
n37=  edit , 70, 70 138 25 20
n38=  edit , 71, 160 138 25 20
n39=  edit , 72, 250 138 25 20
n40=
n41=  text "Fishing:", 54, 10 180 50 20, right
n42=  text "Cooking:", 55, 100 180 50 20, right
n43=  text "Firemake:", 56, 190 180 50 20, right
n44=
n45=  edit , 73, 70 178 25 20
n46=  edit , 74, 160 178 25 20
n47=  edit , 75, 250 178 25 20
n48=
n49=  text "Fletching:", 57, 10 220 50 20, right
n50=  text "Woodcut:", 58, 100 220 50 20, right
n51=  text "Runecrft:", 59, 190 220 50 20, right
n52=
n53=  edit , 76, 70 218 25 20
n54=  edit , 77, 160 218 25 20
n55=  edit , 78, 250 218 25 20
n56=
n57=  text "Thieving:", 60, 10 260 50 20, right
n58=  text "Agility:", 61, 100 260 50 20, right
n59=  text "Herblore:", 62, 190 260 50 20, right
n60=
n61=  edit , 79, 70 258 25 20
n62=  edit , 80, 160 258 25 20
n63=  edit , 81, 250 258 25 20
n64=
n65=  text "Slayer:", 63, 10 300 50 20, right
n66=  text "Farming:", 64, 100 300 50 20, right
n67=  text "Constr:", 65, 190 300 50 20, right
n68=
n69=  edit , 82, 70 298 25 20
n70=  edit , 83, 160 298 25 20
n71=  edit , 84, 250 298 25 20
n72=
n73=  text "Double click a skill to see a calculator for it.", 90, 1 330 300 20, center
n74=}
n75=dialog skill {
n76=  Title %skill
n77=  size -1 -1 250 310
n78=
n79=  text "User", 1, 55 1 50 20
n80=  edit , 10, 25 15 80 20, limit 12
n81=  button "Look Up", 20, 120 15 50 20
n82=
n83=  text "Level:", 2, 10 45 50 20, right
n84=  edit , 11, 63 43 25 20
n85=  text "Next level:", 3, 8 80 70 20
n86=  edit , 12, 63 78 25 20
n87=
n88=  text "EXP:", 4, 100 45 50 20
n89=  edit , 13, 125 43 90 20
n90=  text "EXP:", 5, 100 80 50 20
n91=  edit , 14, 125 78 90 20
n92=
n93=  text "Rank", 8, 198 1 50 20
n94=  edit , 17, 175 15 70 20
n95=
n96=  text "EXP to next:", 7, 30 110 90 20, center
n97=  edit , 16, 115 108 90 20
n98=
n99=  text "Items to Next Level", 6, 15 140 130 20
n100=  list 15, 10 155 230 150
n101=}
n102=dialog combat {
n103=  Title "Combat"
n104=  size -1 -1 300 200
n105=
n106=  text "Player:", 1, 5 20 50 20, right
n107=  edit , 20, 65 18 80 20, limit 12
n108=  button "Look Up", 30, 155 18 50 20
n109=
n110=  text "Attack:", 2, 5 55 50 20, right
n111=  text "Strength:", 3, 95 55 50 20, right
n112=  text "Defence:", 4, 185 55 50 20, right
n113=  text "Hitpoints:", 5, 5 95 50 20, right
n114=  text "Ranged:", 6, 95 95 50 20, right 
n115=  text "Magic:", 7, 185 95 50 20, right
n116=  text "Prayer:", 8, 5 135 50 20, right
n117=
n118=  edit , 21, 65 52 25 20
n119=  edit , 22, 155 52 25 20
n120=  edit , 23, 245 52 25 20 
n121=  edit , 24, 65 92 25 20
n122=  edit , 25, 155 92 25 20
n123=  edit , 26, 245 92 25 20
n124=  edit , 27, 65 132 25 20
n125=
n126=  text "Combat", 31, 155 120 50 20, center
n127=  edit , 32, 155 133 50 20, center
n128=  button "Recalc", 33, 100 130 50 25
n129=
n130=}
n131=on *:DIALOG:stat:*:*:{
n132=  if ($devent == init) { 
n133=    if (%defrsn == $null) {
n134=      set %defrsn $left($?="Default Runescape Username?",12)
n135=      if (%defrsn == $null) { halt }
n136=      else { .signal dstat %defrsn }
n137=    }
n138=    if (%defrsn != $null) {
n139=      .signal dstat %defrsn
n140=    }
n141=  }
n142=  if ($devent == sclick) { 
n143=    if ($did == 5) { .signal dstat $replace($did(4),$chr(32),+) }
n144=    if ($did == 20) { did -o $dname 36 1 $cmbcalc($did(31),$did(37),$did(34),$did(32),$did(33)) }
n145=  }
n146=  if ($devent == dclick) {
n147=    if ($inrect($mouse.x,$mouse.y,10,220,50,20)) { set %skill Fletching } 
n148=    if ($inrect($mouse.x,$mouse.y,10,50,50,20)) { set %skill Attack }
n149=    if ($inrect($mouse.x,$mouse.y,100,50,50,20)) { set %skill Strength } 
n150=    if ($inrect($mouse.x,$mouse.y,190,50,50,20)) { set %skill Defence }
n151=    if ($inrect($mouse.x,$mouse.y,10,70,50,20)) { set %skill Hitpoints }
n152=    if ($inrect($mouse.x,$mouse.y,100,70,50,20)) { set %skill Magic }
n153=    if ($inrect($mouse.x,$mouse.y,190,70,50,20)) { set %skill Ranged }
n154=    if ($inrect($mouse.x,$mouse.y,10,90,50,20)) { set %skill Prayer }
n155=    if ($inrect($mouse.x,$mouse.y,10,140,50,20)) { set %skill Mining }
n156=    if ($inrect($mouse.x,$mouse.y,100,140,50,20)) { set %skill Smithing }
n157=    if ($inrect($mouse.x,$mouse.y,190,140,50,20)) { set %skill Crafting }
n158=    if ($inrect($mouse.x,$mouse.y,10,180,50,20)) { set %skill Fishing }
n159=    if ($inrect($mouse.x,$mouse.y,100,180,50,20)) { set %skill Cooking }
n160=    if ($inrect($mouse.x,$mouse.y,190,180,50,20)) { set %skill Firemaking }
n161=    if ($inrect($mouse.x,$mouse.y,100,220,50,20)) { set %skill Woodcutting }
n162=    if ($inrect($mouse.x,$mouse.y,190,220,50,20)) { set %skill Runecraft }
n163=    if ($inrect($mouse.x,$mouse.y,10,260,50,20)) { set %skill Thieving }
n164=    if ($inrect($mouse.x,$mouse.y,100,260,50,20)) { set %skill Agility }
n165=    if ($inrect($mouse.x,$mouse.y,190,260,50,20)) { set %skill Herblore }
n166=    if ($inrect($mouse.x,$mouse.y,10,300,50,20)) { set %skill Slayer }
n167=    if ($inrect($mouse.x,$mouse.y,100,300,50,20)) { set %skill Farming }
n168=    if ($inrect($mouse.x,$mouse.y,190,300,50,20)) { set %skill Construction }
n169=    if ($inrect($mouse.x,$mouse.y,100,90,50,20)) { 
n170=      set %cmb on
n171=      dialog -am combat combat | .signal dcmb $did(stat,4)
n172=    }
n173=    if (%skill) { dialog -am skill skill | .signal dskill $did(stat,4) }
n174=  }
n175=  if ($devent == close) {
n176=    sockclose dstat
n177=    sockclose dskill
n178=    sockclose dcmb   
n179=  }
n180=}
n181=on *:DIALOG:skill:*:*:{
n182=  if ($devent == init) {
n183=    did -o skill 10 1 $did(stat,4)
n184=  }
n185=  if ($devent == sclick) {
n186=    if ($did == 20) {
n187=      .signal dskill $replace($did(skill,10),$chr(32),+)
n188=    }
n189=  }
n190=  if ($devent == close) {
n191=    sockclose dskill
n192=    sockclose dstat
n193=    sockclose dcmb
n194=    unset %skill
n195=  }
n196=}
n197=on *:DIALOG:combat:*:*:{
n198=  if ($devent == init) {
n199=    did -o combat 20 1 $did(stat,4)
n200=  }
n201=  if ($devent == sclick) {
n202=    if ($did == 30) {
n203=      .signal dcmb $replace($did(combat,20),$chr(32),+)
n204=    }
n205=    if ($did == 33) {
n206=      did -o combat 32 1 $cmbcalc($did(21),$did(23),$did(22),$did(24),$did(27))
n207=    }
n208=  }
n209=  if ($devent == dclick) {
n210=    if ($inrect($mouse.x,$mouse.y,5,55,50,20)) { set %skill Attack }
n211=    if ($inrect($mouse.x,$mouse.y,95,55,50,20)) { set %skill Strength }
n212=    if ($inrect($mouse.x,$mouse.y,185,55,50,20)) { set %skill Defence }
n213=    if ($inrect($mouse.x,$mouse.y,5,95,50,20)) { set %skill Hitpoints }
n214=    if ($inrect($mouse.x,$mouse.y,95,95,50,20)) { set %skill Ranged }
n215=    if ($inrect($mouse.x,$mouse.y,185,95,50,20)) { set %skill Magic }
n216=    if ($inrect($mouse.x,$mouse.y,5,135,50,20)) { set %skill Prayer }
n217=    if (%skill) { dialog -am skill skill | .signal dskill $did(combat,20) }
n218=  }
n219=  if ($devent == close) {
n220=    sockclose dskill
n221=    sockclose dstat
n222=    sockclose dcmb
n223=    unset %cmb
n224=  }
n225=}
n226=on *:SIGNAL:dstat:{
n227=  did -rb stat 31-38,70-84
n228=  set %lookup.d $replace($1-,$chr(32),+)
n229=  sockopen dstat www.rscript.org 80
n230=}
n231=on *:SIGNAL:dskill:{
n232=  did -rb skill 11-14,16-17
n233=  set %lookup.d $replace($1-,$chr(32),+)
n234=  sockopen dstat www.rscript.org 80  
n235=}
n236=on *:SIGNAL:dcmb:{
n237=  did -rb combat 21-27,32
n238=  set %lookup.d $replace($1-,$chr(32),+)
n239=  sockopen dstat www.rscript.org 80
n240=}
n241=on *:SOCKOPEN:dstat:{
n242=  sockwrite -nt $sockname GET /lookup.php?type=stats&user= $+ %lookup.d HTTP/1.0 
n243=  sockwrite -nt $sockname Host: rscript.org $+ $crlf $+ $crlf
n244=  sockwrite -nt $sockname 
n245=  if (%cmb) {
n246=    sockrename $sockname dcmb
n247=  }
n248=  if (%skill) {
n249=    sockrename $sockname dskill
n250=  }
n251=}
n252=on *:SOCKREAD:dstat:{
n253=  var %total | sockread -f %total
n254=  tokenize 32 $remove(%total,Stat:)
n255=  if (*does not feature* iswm $1-) { did -er stat 31-38,70-84 | sockclose $sockname }
n256=  if (Attack == $1) { did -eo stat 31 1 $iif($3 isnum,$3,NA) }
n257=  if (Hitpoints == $1) { did -eo stat 32 1 $iif($3 isnum,$3,NA) }
n258=  if (Prayer == $1) { did -eo stat 33 1 $iif($3 isnum,$3,NA) }
n259=  if (Strength == $1) { did -eo stat 34 1 $iif($3 isnum,$3,NA) }
n260=  if (Defence == $1) { did -eo stat 37 1 $iif($3 isnum,$3,1) }
n261=  if (Ranged == $1) { did -eo stat 38 1 $iif($3 isnum,$3,NA) }
n262=  if (Magic == $1) { 
n263=    did -eo stat 35 1 $iif($3 isnum,$3,NA)
n264=    did -eo stat 36 1 $cmbcalc($did(stat,31),$iif($did(stat,37) != NA,$did(stat,37),1),$did(stat,34),$did(stat,32),$did(stat,33))
n265=  }
n266=  if (Herblore == $1) { did -eo stat 81 1 $iif($3 isnum,$3,NA) }
n267=  if (Agility == $1) { did -eo stat 80 1 $iif($3 isnum,$3,NA) }
n268=  if (Thieving == $1) { did -eo stat 79 1 $iif($3 isnum,$3,NA) }
n269=  if (Crafting == $1) { did -eo stat 72 1 $iif($3 isnum,$3,NA) }
n270=  if (Fletching == $1) { did -eo stat 76 1 $iif($3 isnum,$3,NA) }
n271=  if (Slayer == $1) { did -eo stat 82 1 $iif($3 isnum,$3,NA) }
n272=  if (Mining == $1) { did -eo stat 70 1 $iif($3 isnum,$3,NA) }
n273=  if (Smithing == $1) { did -eo stat 71 1 $iif($3 isnum,$3,NA) }
n274=  if (Fishing == $1) { did -eo stat 73 1 $iif($3 isnum,$3,NA) }
n275=  if (Cooking == $1) { did -eo stat 74 1 $iif($3 isnum,$3,NA) }
n276=  if (Runecraft == $1) { did -eo stat 78 1 $iif($3 isnum,$3,NA) }
n277=  if (Firemaking == $1) { did -eo stat 75 1 $iif($3 isnum,$3,NA) }
n278=  if (Woodcutting == $1) { did -eo stat 77 1 $iif($3 isnum,$3,NA) }
n279=  if (Farming == $1) { did -eo stat 83 1 $iif($3 isnum,$3,NA) }
n280=  if (Construction == $1) {
n281=    did -eo stat 84 1 $iif($3 isnum,$3,NA)
n282=    sockclose $sockname
n283=  }
n284=}
n285=on *:SOCKREAD:dskill:{
n286=  var %total | sockread -f %total
n287=  tokenize 32 $remove(%total,Stat:)
n288=  if ($1 == %skill) {
n289=    did -eo skill 17 1 $2
n290=    did -eo skill 11 1 $3
n291=    did -eo skill 12 1 $iif($calc($3 + 1) isnum 1-99,$calc($3 + 1),NA)
n292=    did -eo skill 13 1 $4
n293=    did -eo skill 14 1 $iif($calc($3 + 1) isnum 1-99,$bytes($nextlvl($3),b),NA) 
n294=    did -eo skill 16 1 $iif($calc($3 + 1) isnum 1-99,$bytes($calc($nextlvl($3) - $remove($4,$chr(44))),b),0) 
n295=    item
n296=    sockclose $sockname
n297=  }
n298=}
n299=on *:SOCKREAD:dcmb:{
n300=  var %total | sockread -f %total
n301=  tokenize 32 $remove(%total,Stat:) 
n302=  if ($1 == Attack) { did -eo combat 21 1 $iif($3 isnum,$3,NA) }
n303=  if ($1 == Strength) { did -eo combat 22 1 $iif($3 isnum,$3,NA) }
n304=  if ($1 == Defence) { did -eo combat 23 1 $iif($3 isnum,$3,NA) }
n305=  if ($1 == Hitpoints) { did -eo combat 24 1 $iif($3 isnum,$3,NA) }
n306=  if ($1 == Ranged) { did -eo combat 25 1 $iif($3 isnum,$3,NA) }
n307=  if ($1 == Prayer) { did -eo combat 27 1 $iif($3 isnum,$3,NA) }
n308=  if ($1 == Magic) { 
n309=    did -eo combat 26 1 $iif($3 isnum,$3,NA)
n310=    did -eo combat 32 1 $cmbcalc($did(combat,21),$iif($did(combat,23) != NA,$did(combat,23),1),$did(combat,22),$did(combat,24),$did(combat,27))
n311=    sockclose $sockname
n312=  }
n313=}
n314=alias cmbcalc { 
n315=  return $calc((0.32707*$1)+(0.249*$2)+(0.324*$3)+(0.25*$4)+(0.124*$5))
n316=}
n317=alias nextlvl {
n318=  if ($1 !isnum 1-99) { return NA }
n319=  else { 
n320=    var %nextlvl = $1 + 1
n321=    return $readini($script,nextlvl,$+(l,%nextlvl))
n322=  }
n323=}
n324=alias item {
n325=  var %f = $calc($ini($script,0) + 1)
n326=  while (%f > 0 ) {
n327=    dec %f
n328=    if ($ini($script,%f) == %skill) {
n329=      var %g = $calc($ini($script,%f,0) + 1)
n330=      while (%g > 1) {
n331=        dec %g
n332=        did -a skill 15 $replace($ini($script,%f,%g),$chr(95),$chr(32)) - $bytes($round($calc($remove($did(skill,16),$chr(44)) / $readini($script,$ini($script,%f),$ini($script,%f,%g))),0),b)
n333=      }
n334=    }
n335=  }
n336=}