jeigu logino ir servo ip skiriasi stai biskeli patobulintas variantas :] turetu veikt
on *:text:!status:#:{
; Jei bent viena užklausa jau vykdoma,
; stabdome veiksmus
if ($sock(L2ServerStatus*,0)) return
; Čia nustatome serverio IP ir prievadus
var %ip = 127.0.0.1
; servo ipas %ip
var %ip2 = 127.0.0.1
; logino ipas %ip2
var %LoginPort = 2106, %GamePort = 7777
sockopen L2ServerStatusLogin %ip2 %LoginPort
sockopen L2ServerStatusGame %ip %GamePort
set %L2StatusTmpChan #
}
on *:sockopen:L2ServerStatus*:{
var %type = $mid($sockname,15-)
; Čia nustatomos laikinos reikšmės, ar serveris veikia, ar ne
set %L2Status $+ %type Online
if ($sockerr) set %L2Status $+ %type Offline
sclose $sockname
}
alias -l sclose {
sockclose $1
; Jeigu serverio būsena jau patikrinta, pranešame tai į kanalą
if (!$sock(L2ServerStatus*,0)) && (%L2StatusTmpChan) {
msg %L2StatusTmpChan $&
Griešpelkio Lineage II server nr. 5 $&
būsena: Login %L2StatusLogin / Game %L2StatusGame