for revogamer
Posted by Fubar
Monday, July 17, 2006
Description: adsf
alias csquery {
sockudp -k cs $1 $2 ÿÿÿÿTSource Engine Query
}
on *:udpread:cs:{
sockread -n &test
breplace &test 0 254
var %temp.cs $bvar(&test,1,$bvar(&test,0)).text
set %cs.server $gettok(%temp.cs,3,254)
set %cs.map $gettok(%temp.cs,4,254)
set %cs.game $gettok(%temp.cs,6,254)
set %cs.players $asc($left($gettok(%temp.cs,7,254),1)) $+ / $+ $asc($mid($gettok(%temp.cs,7,254),2,1))
set %cs.type $mid($gettok(%temp.cs,7,254),4,1)
set %cs.os $mid($gettok(%temp.cs,7,254),5,1)
if ($right($gettok(%temp.cs,7,254),1) == 1) {
set %cs.pass yes
}
msg %cs.chan Number of Players: %cs.player
}
on *:TEXT:.status:#yourchannel: {
set %cs.chan $chan
msg $chan CS Server query on [^B]csserverip:csserverport[^B] --
csquery csserverip csserverport
}
alias csquery {
sockudp -k cs $1 $2 ÿÿÿÿTSource Engine Query
}
on *:udpread:cs:{
sockread -n &test
breplace &test 0 254
var %temp.cs $bvar(&test,1,$bvar(&test,0)).text
set %cs.server $gettok(%temp.cs,3,254)
set %cs.map $gettok(%temp.cs,4,254)
set %cs.game $gettok(%temp.cs,6,254)
set %cs.players $asc($left($gettok(%temp.cs,7,254),1)) $+ / $+ $asc($mid($gettok(%temp.cs,7,254),2,1))
set %cs.type $mid($gettok(%temp.cs,7,254),4,1)
set %cs.os $mid($gettok(%temp.cs,7,254),5,1)
if ($right($gettok(%temp.cs,7,254),1) == 1) {
set %cs.pass yes
}
msg %cs.chan Number of Players: %cs.player
}
on *:TEXT:.status:#yourchannel: {
set %cs.chan $chan
msg $chan CS Server query on [^B]csserverip:csserverport[^B] --
csquery csserverip csserverport
}