Was mache ich falsch?

- [ offen ]
NonStop
13. Juli 2007 um 00:45
Geschlossen
Erledigt

NonStop

Gast
13. Juli 2007 um 00:45
- #1
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

[autoit]

If ( @DesktopWidth < 1280 ) Or ( @DesktopHeight < 1024 ) Then MsgBox('', "Auflösung zu klein ideal 1280x1024")
[/autoit] [autoit][/autoit] [autoit]
$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
[/autoit] [autoit][/autoit] [autoit]
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
[/autoit] [autoit][/autoit] [autoit]
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
[/autoit] [autoit][/autoit] [autoit]
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
[/autoit] [autoit][/autoit] [autoit]
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
[/autoit] [autoit][/autoit] [autoit]
$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:
[/autoit] [autoit][/autoit] [autoit]
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)
[/autoit] [autoit][/autoit] [autoit]
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
[/autoit] [autoit][/autoit] [autoit]
;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)
[/autoit] [autoit][/autoit] [autoit]
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)
[/autoit] [autoit][/autoit] [autoit]
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
[/autoit] [autoit][/autoit] [autoit]
;Allgemein End
EndIf
If $Area > 3.9 Then
Sleep(5000)
MouseClick("left",258,487)
Sleep(1000)
MouseClick("left",222,539)
SLeep(10000)
Select
[/autoit] [autoit][/autoit] [autoit]
Case $build4 = 0

Case $build4 = 1
MouseClick("left","890","406")
Sleep(3000)
[/autoit] [autoit][/autoit] [autoit]
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)
[/autoit] [autoit][/autoit] [autoit]
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
[/autoit] [autoit][/autoit] [autoit][/autoit]
AspirinJunkie

.

Reaktionen

1

Beiträge

3.294
13. Juli 2007 um 02:19
- #2
Naja laut deinem Code werden nur die Zeilen 65-73 zu der bestimmten Zeit gestartet - der Rest so - einfach weil nur dieser Innerhalb der If-Anweisung mit der Zeitabfrage steht.
Willst du den Rest auch nur zu dieser Zeit ausführen dann muss dieser ebenfalls noch innerhalb dieser If-Anweisung.
Sonst fällt mir dazu nicht viel ein - weiß ja gar nicht wirklich was das Skript machen soll.
Zumindestens empfehle ich beim Einsatz von MouseClick() immer die Koordinaten per "Opt("MouseCoordMode", 0)" von absoluten Koordinaten auf relativ zum Fenster bezogene Koordinaten umzustellen.
Das hat den Vorteil das das ganze dann nicht mehr von der Bildschirmauflösung abhängig ist.
Damit auch das AutoIt-Window-Info Tool Fensterbezogene statt absolute Koordinaten anzeigt muss man dies dort bei "Options"-"Coord-Mode"-"Window" umstellen.
Waluev

ehemaliger µit - Orga

Beiträge

561
13. Juli 2007 um 08:32
- #3
Hi
schreib einfach ganz am Anfang

[autoit]

$hour = 16
$min = 30 ;also ne Zeit deiner wahl
[/autoit][autoit][/autoit][autoit]
Do
Sleep(100)
Until $hour=@Hour And $Min = @Min
;dann dein weiteres Skript
[/autoit]
Kann sein das die Makros falsch sind...hab die nicht genau im Kopf, aber wenn dmit Scite codest stehen die ja dann sowieso als Vorschlag da..

Hoffe das hilft dir

Waluev
Flensburg ist wie Payback - wenn man 18 Punkte hat bekommt man ein Fahrrad.
NonStop

Gast
13. Juli 2007 um 10:49
- #4
Zitat

Original von Waluev
Hi

schreib einfach ganz am Anfang

[autoit]

$hour = 16
$min = 30 ;also ne Zeit deiner wahl
[/autoit] [autoit][/autoit] [autoit]
Do
Sleep(100)
Until $hour=@Hour And $Min = @Min
;dann dein weiteres Skript
[/autoit]
Kann sein das die Makros falsch sind...hab die nicht genau im Kopf, aber wenn dmit Scite codest stehen die ja dann sowieso als Vorschlag da..

Hoffe das hilft dir

Waluev

Alles anzeigen

Super danke
so klappts
[autoit]

$zeit = InputBox("Start uhrzeit", "Wann soll der bau starten?", "06:00")
[/autoit][autoit][/autoit][autoit][/autoit][autoit]
Do
Sleep(100)
Until @HOUR = StringLeft($zeit, 2) And @MIN = StringRight($zeit, 2)
[/autoit]
2 Mal editiert, zuletzt von NonStop (13. Juli 2007 um 10:53)

In deinem Webbrowser ist JavaScript deaktiviert. Um alle Funktionen dieser Website nutzen zu können, muss JavaScript aktiviert sein.