Autoit Problem

12/04/2012 15:48 NeonBurn#1
hallo leute habe erst vor kurzem mit autoit angefangen hatte nun versucht ein programm zu schreiben (das nicht geht). mein problem ist es dass ich nicht weiß ob die sache mit dem if so richtig ist bzw. geht aufjedenfall habe ich immer einen error in den letzten zeilen. ich weiß einfach nicht was ich falsch gemacht habe. bitte um hilfe.
vielen dank im voraus

Code:
#include <Sound.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Fragen", 524, 507, 211, 128)
$Label1 = GUICtrlCreateLabel("Wo hat das BVG den Sitz?", 8, 16, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label2 = GUICtrlCreateLabel("Aus wie vielen Senaten besteht das BVG?", 8, 104, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label3 = GUICtrlCreateLabel("Wie viele Bundesrichter befinden sich in einem Senat?", 8, 192, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label4 = GUICtrlCreateLabel("Das BVG kontrolliert die _____ der Gerichte.", 8, 280, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label5 = GUICtrlCreateLabel("Wie wird das BVG noch genannt?", 8, 368, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i1 = GUICtrlCreateInput("", 8, 144, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i2 = GUICtrlCreateInput("", 8, 320, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i3 = GUICtrlCreateInput("", 8, 56, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i4 = GUICtrlCreateInput("", 8, 232, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i5 = GUICtrlCreateInput("", 8, 408, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Button1 = GUICtrlCreateButton("Button1", 8, 464, 235, 25)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Button2 = GUICtrlCreateButton("Schließen", 272, 464, 235, 25)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button2
			$neg = _SoundOpen ("neg.mp3")
			_SoundPlay ($neg)
			Sleep (2000)
			_SoundClose ($neg)
			Exit
		Case $Button1
			$f1 = GUICtrlRead ($i1)
			$f2 = GUICtrlRead ($i2)
			$f3 = GUICtrlRead ($i3)
			$f4 = GUICtrlRead ($i4)
			$f5 = GUICtrlRead ($i5)

				If 	$f1 = "Karlsruhe" Then
				If	$f2 = "2" Then
				If	$f3 = "8" Then
				If	$f4 = "Unabhängigkeit" Then
				If	$f5 = "Hüter der Verfassung" Then
				$pos = _SoundOpen ("pos.mp3")
				_SoundPlay ($pos)
				Sleep (5000)
				_SoundClose ($pos)
				Exit
				Else
				$neg = _SoundOpen ("neg.mp3")
				_SoundPlay ($neg)
				Sleep (2000)
				_SoundClose ($neg)
				Exit
	EndSwitch
WEnd
12/04/2012 16:33 BladeTiger12#2
Code:
#include <Sound.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Fragen", 524, 507, 211, 128)
$Label1 = GUICtrlCreateLabel("Wo hat das BVG den Sitz?", 8, 16, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label2 = GUICtrlCreateLabel("Aus wie vielen Senaten besteht das BVG?", 8, 104, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label3 = GUICtrlCreateLabel("Wie viele Bundesrichter befinden sich in einem Senat?", 8, 192, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label4 = GUICtrlCreateLabel("Das BVG kontrolliert die _____ der Gerichte.", 8, 280, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label5 = GUICtrlCreateLabel("Wie wird das BVG noch genannt?", 8, 368, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i1 = GUICtrlCreateInput("", 8, 144, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i2 = GUICtrlCreateInput("", 8, 320, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i3 = GUICtrlCreateInput("", 8, 56, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i4 = GUICtrlCreateInput("", 8, 232, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i5 = GUICtrlCreateInput("", 8, 408, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Button1 = GUICtrlCreateButton("Button1", 8, 464, 235, 25)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Button2 = GUICtrlCreateButton("Schließen", 272, 464, 235, 25)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button2
			$neg = _SoundOpen ("neg.mp3")
			_SoundPlay ($neg)
			Sleep (2000)
			_SoundClose ($neg)
			Exit
		Case $Button1
			$f1 = GUICtrlRead ($i1)
			$f2 = GUICtrlRead ($i2)
			$f3 = GUICtrlRead ($i3)
			$f4 = GUICtrlRead ($i4)
			$f5 = GUICtrlRead ($i5)

				If 	$f1 = "Karlsruhe" Then
					If	$f2 = "2" Then
						If	$f3 = "8" Then
							If	$f4 = "Unabhängigkeit" Then
								If	$f5 = "Hüter der Verfassung" Then
									$pos = _SoundOpen ("pos.mp3")
									_SoundPlay ($pos)
									Sleep (5000)
									_SoundClose ($pos)
									Exit
									Else
									$neg = _SoundOpen ("neg.mp3")
									_SoundPlay ($neg)
									Sleep (2000)
									_SoundClose ($neg)
									Exit
								EndIf
							EndIf
						EndIf
					EndIf
				EndIf
	EndSwitch
WEnd
Weitere Fragen kannst mir auch über Skype stellen:
MrBladeTiger12
12/04/2012 16:33 Achat#3
Damit du auch was lernst:

STRG+T

in SciTE drücken ;)

MfG

€dit: @BladeTiger12 [code][/code] <--
12/04/2012 16:38 Lumi#4
Bei einer If - Abfrage benötigst du die EndIf Befehl, damit die If - Abfrage auch endet.
12/04/2012 16:46 Achat#5
Code:
;### Tidy Error -> "endswitch" is closing previous "if" on line 57
						EndSwitch
;### Tidy Error -> "wend" is closing previous "if" on line 56
					WEnd


;### Tidy Error -> if is never closed in your script.
;### Tidy Error -> if is never closed in your script.
;### Tidy Error -> if is never closed in your script.
;### Tidy Error -> if is never closed in your script.
;### Tidy Error -> if is never closed in your script.
Tidy FTW

[Only registered and activated users can see links. Click Here To Register...]

Code:
#include <Sound.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Fragen", 524, 507, 211, 128)
$Label1 = GUICtrlCreateLabel("Wo hat das BVG den Sitz?", 8, 16, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label2 = GUICtrlCreateLabel("Aus wie vielen Senaten besteht das BVG?", 8, 104, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label3 = GUICtrlCreateLabel("Wie viele Bundesrichter befinden sich in einem Senat?", 8, 192, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label4 = GUICtrlCreateLabel("Das BVG kontrolliert die _____ der Gerichte.", 8, 280, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Label5 = GUICtrlCreateLabel("Wie wird das BVG noch genannt?", 8, 368, 500, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i1 = GUICtrlCreateInput("", 8, 144, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i2 = GUICtrlCreateInput("", 8, 320, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i3 = GUICtrlCreateInput("", 8, 56, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i4 = GUICtrlCreateInput("", 8, 232, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$i5 = GUICtrlCreateInput("", 8, 408, 500, 34)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Button1 = GUICtrlCreateButton("Button1", 8, 464, 235, 25)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
$Button2 = GUICtrlCreateButton("Schließen", 272, 464, 235, 25)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button2
			$neg = _SoundOpen("neg.mp3")
			_SoundPlay($neg)
			Sleep(2000)
			_SoundClose($neg)
			Exit
		Case $Button1
			If GUICtrlRead($i1) = "Karlsruhe" And GUICtrlRead($i2) = "2" And GUICtrlRead($i3) = "8" And GUICtrlRead($i4) = "Unabhängigkeit" And $GUICtrlRead($i5) = "Hüter der Verfassung" Then
				$pos = _SoundOpen("pos.mp3")
				_SoundPlay($pos)
				Sleep(5000)
				_SoundClose($pos)
				Exit
			Else
				$neg = _SoundOpen("neg.mp3")
				_SoundPlay($neg)
				Sleep(2000)
				_SoundClose($neg)
				Exit
			EndIf
	EndSwitch
WEnd
MfG
12/04/2012 16:55 BladeTiger12#6
Ich schreibe die IF-Abfragen ungerne so lange.
Das stört mich irgendwie beim Programme schreiben.
Und so sieht es eh viel übersichtlicher aus.
12/04/2012 17:07 NeonBurn#7
danke an alle das hat mir geholfen das mit dem endif hatte ich gewusst aber ich hatte nicht gewusst dass ich das für jedes if schreiben muss