By master me on Nov 23, 2009its a simple !ml script i made and it works fine
(23:25:13) <@masterme212> !ml bse
(23:25:14) -noux10- ~~~ [ CLAN INFO ]: [BsE] Bloodshed Empire (http://rs-bse.com) | Members: 44 [Avg]: Cmb: (F2P: 108.73 | P2P: 114.91 | HP: 89.82 | Magic: 78.361 | Ranged: 80.48 | Skill Total: 1,600 | F2P & P2P Based (Homeworld 121) | Cape: Wilderness49 | Runehead: http://www.runehead.com/clans/ml.php?clan=bloodshed
(23:25:44) <@masterme212> @ml bse
(23:25:45) <@noux10> ~~~ [ CLAN INFO ]: [BsE] Bloodshed Empire (http://rs-bse.com) | Members: 44 [Avg]: Cmb: (F2P: 108.73 | P2P: 114.91 | HP: 89.82 | Magic: 78.361 | Ranged: 80.48 | Skill Total: 1,600 | F2P & P2P Based (Homeworld 121) | Cape: Wilderness49 | Runehead: http://www.runehead.com/clans/ml.php?clan=bloodshed
enjoy :D
ON $*:TEXT:/^[@!.](ml|memberlist)/Si:#: {
var %sckid = $right($ticks,6)
hmake clan. [ $+ [ %sckid ] ] 50
hadd clan. [ $+ [ %sckid ] ] output $iif($left($1,1) == @,msg $chan,notice $nick)
hadd clan. [ $+ [ %sckid ] ] nick $nick
hadd clan. [ $+ [ %sckid ] ] clan $replace($2-,$chr(32),$chr(95))
sockopen clan. [ $+ [ %sckid ] ] www6.runehead.com 80
}
on *:SOCKOPEN:clan.*: {
sockwrite -nt $sockname GET /feeds/lowtech/searchclan.php?search= $+ $hget($sockname,clan) HTTP/1.1
sockwrite -nt $sockname Host: www6.runehead.com
sockwrite -nt $sockname $crlf
}
on *:SOCKREAD:clan.*: {
var %read
sockread %read
if (*Not Found* iswm %read) { $hget($sockname,output) $hget($sockname,clan) Was not found on the Runehead Clan database | hfree $sockname | halt }
if (*http://* iswm %read) {
tokenize 124 %read
%ml $hget($sockname,output) 12~~~ [12 CLAN INFO 1]: [11 $+ $5 $+ ]12 $1 (11 $+ $2 $+ 12) $chr(124) Members:11 $6 11 $+ $chr(91) $+ 12Avg1 $+ $chr(93) $+ : 12Cmb: (12F2P:11 $16 $+ 14 $chr(124) 12P2P:11 $7 $chr(124) 12HP:11 $8 $+ 11 $chr(124) 12Magic:1 $10 $+ 111 $chr(124) 12Ranged:11 $11 $+ 11 $chr(124) 12Skill Total:11 $bytes($9,b) $+ 11 $chr(124) $+ 12 $12 12Based (12Homeworld11 $15 $+ 11) $chr(124) 12Cape:11 $14 $+ 12 $chr(124)12 Runehead:12 $3
hfree $sockname
sockclose $sockname
}
}
I'm real curious why you used hashtables to store 3 things master me?
Also, why did you put 50 in the hmake. That will use enough memory for 500 records.
You might want to consider using sockmark or even using global variables would be better that that.
All of this -->> [ $+ [ %sckid ] ] Can also be eliminated if you set the variable with "clan." in the first place.
var %sckid = $+(clan.,$right($ticks,6))
No idea what the %ml is for. It doesn't do anything.
Working code though :)
