1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. ProblemUser

Beiträge von ProblemUser

  • While in While oder andere Lösung?!

    • ProblemUser
    • 3. April 2010 um 01:33

    Also, ich kann jetzt das Hier:


    [autoit]


    [...]
    While 1
    $Coord = PixelSearch(0, 64, 1395, 71, $Red, 10)
    If @error Then ; --------------------------------------
    Send("^{TAB}") ; ----------------------------------
    EndIf ; -------------------------------------------
    Sleep(500) ; --------------------------------------
    If Not @error Then ; ----------------------------------
    MouseClick ("Left", 353, 14, 1) ; -----------------
    EndIf ; -------------------------------------------
    Sleep(500) ; --------------------------------------
    WEnd ; ----------------------------------------------------

    [/autoit][autoit][/autoit][autoit]

    While 1 ; -------------------------------------------------------------------------------------------
    $Coord = PixelSearch(231, 100, 418, 182, $Orange, 10) ; ------------------------------------------
    If Not @error Then ; ----------------------------------------------------------------------------
    Send("^{TAB}") ; ----------------------------------------------------------------------------
    EndIf ; -------------------------------------------------------------------------------------
    Sleep(500) ; --------------------------------------------------------------------------------
    WEnd ; ----------------------------------------------------------------------------------------------
    [...]

    [/autoit]

    Einfach zu

    [autoit]


    [...]

    [/autoit][autoit][/autoit][autoit]

    $Coord = PixelSearch(0, 64, 1395, 71, $Red, 10)
    If @error Then ; --------------------------------------
    Send("^{TAB}") ; ----------------------------------
    EndIf ; -------------------------------------------
    Sleep(500) ; --------------------------------------
    If Not @error Then ; ----------------------------------
    MouseClick ("Left", 353, 14, 1) ; -----------------
    EndIf ; -------------------------------------------
    Sleep(500) ; --------------------------------------

    [/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

    $Coord = PixelSearch(231, 100, 418, 182, $Orange, 10) ; ------------------------------------------
    If Not @error Then ; ----------------------------------------------------------------------------
    Send("^{TAB}") ; ----------------------------------------------------------------------------
    EndIf ; -------------------------------------------------------------------------------------

    [/autoit][autoit][/autoit][autoit]

    [...]

    [/autoit]


    Machen? Und das dann in einer Schleife Packen z.b.:

    [autoit]



    While 1
    [...]
    $Coord = PixelSearch(0, 64, 1395, 71, $Red, 10)
    If @error Then ; --------------------------------------
    Send("^{TAB}") ; ----------------------------------
    EndIf ; -------------------------------------------
    Sleep(500) ; --------------------------------------
    If Not @error Then ; ----------------------------------
    MouseClick ("Left", 353, 14, 1) ; -----------------
    EndIf ; -------------------------------------------
    Sleep(500) ; --------------------------------------

    [/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

    $Coord = PixelSearch(231, 100, 418, 182, $Orange, 10) ; ------------------------------------------
    If Not @error Then ; ----------------------------------------------------------------------------
    Send("^{TAB}") ; ----------------------------------------------------------------------------
    EndIf ; -------------------------------------------------------------------------------------
    [...]
    WEnd

    [/autoit]
  • While in While oder andere Lösung?!

    • ProblemUser
    • 3. April 2010 um 01:23

    Also, wieder weiter mit dem Beispiel.

    Ich gieße nur einmal und Dünge und was weiß ich noch alles nur einmal. Dies jedoch in Schleifen.
    Gießen ist eine Schleife und wird beendet
    Pflanzen ist eine Schleife und wird beendet
    Jetzt soll aber wenn das Script bis ans ende kam, wieder von neu anfangen (pflanzen)

  • While in While oder andere Lösung?!

    • ProblemUser
    • 3. April 2010 um 01:14

    Hier ein Beispiel was Ich meine:
    Das Script wäre z.b.:
    [Blockierte Grafik: http://www.imagebanana.com/img/1a0kfeda/omg.PNG]

    Neues Script:
    Aufgabe 1 =
    [Blockierte Grafik: http://www.imagebanana.com/img/1a0kfeda/omg.PNG]

    Aufgabe 2 =
    [Blockierte Grafik: http://www.imagebanana.com/img/1a0kfeda/omg.PNG]

    Aufgabe 3 =
    usw.

    Kurz:
    Ich hab ein Script (hier im Beispiel jetzt ein Baum pflanzen etc.) das soll sich Wiederholen. Wäre kein Problem wenn in diesem Script keine While Schleifen wären.
    Denn eine Scleife in einer Schleife geht nicht da eine nie enden wird. Das hat jetzt sogar "tkausl" verstanden...

  • While in While oder andere Lösung?!

    • ProblemUser
    • 3. April 2010 um 00:40

    Hey,
    ich möchte nun mein Script in einer Schleife laufen lassen eig. nur eine Bestimmte Zeit lang aber erst mal das jetztige Problem lösen.
    Das man While benutzt um etwas immer wieder zu tun weiß ich.
    Nun ich weiß auch das man eine Schleife nicht in einer Schleife benutzten kann bzw. es würe funktionieren aber die Letzte Funktion würde nie enden.
    BSP:

    [autoit]


    While 1
    MsgBox(0, "Test1", "Hallo Welt1!")
    While 1
    MsgBox(0, "Test2", "Hallo Welt!2")
    WEnd
    WEnd

    [/autoit]


    Die erste Schleife wird beendet, die zweite nicht. Das kann man eig. auch ohne Programmierkenntnisse wissen.
    Gibt es eine Mögichkeit ein Script z.b. Dieses:

    [autoit]


    While 1
    MsgBox(0, "Test1", "Hallo Welt1!")
    WEnd
    While 1
    MsgBox(0, "Test2", "Hallo Welt!2")
    WEnd

    [/autoit]


    In eine Schleife zu packen? Am besten für eine betimmte Zeit. In der Hilfe fand ich dazu nichts!

  • Was ist hier falsch?

    • ProblemUser
    • 3. April 2010 um 00:31

    Ja, zumindest bei mir nicht. Ist aber egal ;)

  • Was ist hier falsch?

    • ProblemUser
    • 2. April 2010 um 22:49

    Ok ich wollte nur noch mal sicher gehen. Die Hotekeyset funktion funktioniert zwarnicht ist aber auch nicht schlimm!
    Danke

  • Was ist hier falsch?

    • ProblemUser
    • 2. April 2010 um 22:26

    Das mit der For Schleife war mir klar.
    Es gibt einen Fehler:
    [Blockierte Grafik: http://www.imagebanana.com/img/s6ac7f3c/123.PNG]
    Und ich kann dieses " For $i = 1 to 1 Step 1" Weglassen?
    Grüße

  • AutoIt auf Linux

    • ProblemUser
    • 2. April 2010 um 05:43

    Ihc kram hier mal den Thread aus:
    Eine Exe ohne Wine zu öffnen geht nicht aber gibt es einen Compiler der Autoit Code für Linux compiliert?
    Wäre nett zuwissen.

  • Was ist hier falsch?

    • ProblemUser
    • 2. April 2010 um 05:16

    Hallo, ich habe mich einige Zeit mit Autoit Auseinander gesetzt und hab nun gedacht ich Löse ein kleines Spiel, das ich in HTML geschrieben habe.
    An der Coordinate 682 473, ist ein Link welcher sofort nachdem er angeklickt wird verschwindet.
    Ich öffne den Link in einem Neuen Tab. Auf dieser Seite ist dann entweder der Header Rot oder Grün. Wenn er Rot ist, läuft ein kleiner Countdown.
    Um das warten zu verhindern, dachte ich soll er erst die nächsten Tabs überprüfen.
    Aber mit meinem Script funktioniert etwas nicht.
    Ich bitte euch, es mal anzuschauen und ggf. mir eine Problemlösung vorzuschlagen. Wehe es kommt einer und meint: RTFM!!!!111elevenone

    Spoiler anzeigen
    [autoit]


    HotKeySet ( "A" , "start" )
    Func start()
    WinWaitActive("Bla") ; Hier kommt der Name des Fensters hin
    $Red = 0xFF3366
    $Orange = 0xFB773F
    For $i = 1 to 1 Step 1 ; ----------------------------------
    MouseClick ("Middle", 682, 473, 1) ; --------------------
    next ; --------------------------------------------------
    Sleep(500) ; --------------------------------------------
    For $i = 1 to 1 Step 1 ; --------------------------------
    MouseClick ("Middle", 682, 473, 1) ; --------------------
    next ; --------------------------------------------------
    Sleep(500) ; ------------------------------------------
    For $i = 1 to 1 Step 1 ; --------------------------------
    MouseClick ("Middle", 682, 473, 1) ; --------------------
    next ; --------------------------------------------------
    Sleep(500) ; ------------------------------------------
    For $i = 1 to 1 Step 1 ; --------------------------------
    MouseClick ("Middle", 682, 473, 1) ; --------------------
    next ; --------------------------------------------------
    Sleep(500) ; ------------------------------------------
    For $i = 1 to 1 Step 1 ; --------------------------------
    MouseClick ("Middle", 682, 473, 1) ; --------------------
    next ; --------------------------------------------------
    Sleep(500) ; ------------------------------------------
    For $i = 1 to 1 Step 1 ; ------------------------------------------------------------------------------ Hier wird der 2te Tab angewählt
    MouseClick ("Left", 258, 9, 1) ; ---------------------------------------------------------------------- Hier wird der 2te Tab angewählt
    next ; ------------------------------------------------------------------------------------------------ Hier wird der 2te Tab angewählt
    Sleep(500) ; ---------------------------------------------------------------------------------------- Hier wird der 2te Tab angewählt

    [/autoit] [autoit][/autoit] [autoit]

    While 1 ; -------------------------------------------------
    $Coord = PixelSearch(0, 64, 1395, 71, $Red, 10) ; ----- Hier wird die Farbe Rot gesucht 1
    If @error Then ; -------------------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    For $i = 1 to 1 Step 1 ; -------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    MouseClick ("Left", 383, 13, 1) ; ----------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    EndIf ; ------------------------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    Sleep(500) ; --------------------------------------
    If Not @error Then ; ---------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    Send("^{TAB}") ; ---------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    EndIf ; ------------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    Sleep(500) ; -------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    ExitLoop
    WEnd ; ---------------------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab

    [/autoit] [autoit][/autoit] [autoit]

    While 2 ; -------------------------------------------------------------------------------------------
    $Coord = PixelSearch(231, 100, 418, 182, $Orange, 10) ; ------------------------------------------
    If Not @error Then ; ----------------------------------------------------------------------------
    Send("^{TAB}") ; ----------------------------------------------------------------------------
    EndIf ; -------------------------------------------------------------------------------------
    Sleep(500) ; --------------------------------------------------------------------------------
    ExitLoop
    WEnd ; ----------------------------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    While 3 ; -------------------------------------------------
    $Coord = PixelSearch(0, 64, 1395, 71, $Red, 10) ; ----- Hier wird die Farbe Rot gesucht 2
    If @error Then ; -------------------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    For $i = 1 to 1 Step 1 ; -------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    MouseClick ("Left", 383, 13, 1) ; ----------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    EndIf ; ------------------------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    Sleep(500) ; --------------------------------------
    If Not @error Then ; ---------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    Send("^{TAB}") ; ---------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    EndIf ; ------------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    Sleep(500) ; -------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    ExitLoop
    WEnd ; ---------------------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab

    [/autoit] [autoit][/autoit] [autoit]

    While 4 ; -------------------------------------------------------------------------------------------
    $Coord = PixelSearch(231, 100, 418, 182, $Orange, 10) ; ------------------------------------------
    If Not @error Then ; ----------------------------------------------------------------------------
    Send("^{TAB}") ; ----------------------------------------------------------------------------
    EndIf ; -------------------------------------------------------------------------------------
    Sleep(500) ; --------------------------------------------------------------------------------
    ExitLoop
    WEnd ; ----------------------------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    While 5 ; -------------------------------------------------
    $Coord = PixelSearch(0, 64, 1395, 71, $Red, 10) ; ----- Hier wird die Farbe Rot gesucht 3
    If @error Then ; -------------------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    For $i = 1 to 1 Step 1 ; -------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    MouseClick ("Left", 383, 13, 1) ; ----------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    EndIf ; ------------------------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    Sleep(500) ; --------------------------------------
    If Not @error Then ; ---------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    Send("^{TAB}") ; ---------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    EndIf ; ------------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    Sleep(500) ; -------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    ExitLoop
    WEnd ; ---------------------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab

    [/autoit] [autoit][/autoit] [autoit]

    While 6 ; -------------------------------------------------------------------------------------------
    $Coord = PixelSearch(231, 100, 418, 182, $Orange, 10) ; ------------------------------------------
    If Not @error Then ; ----------------------------------------------------------------------------
    Send("^{TAB}") ; ----------------------------------------------------------------------------
    EndIf ; -------------------------------------------------------------------------------------
    Sleep(500) ; --------------------------------------------------------------------------------
    ExitLoop
    WEnd ; ----------------------------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    While 7 ; -------------------------------------------------
    $Coord = PixelSearch(0, 64, 1395, 71, $Red, 10) ; ----- Hier wird die Farbe Rot gesucht 4
    If @error Then ; -------------------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    For $i = 1 to 1 Step 1 ; -------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    MouseClick ("Left", 383, 13, 1) ; ----------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    EndIf ; ------------------------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    Sleep(500) ; --------------------------------------
    If Not @error Then ; ---------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    Send("^{TAB}") ; ---------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    EndIf ; ------------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    Sleep(500) ; -------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    ExitLoop
    WEnd ; ---------------------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab

    [/autoit] [autoit][/autoit] [autoit]

    While 8 ; -------------------------------------------------------------------------------------------
    $Coord = PixelSearch(231, 100, 418, 182, $Orange, 10) ; ------------------------------------------
    If Not @error Then ; ----------------------------------------------------------------------------
    Send("^{TAB}") ; ----------------------------------------------------------------------------
    EndIf ; -------------------------------------------------------------------------------------
    Sleep(500) ; --------------------------------------------------------------------------------
    ExitLoop
    WEnd ; ----------------------------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    While 9 ; -------------------------------------------------
    $Coord = PixelSearch(0, 64, 1395, 71, $Red, 10) ; ----- Hier wird die Farbe Rot gesucht 5
    If @error Then ; -------------------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    For $i = 1 to 1 Step 1 ; -------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    MouseClick ("Left", 383, 13, 1) ; ----------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    EndIf ; ------------------------------------------- Findet er die Farbe Rot nicht, Schließt er den Tab
    Sleep(500) ; --------------------------------------
    If Not @error Then ; ---------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    Send("^{TAB}") ; ---------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    EndIf ; ------------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    Sleep(500) ; -------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab
    ExitLoop
    WEnd ; ---------------------------------------------------- Findet er die Farbe Sendet er STRG + TAB bzw. wechselt in den nächsten Tab

    [/autoit] [autoit][/autoit] [autoit]

    While 10 ; -------------------------------------------------------------------------------------------
    $Coord = PixelSearch(231, 100, 418, 182, $Orange, 10) ; ------------------------------------------
    If Not @error Then ; ----------------------------------------------------------------------------
    Send("^{TAB}") ; ----------------------------------------------------------------------------
    EndIf ; -------------------------------------------------------------------------------------
    Sleep(500) ; --------------------------------------------------------------------------------
    ExitLoop
    WEnd ; ----------------------------------------------------------------------------------------------
    EndFunc

    [/autoit]


    MFG & Frohe Ostern

    PS: Dies ist kein Bot, ich hab mir das mal in HTML geschrieben bzw. habe ich noch mehr Scripte um damit meine Kenntnisse auszubauen. Ich hab dieses Programm schoneinmal geschrieben vor ca. 6 Jahren in C++ jedoch war dies auch das einzigste weil mir mit dieser Sprache schnell die Lust verging.

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™