Remme
Erfahrenes Mitglied
Tach,
Ich möchte einen "Stream-Update" auf eine Page haben, der anzeigt welchjer titel im moment läuft und welcher moderator derzeit onair ist.
Kenne mich jedoch leider nur ein bissl mit dem script beim mIRC aus der wäre
wenn ich dies bei html einbinden will muss ich auch mit sock.open arbeiten?
Am besten wäre es wenn mir einer einen kompletten script geben könnte.
im vorraus
Remme
Ich möchte einen "Stream-Update" auf eine Page haben, der anzeigt welchjer titel im moment läuft und welcher moderator derzeit onair ist.
Kenne mich jedoch leider nur ein bissl mit dem script beim mIRC aus der wäre
Code:
if (%showst != 1) {
/set %statstream 1
/set %echan $chan
/timer 1 0 /set %showst 1
/timer 1 0 /sockclose radio
/timer 1 1 /sockopen radio %serverip %serverport
/timer 1 15 /set %showst 0
}
else { halt }
}
}
on *:sockopen:radio:{
sockwrite -n $sockname GET /7.html HTTP/1.1
sockwrite -n $sockname Host: %serverip
sockwrite -n $sockname User-Agent: Mozilla/4.0
sockwrite -n $sockname Connection: Keep-Alive
sockwrite -n $sockname $str($crlf,2)
}
on *:sockread:radio:{
if ($sockerr) sockclose $sockname
:nextreading
var %h
sockread -f %h
echo %h
if ($sockbr == 0) return
if (%h == $null) %h = -
$iif(%h,tokenize 32 $left(%h,900))
set %bitch $remove($1-,<HTML>,<meta http-equiv="Pragma",content="no-cache"></head><body>,,</body></html>)
set %listnr $gettok(%bitch,1,44)
serverst
set %listnpeak $gettok(%bitch,3,44)
set %bits $gettok(%bitch,4,44)
currtitl
set %kbps $gettok(%bitch,6,44)
if (%kbps) { goto echoing }
goto nextreading
:echoing
if (%serverst == off) { /msg %echan 0,1 » Stream ist [ $+ %serverst $+ ] | /halt }
msg %echan » Radio is $+ %serverst $+ , Moderator ist: %mod
msg %echan » StreamIP lautet: http://www.opecap.net:8000/listen.pls
msg %echan » Listener: %listnr $+ / $+ %bits Peak: %listnpeak
msg %echan » Aktueller Song: %title
msg %echan » Wunschfunktion ist %wunsch , Grussfunktion ist %gruss
goto nextreading
}
alias Serverst {
set %serverst $gettok(%bitch,2,44)
set %serverst2 $gettok(%bitch,2,44)
if (%serverst == 1) {
set %serverst On
}
else { set %serverst off }
}
alias currTitl {
set %title $gettok(%bitch,7,44)
if (%title == $null) {
set %title n/A
}
else {
set %title $gettok(%bitch,7,44)
}
}
wenn ich dies bei html einbinden will muss ich auch mit sock.open arbeiten?
Am besten wäre es wenn mir einer einen kompletten script geben könnte.
im vorraus
Remme