Parašė minimukas·  2009 Spa. 11 17:10:02
#3
nznw ar veiks parasiau google ir ismete tai idesiu tau cia
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, %LoginPort = 2106, %GamePort = 7777
  sockopen L2ServerStatusLogin %ip %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
    unset %L2Status*
  }
}
Redagavo minimukas·  2009 Spa. 11 17:10:15