Dabar yra 2019-08-24, 23:04




Naujos temos kūrimas Atsakyti į temą  [ 3 pranešimai(ų) ] 
Reikia pagalbos su windrop serverių sąrašo 
Autorius Žinutė

Užsiregistravo: 2014-03-20, 15:00
Pranešimai: 3
Forumo litai: 5
Pinigų pervedimas
Standartinė Reikia pagalbos su windrop serverių sąrašo
Man reikėtų skripto windrop botui, kad parašius pvz: .cs išmestų serverio ip adresą, kiek yra žaidėjų ir koks mapas.
Bandžiau daryti su qstats4eggdrop, bet parašius į kanalą !cs (!hl) ir serverio ip adresą, botas nesuteikdavo jokios informacijos, net nereaguodavo į ją (sukonfiguravęs buvau aš visus qstats failus).
Taipogi bandžiau iš paprasto GTH boto išimti šitą komandą, bet nelabai pavyko pakeisti iš remote į .tcl failo skriptą.

Taigi prašau jūsų pagalbos, ar žinote kaip padaryti tokią komandą .tcl failo skriptu (kodu)? Dėkui kurie bandys pagelbėti.


2014-03-20, 15:15
Aprašymas
Kalbusis dalyvis
Kalbusis dalyvis
Vartotojo avataras

Užsiregistravo: 2006-02-05, 16:05
Pranešimai: 1554
Forumo litai: 937
Pinigų pervedimas
Miestas: Klaipeda
Standartinė Re: Reikia pagalbos su windrop serverių sąrašo
Jei tu nori tik tam tikram (savo asmeniniam serveriui) tai gali pasinaudot tokiu:

Kodas:
#servo ip
set rhost "0.0.0.0"
#portas
set rport "27015"
#rcon passwordas
set rconpass "meskiukas123"

set challenge [challengercon $rhost $rport]

bind pub -|- .cs sinfo

proc sinfo {nick uhost hand chan args} {
global rhost rport challenge rconpass
set challenge [challengercon $rhost $rport]
set spalva "\0033,1"
set status [rcon $rhost $rport $challenge "$rconpass" status]
#putlog "cia $status"
regsub -all -- {\ +} $status " " status
regsub -all -- {\# } $status "\#" status
foreach line [split $status "\n"] {
if {[regexp -nocase -- {hostname: (.*?)$} $line garb hostname]} { continue }
if {[regexp -nocase -- {tcp/ip : (.*?)$} $line grab ipas]} { continue }
if {[regexp -nocase -- {map : (.*?) at.*$} $line garb map]} { continue }
if {[regexp -nocase -- {players : (.*?) active \((.*?) max\)$} $line garb pl max]} { continue }
}
if {$pl > 19} { set spalva \0034,1 }
if {$pl < 19} { set spalva \0033,1 }
puthelp "privmsg $chan :\0030,1Public Serveris: \0037,1(\0030,1 $hostname - $ipas \0037,1)\0030,1, zemelapis: \0037,1$map\0030,1,  zaidejai:$spalva $pl\0030,1 /\0037,1 $max\0030,1.\003"
}



:arrow: Kad veiktu turi buti irasytas ir rcon modulis bote :)

_________________
Niekas nezino ka savyje slepia, kol neparagauja valdzios.


2014-03-23, 18:49
Aprašymas WWW

Užsiregistravo: 2014-03-20, 15:00
Pranešimai: 3
Forumo litai: 5
Pinigų pervedimas
Standartinė Re: Reikia pagalbos su windrop serverių sąrašo
Dėkui.
Galima rakint tema :)


2014-03-23, 23:14
Aprašymas
Rodyti paskutinius pranešimus:  Rūšiuoti pagal  
Naujos temos kūrimas Atsakyti į temą  [ 3 pranešimai(ų) ] 


Dabar prisijungę

Vartotojai naršantys šį forumą: Registruotų vartotojų nėra ir 1 svečias


Jūs negalite kurti naujų temų šiame forume
Jūs negalite atsakinėti į temas šiame forume
Jūs negalite redaguoti savo pranešimų šiame forume
Jūs negalite trinti savo pranešimų šiame forume
Jūs negalite prikabinti failų šiame forume

Ieškoti:
Pereiti į:  
cron
© phpBB Group. Veikia phpBB pagrindu.
Dizaino autorius Vjacheslav Trushkin, adaptavo Igor „MucTuK“ Gubaidulin
Vertė Vilius Šumskas © 2003, 2005, 2007