connect to IRC with password

[nonas]

As title states, I've been scouring the web for a few hours now trying to figure out how to connect to an IRC chat room with a user and pass. Anyone able to shed some light on this? Currently using Chip's method:

;===============================================================================

;

; Description:      Connects you to a IRC Server, and gives your chosen Nick

; Parameter(s):     $server - IRC Server you wish to connect to

;                   $port - Port to connect to (Usually 6667)

;                   $nick - Nick you choose to use (You can change later)

; Requirement(s):   TCPStartup () to be run

; Return Value(s):  On Success - Socket identifer

;                   On Failure - It will exit on error

; Author(s):        Chip

; Note(s):          English only

;

;===============================================================================

Func _IRCConnect ($server, $port, $nick)

Local $i = TCPConnect(TCPNameToIP($server), $port)

If $i = -1 Then Exit MsgBox(1, "IRC.au3 Error", "Server " & $server & " is not responding.")

TCPSend($i, "NICK " & $nick & @CRLF)

TCPSend($i, "USER " & $nick & " 0 0 " & $nick &@CRLF)

Return $i

EndFunc