Programm zum Vokabeln abfragen

AutoItNoob²

Hallo,
ich hab mir so ein paar gedanken gemacht ein Programm zu schrieben, dass automatisch Vokabeln einer Liste zB. eine Editordatei ausliest und diese dann abfragt.
Die Vokabeln die richtig beantwortet wurden kommen danach seltener dran und die, die häufig falsch beantwortet wurden kommen öfter dran und diese Daten sollte man dann ebenfalls in einem Textdokument speichern können.

Aber mir fehlt die reinste Idee mit welchen Befehlten ich das machen soll

Timme

Moin,
was genau fehlt dir den ne idee wie du das ganze script realisieren sollst oder nur einzelne funktionen?

AutoItNoob²

Zitat von Timme

Moin,
was genau fehlt dir den ne idee wie du das ganze script realisieren sollst oder nur einzelne funktionen?

Eine Idee
Also wie ich etwas aus einem Editor auslese weiß ich, wie ich GUis erstelle und ihnen funktionen gebe weiß ich auch.
Aber ich weiß nicht wie ich das mit dem abfragen machen soll oder wie ich das mit dem häufigkeitsfaktor machen soll. Also je öfter ich richtig hab umso weniger kommt das wort vor. Aber wie soll ich das machen

campweb

Die Forensuch' ist für dich da,
und auch Google trallalala.

MfG, campweb

Timme

Haste aber glück das mir grad langweilig war^^

hab das script nochmal überarbeitet jetzt funktioniert es...

PHP

#include <GUIConstantsEx.au3>
#include <Array.au3>
Global $i = "1"
Global $func = "1"




$MainGui = GUICreate("Vokabeltester",300,200)
$VokAusgabe = GUICtrlCreateEdit("",5,0,290,80)
$VokAbfrage = GUICtrlCreateEdit("",5,85,290,80)
$Ok = GUICtrlCreateButton("Start",110,170,80,25)
GUISetState()


While 1

	$nMsg = GUIGetMsg()
	Switch $nMsg
	Case $GUI_EVENT_CLOSE
		Exit
	Case $Ok
		If ($func == "1") Then
			_Vokabel_einlesen()
			_StartVokabel()
		ElseIf ($func == "2") Then
			_Check()
		EndIf

		EndSwitch
WEnd




Func _Vokabel_einlesen()

	if FileExists("Vokabel.ini") Then
		Global $VokArray = IniReadSection("Vokabel.ini","Vokabel")
		If IsArray($VokArray) Then
			Global $VokRows = $VokArray[0][0]
		EndIf


		Global $Vok_R_Array = IniReadSection("Vokabel.ini","Vokabel_Richtig")
		If IsArray($Vok_R_Array) Then
			Global $Vok_R_Rows = $Vok_R_Array[0][0]
		EndIf
	Else
		guictrlsetdata($VokAusgabe,"Vokabel.ini konnte nicht gefunden werden")
	EndIf


EndFunc






Func _StartVokabel()
	GUICtrlSetData($VokAusgabe,"")
	GUICtrlSetData($VokAbfrage,"")
	if (GUICtrlRead($Ok)=="Start") Then
		GUICtrlSetData($Ok,"Überprüfen")
	EndIf
	If (GUICtrlRead($Ok) == "Next") Then
		GUICtrlSetData($Ok,"Überprüfen")
		EndIf

	If ($i <= $VokRows) Then
		;MsgBox(0,"",$VokRows)
	Global $Norm = 1
	Global $Key = Random(1,$VokRows)
	GUICtrlSetData($VokAusgabe,$VokArray[$Key][0])
	$i = $i +1
Else
	Global $Norm = 2
	Global $Key = Random(1,$Vok_R_Rows)
	GUICtrlSetData($VokAusgabe,$Vok_R_Array[$Key][0])
	;_ArrayDisplay($Vok_R_Array)
	$i = 1
EndIf


$func ="2"


	
EndFunc


Func _Check()


If ($Norm == 1) Then
If (GUICtrlRead($VokAbfrage)== $VokArray[$Key][1]) Then
	IniWrite("Vokabel.ini","Vokabel_Richtig",$VokArray[$Key][0],$VokArray[$Key][1])
	IniDelete("Vokabel.ini","Vokabel",$VokArray[$Key][0])
	GUICtrlSetData($VokAusgabe,"")
	GUICtrlSetData($VokAbfrage,"Richtig")
	GUICtrlSetData($Ok,"Next")
Else
	GUICtrlSetData($VokAusgabe,"")
	GUICtrlSetData($VokAbfrage,"Falsch")
	GUICtrlSetData($Ok,"Next")
EndIf


ElseIf ($Norm == 2) Then
If (GUICtrlRead($VokAbfrage)== $Vok_R_Array[$Key][1]) Then
	GUICtrlSetData($VokAusgabe,"")
	GUICtrlSetData($VokAbfrage,"Richtig")
	GUICtrlSetData($Ok,"Next")
Else
	GUICtrlSetData($VokAusgabe,"")
	GUICtrlSetData($VokAbfrage,"Falsch")
	GUICtrlSetData($Ok,"Next")
EndIf
EndIf






$func = "1"
EndFunc

Alles anzeigen

Vokabel.ini

PHP

[Vokabel]
transfer=übertragung
rubber=gummi
one=eins


[Vokabel_Richtig]
connection=verbindung
two=zwei

hoffe das hilft dir weiter^^

AutoItNoob²

Das script funktioniert nicht

stayawayknight

Zitat von AutoItNoob²

Das script funktioniert nicht

Eine klasse Problembeschreibung
Erkläre mal bitte, was daran nicht geht - sonst kann dir nur mühselig geholfen werden.

Aquaplant

War nur ein kleiner Fehler drin, der aus anderen Programmiersprachen stammt
Hab noch ein paar kleine Dinge geändert.
Jetzt sollte es funktionieren:

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <Array.au3>
Global $i = "1"
Global $func = "1"

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$MainGui = GUICreate("Vokabeltester", 300, 200)
$VokAusgabe = GUICtrlCreateEdit("", 5, 0, 290, 80)
$VokAbfrage = GUICtrlCreateEdit("", 5, 85, 290, 80)
$Ok = GUICtrlCreateButton("Start", 110, 170, 80, 25)
GUISetState()