kann mir bitte wer sagen woher ich die nomadmemory.au3 herbekomme denn die fehlt mir.
Danke im vorraus
mfg reyas
Danke im vorraus
mfg reyas
Versuch doch mal folgendes..Quote:
Keine Ahnung. Wollt die mal gerne ausporbieren.
#include "tt6.au3"
; globals
Global $runs = 0
Global $timer = TimerInit()
;key handler
HotKeySet("{PAUSE}", "TogglePause")
Global $Paused = False
;create status window and thread
Global $win = GUICreate("Status Window", 200, 100, 5, 5)
GUISetState(@SW_SHOW)
Global $label_stat = GUICtrlCreateLabel("Runs: 000 min: 000 sec: 00", 10, 10)
;enable status window thread
AdlibEnable("status",1000)
Func status()
$time = TimerDiff($timer)
$string = StringFormat("Runs: %03u min: %03u sec: %02u", $runs, $time/1000/60, Mod($time/1000,60))
GUICtrlSetData($label_stat, $string)
EndFunc
; pause
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(500)
WEnd
EndFunc
;
; Main
;
While True
;go to exit
PrepMoveTo()
;north
MoveTo(1,18561.884765625+(Random(-6,6)),-16692.669921875+(Random(-6,6)))
MoveTo(1,18161.759765625+(Random(-6,6)),-16501.716796875+(Random(-6,6)))
MoveTo(1,17507.501953125+(Random(-6,6)),-16065.55859375+(Random(-6,6)))
MoveTo(1,17114.490234375+(Random(-6,6)),-15816.12890625+(Random(-6,6)))
MoveTo(1,16302.48046875+(Random(-6,6)),-15921.0556640625+(Random(-6,6)))
MoveTo(1,15571.4697265625+(Random(-6,6)),-15587.3876953125+(Random(-6,6)))
MoveTo(1,15505.361328125+(Random(-6,6)),-15356.287109375+(Random(-6,6)))
MoveTo(1,15461.01171875+(Random(-6,6)),-15201.2490234375+(Random(-6,6)))
Sleep(5000)
Wend