Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 02:20

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Letzte Frage zu Whileschleifen (Wiederholung) :D

Discussion on Letzte Frage zu Whileschleifen (Wiederholung) :D within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
Papa Kobe's Avatar
 
elite*gold: 5
Join Date: Apr 2011
Posts: 1,960
Received Thanks: 1,483
Letzte Frage zu Whileschleifen (Wiederholung) :D

Hi nochmal

Habe nun meine Whileschleife (die ich haben wollte) & wollte fragen, wie man einstellen kann, dass er nach 25x Wiederholungen aufhören soll?

...
Code:
while 1
    For $i = 0 To 8
        Sleep(2000)
        Send($zeile[$i])
        Sleep(1500)
    Next
WEnd
...

Könnte wer es dort einbinden oder erklären wie's geht? Danke schonmal
Papa Kobe is offline  
Old 12/22/2012, 12:35   #2

 
elite*gold: 64
Join Date: May 2011
Posts: 1,229
Received Thanks: 854
Code:
while 1
    For $i = 0 To 24
        Sleep(2000)
        Send($zeile[$i])
        Sleep(1500)
    Next
WEnd
BladeTiger12 is online now  
Thanks
1 User
Old 12/22/2012, 12:39   #3
 
Papa Kobe's Avatar
 
elite*gold: 5
Join Date: Apr 2011
Posts: 1,960
Received Thanks: 1,483
Quote:
Originally Posted by BladeTiger12 View Post
Code:
while 1
    For $i = 0 To 24
        Sleep(2000)
        Send($zeile[$i])
        Sleep(1500)
    Next
WEnd
Funkt. nicht? o:
Der schreibt immer weiter..

€: Danke. Du hast mit "0 To 24" gesagt, wie viele Zeilen (hab ein großes Script) er aus einem anderem Textdokument kopieren soll. Danke :P Aber ich will auch nachdem er eine bestimmte Begrenzung von Wiederholung aufhört. Geht sowas?
Papa Kobe is offline  
Old 12/22/2012, 12:46   #4

 
elite*gold: 64
Join Date: May 2011
Posts: 1,229
Received Thanks: 854
ja so:
Code:
#include <File.au3>
$Line = _FileCountLines("Name")
while 1
    For $i = 0 To $Line
        Sleep(2000)
        Send($zeile[$i])
        Sleep(1500)
        If $i = 15 Then
             ExitLoop
        EndIf
    Next
WEnd
BladeTiger12 is online now  
Thanks
1 User
Old 12/22/2012, 12:55   #5
 
Papa Kobe's Avatar
 
elite*gold: 5
Join Date: Apr 2011
Posts: 1,960
Received Thanks: 1,483
Quote:
;Account 1
while 1
Sleep(3000)
mouseClick("left", 236, 42, 1)
Send("www.facebook.com{ENTER}")
Sleep(3000)
mouseClick("left", 737, 104, 1) ;Klick auf Emailkasten
Sleep(3000)
While 1
For $i = 0 To 24
Sleep(2000)
Send($zeile[$i])
Sleep(1500)
If $i = 1 Then
ExitLoop
EndIf
Next
WEnd ;Variable 1 als Email
Sleep(1000)
mouseClick("left", 900, 105, 1)
Sleep(1000)
While 1
For $i = 1 To 24
Sleep(2000)
Send($zeile[$i])
Sleep(1500)
If $i = 1 Then
ExitLoop
EndIf
Next
WEnd ;Variable 2 als Passwort
Sleep(2000)
mouseClick("left", 1084, 104, 1) ;ANMELDEN!
Sleep(10000)
mouseClick("left", 307, 42, 1)
Sleep(1000)
Send($var0) ;Variable 0 als Link
Sleep(1000)
Send("{ENTER}")
Sleep(10000)
mouseClick("left", 765, 442, 1) ; NUR LIKEBUTTON!
Sleep(4000)
mouseClick("left", 1007, 120, 1) ;Pfeil nach unten für abmelden
Sleep(1500)
mouseClick("left", 861, 303, 1) ;ABMELDEN!
Sleep(1500)
WEnd
Also. Ich weiß, der Code ist falsch. Ich will, dass er 0 für Email nimmt & 1 für Passwort. Und nach der Schleife soll er die 0 auf 2 machen & die 1 auf die 3. Ging sowas?
Papa Kobe is offline  
Old 12/22/2012, 18:36   #6
 
Croco™'s Avatar
 
elite*gold: 235
Join Date: Jan 2012
Posts: 920
Received Thanks: 377
Schau dir das mal an vl. hilft es dir ja:
Croco™ is offline  
Thanks
1 User
Old 12/22/2012, 18:52   #7
 
Achat's Avatar
 
elite*gold: 528
Join Date: Jan 2012
Posts: 2,127
Received Thanks: 2,403
Quote:
Originally Posted by King Kobe View Post
Hi nochmal

Habe nun meine Whileschleife (die ich haben wollte) & wollte fragen, wie man einstellen kann, dass er nach 25x Wiederholungen aufhören soll?

...
Code:
while 1
    For $i = 0 To 8
        Sleep(2000)
        Send($zeile[$i])
        Sleep(1500)
    Next
WEnd
...

Könnte wer es dort einbinden oder erklären wie's geht? Danke schonmal
Code:
local $iw = 1
while 1
        For $i = 0 To 8
        Sleep(2000)
        Send($zeile[$i])
        Sleep(1500)
        next
        $iw +=1
If $iw = 25 then exitloop
WEnd
MfG
Achat is offline  
Thanks
1 User
Old 12/22/2012, 19:35   #8
 
-STORM-'s Avatar
 
elite*gold: 124
Join Date: Dec 2009
Posts: 2,114
Received Thanks: 3,142
Oder gleich 2 For-Schleifen benutzen.
Ich finde, da blickt man besser durch.

Code:
For $iw = 1 To 25
	For $i = 0 To 8
		Sleep(2000)
		Send($zeile[$i])
		Sleep(1500)
	Next
Next
-STORM- is offline  
Thanks
1 User
Reply


Similar Threads Similar Threads
Letzte Nitrado Frage.
05/04/2011 - Minecraft - 11 Replies
Muss ich bei Nitrado meine echte Adresse angeben bitte um schnelle Antwort.
Sry letzte frage
12/26/2010 - Main - 8 Replies
ich sehe die meisten haben wen sie was posten untr ihren nahmen PREMIUM stehen wie kann man auch Premium werden
IPAD letzte Frage
11/17/2010 - Off Topic - 18 Replies
Hallo epvpers, habe im internet nen anbieter gefunden auf einer Kleinanzeigen seite. Er verkauft Ipad 64 GB für einen mega billigen Preis. Als ich ihn fragte ob wir es über Amazon usw machen könnte schrieb er das: Ps. er is aus England er hat dort angeblich eine Firma = Großhändler Bitte tut mir leid, wir tun das nicht ok. Bitte werden wir gerne, damit Sie wissen, dass wir sind eingetragene und berechtigtes Unternehmen hier in Großbritannien. Hier sind unsere Firmendaten zu überprüfen,...
Whileschleifen >.<
10/12/2009 - AutoIt - 9 Replies
Hallo, 2 teile meiens scripts: 1) While True $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 MsgBox(1, "Anleitung", "Drückt Start um zu Schlagen,Picupen und Aura/Sk anzumach und Potten um Blaue|Rote pots zu schlucken.Dazu müssen Aura F1 und Blaue|Rote pots 1und 2 sein", 1000) Case $Button2
Letzte frage
09/30/2007 - Kal Online - 3 Replies
um beim imp hack im RE 8.3 den inventory slot zu finden muss ich da inventory slot eingeben oder nur inventory oder ganz andres wort ?



All times are GMT +1. The time now is 02:20.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.