Ich will dass dieses Script um eine bestimmt zeit startet es fängt aber immer sofort an was tue ich falsch
achso falls es weitere verbesserungen gibt bitte sagen^^
Spoiler anzeigen
If ( @DesktopWidth < 1280 ) Or ( @DesktopHeight < 1024 ) Then MsgBox('', "Auflösung zu klein ideal 1280x1024")
$Area = InputBox("Gebiete", "Auf wie vielen Gebieten soll gebaut werden(1-5)","1")
If $Area > 0.9 Then
$build1 = InputBox("Gebäude","Was Soll auf Gebiet 1 gebaut werden 1: Dorfzentrum 2:Hütte 3:Holzfäller 4:Steinmetz 5:Eisenmine 6:Farm 7:Brunnen 8:Mauer 9:Viehzucht 10:Kaserne", "1")
EndIf
If $Area > 1.9 Then
$build2 =InputBox("Gebäude","Was Soll auf Gebiet 2 gebaut werden 1: Dorfzentrum 2:Hütte 3:Holzfäller 4:Steinmetz 5:Eisenmine 6:Farm 7:Brunnen 8:Mauer 9:Viehzucht 10:Kaserne", "1")
EndIf
If $Area > 2.9 Then
$build3 = InputBox("Gebäude","Was Soll auf Gebeit 3 gebaut werden 1: Dorfzentrum 2:Hütte 3:Holzfäller 4:Steinmetz 5:Eisenmine 6:Farm 7:Brunnen 8:Mauer 9:Viehzucht 10:Kaserne", "1")
EndIf
If $Area > 3.9 Then
$build4 = InputBox("Gebäude","Was Soll auf Gebiet 2 gebaut werden 1: Dorfzentrum 2:Hütte 3:Holzfäller 4:Steinmetz 5:Eisenmine 6:Farm 7:Brunnen 8:Mauer 9:Viehzucht 10:Kaserne", "1")
EndIf
IF $Area > 4.9 Then
$build5 = InputBox("Gebäude","Was Soll auf Gebiet 2 gebaut werden 1: Dorfzentrum 2:Hütte 3:Holzfäller 4:Steinmetz 5:Eisenmine 6:Farm 7:Brunnen 8:Mauer 9:Viehzucht 10:Kaserne", "1")
EndIf
$shutd = InputBox("Herrunterfahren", "Soll der Pc nach verfolgreichem bauen herruntergefahren werden? Möglichkeiten ja nein","nein")
$zeit = InputBox("Start uhrzeit", "Wann soll der bau starten?", "06:00")
#cs
Tabelle zeigen:
MouseClick("left",258,487)
Sleep(5000)
MouseClick("left",222,520)
1:222
2:222 520
3:222 538
4:222 551
5:222 565
6:
7:
8:
9:
10:
Gebäude:
1: Dorfzentrum= x886 y407
2: Hütte= x886c
3: Holzfäller= x886 y
4: Steinmetz= x886 y
5: Eisenmine= x886 y
6: Farm= x886 y
7: Brunnen= x886 y
8: Mauer= x886 y
9: Viehzuch= x886 y
10: Kaserne= x886 y
11:
12:
13:
14:
15:
#ce
While 1
Sleep(2000)
If @HOUR = StringLeft($zeit, 2) And @MIN = StringRight($zeit, 2) Then
WinActivate("Age of Fear - Mozilla Firefox")
Sleep(1000)
MouseClick("left",857,166,2)
SLeep(500)
MouseClick("left",857,184)
MouseClick("left",851,210)
SLeep(10000)
MouseClick("left",239,312)
SLeep(10000)
;Allgemein
EndIf
If $Area > 0.9 Then
Select
Case $build1 = 0
Case $build1 = 1
MouseClick("left","890","406")
Sleep(3000)
Case $build1 = 2
MouseClick("left","890","440")
Sleep(3000)
Case $build1 = 3
MouseClick("left","890","475")
Sleep(3000)
Case $build1 = 4
MouseClick("left","890","512")
Sleep(3000)
Case $build1 = 5
MouseClick("left","890","545")
Sleep(3000)
Case $build1 = 6
MouseClick("left","890","581")
Sleep(3000)
SLeep(5000)
Case $build1 = 7
MouseClick("left","890","617")
Sleep(3000)
Case $build1 = 8
MouseClick("left","890","656")
Sleep(3000)
Case $build1 = 9
MouseClick("left","890","689")
Sleep(3000)
Case $build1 = 10
MouseClick("left","890","718")
Sleep(3000)
EndSelect
If $Area < 1.1 And $shutd = "ja" Then Shutdown("9") Else
If $Area < 1.1 Then Exit
;Allgemein End
[/autoit] [autoit][/autoit] [autoit]EndIf
If $Area > 1.9 Then
Sleep(10000)
MouseClick("left",258,487)
Sleep(1000)
MouseClick("left",222,510)
Sleep(10000)
Select
Case $build2 = 0
Case $build2 = 1
MouseClick("left","890","406")
Sleep(3000)
Case $build2 = 2
MouseClick("left","890","440")
Sleep(3000)
Case $build2 = 3
MouseClick("left","890","475")
Sleep(3000)
Case $build2 = 4
MouseClick("left","890","512")
Sleep(3000)
Case $build2 = 5
MouseClick("left","890","545")
Sleep(3000)
Case $build2 = 6
MouseClick("left","890","581")
Sleep(3000)
SLeep(5000)
Case $build2 = 7
MouseClick("left","890","617")
Sleep(3000)
Case $build2 = 8
MouseClick("left","890","656")
Sleep(3000)
Case $build2 = 9
MouseClick("left","890","689")
Sleep(3000)
Case $build2 = 10
MouseClick("left","890","718")
Sleep(3000)
EndSelect
If $Area < 2.1 And $shutd = "ja" Then Shutdown("9") Else
If $Area < 2.1 Then Exit
;Allgemein End
EndIf
If $Area > 2.9 Then
Sleep(5000)
MouseClick("left",258,487)
Sleep(1000)
MouseClick("left",222,527)
Sleep(10000)
Select
Case $build3 = 0
Case $build3 = 1
MouseClick("left","890","406")
Sleep(3000)
Case $build3 = 2
MouseClick("left","890","440")
Sleep(3000)
Case $build3 = 3
MouseClick("left","890","475")
Sleep(3000)
Case $build3 = 4
MouseClick("left","890","512")
Sleep(3000)
Case $build3 = 5
MouseClick("left","890","545")
Sleep(3000)
Case $build3 = 6
MouseClick("left","890","581")
Sleep(3000)
SLeep(5000)
Case $build3 = 7
MouseClick("left","890","617")
Sleep(3000)
Case $build3 = 8
MouseClick("left","890","656")
Sleep(3000)
Case $build3 = 9
MouseClick("left","890","689")
Sleep(3000)
Case $build3 = 10
MouseClick("left","890","718")
Sleep(3000)
EndSelect
If $Area < 3.1 And $shutd = "ja" Then Shutdown("9") Else
If $Area < 3.1 Then Exit
;Allgemein End
EndIf
If $Area > 3.9 Then
Sleep(5000)
MouseClick("left",258,487)
Sleep(1000)
MouseClick("left",222,539)
SLeep(10000)
Select
Case $build4 = 0
Case $build4 = 1
MouseClick("left","890","406")
Sleep(3000)
Case $build4 = 2
MouseClick("left","890","440")
Sleep(3000)
Case $build4 = 3
MouseClick("left","890","475")
Sleep(3000)
Case $build4 = 4
MouseClick("left","890","512")
Sleep(3000)
Case $build4 = 5
MouseClick("left","890","545")
Sleep(3000)
Case $build4 = 6
MouseClick("left","890","581")
Sleep(3000)
SLeep(5000)
Case $build4 = 7
MouseClick("left","890","617")
Sleep(3000)
Case $build4 = 8
MouseClick("left","890","656")
Sleep(3000)
Case $build4 = 9
MouseClick("left","890","689")
Sleep(3000)
Case $build4 = 10
MouseClick("left","890","718")
Sleep(3000)
EndSelect
If $Area < 4.1 And $shutd = "ja" Then Shutdown("9") Else
If $Area < 4.1 Then Exit
;Allgemein End
EndIf
If $Area > 4.9 Then
SLeep(10000)
MouseClick("left",258,487)
Sleep(2000)
MouseClick("left",222,551)
Sleep(10000)
Select
Case $build5 = 0
Case $build5 = 1
MouseClick("left","890","406")
Sleep(3000)
Case $build5 = 2
MouseClick("left","890","440")
Sleep(3000)
Case $build5 = 3
MouseClick("left","890","475")
Sleep(3000)
Case $build5 = 4
MouseClick("left","890","512")
Sleep(3000)
Case $build5 = 5
MouseClick("left","890","545")
Sleep(3000)
Case $build5 = 6
MouseClick("left","890","581")
Sleep(3000)
SLeep(5000)
Case $build5 = 7
MouseClick("left","890","617")
Sleep(3000)
Case $build5 = 8
MouseClick("left","890","656")
Sleep(3000)
Case $build5 = 9
MouseClick("left","890","689")
Sleep(3000)
Case $build5 = 10
MouseClick("left","890","718")
Sleep(3000)
EndSelect
If $Area < 5.1 And $shutd = "ja" Then Shutdown("9") Else
If $Area < 5.1 Then Exit
;Allgemein End
EndIf
WEnd