Hallo,
ich versuche gerade ein kleines script zu machen das mir eine zufällige zahl ausgibt.
Ich will eine kleine 1x1 übung machen für meinen bruder.
Das z.B. kommt 4x7 oder 8x3
Vielen Dank
MFG
Hallo,
ich versuche gerade ein kleines script zu machen das mir eine zufällige zahl ausgibt.
Ich will eine kleine 1x1 übung machen für meinen bruder.
Das z.B. kommt 4x7 oder 8x3
Vielen Dank
MFG
Da fehlt zwar die Frage, aber ich schreib Dir mal ein Beispiel:
$a = Random(1, 9, 1)
$b = Random(1, 9, 1)
$erg = InputBox('Rechenaufgabe', 'Wie viel ist ' & $a & ' mal ' & $b & ' ?', '')
If $a * $b = $erg Then
MsgBox(0, 'Aufgabe', 'Richtig!')
Else
MsgBox(0, 'Aufgabe', 'Falsch!')
EndIf
$iInt1 = Random(1, 9, 0)
$iInt2 = Random(1, 9, 0)
$iResult = $iInt1 * $iInt2
$sUserInput = Inputbox("Ergebnis", StringFormat("Gib das Ergebnis von %i mal %i ein", $iInt1, $iInt2), "", " M")
If $sUserInput = $iResult Then
MsgBox(64, "Info", "Richtig")
Else
MsgBox(16, "Info", "Falsch")
EndIf
@Edit: Oscar war schneller
es klappt soweit jetzt mein 3. problem (2.selbst gelöst)
ich möchte jetzt das es eine datein erstellt und rein schreibt z.B 4 gelöst 7ungelöst
mein code bis jetzt
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <File.au3>
_FileCreate("C:\Gelöst.txt")
GUICreate("1 x 1 Übung",220,315)
$1 = GUICtrlCreateButton("1er Reihe",10,10,200)
$2 = GUICtrlCreateButton("2er Reihe",10,40,200)
$3 = GUICtrlCreateButton("3er Reihe",10,70,200)
$4 = GUICtrlCreateButton("4er Reihe",10,100,200)
$5 = GUICtrlCreateButton("5er Reihe",10,130,200)
$6 = GUICtrlCreateButton("6er Reihe",10,160,200)
$7 = GUICtrlCreateButton("7er Reihe",10,190,200)
$8 = GUICtrlCreateButton("8er Reihe",10,220,200)
$9 = GUICtrlCreateButton("9er Reihe",10,250,200)
$alles = GUICtrlCreateButton("Ganzes kleines 1x1",10,280,200)
GUISetState() ; will display an empty dialog box
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $1
while 1
$a = 1
$b = Random(1,9,1)
$erg = InputBox('Rechenaufgabe', 'Wie viel ist ' & $a & ' mal ' & $b & ' ?', '')
If $a * $b = $erg Then
MsgBox(0, 'Aufgabe', 'Richtig!')
$file = FileOpen("C:\Gelöst.txt", 1)
FileWrite($file, "richtig")
FileWrite($file, @CRLF)
Else
MsgBox(0, 'Aufgabe', 'Falsch!')
$file = FileOpen("C:\Gelöst.txt", 1)
FileWrite($file, "falsch")
FileWrite($file, @CRLF)
EndIf
wend
EndSelect
WEnd
so auch ok ?
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <File.au3>
$file="c:\Gelöst.txt"
[/autoit] [autoit][/autoit] [autoit]GUICreate("1 x 1 Übung",220,315)
$1 = GUICtrlCreateButton("1er Reihe",10,10,200)
$2 = GUICtrlCreateButton("2er Reihe",10,40,200)
$3 = GUICtrlCreateButton("3er Reihe",10,70,200)
$4 = GUICtrlCreateButton("4er Reihe",10,100,200)
$5 = GUICtrlCreateButton("5er Reihe",10,130,200)
$6 = GUICtrlCreateButton("6er Reihe",10,160,200)
$7 = GUICtrlCreateButton("7er Reihe",10,190,200)
$8 = GUICtrlCreateButton("8er Reihe",10,220,200)
$9 = GUICtrlCreateButton("9er Reihe",10,250,200)
$alles = GUICtrlCreateButton("Ganzes kleines 1x1",10,280,200)
GUISetState() ; will display an empty dialog box
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $1
while 1
$a = 1
$b = Random(1,9,1)
$erg = InputBox('Rechenaufgabe', 'Wie viel ist ' & $a & ' mal ' & $b & ' ?', '')
If $a * $b = $erg Then
MsgBox(0, 'Aufgabe', 'Richtig!')
FileWriteLine($file,$a & "*" & $b & " Das Ergebnis: " & $erg & " war richtig.")
Else
MsgBox(0, 'Aufgabe', 'Falsch!')
FileWriteLine($file,$a & "*" & $b & " Das Ergebnis: " & $erg & " war falsch.")
EndIf
wend
EndSelect
WEnd
nach c:\ kannst du evtl. je nach OS / UAC nicht schreiben, nimm sonst @Desktopdir oder so.
Hallo timiboy,
ich muss mich wundern, wie man (nach über einem Jahr auf autoit.de) immer noch die Hilfe so ignorieren kann und lieber die einfachsten Fragen hier postet. Da könnte man fast auf die Idee kommen, dass du es nur zu Werbezewecken
ZitatDein Profil auf [Name entfernt] eröffnet dir eine ganze Welt
große Community, viele neue Freunde!
einzigartiges Belohnungssystem!
aktiv sein, regelmäßig Punkte erhaltenMit unseren Punkten kannst Du
Wünschen und Einkaufen, Helfen und Spielen oder einfach nur Netzwerken.
machst.
Solche Links in Signaturen sollten Imho auf diesem Board verboten werden, schliesslich ist es auch werbefrei. Und dass du auch mit bottypische Themen eröffnest bestärkt mich in der Meinung, dass du nur Belohnungspunkte abstauben willst,
mfg autoBert
mfg autoBert