Runescape Application

[Eldrup]

Well, i want to create an application that can load peoples stats from Runescape, when you typed in the username in a textbox, and pressed a button.. How is this possible?

If it is possible ofcourse..

Can anyone help with this?

[TheUsed]

im not sure if it can be done easily.

the game runs by flash or java. unless they made it differently now.

[Eldrup]

I have no idea, but i think it could be pretty cool... (:

[chris128]

Dont they have some web site that you can pull stats from or something though? I've never played the game but I'm sure I've seen several other people on here asking questions about how to do a similar thing. Have you tried searching these forums for "runescape" and seeing what other people have done?

[FreeBullets]

It has to pull data from http://hiscore.runescape.com/hiscores.ws

[weirddemon]

From the link that FreeBullets posted, it looks like there is a Search By Name search box. You can probably use a WebBrowser control and send the name of the user to that search and then pull the results.

Though that does seem a little unreliable.

[ballerplaya]

Here is a sample program which I made awhile back. THe code is longer then what it could be but here ya go.

Imports System.Net

Public Class Class1
    Dim wc As WebClient
    Dim rawdata As String
    Dim parsedData() As String
    Dim Strength, Attack, Defence, Prayer, HitPoints, Magic, Range, Summoning As Integer
    Dim Cooking, Woodcutting, Fletching, Fishing, Firemaking, Crafting, Smithing, Mining, Herblore, Agility, Theving, Slayer, Farming, Runecrafting, Hunter, Construction As Integer
    Public Function downloadStats(ByVal username As String)
        parsedData = Nothing


        'http://hiscore.runescape.com/index_lite.ws?player=

        Dim rawdata As String
        'Gets the data of the stats
        Dim wc As New System.Net.WebClient
        Try

            rawdata = wc.DownloadString("http://hiscore.runescape.com/index_lite.ws?player=" & username)

        Catch ex As Exception

        End Try
        'parse the data

        Try

            parsedData = rawdata.Split(",")
        Catch ex As Exception

        End Try


        Try

            'Levels 
            Strength = parsedData(7)
            Attack = parsedData(3)
            Defence = parsedData(5)
            Prayer = parsedData(13)
            HitPoints = parsedData(9)
            Magic = parsedData(15)
            Range = parsedData(11)
            Summoning = parsedData(49)
            Cooking = parsedData(17)
            Woodcutting = parsedData(19)
            Fletching = parsedData(21)
            Fishing = parsedData(23)
            Firemaking = parsedData(25)
            Crafting = parsedData(27)
            Smithing = parsedData(29)
            Mining = parsedData(31)
            Herblore = parsedData(33)
            Agility = parsedData(35)
            Theving = parsedData(37)
            Slayer = parsedData(39)
            Farming = parsedData(41)
            Runecrafting = parsedData(43)
            Hunter = parsedData(45)
            Construction = parsedData(47)

            '___________________________________

            If Strength < 0 Then Strength = 1
            If Attack < 0 Then Attack = 1
            If Defence < 0 Then Defence = 1
            If Prayer < 0 Then Prayer = 1
            If HitPoints < 0 Then HitPoints = 1
            If Magic < 0 Then Magic = 1
            If Range < 0 Then Range = 1
            If Summoning < 0 Then Summoning = 1
            If Cooking < 0 Then Cooking = 1
            If Woodcutting < 0 Then Woodcutting = 1
            If Fletching < 0 Then Fletching = 1
            If Fishing < 0 Then Fishing = 1
            If Firemaking < 0 Then Firemaking = 1
            If Crafting < 0 Then Crafting = 1
            If Smithing < 0 Then Smithing = 1
            If Mining < 0 Then Mining = 1
            If Herblore < 0 Then Herblore = 1
            If Agility < 0 Then Agility = 1
            If Theving < 0 Then Theving = 1
            If Slayer < 0 Then Slayer = 1
            If Farming < 0 Then Farming = 1
            If Runecrafting < 0 Then Runecrafting = 1
            If Hunter < 0 Then Hunter = 1
            If Construction < 0 Then Construction = 1

        Catch ex As Exception
        End Try
        '_____________________________________










        Return Nothing



    End Function
    Public Function getStat(ByVal stat_name As String)
        Select Case stat_name.ToLower
            Case "strength" : Return Strength
            Case "attack" : Return Attack
            Case "defence" : Return Defence
            Case "prayer" : Return Prayer
            Case "hitPoints" : Return HitPoints
            Case "magic" : Return Magic
            Case "range" : Return Range
            Case "summoning" : Return Summoning
            Case "cooking" : Return Cooking
            Case "woodcutting" : Return Woodcutting
            Case "fletching" : Return Fletching
            Case "fishing" : Return Fishing
            Case "firemaking" : Return Firemaking
            Case "crafting" : Return Crafting
            Case "smithing" : Return Smithing
            Case "mining" : Return Mining
            Case "herblore" : Return Herblore
            Case "agility" : Return Agility
            Case "theving" : Return Theving
            Case "slayer" : Return Slayer
            Case "farming" : Return Farming
            Case "runecrafting" : Return Runecrafting
            Case "hunter" : Return Hunter
            Case "construction" : Return Construction
        End Select
        Return Nothing
    End Function
End Class

Here is parse information you can use in the parenthesis:

0 = Overall Rank
1 = Overall Level
2 = Overall Expereince
3 = Attack Level
4 = Attack Experience and Rank
5 = Defence Level
6 = Defence Experience and Rank
7 = Strength Level
8 = Strength Experience and Rank
9 = Hitpoints Level
10 = Hitpoints Experience and Rank
11 = Ranged Level
12 = Ranged Experience and Rank
13 = Prayer Level
14 = Prayer Experience and Rank
15 = Magic Level
16 = Magic Experience and Rank
17 = Cooking Level
18 = Cooking Experience and Rank
19 = Woodcutting Level
20 = Woodcutting Experience and Rank
21 = Fletching Level
22 = Fletching Experience and Rank
23 = Fishing Level
24 = Fishing Experience and Rank
25 = Firemaking Level
26 = Firemaking Experience and Rank
27 = Crafting Level
28 = Crafting Experience and Rank
29 = Smithing Level
30 = Smithing Experience and Rank
31 = Mining Level
32 = Mining Experience and Rank
33 = Herblore Level
34 = Herblore Experience and Rank
35 = Agility Level
36 = Agility Experience and Rank
37 = Theving Level
38 = Theiving Experience and Rank
39 = Slayer Level
40 = Slayer Experience and Rank
41 = Farming Level
42 = Farming Experience and Rank
43 = Runecrafting Level
44 = Runecrafting Experience and Rank
45 = Hunter Level
46 = Hunter Experience and Rank
47 = Construction Level
48 = Construction Experience and Rank
49 = Summoning Level
50 = Summoning Rank

If I was to use:

   Dim wc As WebClient
    Dim rawdata As String
    Dim parsedData() As String

sub downloadStats()
        parsedData = Nothing


        Dim rawdata As String
        'Gets the data of the stats
        Dim wc As New System.Net.WebClient
        Try

            rawdata = wc.DownloadString("http://hiscore.runescape.com/index_lite.ws?player=" & username)

        Catch ex As Exception

        End Try
        'parse the data

        Try

            parsedData = rawdata.Split(",")
        Catch ex As Exception

        End Try


dim summoning as integer
summoning = parsedData(49)
end sub

It would give what ever level you had in the summoning skill

[Vectris]

As you can see by ball's code, there is actually a shortcut in the website for people who want quick hiscore access in a program.

And that is to use the URL "http://hiscore.runescape.com/index_lite.ws?player=USERNAME" which will return a blank page with just the raw data. It works faster and is easier to parse.

I would suggest against making such a program though unless it was simply for experience because it has been done so many times and in so many different ways I'm afraid that it would be a useless program.