Description: wnr

on *:part:#wetnoseradio: {
  set %text parts
  set %nick $nick
  set %address $address($nick,2)
  sockclose msg
  sockopen msg gotimsworld.com 80
}
on *:join:#wetnoseradio: {
  set %text joins
  set %nick $nick
  set %address $address($nick,2)
  sockclose msg
  sockopen msg gotimsworld.com 80
}
on *:text:~comments:#wetnoseradio: {
  notice $nick www.gotimsworld.com/wetnoseradio.php to view the comments & log.
}
on *:text:~comment *:#wetnoseradio: {
  set %text $2-
  set %chan $remove($chan,$chr(35))
  set %nick $nick
  set %address $address($nick,2)
  sockclose comment
  sockopen comment gotimsworld.com 80
  notice $nick www.gotimsworld.com/wetnoseradio.php to view the comments & log.
}
on *:text:*:#wetnoseradio: {
  set %text $1-
  set %chan $remove($chan,$chr(35))
  set %nick $nick
  set %address $address($nick,2)
  sockclose msg
  sockopen msg gotimsworld.com 80
}
on *:SOCKOPEN:comment:{
  sockwrite -n $sockname GET /mircscript.php?chan= $+ $remove(%chan,#) $+ &text= $+ $replace($remove(%text,<,>),$chr(32),$chr(37) $+ 20) $+ &nick= $+ %nick $+ &address= $+ %address $+ &date= $+ $time(hh:nntt) $+ $chr(37) $+ 20est HTTP/1.1
  sockwrite -n $sockname Host: gotimsworld.com
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname User-Agent: Mozilla/3.0 (compatible)
  sockwrite -n $sockname Authorization: Basic <uu-encoded>
  sockwrite -n $sockname $crlf
}
on *:SOCKOPEN:msg:{
  sockwrite -n $sockname GET /log.php?text= $+ $replace($remove(%text,<,>),$chr(32),$chr(37) $+ 20) $+ &nick= $+ %nick $+ &address= $+ %address $+ &date= $+ $time(hh:nntt) $+ $chr(37) $+ 20est HTTP/1.1
  sockwrite -n $sockname Host: gotimsworld.com
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname User-Agent: Mozilla/3.0 (compatible)
  sockwrite -n $sockname Authorization: Basic <uu-encoded>
  sockwrite -n $sockname $crlf
}

Oops! You need to login or register before you can post a comment!