Brauche wieder Hilfe beim Coden :(

11/22/2010 15:37 Ambuscade#1
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 
11/22/2010 15:49 Masterakio1995#2
Zu wenige EndIf´s
11/22/2010 15:49 lolkop#3
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
11/22/2010 15:51 omer36#4
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 
11/22/2010 15:52 PenGuin :O#5
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.
11/22/2010 15:56 omer36#6
im minuten abstand jeweils eine lösung :D :D
11/22/2010 15:58 PenGuin :O#7
Wobei meine die Kürzeste ist, wenn auch die, die er nicht versteht :P
11/22/2010 16:05 ZeraPain#8
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.
11/22/2010 16:17 PenGuin :O#9
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
11/22/2010 17:21 Ambuscade#10
jo... das ist die Wahrheit^^ Ich versteh deins wirklich nicht ;)

Aber trotzdem danke an alle :)