rendered paste body;###############################################
;# RuneScape Hiscore Lookup Script -Aug 25, 06 #
;# Made by Ajay_Haley (crashstash@hotmail.com) #
;# And Smooth_dudes (mc.kingo@ofir.dk) #
;###############################################
on *:TEXT:!stats*:*: { rsprofile $2- global $nick }
on *:TEXT:!overall*:*: { rsprofile $2- overall $nick }
on *:TEXT:!attack*:*: { rsprofile $2- attack $nick }
on *:TEXT:!defence*:*: { rsprofile $2- defence $nick }
on *:TEXT:!strength*:*: { rsprofile $2- strength $nick }
on *:TEXT:!hitpoints*:*: { rsprofile $2- hitpoints $nick }
on *:TEXT:!ranged*:*: { rsprofile $2- ranged $nick }
on *:TEXT:!prayer*:*: { rsprofile $2- prayer $nick }
on *:TEXT:!magic*:*: { rsprofile $2- magic $nick }
on *:TEXT:!cooking*:*: { rsprofile $2- cooking $nick }
on *:TEXT:!woodcutting*:*: { rsprofile $2- woodcutting $nick }
on *:TEXT:!fletching*:*: { rsprofile $2- fletching $nick }
on *:TEXT:!fishing*:*: { rsprofile $2- fishing $nick }
on *:TEXT:!firemaking*:*: { rsprofile $2- firemaking $nick }
on *:TEXT:!crafting*:*: { rsprofile $2- crafting $nick }
on *:TEXT:!smithing*:*: { rsprofile $2- smithing $nick }
on *:TEXT:!mining*:*: { rsprofile $2- mining $nick }
on *:TEXT:!herblore*:*: { rsprofile $2- herblore $nick }
on *:TEXT:!agility*:*: { rsprofile $2- agility $nick }
on *:TEXT:!thieving*:*: { rsprofile $2- thieving $nick }
on *:TEXT:!slayer*:*: { rsprofile $2- slayer $nick }
on *:TEXT:!farming*:*: { rsprofile $2- farming $nick }
on *:TEXT:!runecraft*:*: { rsprofile $2- runecraft $nick }
on *:TEXT:!construction*:*: { rsprofile $2- construction $nick }
alias rsprofile {
set %rsp.user $upper($left($1,1)) $+ $lower($right($1,-1))
set %rsp.exit1 $2
set %rsp.exit2 $3
;###################################################
;### What to say if they're not on the hiscores? ###
;###################################################
set %rsp.0 Not Listed
set %rsp.rank.overall %rsp.0 | set %rsp.lvl.overall %rsp.0 | set %rsp.xp.overall %rsp.0
set %rsp.rank.attack %rsp.0 | set %rsp.lvl.attack %rsp.0 | set %rsp.xp.attack %rsp.0
set %rsp.rank.defence %rsp.0 | set %rsp.lvl.defence %rsp.0 | set %rsp.xp.defence %rsp.0
set %rsp.rank.strength %rsp.0 | set %rsp.lvl.strength %rsp.0 | set %rsp.xp.strength %rsp.0
set %rsp.rank.hitpoints %rsp.0 | set %rsp.lvl.hitpoints %rsp.0 | set %rsp.xp.hitpoints %rsp.0
set %rsp.rank.ranged %rsp.0 | set %rsp.lvl.ranged %rsp.0 | set %rsp.xp.ranged %rsp.0
set %rsp.rank.prayer %rsp.0 | set %rsp.lvl.prayer %rsp.0 | set %rsp.xp.prayer %rsp.0
set %rsp.rank.magic %rsp.0 | set %rsp.lvl.magic %rsp.0 | set %rsp.xp.magic %rsp.0
set %rsp.rank.cooking %rsp.0 | set %rsp.lvl.cooking %rsp.0 | set %rsp.xp.cooking %rsp.0
set %rsp.rank.woodcutting %rsp.0 | set %rsp.lvl.woodcutting %rsp.0 | set %rsp.xp.woodcutting %rsp.0
set %rsp.rank.fletching %rsp.0 | set %rsp.lvl.fletching %rsp.0 | set %rsp.xp.fletching %rsp.0
set %rsp.rank.fishing %rsp.0 | set %rsp.lvl.fishing %rsp.0 | set %rsp.xp.fishing %rsp.0
set %rsp.rank.firemaking %rsp.0 | set %rsp.lvl.firemaking %rsp.0 | set %rsp.xp.firemaking %rsp.0
set %rsp.rank.crafting %rsp.0 | set %rsp.lvl.crafting %rsp.0 | set %rsp.xp.crafting %rsp.0
set %rsp.rank.smithing %rsp.0 | set %rsp.lvl.smithing %rsp.0 | set %rsp.xp.smithing %rsp.0
set %rsp.rank.mining %rsp.0 | set %rsp.lvl.mining %rsp.0 | set %rsp.xp.mining %rsp.0
set %rsp.rank.herblore %rsp.0 | set %rsp.lvl.herblore %rsp.0 | set %rsp.xp.herblore %rsp.0
set %rsp.rank.agility %rsp.0 | set %rsp.lvl.agility %rsp.0 | set %rsp.xp.agility %rsp.0
set %rsp.rank.thieving %rsp.0 | set %rsp.lvl.thieving %rsp.0 | set %rsp.xp.thieving %rsp.0
set %rsp.rank.slayer %rsp.0 | set %rsp.lvl.slayer %rsp.0 | set %rsp.xp.slayer %rsp.0
set %rsp.rank.farming %rsp.0 | set %rsp.lvl.farming %rsp.0 | set %rsp.xp.farming %rsp.0
set %rsp.rank.runecraft %rsp.0 | set %rsp.lvl.runecraft %rsp.0 | set %rsp.xp.runecraft %rsp.0
set %rsp.rank.construction %rsp.0 | set %rsp.lvl.construction %rsp.0 | set %rsp.xp.construction %rsp.0
sockopen rslookup hiscore.runescape.com 80
}
on *:sockopen:rslookup: {
sockwrite -nt $sockname GET /lang/en/aff/runescape/hiscorepersonal.ws?user1= $+ %rsp.user HTTP/1.1
sockwrite -nt $sockname Host: hiscore.runescape.com $+ $crlf $+ $crlf
}
on *:sockread:rslookup: {
if ($sockerr) {
echo -a Error.
halt
}
else {
var %rsp.html
sockread %rsp.html
if (<td align="right">*</td> iswm %rsp.html) {
if (%rsp.stage == 1) {
set %rsp.rank. $+ %rsp.skill $remove(%rsp.html,<td align="right">,</td>)
inc %rsp.stage
}
elseif (%rsp.stage == 2) {
set %rsp.lvl. $+ %rsp.skill $remove(%rsp.html,<td align="right">,</td>)
inc %rsp.stage
}
elseif (%rsp.stage == 3) {
set %rsp.xp. $+ %rsp.skill $remove(%rsp.html,<td align="right">,</td>)
inc %rsp.stage
}
}
if (<td align="left"><a href="overall.ws?table=*&user=*">*</a></td> iswm %rsp.html) {
set %rsp.skill $lower($remove(%rsp.html,%rsp.user,<td align="left"><a href="overall.ws?table=,1,2,3,4,5,6,7,8,9,0,&user=,">,</a></td>))
set %rsp.stage 1
}
if (*"mainscroll-bottom"* iswm %rsp.html) {
;#####################################################
;## Main Configuration ##
;## Alter defaults or make your own query returns. ##
;## ##
;## Feel free to make use of the these variables: ##
;## %rsp.user -- RS Username being queried ##
;## %rsp.rank.{skill} -- Returns player's rank ##
;## %rsp.lvl.{skill} -- Returns player's level ##
;## %rsp.xp.{skill} -- Returns player's experience ##
;## %rsp.exit1 -- Skill being queried ##
;## %rsp.exit2 -- Channel to return query to ##
;## ##
;## Replace "{skill}" with any skill name. ##
;#####################################################
if (%rsp.exit1 != global) {
set %rsp.colour 7,2
set %rsp.colour1 13,2
set %rsp.colour2 11,2
;###################################################
;## How will you return individual skill lookups? ##
;###################################################
notice %rsp.exit2 %rsp.colour1 %rsp.user $+ 's $upper($left(%rsp.exit1,1)) $+ $lower($right(%rsp.exit1,-1)) $+ %rsp.colour2 Level: $+ %rsp.colour %rsp.lvl. [ $+ [ %rsp.exit1 ] ] $upper($left(%rsp.exit1,1)) $+ $lower($right(%rsp.exit1,-1)) $+ %rsp.colour2 Exp: $+ %rsp.colour %rsp.xp. [ $+ [ %rsp.exit1 ] ] $upper($left(%rsp.exit1,1)) $+ $lower($right(%rsp.exit1,-1)) $+ %rsp.colour2 Rank: $+ %rsp.colour %rsp.rank. [ $+ [ %rsp.exit1 ] ]
unset %rsp.colour*
}
else {
;###############################################
;## How will you return full hiscore lookups? ##
;###############################################
set %rsp.colour 7,2
set %rsp.half 11,2Fletching: $+ %rsp.colour %rsp.lvl.fletching 11,2Fishing: $+ %rsp.colour %rsp.lvl.fishing 11,2Firemaking: $+ %rsp.colour %rsp.lvl.firemaking 11,2Crafting: $+ %rsp.colour %rsp.lvl.crafting 11,2Smithing: $+ %rsp.colour %rsp.lvl.smithing 11,2Mining: $+ %rsp.colour %rsp.lvl.mining 11,2Herblore: $+ %rsp.colour %rsp.lvl.herblore 11,2Agility: $+ %rsp.colour %rsp.lvl.agility 11,2Thieving: $+ %rsp.colour %rsp.lvl.thieving 11,2Slayer: $+ %rsp.colour %rsp.lvl.slayer 11,2Farming: $+ %rsp.colour %rsp.lvl.farming 11,2Runecraft: $+ %rsp.colour %rsp.lvl.runecraft 11,2Construction: $+ %rsp.colour %rsp.lvl.construction
notice %rsp.exit2 13,2Hiscores for %rsp.user $+ : 11,2Overall: $+ %rsp.colour %rsp.lvl.overall 11,2Attack: $+ %rsp.colour %rsp.lvl.attack 11,2Defence: $+ %rsp.colour %rsp.lvl.defence 11,2Strength: $+ %rsp.colour %rsp.lvl.strength 11,2Hitpoints: $+ %rsp.colour %rsp.lvl.hitpoints 11,2Ranged: $+ %rsp.colour %rsp.lvl.ranged 11,2Prayer: $+ %rsp.colour %rsp.lvl.prayer 11,2Magic: $+ %rsp.colour %rsp.lvl.magic 11,2Cooking: $+ %rsp.colour %rsp.lvl.cooking 11,2Woodcutting: $+ %rsp.colour %rsp.lvl.woodcutting $+ %rsp.half
}
unset %rsp.*
}
}
}