Jump to content
Sign in to follow this  
zutto

simple problem

Recommended Posts

zutto

yeah i've been thinking and searching about how can i bind start / stop [/pause] to keys? as example f6 = start f7 = stop [f8 = pause] the script

just simple recorded script :)

regards.

Share this post


Link to post
Share on other sites
monoceres

Maaaaybe:

#include <misc.au3>
Global $pause
HotKeySet("{F8}","pause")
HotKeySet("{F7}","stop")

$dll=DllOpen("user32.dll")
Do
    Sleep(25)
Until _IsPressed("75")


while 1
    sleep(100)
WEnd

Func pause()
    $pause=Not $pause
    Do
        sleep(10)
    Until Not $pause
EndFunc

Func stop()
    Exit
EndFunc

Broken link? PM me and I'll send you the file!

Share this post


Link to post
Share on other sites
zutto

HotKeySet("{F6}", "_Quit")

Func _Quit()
    Exit
EndFuncoÝ÷ Ú+-«km¢»!¢é]­Ö­zwh®+-«p®à¡«­¢+ÙÉ¥½¸´´´MÉ¥ÁÑ]É¥ÑȹÉѽMÑÉд´´)=ÁÐ ÅÕ½Ðí]¥¹]¥Ñ±äÅÕ½Ðì°ÄÀÀ¤)=ÁÐ ÅÕ½Ðí]¥¹Q¥Ñ±5Ñ¡5½ÅÕ½Ðì°Ð¤)=ÁÐ ÅÕ½Ðí]¥¹ÑÑ!¥¹QáÐÅÕ½Ðì°Ä¤)=ÁÐ ÅÕ½Ðí5½ÕÍ
½½É5½ÅÕ½Ðì°À¤)]¥¹]¥Ð ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤)%9½Ð]¥¹Ñ¥Ù ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤Q¡¸]¥¹Ñ¥ÙÑ ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤)]¥¹]¥ÑÑ¥Ù ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤)5½ÕÍ5½Ù ÈÜØ°ÐÄä¤)5½Õͽݸ ÅÕ½Ðí±ÐÅÕ½Ðì¤)5½ÕÍUÀ ÅÕ½Ðí±ÐÅÕ½Ðì¤)ͱÀ ÅÕ½ÐìÄÀÀÀÅÕ½Ðì¤)5½ÕÍ5½Ù ÐÈà°ÌÔĤ)5½Õͽݸ ÅÕ½Ðí±ÐÅÕ½Ðì¤)ͱÀ ÅÕ½ÐìÄÀÀÀÅÕ½Ðì¤)5½ÕÍ5½Ù ÐÈÜ°ÌÔĤ)5½ÕÍUÀ ÅÕ½Ðí±ÐÅÕ½Ðì¤)ͱÀ ÅÕ½ÐìÄÀÀÀÅÕ½Ðì¤)5½ÕÍ5½Ù ÈäÈ°ÌØؤ)5½Õͽݸ ÅÕ½Ðí±ÐÅÕ½Ðì¤)5½ÕÍUÀ ÅÕ½Ðí±ÐÅÕ½Ðì¤)ͱÀ ÅÕ½ÐìÄÀÀÀÅÕ½Ðì¤)5½ÕÍ5½Ù ÌÌÀ°Ðàä¤)5½Õͽݸ ÅÕ½Ðí±ÐÅÕ½Ðì¤)5½ÕÍUÀ ÅÕ½Ðí±ÐÅÕ½Ðì¤)ͱÀ ÅÕ½ÐìÄÀÀÀÅÕ½Ðì¤)]¥¹]¥Ð ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤)%9½Ð]¥¹Ñ¥Ù ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤Q¡¸]¥¹Ñ¥ÙÑ ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤)]¥¹]¥ÑÑ¥Ù ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤)5½ÕÍ5½Ù ÌÌÌ°ÌØä¤)5½Õͽݸ ÅÕ½Ðí±ÐÅÕ½Ðì¤)5½ÕÍUÀ ÅÕ½Ðí±ÐÅÕ½Ðì¤)ͱÀ ÅÕ½ÐìÄÀÀÀÅÕ½Ðì¤)5½ÕÍ5½Ù ÌÄà°ÔÀÀ¤)5½Õͽݸ ÅÕ½Ðí±ÐÅÕ½Ðì¤)5½ÕÍUÀ ÅÕ½Ðí±ÐÅÕ½Ðì¤)ͱÀ ÅÕ½ÐìÄÀÀÀÅÕ½Ðì¤)]¥¹]¥Ð ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤)%9½Ð]¥¹Ñ¥Ù ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤Q¡¸]¥¹Ñ¥ÙÑ ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤)]¥¹]¥ÑÑ¥Ù ÅÕ½ÐíàÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì¤)5½ÕÍ5½Ù ÈäÄ°Ìàä¤)5½Õͽݸ ÅÕ½Ðí±ÐÅÕ½Ðì¤)5½ÕÍUÀ ÅÕ½Ðí±ÐÅÕ½Ðì¤)ͱÀ ÅÕ½ÐìÄÀÀÀÅÕ½Ðì¤)ÉÕ¸ ÅÕ½ÐíèÀäÈíà¹áÅÕ½Ðì¤(¹É¥½¸´´´MÉ¥ÁÑ]É¥ÑȹÉѽ¹´´´)!½Ñ-åMÐ ÅÕ½ÐííÙôÅÕ½Ðì°ÅÕ½Ðí}EÕ¥ÐÅÕ½Ðì¤()Õ¹}EեР¤(á¥Ð)¹Õ¹)!½Ñ-åMÐ ÅÕ½ÐííÝôÅÕ½Ðì°ÅÕ½Ðí}MÑÉÐÅÕ½Ðì¤()Õ¹}MÑÉÐ ¤(á¥Ð)¹Õ¹

Share this post


Link to post
Share on other sites
zutto

that wrked, but could someone add start to that xD i am total dumbass idiot i have no idea how.

tried this

#include <misc.au3>

Global $pause

HotKeySet("{F8}","pause")

HotKeySet("{F7}","stop")

HotKeySet("{F6}","start")

$dll=DllOpen("user32.dll")

Do

Sleep(25)

Until _IsPressed("75")

while 1

sleep(100)

WEnd

Func pause()

$pause=Not $pause

Do

sleep(10)

Until Not $pause

EndFunc

Func stop()

Exit

EndFunc

Func start()

start

but no succes ;/

Share this post


Link to post
Share on other sites
Drew

Sec i made a silly mistake. Going fast in programming = bad.

Tell me if that works , and if you want me to explain it or not.

EDIT

Forgot to ; a line.

HotKeySet("{F7}", "_Start")
HotKeySet("{F6}", "_Quit")
;
Opt("WinWaitDelay", 100)
Opt("WinTitleMatchMode", 4)
Opt("WinDetectHiddenText", 1)
Opt("MouseCoordMode", 0)

While 1
    Sleep(5000)
WEnd

Func _Start()
    WinWait("x", "")
    If Not WinActive("x", "") Then WinActivate("x", "")
    WinWaitActive("x", "")
    MouseMove(276, 419)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    MouseMove(428, 351)
    MouseDown("left")
    Sleep("1000")
    MouseMove(427, 351)
    MouseUp("left")
    Sleep("1000")
    MouseMove(292, 366)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    MouseMove(330, 489)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    WinWait("x", "")
    If Not WinActive("x", "") Then WinActivate("x", "")
    WinWaitActive("x", "")
    MouseMove(333, 369)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    MouseMove(318, 500)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    WinWait("x", "")
    If Not WinActive("x", "") Then WinActivate("x", "")
    WinWaitActive("x", "")
    MouseMove(291, 389)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    Run("c:\x.exe")
;
    Exit
EndFunc   

Func _Quit()
    Exit
EndFunc

I'll explain it if you want.

Edited by Drew

Share this post


Link to post
Share on other sites
zutto

Sec i made a silly mistake. Going fast in programming = bad.

Tell me if that works , and if you want me to explain it or not.

EDIT

Forgot to ; a line.

HotKeySet("{F7}", "_Start")
HotKeySet("{F6}", "_Quit")
;
Opt("WinWaitDelay", 100)
Opt("WinTitleMatchMode", 4)
Opt("WinDetectHiddenText", 1)
Opt("MouseCoordMode", 0)

While 1
    Sleep(5000)
WEnd

Func _Start()
    WinWait("x", "")
    If Not WinActive("x", "") Then WinActivate("x", "")
    WinWaitActive("x", "")
    MouseMove(276, 419)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    MouseMove(428, 351)
    MouseDown("left")
    Sleep("1000")
    MouseMove(427, 351)
    MouseUp("left")
    Sleep("1000")
    MouseMove(292, 366)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    MouseMove(330, 489)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    WinWait("x", "")
    If Not WinActive("x", "") Then WinActivate("x", "")
    WinWaitActive("x", "")
    MouseMove(333, 369)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    MouseMove(318, 500)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    WinWait("x", "")
    If Not WinActive("x", "") Then WinActivate("x", "")
    WinWaitActive("x", "")
    MouseMove(291, 389)
    MouseDown("left")
    MouseUp("left")
    Sleep("1000")
    Run("c:\x.exe")
;
    Exit
EndFunc   

Func _Quit()
    Exit
EndFunc

I'll explain it if you want.

hmm whining about line 17, let me look it again..

EDIT: i screw'd something, now works perfectly, Thanks! =)

Edited by zutto

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  

×