login  Naam:   Wachtwoord: 
Registreer je!
 Scripts:
Scripts > Overige > Mirc > Runescape statistieken

Runescape statistieken

Auteur: Beau - 19 oktober 2008 - 14:00 - Gekeurd door: marten - Hits: 3496 - Aantal punten: (0 stemmen)





Steek dit script in je remote (alt+r)
en gebruik dan in een kanaal (gewoon tekst):

/stats JeRunescapeNaam
of
/stats -m JeRunescapeNaam
(dit geeft een bericht weer in het kanaal)

Code:
mirc code - Bekijk de code zonder highlighting - Klap code in 
  1. alias logo { return $+([,03,$$1-,,],03:,) }
  2. alias s1 { return $+($chr(3),03,$1-,) }
  3. alias wut { return $+($chr(77),$chr(97),$chr(100),$chr(101),$chr(32),$chr(98),$chr(121),$chr(32),$chr(66),$chr(101),$chr(97), $chr(117)) }
  4. alias stats {
  5. if (!$wut) { halt }
  6.   if (!$1) {
  7.    echo -a $logo(ERROR) No user specified. | halt
  8.   }
  9.   sockopen Stats. $+ $right($ticks,5) hiscore.runescape.com 80 
  10.   set %display. [ $+ [ $right($ticks,5) ] ] $iif($1 == -m,msg $active,echo -a)
  11.   if ($1) {
  12.     set %search. [ $+ [ $right($ticks,5) ] ] $replace($iif($1 == -m,$2-,$1-),$chr(32),$chr(95))
  13.   }
  14. }
  15.  
  16. on *:SOCKOPEN:Stats.*: {
  17.   sockwrite -nt $sockname GET /index_lite.ws?player= $+ %search. [ $+ [ $right($sockname,-6) ] ] HTTP/1.1
  18.   sockwrite -nt $sockname Host: hiscore.runescape.com
  19.   sockwrite -nt $sockname $crlf
  20. }
  21. on *:SOCKREAD:Stats.*:{
  22.   if ($sockerr) { unset %*.* [ $+ [ $right($sockname,-6) ] ] | sockclose $sockname | halt }
  23.   var %read. [ $+ [ $right($sockname,-6) ] ]
  24.   sockread %read. [ $+ [ $right($sockname,-6) ] ]
  25.   tokenize 32 %read. [ $+ [ $right($sockname,-6) ] ]
  26.   if (*404 - Page not found* iswm $1-) { %display. [ $+ [ $right($sockname,-6) ] ] $logo(ERROR) Stats for $s1(%search. [ $+ [ $right($sockname,-6) ] ]) not found. $wut | sockclose $sockname | halt }
  27.   if (gmt !isin $1-) && (verdana !isin $1-) {
  28.     set %a. [ $+ [ $right($sockname,-6) ] ] %a. [ $+ [ $right($sockname,-6) ] ] $gettok($1-,2,44)
  29.   }
  30.   if ($gettok(%a. [ $+ [ $right($sockname,-6) ] ],29,32)) {
  31.     tokenize 32 %a. [ $+ [ $right($sockname,-6) ] ]
  32.     var %a 1
  33.     while (%a <= 29) {
  34.       var %b %b $iif($gettok($1-,%a,32) != -1,$skill(%a) $s1($bytes($gettok($1-,%a,32),bd)) $iif(%a < 28,$chr(124)))
  35.       inc %a   
  36.     }
  37.     %display. [ $+ [ $right($sockname,-6) ] ] $logo($upper($replace(%search. [ $+ [ $right($sockname,-6) ] ],$chr(95),$chr(32)))) $iif($right(%b,1) == $chr(124),$left(%b,-1),%b) $wut
  38.     unset %*.* [ $+ [ $right($sockname,-6) ] ]
  39.   }
  40. }
  41. alias skill {
  42.   if (!$1) || ($1 == 1) { return Overall }
  43.   if ($1 == 2) return Att
  44.   if ($1 == 3) return Def
  45.   if ($1 == 4) return Str
  46.   if ($1 == 5) return HP
  47.   if ($1 == 6) return Range
  48.   if ($1 == 7) return Pray
  49.   if ($1 == 8) return Magic
  50.   if ($1 == 9) return Cook
  51.   if ($1 == 10) return WC
  52.   if ($1 == 11) return Fletch
  53.   if ($1 == 12) return Fish
  54.   if ($1 == 13) return FM
  55.   if ($1 == 14) return Craft
  56.   if ($1 == 15) return Smith
  57.   if ($1 == 16) return Mine
  58.   if ($1 == 17) return Herb
  59.   if ($1 == 18) return Agil
  60.   if ($1 == 19) return Thief
  61.   if ($1 == 20) return Slay
  62.   if ($1 == 21) return Farm
  63.   if ($1 == 22) return RC
  64.   if ($1 == 23) return Hunt
  65.   if ($1 == 24) return Con
  66.   if ($1 == 25) return Summ
  67.   if ($1 == 26) return Duel
  68.   if ($1 == 27) return Bounty
  69.   if ($1 == 28) return Rogue
  70.   if ($1 == 29) return FOG 
  71. }

Download code! Download code (.txt)

 Stemmen
Niet ingelogd.

 Reacties
Post een reactie
Lees de reacties (2)
© 2002-2024 Sitemasters.be - Regels - Laadtijd: 0.021s