Register for your free account! | Forgot your password?

Go Back   elitepvpers › Coders Den › AutoIt
Brauche wieder Hilfe beim Coden :( Brauche wieder Hilfe beim Coden :(
You last visited: Today at 08:55

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

Advertisement


Advertise with us!

Brauche wieder Hilfe beim Coden :(

Discussion on Brauche wieder Hilfe beim Coden :( within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Aug 2010
Posts: 39
Received Thanks: 0
Brauche wieder Hilfe beim Coden :(

Hi
Ich will ein Programm selbst entwickeln, wo man mit Ok immer eine Sache weiter kommt und mit Abbrechen, sich das " Programm " schließt.
Doch bei mir startet das Programm erst garnicht. Irgendetwas mache ich falsch.
PHP Code:
$M1 = MsgBox(1,"","Willst du mit mir spielen?")
If $M1 = 1 Then
    $M2 = MsgBox(1,"","Bist du dir auch ganz sicher?")
Else Exit

    If $M2 = 1 Then
        $M3 = MsgBox(1,"","Ok, dann lass uns spielen! *Muhahahaha*")
        Else Exit
    
        If $M3 = 1 Then
            $M4 = MsgBox(1,"","so... dann fangen wir mal an")
            Else Exit
        
            If $M4 = 1 Then
                $M5 = MsgBox(1,"","Jetzt fällt mir nix mehr ein -.-")
                Else Exit
            
                If $M5 = 1 Then
                    $M6 = MsgBox(1,"","Drück bitte auf Abbrechen!")
                    Else Exit
                
                    If $M6 = 1
                        $M7 = MsgBox(1,"","So lange hat noch keiner mit mir ´geredet´")
                        Else Exit

                        If $M7 = 1
                            $M8 = MsgBox(1,"","Ok, wenne meinst")
                            Else Exit
                        
                            If $M8 = 1 Then
                                $M9 = MsgBox(1,"","Du hast noch 5 Chancen, aufzuhören... Danach gibt es nur noch den Button OK")
                                Else Exit
                            
                                If $M9 = 1 Then
                                    $M10 = MsgBox(1,"","...noch 4 Chancen")
                                    Else Exit
                                
                                    If $M10 = 1 Then
                                        $M11 = MsgBox(1,"","...noch 3 Chancen")
                                        Else Exit
                                
                                        If $M11 = 1 Then
                                            $M12 = MsgBox(1,"","...noch 2 Chancen")
                                            Else Exit
                                    
                                            If $M13 = 1 Then
                                                $M14 = MsgBox(1,"","...noch 1 Chance")
                                                Else Exit
                                    
                                                If $M14 = 1 Then
                                                    While $M14 <5
                                                        MsgBox(0,"OPFER!!!")
                                                    WEnd
                                                    Else Exit
    EndIf 
Ambuscade is offline  
Old   #2
 
Masterakio1995's Avatar
 
elite*gold: 8
The Black Market: 42/0/0
Join Date: Apr 2009
Posts: 2,977
Received Thanks: 855
Zu wenige EndIf´s
Masterakio1995 is offline  
Old   #3
 
lolkop's Avatar
 
elite*gold: 280
The Black Market: 0/0/0
Join Date: May 2007
Posts: 2,818
Received Thanks: 3,483
du musst jedes if natürlich auch wieder abschließen...
Code:
If MsgBox(1,"","Willst du mit mir spielen?") = 1 Then
	If MsgBox(1,"","Bist du dir auch ganz sicher?") = 1 Then
		If MsgBox(1,"","Ok, dann lass uns spielen! *Muhahahaha*") = 1 Then
			If MsgBox(1,"","so... dann fangen wir mal an") = 1 Then
				If MsgBox(1,"","Jetzt fällt mir nix mehr ein -.-") = 1 Then
					If MsgBox(1,"","Drück bitte auf Abbrechen!") = 1 Then
						If MsgBox(1,"","So lange hat noch keiner mit mir ´geredet´") = 1 Then
							If MsgBox(1,"","Ok, wenne meinst") = 1 Then
								If MsgBox(1,"","Du hast noch 5 Chancen, aufzuhören... Danach gibt es nur noch den Button OK") = 1 Then
									If MsgBox(1,"","...noch 4 Chancen") = 1 Then
										If MsgBox(1,"","...noch 3 Chancen") Then
											If MsgBox(1,"","...noch 2 Chancen") = 1 Then
												If MsgBox(1,"","...noch 1 Chance") = 1 Then
													While 1
														MsgBox(0,"","OPFER!!!")
													WEnd
												EndIf
											EndIf
										EndIf
									EndIf
								EndIf
							EndIf
						EndIf
					EndIf
				EndIf
			EndIf
		EndIf
	EndIf
EndIf
lolkop is offline  
Old   #4
 
omer36's Avatar
 
elite*gold: 0
The Black Market: 2/0/0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
PHP Code:
#cs ----------------------------------------------------------------------------
    
    AutoIt Version: 3.3.6.1
    Author:         myName
    
    Script Function:
    Template AutoIt script.
    
#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

$M1 = MsgBox(1, "", "Willst du mit mir spielen?")
If $M1 = 1 Then
    $M2 = MsgBox(1, "", "Bist du dir auch ganz sicher?")
Else
    Exit
EndIf


If $M2 = 1 Then
    $M3 = MsgBox(1, "", "Ok, dann lass uns spielen! *Muhahahaha*")
Else
    Exit
EndIf

If $M3 = 1 Then
    $M4 = MsgBox(1, "", "so... dann fangen wir mal an")
Else
    Exit
EndIf

If $M4 = 1 Then
    $M5 = MsgBox(1, "", "Jetzt fällt mir nix mehr ein -.-")
Else
    Exit
EndIf

If $M5 = 1 Then
    $M6 = MsgBox(1, "", "Drück bitte auf Abbrechen!")
Else
    Exit
EndIf

If $M6 = 1 Then
    $M7 = MsgBox(1, "", "So lange hat noch keiner mit mir ´geredet´")
Else
    Exit
EndIf

If $M7 = 1 Then
    $M8 = MsgBox(1, "", "Ok, wenne meinst")
Else
    Exit
EndIf

If $M8 = 1 Then
    $M9 = MsgBox(1, "", "Du hast noch 5 Chancen, aufzuhören... Danach gibt es nur noch den Button OK")
Else
    Exit
EndIf

If $M9 = 1 Then
    $M10 = MsgBox(1, "", "...noch 4 Chancen")
Else
    Exit
EndIf

If $M10 = 1 Then
    $M11 = MsgBox(1, "", "...noch 3 Chancen")
Else
    Exit
EndIf

If $M11 = 1 Then
    $M12 = MsgBox(1, "", "...noch 2 Chancen")
Else
    Exit
EndIf

If $M12 = 1 Then
    $M13 = MsgBox(1, "", "...noch 1 Chance")
Else
    Exit
EndIf

If $M13 = 1 Then
    While $M13 < 5
        MsgBox(0, "", "OPFER!!!")
    WEnd
Else
    Exit
EndIf 
omer36 is offline  
Old   #5
 
PenGuin :O's Avatar
 
elite*gold: 2
The Black Market: 1/0/0
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
Code:
Dim $aFragen[14] = ["Willst du mit mir spielen?", _
					"Bist du dir auch ganz sicher?", _
					"Ok, dann lass uns spielen! *Muhahahaha*", _
					"so... dann fangen wir mal an", _
					"Jetzt fällt mir nix mehr ein -.-", _
					"Drück bitte auf Abbrechen!", _
					"So lange hat noch keiner mit mir ´geredet´", _
					"Ok, wenne meinst", _
					"Du hast noch 5 Chancen, aufzuhören... Danach gibt es nur noch den Button OK", _
					"...noch 4 Chancen", _
					"...noch 3 Chancen", _
					"...noch 2 Chancen", _
					"...noch 1 Chance", _
					"OPFER!!!"]
For $i = 0 To UBound($aFragen) - 2
	$iMsg = MsgBox(1, "", $aFragen[$i])
	If $iMsg <> 1 Then Exit
Next
While 1
	MsgBox(0, "", $aFragen[13])
WEnd
Bitte.
PenGuin :O is offline  
Old   #6
 
omer36's Avatar
 
elite*gold: 0
The Black Market: 2/0/0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
im minuten abstand jeweils eine lösung
omer36 is offline  
Old   #7
 
PenGuin :O's Avatar
 
elite*gold: 2
The Black Market: 1/0/0
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
Wobei meine die Kürzeste ist, wenn auch die, die er nicht versteht :P
PenGuin :O is offline  
Old   #8
 
ZeraPain's Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jan 2010
Posts: 360
Received Thanks: 249
Quote:
Originally Posted by pinguin94 View Post
Wobei meine die Kürzeste ist, wenn auch die, die er nicht versteht :P
naja, wir wollen hier mal keinen runtermachen..
dann erklärs ihm lieber.
außerdem hast du bei deiner umsetzung die jeweilige exit
option vergessen.
ZeraPain is offline  
Old   #9
 
PenGuin :O's Avatar
 
elite*gold: 2
The Black Market: 1/0/0
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
Hatte ich vorher nicht, bis mir jetzt gerade auffiel, dass ich einen falschen Style verwendet habe.
Ich pass es an.
Außerdem mach ich hier keinen herunter. Es ist doch die Wahrheit -.-

Done
PenGuin :O is offline  
Old   #10
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Aug 2010
Posts: 39
Received Thanks: 0
jo... das ist die Wahrheit^^ Ich versteh deins wirklich nicht

Aber trotzdem danke an alle
Ambuscade is offline  
Reply

« Frage | Problem: ImageSearch »

Similar Threads Similar Threads
Brauche Hilfe beim Coden
11/20/2010 - AutoIt - 10 Replies
Hi Ich fange gerade an mich mit AutoIt zu beschäftigen.( und Koda ) Ich bin dabei einen mini-Taschenrechner zu machen^^ Es kommen natürlich noch Optionen dazu;) Ich hab jetzt 3 Fragen : 1) Wie kann ich den Code kürzen? 2) Was muss ich machen, um das so einzustellen, dass ich, wenn ich auf "Abbrechen" klicke ( beim 2. Fenster), zum ersten Fenster gelange, und sich das Programm nicht ganz schließt ? 3) Was muss ich machen, damit in der Input-Box nicht Input1 steht, sondern 0 ? #include...
Hilfe beim Coden vom 4Story Bot
11/05/2010 - 4Story - 9 Replies
Ich will einen 4Story Bot coden in VB08, aber wenn ich My.Computer.Keyboard.sendkeys("1")'1=An griff geht das net, why ever...! Welche Anweisung muss ich sonst nehmen??? Gibt es ein Tutorial mit AutoIt ? Oder in VB08? Danke im Vorraus
Hilfe beim coden
04/22/2010 - Kal Online - 6 Replies
Ich weiss das es hier genug leecher und sonstiges gibt, aber vorerst gehöre ich nicht zu denen. Da hier im board ja viele nen Kalbot haben wollte ich fragen ob sich irgendjemand mit mir in verbindung setzen kann und mir helfen kann einen bot zu coden oder für den anfang etwas leichteres- wie gesagt ich erwarte nur hilfe. Ich werde es selbst versuchen weil mich sowas schon seit langem fasziniert. Wäre wirklich freundlich mfg PuppetMaster : )
Hilfe beim Coden
03/27/2010 - WarRock - 11 Replies
Hallo, Ich habe gerade ein D3D Hack gecodet! Leider ist der immer Detected.. Kann mir jemand helfen oder kann mir jemand einen empfehlen, der mir dabei helfen könnte? Danke im Voraus.
Brauche hilfe beim coden !!
07/09/2008 - WarRock - 1 Replies
Kann mir jemand mal bitte alle aktuellen addys zum coden sagen :confused: ?? Danke schonmal im voraus !!



All times are GMT +2. The time now is 08:57.

elitepvpers - play less, get more - Top

Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

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