Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
autoit do schleife problem autoit do schleife problem
You last visited: Today at 09:40

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

Advertisement


Advertise with us!

autoit do schleife problem

Discussion on autoit do schleife problem within the AutoIt forum part of the Coders Den category.

Reply
Page 1 of 2 1 2
 
Old   #1
 
GT4's Avatar
 
elite*gold: 81
The Black Market: 1/0/0
Join Date: Dec 2008
Posts: 434
Received Thanks: 81
Question autoit do schleife problem

wolte ma ein autoit spammer machen

Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Global $pause

$inireadinput1 = IniRead("save2.ini","save","input1","")
$inireadinput2 = IniRead("save2.ini","save","input2","")
$inireadinput3 = IniRead("save2.ini","save","input3","")

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Spam made by ******", 626, 442, 192, 124)
$Button1 = GUICtrlCreateButton("Start spam !", 0, 0, 113, 49)
$Input1 = GUICtrlCreateInput($inireadinput1, 472, 27, 153, 21)
$Input2 = GUICtrlCreateInput($inireadinput2, 472, 56, 153, 21)
$input3 = GUIctrlCreateinput($inireadinput3, 472, 85, 153, 21) 
$checkbox1 = GUICtrlCreateCheckbox("Enter ?",472, 115, 153, 21)
$Pic1 = GUICtrlCreatePic("41125.kp2", 0, 0, 625, 441, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

IniWrite("save.ini","hotkey","exit","{f5}")

$iniread = IniRead("save.ini","hotkey","exit","")
HotKeySet($iniread,"_exit")
IniDelete("save.ini","hotkey","exit")
iniwrite("save3.ini","wie viel verzögerung","sleep","2000")
HotKeySet("{f4}", "_Pause")
hotkeyset("{f3}","_Start")

if $checkbox1 = 1 Then _enter()
if $checkbox1 = 0 Then _nichtenter()


func _enter()
	send("{enter}")
endfunc

Func _exit()
Exit
EndFunc

Func _Pause()
While 1
    Sleep(100)
WEnd
EndFunc

func _Start()
	
IniWrite("save2.ini","save","input1",GUICtrlRead($input1))
IniWrite("save2.ini","save","input2",GUICtrlRead($input2))
IniWrite("save2.ini","save","input3",GUICtrlRead($input3))

$auslesen = GUICtrlRead($checkbox1)
if $auslesen = 1 Then 
	
$anzahl = 0
do

	sleep(Guictrlread($input2))                         <-   ; WIE SOLL ICH DAS HIR MACHEN ??
	Send(GUICtrlRead($input1))
    send("{Enter}")
	$anzahl = +1
	until $anzahl = GUICtrlRead($input3)
EndIf

If $auslesen = 4 then
Do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    until GUICtrlRead($input3)
EndIf


endfunc

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		case $button1
			
IniWrite("save2.ini","save","input1",GUICtrlRead($input1))
IniWrite("save2.ini","save","input2",GUICtrlRead($input2))
IniWrite("save2.ini","save","input3",GUICtrlRead($input3))

while 3
$auslesen = GUICtrlRead($checkbox1)
if $auslesen = 1 Then 

	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    send("{Enter}")
EndIf

If $auslesen = 4 then
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))

	EndIf
WEnd
	EndSwitch
WEnd

BISCHEN UNÜBERSICHTLICH
ich wil z.B das er 10 mal schreibt hallo nur 10 mal krige es aber nicht hin ;(
er schreibt immer und immer weiter...
GT4 is offline  
Old 11/21/2009, 14:02   #2
 
MC_Muffin's Avatar
 
elite*gold: 0
The Black Market: 0/1/0
Join Date: Nov 2009
Posts: 4,943
Received Thanks: 1,230
Quote:
Originally Posted by GT4 View Post
wolte ma ein autoit spammer machen

Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Global $pause

$inireadinput1 = IniRead("save2.ini","save","input1","")
$inireadinput2 = IniRead("save2.ini","save","input2","")
$inireadinput3 = IniRead("save2.ini","save","input3","")

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Spam made by Master28 !", 626, 442, 192, 124)
$Button1 = GUICtrlCreateButton("Start spam !", 0, 0, 113, 49)
$Input1 = GUICtrlCreateInput($inireadinput1, 472, 27, 153, 21)
$Input2 = GUICtrlCreateInput($inireadinput2, 472, 56, 153, 21)
$input3 = GUIctrlCreateinput($inireadinput3, 472, 85, 153, 21) 
$checkbox1 = GUICtrlCreateCheckbox("Enter ?",472, 115, 153, 21)
$Pic1 = GUICtrlCreatePic("41125.kp2", 0, 0, 625, 441, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

IniWrite("save.ini","hotkey","exit","{f5}")

$iniread = IniRead("save.ini","hotkey","exit","")
HotKeySet($iniread,"_exit")
IniDelete("save.ini","hotkey","exit")
iniwrite("save3.ini","wie viel verzögerung","sleep","2000")
HotKeySet("{f4}", "_Pause")
hotkeyset("{f3}","_Start")

if $checkbox1 = 1 Then _enter()
if $checkbox1 = 0 Then _nichtenter()


func _enter()
	send("{enter}")
endfunc

Func _exit()
Exit
EndFunc

Func _Pause()
While 1
    Sleep(100)
WEnd
EndFunc

func _Start()
	
IniWrite("save2.ini","save","input1",GUICtrlRead($input1))
IniWrite("save2.ini","save","input2",GUICtrlRead($input2))
IniWrite("save2.ini","save","input3",GUICtrlRead($input3))

$auslesen = GUICtrlRead($checkbox1)
if $auslesen = 1 Then 
	
$anzahl = 0
do

	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    send("{Enter}")
	$anzahl = +1
	until $anzahl = GUICtrlRead($input3)
EndIf

If $auslesen = 4 then
Do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    until GUICtrlRead($input3)
EndIf


endfunc

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		case $button1
			
IniWrite("save2.ini","save","input1",GUICtrlRead($input1))
IniWrite("save2.ini","save","input2",GUICtrlRead($input2))
IniWrite("save2.ini","save","input3",GUICtrlRead($input3))

while 3
$auslesen = GUICtrlRead($checkbox1)
if $auslesen = 1 Then 

	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    send("{Enter}")
EndIf

If $auslesen = 4 then
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))

	EndIf
WEnd
	EndSwitch
WEnd
Ja und was ist das Problem?
MC_Muffin is offline  
Old 11/21/2009, 14:06   #3
 
GT4's Avatar
 
elite*gold: 81
The Black Market: 1/0/0
Join Date: Dec 2008
Posts: 434
Received Thanks: 81
Ich hab das problem editiert

Muss forsichtig sein nicht das ich mein dritte verwanung kriege ;(

Ich mache mal parr photos.

Drauf klicken pls
GT4 is offline  
Old 11/21/2009, 14:31   #4
 
Xereon's Avatar
 
elite*gold: 0
The Black Market: 3/1/0
Join Date: Apr 2009
Posts: 793
Received Thanks: 366
Also ich nehme mal an das du hiermit Probleme hast oder?

Code:
If $auslesen = 4 then
Do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    until GUICtrlRead($input3)
Da fehlt ein counter :P
Xereon is offline  
Old 11/21/2009, 14:45   #5
 
GT4's Avatar
 
elite*gold: 81
The Black Market: 1/0/0
Join Date: Dec 2008
Posts: 434
Received Thanks: 81
Quote:
Originally Posted by Xereon View Post
Also ich nehme mal an das du hiermit Probleme hast oder?

Code:
If $auslesen = 4 then
Do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    until GUICtrlRead($input3)
Da fehlt ein counter :P
Ich hab doch folgendes hingeschrieben:

$anzahl = 0
do

sleep(Guictrlread($input2))
Send(GUICtrlRead($input1))
send("{Enter}")
$anzahl = +1
until $anzahl = GUICtrlRead($input3)

Hab ich was falsch gemacht ???
GT4 is offline  
Old 11/21/2009, 15:01   #6
 
Xereon's Avatar
 
elite*gold: 0
The Black Market: 3/1/0
Join Date: Apr 2009
Posts: 793
Received Thanks: 366
gott hat das Ewigkeiten gedauert bis ich dein Script durschaut habe.
Du hast eine Funktion _Start, in der sich die do schleife befindet, die du aber überhaupt nicht callst. Statdessen gehts du in eine While Schleife die immer true ist. Ist doch logisch das es nicht endet.
Und zu meinen letzten Post:
Code:
If $auslesen = 4 then
Do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    until GUICtrlRead($input3)
Da fehlt der Counter :P
Xereon is offline  
Old 11/21/2009, 15:44   #7
 
GT4's Avatar
 
elite*gold: 81
The Black Market: 1/0/0
Join Date: Dec 2008
Posts: 434
Received Thanks: 81
EDIT: !!!!!!!!!!!!!!!!!!!

Könte jemand den code korrigieren ?
Und in posten, da kommt immer so ein fehler ganz unten.


Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Global $pause

$inireadinput1 = IniRead("save2.ini","save","input1","")
$inireadinput2 = IniRead("save2.ini","save","input2","")
$inireadinput3 = IniRead("save2.ini","save","input3","")

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Spam made by ******* !", 626, 442, 192, 124)
$Button1 = GUICtrlCreateButton("Start spam !", 0, 0, 113, 49)
$Input1 = GUICtrlCreateInput($inireadinput1, 472, 27, 153, 21)
$Input2 = GUICtrlCreateInput($inireadinput2, 472, 56, 153, 21)
$input3 = GUIctrlCreateinput($inireadinput3, 472, 85, 153, 21) 
$checkbox1 = GUICtrlCreateCheckbox("Enter ?",472, 115, 153, 21)
$Pic1 = GUICtrlCreatePic("41125.kp2", 0, 0, 625, 441, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

IniWrite("save.ini","hotkey","exit","{f5}")

$iniread = IniRead("save.ini","hotkey","exit","")
HotKeySet($iniread,"_exit")
IniDelete("save.ini","hotkey","exit")
iniwrite("save3.ini","wie viel verzögerung","sleep","2000")
HotKeySet("{f4}", "_Pause")
hotkeyset("{f3}","_Start")

if $checkbox1 = 1 Then _enter()
if $checkbox1 = 0 Then _nichtenter()


func _enter()
	send("{enter}")
endfunc

Func _exit()
Exit
EndFunc

Func _Pause()
While 1
    Sleep(100)
WEnd
EndFunc

func _Start()
	
IniWrite("save2.ini","save","input1",GUICtrlRead($input1))
IniWrite("save2.ini","save","input2",GUICtrlRead($input2))
IniWrite("save2.ini","save","input3",GUICtrlRead($input3))

$auslesen = GUICtrlRead($checkbox1)
if $auslesen = 1 Then 
	
$anzahl = 0

do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    send("{Enter}")
	$anzahl = $anzahl + 1
	tooltip("du hast schon"& $anzahl & "nachrichten geschikt",0,0,"info")
	until $anzahl = GUICtrlRead($input3)
	if $anzahl = GUICtrlRead($input3) Then
		WinClose("du hast schon" & GUICtrlRead($input3) "nachrichten geschikt","")
		ToolTip("Fertig!",0,0,"Info")
		sleep(2000)
		winclose("Fertig!","")
		EndIf
EndIf

If $auslesen = 4 then
$anzahl2 = 0
Do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
	$anzahl2 = $anzahl2 + 1
	tooltip("du hast schon"& $anzahl & "nachrichten geschikt",0,0,"info")
	until GUICtrlRead($input3)
	if $anzahl = GUICtrlRead($input3) Then
	WinClose("du hast schon" & GUICtrlRead($input3) "nachrichten geschikt","")
	ToolTip("Fertig!",0,0,"Info")
	sleep(2000)
	winclose("Fertig!","")
EndIf



While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		case $button1
			
IniWrite("save2.ini","save","input1",GUICtrlRead($input1))
IniWrite("save2.ini","save","input2",GUICtrlRead($input2))
IniWrite("save2.ini","save","input3",GUICtrlRead($input3))


$auslesen = GUICtrlRead($checkbox1)
if $auslesen = 1 Then 
$anzahl3 = 0

do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    send("{Enter}")
	$anzahl3 = $anzahl3 + 1
	tooltip("du hast schon"& $anzahl & "nachrichten geschikt",0,0,"info")
until GUICtrlRead($input3)
if $anzahl = GUICtrlRead($input3) Then
		WinClose("du hast schon" & GUICtrlRead($input3) "nachrichten geschikt","")
		ToolTip("Fertig!",0,0,"Info")
		sleep(2000)
		winclose("Fertig!","")
		
EndIf

If $auslesen = 4 then
	$anzahl4 = 0
	Do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
	$anzahl3 = $anzahl3 + 1
	tooltip("du hast schon"& $anzahl & "nachrichten geschikt",0,0,"info")
until GUICtrlRead($input3)
if $anzahl = GUICtrlRead($input3) Then
		WinClose("du hast schon" & GUICtrlRead($input3) "nachrichten geschikt","")
		ToolTip("Fertig!",0,0,"Info")
		sleep(2000)
		winclose("Fertig!","")
		
EndIf


EndSwitch    [COLOR="Red"][B]<<<<-----[/B][/COLOR] [COLOR="Red"][B]HIR KOMMEN IMMER FEHLER[/B][/COLOR]
WEnd          [COLOR="Red"][B]<<<<-----[/B][/COLOR] [B][COLOR="Red"]HIR KOMMEN IMMER FEHLER[/COLOR][/B]
GT4 is offline  
Old 11/21/2009, 16:16   #8
 
Xereon's Avatar
 
elite*gold: 0
The Black Market: 3/1/0
Join Date: Apr 2009
Posts: 793
Received Thanks: 366
Wenn du jetzt auch noch die genaue Fehlermeldung hier reinschreibts, können wir dir bestimmt helfen
Xereon is offline  
Old 11/21/2009, 16:31   #9
 
GT4's Avatar
 
elite*gold: 81
The Black Market: 1/0/0
Join Date: Dec 2008
Posts: 434
Received Thanks: 81
Du köntest ja auch diesen code was ich oben gepostet habe in einem autoit datei rein schmeisen und dan es an gucken.
Aber hier der Fehler :


C:\Dokumente und Einstellungen\anonymous\Desktop\spammer bearbeiten\Neu AutoIt v3 Script.au3 (116) : ==> "Wend" statement with no matching "While" statement.:
WEnd
GT4 is offline  
Old 11/21/2009, 16:41   #10
 
Xereon's Avatar
 
elite*gold: 0
The Black Market: 3/1/0
Join Date: Apr 2009
Posts: 793
Received Thanks: 366
Nein könnte ich nicht, weil ich dazu viel zu faul bin :P
Wenn mich nicht alles irrt, gehört vor den Endswitch ein Endif hin :P
Xereon is offline  
Old 11/21/2009, 16:44   #11




 
bloodx's Avatar
 
elite*gold: 55
The Black Market: 4/0/0
Join Date: Mar 2006
Posts: 4,582
Received Thanks: 1,537
Wend" statement with no matching "While" statement.:

du musst das Wend weg nehmen weil du kein dazugehöriges While hast.... Wer lesen kann ist klar im vorteil
bloodx is offline  
Old 11/21/2009, 16:50   #12
 
Xereon's Avatar
 
elite*gold: 0
The Black Market: 3/1/0
Join Date: Apr 2009
Posts: 793
Received Thanks: 366
Quote:
Originally Posted by bloodx View Post
Wend" statement with no matching "While" statement.:

du musst das Wend weg nehmen weil du kein dazugehöriges While hast.... Wer lesen kann ist klar im vorteil
Ohja wie recht du da hast:
Code:
[COLOR="Red"][B]While 1[/B][/COLOR]
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		case $button1
			
IniWrite("save2.ini","save","input1",GUICtrlRead($input1))
IniWrite("save2.ini","save","input2",GUICtrlRead($input2))
IniWrite("save2.ini","save","input3",GUICtrlRead($input3))


$auslesen = GUICtrlRead($checkbox1)
if $auslesen = 1 Then 
$anzahl3 = 0

do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
    send("{Enter}")
	$anzahl3 = $anzahl3 + 1
	tooltip("du hast schon"& $anzahl & "nachrichten geschikt",0,0,"info")
until GUICtrlRead($input3)
if $anzahl = GUICtrlRead($input3) Then
		WinClose("du hast schon" & GUICtrlRead($input3) "nachrichten geschikt","")
		ToolTip("Fertig!",0,0,"Info")
		sleep(2000)
		winclose("Fertig!","")
		
EndIf

If $auslesen = 4 then
	$anzahl4 = 0
	Do
	sleep(Guictrlread($input2))
	Send(GUICtrlRead($input1))
	$anzahl3 = $anzahl3 + 1
	tooltip("du hast schon"& $anzahl & "nachrichten geschikt",0,0,"info")
until GUICtrlRead($input3)
if $anzahl = GUICtrlRead($input3) Then
		WinClose("du hast schon" & GUICtrlRead($input3) "nachrichten geschikt","")
		ToolTip("Fertig!",0,0,"Info")
		sleep(2000)
		winclose("Fertig!","")
		
EndIf


EndSwitch    <<<<----- HIR KOMMEN IMMER FEHLER
[COLOR="Red"][B]WEnd[/B] [/COLOR]         <<<<----- HIR KOMMEN IMMER FEHLER
Xereon is offline  
Old 11/21/2009, 16:55   #13
 
GT4's Avatar
 
elite*gold: 81
The Black Market: 1/0/0
Join Date: Dec 2008
Posts: 434
Received Thanks: 81
Wen ich das "wend" weg mache dan kommt das:

C:\Dokumente und Einstellungen\anonymous\Desktop\spammer bearbeiten\Neu AutoIt v3 Script.au3 (116) : ==> "While" statement has no matching "Wend" statement.:
EndSwitch

Hier noch ma der CODE
Keiner der mir helfen kann ?

Edit:Jetzt bin ich ganz verwirrt , was soll ich jetz machen.
*verzweifelt*
GT4 is offline  
Old 11/21/2009, 17:00   #14
 
Xereon's Avatar
 
elite*gold: 0
The Black Market: 3/1/0
Join Date: Apr 2009
Posts: 793
Received Thanks: 366
Quote:
Originally Posted by Xereon View Post
Nein könnte ich nicht, weil ich dazu viel zu faul bin :P
Wenn mich nicht alles irrt, gehört vor den Endswitch ein Endif hin :P
Schonmal das ausprobiert?
Xereon is offline  
Old 11/21/2009, 17:08   #15
 
GT4's Avatar
 
elite*gold: 81
The Black Market: 1/0/0
Join Date: Dec 2008
Posts: 434
Received Thanks: 81
Ohh entlich ich habs ! Ich habe ein endif vergessen !

Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Global $pause

$inireadinput1 = IniRead("save2.ini", "save", "input1", "")
$inireadinput2 = IniRead("save2.ini", "save", "input2", "")
$inireadinput3 = IniRead("save2.ini", "save", "input3", "")

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Spam made by ****** !", 626, 442, 192, 124)
$Button1 = GUICtrlCreateButton("Start spam !", 0, 0, 113, 49)
$Input1 = GUICtrlCreateInput($inireadinput1, 472, 27, 153, 21)
$Input2 = GUICtrlCreateInput($inireadinput2, 472, 56, 153, 21)
$input3 = GUIctrlCreateinput($inireadinput3, 472, 85, 153, 21)
$checkbox1 = GUICtrlCreateCheckbox("Enter ?", 472, 115, 153, 21)
$Pic1 = GUICtrlCreatePic("41125.kp2", 0, 0, 625, 441, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

IniWrite("save.ini", "hotkey", "exit", "{f5}")

$iniread = IniRead("save.ini", "hotkey", "exit", "")
HotKeySet($iniread, "_exit")
IniDelete("save.ini", "hotkey", "exit")
iniwrite("save3.ini", "wie viel verzögerung", "sleep", "2000")
HotKeySet("{f4}", "_Pause")
hotkeyset("{f3}", "_Start")






Func _exit()
	Exit
EndFunc   ;==>_exit

Func _Pause()
	While 1
		Sleep(100)
	WEnd
EndFunc   ;==>_Pause

func _Start()

	IniWrite("save2.ini", "save", "input1", GUICtrlRead($Input1))
	IniWrite("save2.ini", "save", "input2", GUICtrlRead($Input2))
	IniWrite("save2.ini", "save", "input3", GUICtrlRead($input3))

	$auslesen = GUICtrlRead($checkbox1)
	if $auslesen = 1 Then

		$anzahl = 0

		do
			tooltip("du hast schon" & $anzahl & "nachrichten geschikt", 0, 0, "info")
			sleep(Guictrlread($Input2))
			Send(GUICtrlRead($Input1))
			send("{Enter}")
			$anzahl = $anzahl + 1
			tooltip("du hast schon" & $anzahl & "nachrichten geschikt", 0, 0, "info")
		until $anzahl = GUICtrlRead($input3)
		if $anzahl = GUICtrlRead($input3) Then
			WinClose("du hast schon" & GUICtrlRead($input3) "nachrichten geschikt", "")
			ToolTip("Fertig!", 0, 0, "Info")
		EndIf
		EndIf   [COLOR="Red"][B]<---- das HABE ICH VERGSSEN ! !MAN MAN !! TROTZDEM DANKE AN ALLE ;)[/B][/COLOR]

		If $auslesen = 4 then
			$anzahl2 = 0
			Do
				sleep(Guictrlread($Input2))
				Send(GUICtrlRead($Input1))
				$anzahl2 = $anzahl2 + 1
			until GUICtrlRead($input3)
		EndIf

         EndFunc   [COLOR="Red"][B]<<<<------ UND DAS HABBE ICH AUCH VERGeSSEN![/B][/COLOR]

		while 1
			$nMsg = GUIGetMsg()
			Switch $nMsg
				Case $GUI_EVENT_CLOSE
					Exit
				case $Button1

					IniWrite("save2.ini", "save", "input1", GUICtrlRead($Input1))
					IniWrite("save2.ini", "save", "input2", GUICtrlRead($Input2))
					IniWrite("save2.ini", "save", "input3", GUICtrlRead($input3))


					$auslesen = GUICtrlRead($checkbox1)
					if $auslesen = 1 Then
						$anzahl3 = 0

						do
							sleep(Guictrlread($Input2))
							Send(GUICtrlRead($Input1))
							send("{Enter}")
							$anzahl3 = $anzahl3 + 1
						until GUICtrlRead($input3)
					EndIf

					If $auslesen = 4 then
						$anzahl4 = 0
						GUICtrlCreateLabel("du hast schon" & $anzahl4 "nachrichten gesendet", 472, 144, 153, 21)
						GUICtrlSetColor(-1, 0xFF0000)
						Do
							sleep(Guictrlread($Input2))
							Send(GUICtrlRead($Input1))
							$anzahl3 = $anzahl3 + 1
						until GUICtrlRead($input3)
					EndIf
			EndSwitch
		WEnd
GT4 is offline  
Reply
Page 1 of 2 1 2

Tags
autoit, do schleife, fehler

« AutoIT scripts | URL auslesen »

Similar Threads Similar Threads
Hilfe bei der autoit while schleife
03/05/2010 - Metin2 - 7 Replies
Hallo, also ich habe ein problem und weiß nicht wie ich das lösen kann :( ich will einen Multihack machen für metin2 aber wenn ich eine value freezen muss dann mache ich eine while schleife und dann kann man keinen anderen Button mehr aktivieren :( z.B. (ein anderes von mit erstelltes programm) Code:
Autoit - If Schleife - Problem
05/27/2009 - AutoIt - 3 Replies
Huhu, hab nen kleines Problem mit ner If-Schleife: $pixel_mob = PixelGetColor (549, 68) $farbe_mob = Hex($pixel_mob, 6) if $farbe_mob = 'CE0000' Then ToolTip('Attacking...',0,0)
Autoit - Problem mit If-Schleife
05/27/2009 - General Coding - 1 Replies
Huhu, erstmal ne kleine Frage...hab gerade zu diesem Thema nen Beitrag geschrieben, flupps, 5 Minuten später war er gelöscht - keine PN, nix.. Naja...mal schaun ^^ Problem ist folgendes: Hab diese if schleife in meiner while schleife:
Autoit schleife die wartet bis das eine oder andere eintritt
07/21/2008 - General Coding - 9 Replies
Hallo zusammen, ich bastel jetzt schon seit tagen an einem scriptteil aber komme nicht weiter! Folgendes ich versuche in autoit ein schleife zu bauen , die darauf wartet das sich entweder ein pixel an der stelle x oder ein pixel an der stelle y verändert . Anders gesagt die schleife soll warten bis ein pixel am oberen rand schwarz wird oder der andere pixel unten in einer leiste sich verändert wobei da die farbe unterschiedlich ist !



All times are GMT +2. The time now is 09:40.

elitepvpers - play less, get more - Top

Powered by vBulletin®
Copyright ©2000 - 2024, 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 ©2024 elitepvpers All Rights Reserved.