mirc-php
Posted by w.e
Saturday, April 16, 2005
Description: doesnt work..
ok well it does the nicks perfectly, it doesnt go onto another chan though, very confusing
on *:text:*:#: {
inc $+(%,$nick,.,text)
}
alias clear {
sockclose clear
sockopen clear gotimsworld.com 80
check
}
alias check {
write -c people.txt
var %i 1
var %a 1
while (%a < $chan(0)) {
while (%i < $nick($chan(%a),0)) {
if (% [ $+ [ $+($nick($chan(%a),%i),.text) ] ]) {
echo sockclose 153 $+ $nick($chan(%a),%i) $+ % [ $+ [ $+($nick($chan(%a),%i),.text) ] ]
echo sockopen 153 $+ $nick($chan(%a),%i) $+ % [ $+ [ $+($nick($chan(%a),%i),.text) ] ] gotimsworld.com 80
}
inc %i
}
inc %a
}
}
on *:SOCKOPEN:153*:{
sockwrite -n $sockname GET /linespost.php?nick= $+ $gettok($sockname,2,45) $+ &lines= $+ $gettok($sockname,3,45) HTTP/1.1
sockwrite -n $sockname Host: gotimsworld.com
sockwrite -n $sockname Connection: close
sockwrite -n $sockname $crlf
}
on *:SOCKOPEN:clear:{
sockwrite -n $sockname GET /clearlines.php HTTP/1.1
sockwrite -n $sockname Host: gotimsworld.com
sockwrite -n $sockname Connection: close
sockwrite -n $sockname $crlf
}
ok well it does the nicks perfectly, it doesnt go onto another chan though, very confusing