Spoiler anzeigen
Global $paused = FALSE
HotKeySet( "{PAUSE}", "TogglePause")
$i = 0
While $i <= 6
Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
Send("{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{LEFT}{LEFT}{TAB}{TAB}{TAB}")
Dim $lLimit1 = 25 ; 25-40
Dim $lLimit1_N = 0
Dim $lLimit2 = 90 ; 90-110
Dim $lLimit2_N = 0
Dim $lBuffer = ''
Dim $lRandom = ''
While 1
$lBuffer = Random( 1, 3, 1 )
Switch $lBuffer
Case 1 ; normal
$lRandom = Random( 56, 1441, 1 )
Case 2 ; $lLimit1
$lLimit1_N += 1
If ( $lLimit1_N == $lLimit1 ) Then
$lLimit1_N = 0
$lRandom = Random( 1241, 9999, 1 )
Else
$lRandom = Random( 56, 1441, 1 )
EndIf
Case 3 ; $lLimit2
$lLimit2_N += 1
If ( $lLimit2_N == $lLimit2 ) Then
$lLimit2_N = 0
$lRandom = Random( 9999, 50000, 1 )
Else
$lRandom = Random( 56, 1441, 1 )
EndIf
EndSwitch
;MsgBox( 0, "", $lRandom )
Send($lRandom)
sleep(Random(10,110))
;Send("{ENTER}")
Sleep(Random(300,500))
Send("{ESC}")
Sleep(Random(1600,2000))
Send("{BACKSPACE}{BACKSPACE}{BACKSPACE}{BACKSPACE}{BACKSPACE}{BACKSPACE}")
sleep(Random(10,110))
Dim $lLimit1 = 25 ; 25-40
Dim $lLimit1_N = 0
Dim $lLimit2 = 90 ; 90-110
Dim $lLimit2_N = 0
Dim $lBuffer = ''
Dim $lRandom = ''
While 1
$lBuffer = Random( 1, 3, 1 )
Switch $lBuffer
Case 1 ; normal
$lRandom = Random( 56, 1441, 1 )
Case 2 ; $lLimit1
$lLimit1_N += 1
If ( $lLimit1_N == $lLimit1 ) Then
$lLimit1_N = 0
$lRandom = Random( 1241, 9999, 1 )
Else
$lRandom = Random( 56, 1441, 1 )
EndIf
Case 3 ; $lLimit2
$lLimit2_N += 1
If ( $lLimit2_N == $lLimit2 ) Then
$lLimit2_N = 0
$lRandom = Random( 9999, 50000, 1 )
Else
$lRandom = Random( 56, 1441, 1 )
EndIf
EndSwitch
Send($lRandom)
sleep(Random(10,110))
;Send("{ENTER}")
Sleep(Random(300,500))
Send("{ESC}")
Sleep(Random(1200,1900))
Send("{F6}")
WEnd
Wend
$i = $i + 1
WEnd
Func TogglePause()
$paused = Not $paused
While $paused
WEnd
EndFunc
das problem ist, das er jetzt 2 mal ne andere random tzahl einfuegt, aber danach NUR NOCH F6 audfuehrt! aber er soll ja nur einmal F6 druecken und dann wieder die random zahlen ausfuehren.....wo liegt mein fehler??
thx ahead