Jump to content

Try To Send Text


Recommended Posts

Im Doing Send Commands....

$color1 = 5
Run("Notepad.exe")
WinWaitActive("Untitled - Notepad")
Send("^")
Send($color)

I want that to output "^5" But For Some Reason It is not outputing anything, Any Help?

Link to comment
Share on other sites

$color1 = 5
Run("Notepad.exe")
WinWaitActive("Untitled - Notepad")
Send("^",1)
Send($color1)


Time you enjoyed wasting is not wasted time ......T.S. Elliot
Suspense is worse than disappointment................Robert Burns
God help the man who won't help himself, because no-one else will...........My Grandmother

Link to comment
Share on other sites

#include <Date.au3>

$color1 = Random(0,10)
$color1 = Floor($color1)

HotKeySet("{f3}", "bind")
HotKeySet("{f5}", "_Exit")

If FileExists("SoF2MP-Test.exe") Then
    $answer = MsgBox(1, "[!] Dinks Clan", "Dinks Clan Checker" & @CRLF & " " & @CRLF & "www.dinksclan.com" & @CRLF & " " & @CRLF & "Made By: Trime`")
    If $answer = 2 Then
        Exit
    EndIf
Else
    MsgBox(16, "[!] Dinks Clan", "Please Place Me In Your Main Sof2 Directory")
    Exit
EndIf   
Run("SoF2MP-Test.exe")
WinWaitActive("SoF2 MP Test")

While 1
Sleep(1000)
If WinGetText("SoF2 MP Test", "") = "@dinks" Then
    bind()
    EndIf
WEnd

Func bind()
    Send("t")
    Send("^",1)
    Send($color1)
    Send("Testing... ")
    Send(_NowTime())
    Send("{ENTER}")
$color1 = Random(0,10)
$color1 = Floor($color1)
EndFunc
    
Func _Exit()
    Exit
EndFunc

This Is the part im having trouble with....

While 1

Sleep(1000)

If WinGetText("SoF2 MP Test", "") = "@dinks" Then

bind()

EndIf

WEnd

I can't get it to work, but what i want it to do is that if a user types @dinks while ingame, then you execute the bind func.

Any help?

Link to comment
Share on other sites

#include <Date.au3>

$color1 = Random(0,10)
$color1 = Floor($color1)

HotKeySet("{f3}", "bind")
HotKeySet("{f5}", "_Exit")

If FileExists("SoF2MP-Test.exe") Then
    $answer = MsgBox(1, "[!] Dinks Clan", "Dinks Clan Checker" & @CRLF & " " & @CRLF & "www.dinksclan.com" & @CRLF & " " & @CRLF & "Made By: Trime`")
    If $answer = 2 Then
        Exit
    EndIf
Else
    MsgBox(16, "[!] Dinks Clan", "Please Place Me In Your Main Sof2 Directory")
    Exit
EndIf   
Run("SoF2MP-Test.exe")
WinWaitActive("SoF2 MP Test")

While 1
Sleep(1000)
If WinGetText("SoF2 MP Test", "") = "@dinks" Then
    bind()
    EndIf
WEnd

Func bind()
    Send("t")
    Send("^",1)
    Send($color1)
    Send("Testing... ")
    Send(_NowTime())
    Send("{ENTER}")
$color1 = Random(0,10)
$color1 = Floor($color1)
EndFunc
    
Func _Exit()
    Exit
EndFunc

This Is the part im having trouble with....

While 1

Sleep(1000)

If WinGetText("SoF2 MP Test", "") = "@dinks" Then

bind()

EndIf

WEnd

I can't get it to work, but what i want it to do is that if a user types @dinks while ingame, then you execute the bind func.

Any help?

I think that you have got your topics mixed up!!!!


Time you enjoyed wasting is not wasted time ......T.S. Elliot
Suspense is worse than disappointment................Robert Burns
God help the man who won't help himself, because no-one else will...........My Grandmother

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...