Так как воротил вечнорумных Браина и Мостярика больше нету, а скрипт запуска был потерян, то этим делом занялся я,
долгие поиски увенчались успехом и я нашел этот скрипт запускающий комнату
кстати вот он
скрипт остался без изменения еще от Brian
# Для включения скрипта на канале: !set +u2
setudef flag u2
bind pub - !стартс addroom
bind pub - !start addroom
proc addroom {nick uhost hand chan text} {
if {$chan == "#planu2" && [channel get $chan u2]} {
# game - Название игры
set game "Need For Speed Underground 2"
# roomname - Название комнаты
set roomname "St.Races 24/7"
# port - Порт комнаты
set port 1098
# vpnPort - порт open vpn
set vpnPort 1097
set list [join [chanlist #planu2] ", "]
set playerscount [llength [chanlist $chan]]
set up 20
::http::config -useragent "Mozilla/4.0 (compatible; MSIE 4.01; Windows CE; PPC; 240x320)" -urlencoding cp1251
catch {set parsing_tok [::http::geturl "http://tracker.plangc.ru/?do=vpn_add&addr=&port=$port&game=VPN&mod=[http::formatQuery $game]&vpnport=$vpnPort&playerscount=$playerscount&chan=planu2&roomname=[http::formatQuery $roomname]&ts2=none&playerlist=[http::formatQuery $list]" -timeout 20000]}
::http::cleanup $parsing_tok
utimer $up [list addroom $nick $uhost $hand $chan ""]
}
}
# ________________________________________________ С т а т у с к о м н а т ы ____________________________________
bind pub - !статус statusroom
bind pub - !status statusroom
proc statusroom {nick uhost hand chan text} {
::http::config -useragent "Mozilla/4.0 (compatible; MSIE 4.01; Windows CE; PPC; 240x320)"
set parsing_tok [::http::geturl "http://tracker.plangc.ru/" -timeout 20000]
set data [::http::data $parsing_tok]
set data [regsub -all -- {\n|\r|\t|\v} [::http::data $parsing_tok] ""]
::http::cleanup $parsing_tok
# Между тегов <td>...</td> вписать название канала
if {[regexp -- {<td>planu2</td>} $data]} {putserv "PRIVMSG $chan :Комната ONLINE"} {putserv "PRIVMSG $chan :Комната OFFLINE"}
}
# ____________________________________________________Запуск демона пинга____________________________________
bind pub - !юдп udp
proc udp { udp nick uhost hand chan } {
catch { exec /home/brian/udpdaemon 1098 & }
}впрочем комментарии присутствуют и если кто то будет ставить то сможет легко отредактировать, а так же я думаю, что эта тема поможет не потерять скрипт в будущем
Отредактировано Shin (2013-11-26 20:40:31)
.