Jump to content
Sign in to follow this  
address

Help needed

Recommended Posts

address

while 1

MouseClick("left", 120, 123, 1)

MouseClick("left", 913, 431, 1)

Send ("{HOME}")

MouseClick("left", 376, 598, 1)

Send("#my script")

MouseClick("left", 736, 637, 1)

Dim $aWord[5] = [4, "Hello", "World", "Good", "Morning"]

For $i = 1 To $aWord[0]

Send($aWord[$i])

MouseClick("left", 644, 596, 1)

MouseClick("left", 295, 120, 1)

Next

Sleep(1000 * 120)

WEnd

I need to write Hello, make 2 mouseclicks, 2 minutes quiet, and then write next word (World) (before upper mouseclicks should be made of course). And I cannot do this whereever I put Next.

Help please.

Share this post


Link to post
Share on other sites
evilertoaster

Here's one way-

while 1
    MouseClick("left", 120, 123, 1)
    MouseClick("left", 913, 431, 1)
    Send ("{HOME}")
    MouseClick("left", 376, 598, 1)
    Send("#my script")
    MouseClick("left", 736, 637, 1)
    Dim $aWord[4] = ["Hello", "World", "Good", "Morning"]
    For $i = 0 To UBound($aWord)
        Send($aWord[$i])
        MouseClick("left", 644, 596, 1)
        MouseClick("left", 295, 120, 1)
        Sleep(1000 * 120)
    Next
WEnd

You don't have to use Ubound() like I did, but it saves you from having to mix datatypes in an array.

Share this post


Link to post
Share on other sites
address

After word writing and two mouseclicking it makes four more unwanted mouseclicks instead of go to sleep for two minutes an go to beginning.

And I have the same problem with numeral writing. Here is code

while 1

MouseClick("left", 120, 123, 1)

MouseClick("left", 913, 431, 1)

Send ("{HOME}")

MouseClick("left", 332, 552, 1)

Send("#my script")

MouseClick("left", 668, 624, 1)

For $i = 1 To 3

$sTextToSend = $i

If $i = 3 Then $sTextToSend = $i

Send($sTextToSend)

MouseClick("left", 663, 554, 1)

MouseClick("left", 295, 120, 1)

Sleep(1000 * 120)

Next

WEnd

Edited by address

Share this post


Link to post
Share on other sites
address

while 1

MouseClick("left", 120, 123, 1)

MouseClick("left", 913, 431, 1)

Send ("{HOME}")

MouseClick("left", 332, 552, 1)

Send("#my script")

MouseClick("left", 668, 624, 1)

For $i = 1 + $a

Send($i)

Next

$a = 1

MouseClick("left", 663, 554, 1)

MouseClick("left", 295, 120, 1)

Sleep(1000 * 5)

WEnd

Tried to solve my problem such. It didn't work too. Edited by address

Share this post


Link to post
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
Sign in to follow this  

×