RechenFenster

Hallo an alle.
ich habe vor eine Gui zu gestalten mit der ich Rechenaufgaben (+ und - bis 10)
Lösen kann.

ich möchte also z.b. 2 zufallszahlen 5x Addieren und 5x Subtrahieren
wenn falsch gerechnet wrde, soll die Aufgabe wiederholt werden, wenn sie richtig ist, dann die Nächste
ich habe schon mal etwas versucht aber so komme ich nicht weiter, ich kann die erste Aufgabe lösen aber komme nicht zur nächsten.
hier mein Script, bitte nicht Lachen
ich hoffe mir kann jemand helfen.

#include <GUIConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>

Opt("GUIOnEventMode", 1)
$window_TR = GUICreate( "MyGui", 500,400)
GUISetOnEvent($GUI_EVENT_CLOSE, "Ende")

For $x = 1 to 1
$i = Random(1,10,1)
Next
For $x2 = 1 to 1
$i2 = Random(1,10,1)
Next

$buttonTRlsg = GUICtrlCreateButton ("=", 320,20,70,70)
GUICtrlSetFont(-1,70,400)

$LabelTR1 = GUICtrlCreateLabel($i&" + "& $i2, 10, 10, 290, 100)
GUICtrlSetFont(-1,70,400)

$in1=GUICtrlCreateInput("",400, 10, 90, 90)
GUICtrlSetFont(-1,55,300)

GUICtrlSetOnEvent($buttonTRlsg, "calc")
GUISetState(@SW_SHOW, $window_TR)

While 1
sleep(1000)
WEnd

Func calc()
$Erg = execute(GUICtrlRead($LabelTR1))
GUICtrlSetData($LabelTR1, $Erg)
if GUICtrlRead($in1) = $Erg then
msgbox(0,"Super","Richtig gemacht :-D")
Else
msgbox(0,"Schade","Leider Falsch :-(")
EndIf
EndFunc

Func Ende()
Exit
EndFunc

super danke, das hilft mir extrem weiter. ich wollte die random Funktion auch erst in eine func setzen wusste dann aber nicht wie ich sie umsetzen sollte, und ich dachte mir, eh ich das script 5x neu ineinanderschreibe gibts bestimmt ne einfachere Lösung. und siehe da: $durchgang += 1.
dankeschön

Wie mache ich es, wenn ich nun nach den 5 Additionsaufgaben 5 Subtraktions Aufgaben lösen möchte und/oder ander Arten wie z.B. Lückenrechen-Aufgaben

Folgender Code Funktioniert Leider so Nicht, habe auch schon anderes Ausprobiert aber ich komme einfach nicht drauf:

#region ;************ Includes ************
#include <GUIConstantsEx.au3>
#endregion ;************ Includes ************

Global $durchgang = 0

Opt("GUIOnEventMode", 1)
$window_TR = GUICreate("MyGui", 500, 400)
GUISetOnEvent($GUI_EVENT_CLOSE, "Ende")

$buttonTRlsg = GUICtrlCreateButton("=", 320, 20, 70, 70)
GUICtrlSetFont(-1, 70, 400)

$LabelTR1 = GUICtrlCreateLabel("", 10, 10, 300, 100)
GUICtrlSetFont(-1, 70, 400)

$in1 = GUICtrlCreateInput("", 400, 10, 90, 90)
GUICtrlSetFont(-1, 55, 300)

GUICtrlSetOnEvent($buttonTRlsg, "calc")
GUISetState(@SW_SHOW, $window_TR)

_rechnen()

Func _rechnen()
GUICtrlSetData($in1, "")
GUICtrlSetState($in1, $GUI_FOCUS)
For $x = 1 To 1
$i = Random(1, 10, 1)
Next
For $x2 = 1 To 1
$i2 = Random(1, 10, 1)
Next
GUICtrlSetData($LabelTR1, $i & " + " & $i2)
EndFunc ;==>_rechnen
While 1
Sleep(1000)
WEnd

Func calc()
$durchgang += 1
$Erg = Execute(GUICtrlRead($LabelTR1))
GUICtrlSetData($LabelTR1, $Erg)
If GUICtrlRead($in1) = $Erg Then
MsgBox(0, "Super", "Richtig gemacht :-D")
Else
MsgBox(0, "Schade", "Leider Falsch :-(")
EndIf
If $durchgang = 5 Then
GUICtrlSetOnEvent($buttonTRlsg, "calcminus")
_rechnenminus()
EndIf
_rechnen()
EndFunc ;==>calc

_rechnenminus()

Func _rechnenminus()
GUICtrlSetData($in1, "")
GUICtrlSetState($in1, $GUI_FOCUS)
For $x = 1 To 1
$i = Random(1, 10, 1)
Next
For $x2 = 1 To 1
$i2 = Random(1, 10, 1)
Next
GUICtrlSetData($LabelTR1, $i & " - " & $i2)
EndFunc ;==>_rechnenminus

Func calcminus()
$durchgang += 5
$Erg = Execute(GUICtrlRead($LabelTR1))
GUICtrlSetData($LabelTR1, $Erg)
If GUICtrlRead($in1) = $Erg Then
MsgBox(0, "Super", "Richtig gemacht :-D")
Else
MsgBox(0, "Schade", "Leider Falsch :-(")
EndIf
If $durchgang = 10 Then exit
_rechnenminus()
EndFunc ;==>calcminus

Func Ende()
Exit
EndFunc ;==>Ende

okay ich werde Deinen Vorschlag mit Dem Spoiler natürlich berücksichtigen.
nur Leider versteh ich Dein Script nicht ganz.
Es Funktioniert zwar aber wo wird festgelegt welchen Wert $s_art und $s_max besitzt?
denn es wird ja zum ersten mal bei Func _rechnen($s_art, $s_max) benannt hat(für mich)
aber keinen bezug zum Array.
mir bringts ja nix, wenn ich Dein Vorschlag 1zu1 blind übernehme und nix Kapier.
braucht bei mir machnmal länger