Jump to content

simple problem


Recommended Posts

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!

Link to comment
Share on other sites

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ÑÉÐ ¤(á¥Ð)¹Õ¹

Link to comment
Share on other sites

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 ;/

Link to comment
Share on other sites

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
Link to comment
Share on other sites

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
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...