Hej Testmax .. Nu sidder jeg og er helt væk og ved ikke hvad jeg skal gøre..
Jeg har dette script som engang virkede men ikke gør nu..
on *:text:!hvem:#: {
.sockopen dance dancegate.net 80
}
on *:sockopen:dance: {
.sockwrite -n $sockname GET /admin/now.php HTTP/1.1
.sockwrite -n $sockname Host: dancegate.net $+ $crlf $+ $crlf
}
on *:sockread:dance:{
if ($sockerr) { .halt }
else {
.var %s.data
.sockread %s.data
if (<td> isin %s.data) { inc %s.td }
if (<td> isin %s.data) && (%s.td == 1) { .set %djid $replace($remove(%s.data,<td>,</td>),$chr(32),$chr(32) $+ - $+ $chr(32)) }
if (<td> isin %s.data) && (%s.td == 2) { .set %dj $replace($remove(%s.data,<td>,</td>),$chr(32),$chr(32) $+ - $+ $chr(32)) }
if (%s.nyhed != $null) && (%s.td == 2) { /amsg %dj - %djid |.unset %s.* | .sockclose dance }
}
}
Hvis jeg skriver !hvem - kommer der INTET overhovedet..
hvis jeg derimod fjerner noget fra koden og faar den til at hedde det her :
on *:sockread:dance:{
if ($sockerr) { .halt }
else {
.var %s.data
.sockread %s.data
/amsg %s.data dance
}
}
så får jeg kun
(20:11:51) (@testbot111) HTTP/1.1 200 OK
retur.. Hvad er det problemet er ??
Håber i kan hjælpe!
____________________________________________________________________________________________________ ______________________
Jeg har nu prøvet med et nyt script. som virkede (i lidt tid)
http://testmax.dk/Forum/T.....-info-fra-ALLE-sider. aspx
Fra den guide her..
her er mit script :
Alias GetFilm {
if ($sock(GetFilm)) {
SockClose GetFilm
}
sockopen GetFilm dancegate.net 80
}
on *:sockopen:GetFilm:{
sockwrite -n $sockname GET /admin/now.php HTTP/1.1
sockwrite -n $sockname Host: dancegate.net
sockwrite -n $sockname $crlf $crlf
}
on *:sockread:GetFilm:{
if ($sockerr) { return }
sockread -f %SockRead
if (%SockRead) {
if (*<td>* iswm %Sockread) { inc %s.td }
if (*<td>* iswm %Sockread) && (%s.td == 1) { echo -n $replace($remove(%Sockread,<td>,</td>),$chr(32),$chr(32) $+ - $+ $chr(32)) }
if (*<td>* iswm %Sockread) && (%s.td == 2) { echo -n $replace($remove(%Sockread,<td>,</td>),$chr(32),$chr(32) $+ - $+ $chr(32)) }
sockclose $sockname
unset %s.td | unset %SockRead
}
}
Det virkede helt fint i noget tid (de 30min jeg roede med det) og så stoppede det bare uden grund med at virke.. (ligesom det andet) - det er som om at scriptet kun virker X antal gange>!!!