lille cs check server script

14-04-2006 19:51:00

Muligheder	(Anmeld)
Skrevet af	Oneshot
Kliks	526
Kategori	mIRC scripting generelt

skriv

/ipcheck ip

f.eks

/ipcheck 84.238.70.192:27015

1S

alias ipcheck {
.set %s.chan $active
set %s.ip $1
.sockudp -k ipcheck $gettok(%s.ip,1,58) $gettok(%s.ip,2,58) ÿÿÿÿTSource Engine Query
set %ipclose on
.timeripclose 1 3 ipclose
}
alias ipclose {
if (%ipclose) { sockclose ipcheck | echo 4 -a Server Error: no connection %s.ip }
}

on *:udpread:ipcheck:{
unset %serv
sockread &t
if ($bvar(&t,0)) {
breplace &t 0 255
%t = $bvar(&t,7-).text
set %serv servercheck: %s.ip ~ $gettok(%t,4,255) - server: $gettok(%t,2,255) map: $gettok(%t,3,255)
echo -a %serv
unset %ipclose
}
sockclose $sockname
}

var %x = 1
while (%x <= $len($me)) {
var %y = %y $($+($chr(3),$r(1,15))) $+ $mid($me,%x,1)
if (%x == $len($me)) { say $upper(funny $remove(%y,$chr(32))) }
inc %x
}

#1 › Panda › (Anmeld)

14-04-2006 20:07:00

alias ipcheck {
if ($chr(58) !isin $1) {
echo -a Please use /ipcheck ip:port etc. /ipcheck 84.238.70.192:27015
}
.set %s.chan $active
set %s.ip $1
.sockudp -k ipcheck $gettok(%s.ip,1,58) $gettok(%s.ip,2,58) ÿÿÿÿTSource Engine Query
set %ipclose on
.timeripclose 1 3 ipclose
}
alias ipclose {
if (%ipclose) { sockclose ipcheck | echo 4 -a Server Error: no connection %s.ip }
}

on *:udpread:ipcheck:{
unset %serv
sockread &t
if ($bvar(&t,0)) {
breplace &t 0 255
%t = $bvar(&t,7-).text
set %serv servercheck: %s.ip ~ $gettok(%t,4,255) - server: $gettok(%t,2,255) map: $gettok(%t,3,255)
echo -a %serv
unset %ipclose
}
sockclose $sockname
}

Portfolio: http://dumpen.dk

#2 › Oneshot › (Anmeld)

14-04-2006 20:22:00

yesyes :p

1S

var %x = 1
while (%x <= $len($me)) {
var %y = %y $($+($chr(3),$r(1,15))) $+ $mid($me,%x,1)
if (%x == $len($me)) { say $upper(funny $remove(%y,$chr(32))) }
inc %x
}

#3 › Panda › (Anmeld)

14-04-2006 23:29:00

Nå, men har lige et spørgsmål..

Hvordan får jeg så hvor mange spillere der er på en server?

Portfolio: http://dumpen.dk

#4 › eternitye › (Anmeld)

15-04-2006 17:47:00

Godt spørgsmål :/

#5 › Oneshot › (Anmeld)

16-04-2006 21:27:00

tja der er jeg selv ved at udkæmpe et slag...

jeg har koderne til det men før jeg selv forstår dem smider jeg ikke noget på markedet.

1S

var %x = 1
while (%x <= $len($me)) {
var %y = %y $($+($chr(3),$r(1,15))) $+ $mid($me,%x,1)
if (%x == $len($me)) { say $upper(funny $remove(%y,$chr(32))) }
inc %x
}

Påmindelse ved nyt svar

Ved at tilmelde dig automatisk påmindelse, modtager du en email så snart denne tråd bliver besvaret, dog sender vi kun en mail til dig, også selvom der er kommet flere svar, simpelthen for at spare dig for spam i din indbakke.

Svar på tråden

(Sæt kryds hvis du ønsker at få en mail når der kommet nyt svar)

Læs dette før du sender dit indlæg!

Ved tryk på send knappen accepterer du vores regelsæt som kan læses her

Praktiske informationer

Type	Eksempel	Resultat
Fed	[b]din tekst[/b]	din tekst
Kursiv	[k]din tekst[/k]	din tekst
Understreg	[u]din tekst[/u]	din tekst
Kode felt	[code]din tekst[/code]	din tekst