All pastes #466789 Raw Edit

Stuff

public text v1 · immutable
·published 2007-05-02 02:44 UTC
rendered paste body
#include <File.au3>
#include <IRC.au3>
Global $server = "irc.gamersvault.net"
Global $port = 6667
Global $nick = "Au3Bot"
Global $channel = "#xferbot"

$Log = "Log.txt"
$CountLines = _FileCountLines($Log)
TCPStartup ()
Global $sock = _IRCConnect($server, $port, $nick); Connects to IRC and Identifies its Nickname
;$recv = TCPRecv($sock, 8192); Recieve things from server
_IRCJoinChannel ($sock, $channel)
While 1
    
            
    $nCountLines = _FileCountLines($Log)
  
    If $nCountLines <> $CountLines Then
          _IRCSendMessage($sock, $log & $ncountlines, $channel)
        $CountLines = $nCountLines
    EndIf
    Sleep(20)
    
WEnd