How to use a different method to send my messages

[lolp1]

Hello,

In a small thing I wrote, I wanted to use a different method to send the messages. Currently I use CrtlSend, how ever I wanted to use something I found from a UDF:

_IRCSendMessage ($irc, $msg, $chan="")

From : http://www.autoitscript.com/forum/index.ph...=43515&st=0

How ever I could not find a way to connect and stay connected, and do the loop to detect a new line (Which that new line will be the message) all in one big loop.

Doing this would achieve:

Less CPU ussage as I do not have to have another IRC client open.

Faster sending, and one less window on my screen..

Take away the screen flicker that happens while crtl send is going on.

So I need some help on how to do this thanks in advanced, any questions about what I want feel free to post as Its kind of confusing to explain.

Note: Refer to the commented lines with crtlsend on them for to make it more clear what I want to do,

Here is the code I want to use the different send message method in:

expandcollapse popup

AutoItSetOption("WinDetectHiddenText", 1)
Opt("WinTitleMatchMode", 2)



Global $title = "StealthBot v2.6 Revision 3"
Global $ctrltext
If WinExists($title)  Then
    MsgBox(4096, "Test", "Window there, click ok", 10)
    Else
MsgBox(4096, "Test", "ZOMG NO WINDOW< WTFUX? This window suppose to be there", 10)

EndIf

If WinExists("mIRC - [#baals")  Then
    MsgBox(4096, "Test", "Window there, click ok.", 10)
    Else
MsgBox(4096, "Test", "ZOMG NO WINDOW< WTFUX? This window suppose to be there", 10)
EndIf

MsgBox(4096, "Test", "Now reading games", 10)

$ctrltext =  WinGetText($title)
While 1
    Sleep(30)
    ;$ctrltext =  WinGetText("[talibot, online in channel The Void] - StealthBot v2.6 Revision 3", "")
    If  $ctrltext <> WinGetText($title) Then
        $ctrltext = WinGetText($title)
        ;MsgBox (0, "Text Added!", "A new line has been added" &@CRLF &$ctrltext)
        $string = StringSplit ($ctrltext, @LF, 1)
        For $n = $string[0] To 1 Step -1
            If StringStripWS($string[$n],4) <> "" Then
                ;MsgBox (0, "Report", "The control has " & $string[0] & " lines." & @CRLF & "Last non-blank line: " & $string[$n])
                ControlSend("mIRC - [#baals", "", "Edit1","West:" & $string[$n]) ; Here is where I want to ;use_IRCSendMessage

                ControlSend("mIRC - [#baals", "", "Edit1", "{ENTER}") ; This would be voided.
                ExitLoop
            EndIf
        Next
        $ctrltext =  WinGetText($title)
    EndIf
WEnd
MsgBox(0,"","If you see this, you fucked up")

Edited June 6, 2007 by lolp1

[lolp1]

up