need a little help :P

[Azaw]

i wanted to make a script that clicks in a few places and write some links, my problem is after it have wrote the link it dosent sleep or press enter, just keep repeating itself... :S cant see why it would

here is the code

expandcollapse popup

global $paused
HotKeySet("{F3}", "togglepause")
HotKeySet("{ESC}", "terminate")
HotKeySet("1", "one")
HotKeySet("2", "tva")
HotKeySet("3", "tre")
HotKeySet("4", "fyra")
HotKeySet("5", "fem")
HotKeySet("6", "sex")
HotKeySet("7", "sju")



Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip('Script is "Running"',0,0)
EndFunc

Func Terminate()
    Exit 0
EndFunc





While 1
    Sleep(2500)
WEnd

Func one()
    MouseClick("left", 311, 379)
    Sleep(500)
    send("{ENTER}")
Endfunc




While 2
    Sleep(2500)
WEnd

Func tva()
    MouseClick("left", 305, 404)
    Sleep(500)
    send("{ENTER}")
Endfunc



While 3
    Sleep(2500)
WEnd

Func tre()
    MouseClick("left", 309, 432)
    Sleep(500)
    send("{ENTER}")
Endfunc





While 4()
    Sleep(2500)
WEnd

Func fyra()
    MouseClick("left", 946, 67)
    Sleep(500)
    Send("länk4")
        sleep(1000)
    Send("{ENTER}")

Endfunc




While 5()
    Sleep(2500)
WEnd

Func fem()
    MouseClick("left", 946, 67)
    Sleep(500)
    Send("länk5")
    Send("{ENTER}")
Endfunc


    While 5()
    Sleep(2500)
WEnd

Func sex()
    MouseClick("left", 946, 67)
    Sleep(500)
    Send("länk6")
    Sleep(1000)
    Send("{ENTER}")
Endfunc



While 7()
    Sleep(2500)
WEnd

Func sju()
    MouseClick("left", 946, 67)
    Sleep(500)
    Send("länk7")
    Sleep(1000)
    Send("{ENTER}")
Endfunc

[stampy]

When the script runs, the continual while loop is there to hold it open and continue running. The lines of the script are run from top to bottom excluding functions. Most people put the functions at the bottom to make it easier to see the global part of the script. You had multiple while loops, written interestingly, that were not needed.

expandcollapse popup

global $paused
HotKeySet("{F3}", "togglepause")
HotKeySet("{ESC}", "terminate")
HotKeySet("1", "one")
HotKeySet("2", "tva")
HotKeySet("3", "tre")
HotKeySet("4", "fyra")
HotKeySet("5", "fem")
HotKeySet("6", "sex")
HotKeySet("7", "sju")

While 1
    Sleep(2500)
WEnd

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip('Script is "Running"',0,0)
EndFunc

Func Terminate()
    Exit 0
EndFunc

Func one()
    MouseClick("left", 311, 379)
    Sleep(500)
    send("{ENTER}")
Endfunc

Func tva()
    MouseClick("left", 305, 404)
    Sleep(500)
    send("{ENTER}")
Endfunc

Func tre()
    MouseClick("left", 309, 432)
    Sleep(500)
    send("{ENTER}")
Endfunc

Func fyra()
    MouseClick("left", 946, 67)
    Sleep(500)
    Send("länk4")
        sleep(1000)
    Send("{ENTER}")

Endfunc

Func fem()
    MouseClick("left", 946, 67)
    Sleep(500)
    Send("länk5")
    Send("{ENTER}")
Endfunc

Func sex()
    MouseClick("left", 946, 67)
    Sleep(500)
    Send("länk6")
    Sleep(1000)
    Send("{ENTER}")
Endfunc

Func sju()
    MouseClick("left", 946, 67)
    Sleep(500)
    Send("länk7")
    Sleep(1000)
    Send("{ENTER}")
Endfunc

[Azaw]

so what do i need to do to make the script to what i want when i press the right key?

[6105]

so what do i need to do to make the script to what i want when i press the right key?

ur keys is 1,2,3,4,5,6,7

and if in sends text u have 1 or 2 or ... or 7 that spam

use key Alt+1 or Ctr+1 or F1 that do not be span

or do how says u stampy disable key inf script write and enable after write

Edited June 4, 2009 by toader

[Azaw]

ur keys is 1,2,3,4,5,6,7

and if in sends text u have 1 or 2 or ... or 7 that spam

use key Alt+1 or Ctr+1 or F1 that do not be span

or do how says u stampy disable key inf script write and enable after write

oh, thx i see the problem now ^^