mirc-php
Posted by w.e
Saturday, April 16, 2005
Description: doesnt work..

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
Submit a comment
Oops! You need to login or register before you can post a comment!

ebaum's world