Clemo's
Latein-Programm
Ein Progamm welches alle Vokabeln aus dem Buch LIBELLUS LATINUS I von LEO BAZANT-HEGEMARK beinhaltet. Es ist in der Sprache Autoit 3 geschrieben und benötigt ein kleines Setup.
Alle Daten werden in der Datei config.txt abgelegt.
Das Programm läuft auf einem PC der über 1 GHz+ Rechenleistung verfügt ideal. Es benötigt 7MB RAM. Es löscht alle temporären Dateien automatisch beim Schließen.
Somit sollte das Programm sehr schnell und fehlerfrei laufen.
Komprimiertes Archiv im ZIP Format [306.4 KB]
Der Quellcode (da man ja immer ein wenig misstrauisch sein sollte...):
;;;LT Master;;;
#include <file.au3>
#include <GUIConstantsEx.au3>
#Include <Misc.au3>
;Variaben:
Local $Programmpunkt, $Name, $Richtig, $Falsch, $Dat, $configZeilen, $configCopyZeile, $Lectiomax, $Lectiomin, $was, $Maus
Local $Lectio, $Deutsch, $Deutsch2, $Deutsch3, $Deutsch4, $Latein, $Richtung, $LectioFilter, $Zufall, $Protokoll, $Benutzer
Local $Prot, $Zeit, $Nummerus1, $Nummerus2, $rf, $A1, $A2, $A3, $zaehlerA, $ZufallNnein, $ZufallNja, $ZufallN, $Eingabe, $Geschlecht
;Variablen für Interface:
Local $OK, $Eingabe, $Anzeige, $E, $A, $msg, $gui, $von, $bis, $aeRichtung, $aeProtokoll
Local $Fenster, $Check, $1, $Extras, $ifSprache, $Sprache, $Ausgabe, $Aufgabe, $Einstellungen
Local $aeName, $aeLectio, $mBeenden, $oBeenden, $sBeenden, $Next, $gFenster, $Suche, $v1, $v2, $v3
Local $suchP, $gesucht, $res, $aeGeschlecht, $alterMod
$Sprache = "Deutsch"
$alterMod = 0
;Startsequenz:
$Name = FileReadLine("config.txt",2)
if @error Then
Opt('MustDeclareVars', 1)
erststart()
EndIf
$Name = StringTrimLeft($Name, 6)
$Protokoll =FileReadLine("config.txt",4)
$Geschlecht = FileReadLine("config.txt",5)
$Geschlecht = StringTrimLeft($Geschlecht, 12)
If $lectiomax >0 Then
$LectioFilter = 1
Else
$LectioFilter = 0
EndIf
If $lectiomin >0 Then
$LectioFilter = 1
Else
$LectioFilter = 0
EndIf
$Check = FileRead("Richtig.txt")
if @error Then
_FileCreate("Richtig.txt")
EndIf
$Check = FileRead("Falsch.txt")
if @error Then
_FileCreate("Falsch.txt")
EndIf
Opt('MustDeclareVars', 1)
Dek()
;Funktionen
Func erststart()
_FileCreate("config.txt")
FileWriteLine("config.txt","Erststart erfolgreich")
$Name = InputBox("dein Name", "Hallo, um das Programm zu personalisieren, gib bitte deinen Namen ein")
FileWriteLine("config.txt","Name: "&$Name)
FileWriteLine("config.txt","Richtungen: 1")
FileWriteLine("config.txt","Es wird kein Protokoll geführt")
$Programmpunkt = 2
GUICreate("Gechlecht",200,20)
$von = GUICtrlCreateButton("männlich",0,0,100,20)
$bis = GUICtrlCreateButton("weiblich",100,0,100,20)
GUISetState(@sw_show)
While 1 = 1
$gui = GUIGetMsg()
if $gui = $von Then
FileWriteLine("config.txt","Geschelcht: m")
GUISetState(@sw_hide)
Dek()
ElseIf $gui = $bis Then
FileWriteLine("config.txt","Geschelcht: w")
GUISetState(@sw_hide)
Dek()
EndIf
WEnd
Dek()
EndFunc
Func HauptInterface()
$Name = StringTrimLeft($Name, 6)
$Protokoll =FileReadLine("config.txt",4)
$Geschlecht = FileReadLine("config.txt",5)
$Geschlecht = StringTrimLeft($Geschlecht, 12)
if $ifSprache = "Latein" Then
$gFenster = WinActive("Verbum")
Else
$gFenster = WinActive("Vokabelprüfer")
EndIf
HotKeySet("{F2}","Notaus")
HotKeySet("^","K")
$rf = (($Richtig / ($Richtig + $Falsch))*100)
$Zeit = "[ "&@HOUR&" : "& @MIN&" :" &@SEC&" ] "
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"Prüfe ob config.txt vorhanden")
EndIf
;''Standardanwendunegn
$Name = FileReadLine("config.txt",2)
if @error Then
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"config.txt nicht vorhanden; starte Setup")
EndIf
erststart()
EndIf
$Name = StringTrimLeft($Name, 6)
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"Name ="&$Name)
EndIf
$Protokoll =FileReadLine("config.txt",4)
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"config.txt erfolgreich ausgelesen")
EndIf
;+++
;Lectiofilter ja/nein
If $lectiomax = "bis" Then
$lectiomax = 0
EndIf
If $lectiomin = "von" Then
$lectiomin = 0
EndIf
If $lectiomax = "*" Then
$lectiomax = 0
EndIf
If $lectiomax = "von" Then
$lectiomax = 0
EndIf
If $lectiomin = "bis" Then
$lectiomin = 0
EndIf
If $lectiomax = "*" Then
$lectiomax = 0
EndIf
If $lectiomin = "*" Then
$lectiomin = 0
EndIf
If $lectiomax >0 Then
$LectioFilter = 1
Else
$LectioFilter = 0
EndIf
If $lectiomin >0 Then
$LectioFilter = 1
Else
$LectioFilter = 0
EndIf
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"Prüfe ob LectioFilter aktiviert werden soll")
EndIf
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"Sprache ="&$ifSprache)
EndIf
;+++
;GUI:
If $ifSprache = "Latein" Then
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"Lt interface")
EndIf
$Fenster = GUICreate("Verbum",400,300)
$Einstellungen = GUICtrlCreateMenu("mutare aliquid")
$aeName = GUICtrlCreateMenuItem("mutare nominis", $Einstellungen)
$aeLectio = GUICtrlCreateMenuItem("mutare lectionis", $Einstellungen)
$aeProtokoll = GUICtrlCreateMenuItem("intercalo tabellum", $Einstellungen)
$mBeenden = GUICtrlCreateMenu("fino")
$oBeenden = GUICtrlCreateMenuItem("securus sine finus", $mBeenden)
$sBeenden = GUICtrlCreateMenuItem("securus finus", $mBeenden)
$Extras = GUICtrlCreateMenu("appositio")
$Sprache = GUICtrlCreateMenuItem("lingua fenestrae", $Extras)
GUICtrlCreateLabel("Negotium:",0,0,100,25)
GUICtrlCreateLabel($Aufgabe,0,26,400,20)
$Eingabe= GUICtrlCreateInput("",0,46,400,20)
$OK = GUICtrlCreateButton("confirmo",0,66,100,20)
$was = GUICtrlCreateButton("?",100,66,100,20)
$Next = GUICtrlCreateButton("proximus verbum",200,66,200,20)
GUISetState(@sw_show)
Else
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"D interface")
EndIf
$Fenster = GUICreate("Vokabelprüfer",400,300)
$Einstellungen = GUICtrlCreateMenu("Einstellungen")
$aeName = GUICtrlCreateMenuItem("Namen ändern", $Einstellungen)
$aeLectio = GUICtrlCreateMenuItem("Lektion ändern", $Einstellungen)
$aeProtokoll = GUICtrlCreateMenuItem("Protokoll Einstellungen ändern", $Einstellungen)
$aeGeschlecht = GUICtrlCreateMenuItem("Geschlecht ändern", $Einstellungen)
$mBeenden = GUICtrlCreateMenu("Beenden")
$oBeenden = GUICtrlCreateMenuItem("Beenden ohne Speichern", $mBeenden)
$sBeenden = GUICtrlCreateMenuItem("Speichern mit Beenden", $mBeenden)
$Extras = GUICtrlCreateMenu("Extras")
$Sprache = GUICtrlCreateMenuItem("Sprache des Programms", $Extras)
$Suche = GUICtrlCreateMenuItem("Info", $Extras)
GUICtrlCreateLabel("Aufgabe:",0,0,100,25)
GUICtrlCreateLabel($Aufgabe,0,26,200,20)
$Eingabe= GUICtrlCreateInput("",0,46,400,20)
$OK = GUICtrlCreateButton("OK",0,66,100,20)
$was = GUICtrlCreateButton("?",100,66,100,20)
$Next = GUICtrlCreateButton("Nächstes Vokabel",200,66,200,20)
GUISetState(@sw_show)
EndIf
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"Benutzeroberfläche fertig. zeige diese nun an")
EndIf
If $Programmpunkt <= 2 Then
MsgBox(4096,"Wilkommen", "Herzlich wilkommen "&$Name&"!",3)
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"Begrüßung abgeschlossen")
EndIf
EndIf
$Programmpunkt = 3
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"starte GUI-Abfrage")
EndIf
While 1 = 1
$gui = GUIGetMsg()
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"gui ="&$gui)
EndIf
$Maus = GUIGetCursorInfo($Fenster)
if $gui = $GUI_EVENT_CLOSE Then
$gui = $oBeenden
EndIf
if $Maus[4] = $was Then
if $ifSprache = "Latein" Then
ToolTip($Ausgabe)
Else
ToolTip("Vokabel ist aus Lektion "&$Lectio&" und die Zufallszahl ist "&$Zufall&".")
EndIf
Else
ToolTip("")
EndIf
Select
Case $gui = $aeName
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"Name wird geändert")
EndIf
$Name = InputBox("ändere Name",$Name&", wie möchtest du genannt werden?")
_FileCreate("config2.txt")
While 1 = 1
$configCopyZeile = $configCopyZeile + 1
$configZeilen= _FileCountLines("config.txt")
$Dat = FileReadLine("config.txt",$configCopyZeile)
if $configCopyZeile = 2 Then
$Dat = "Name: "&$Name
EndIf
FileWriteLine("config2.txt",$Dat)
If $configCopyZeile = $configZeilen Then
FileDelete("config.txt")
$Dat = FileRead("config2.txt")
FileDelete("config2.txt")
_FileCreate("config.txt")
FileWrite("config.txt",$Dat)
$Programmpunkt = 2
GUISetState(@sw_hide)
HauptInterface()
EndIf
WEnd
Case $gui = $aeLectio
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"LectioFilter wird aktiviert/abgestellt")
EndIf
GUICreate("Lektionsauswahl",200,40)
$von = GUICtrlCreateInput("von",0,0,100,20)
$bis = GUICtrlCreateInput("bis",100,0,100,20)
$OK = GUICtrlCreateButton("Bestätigen",0,20,200,20)
GUISetState(@sw_show)
While 1 = 1
$gui = GUIGetMsg()
if $gui = $OK Then
$Lectiomin = GUICtrlRead($von)
$Lectiomax = GUICtrlRead($bis)
;Lectio Filter Check
If $lectiomax = "bis" Then
$lectiomax = 0
EndIf
If $lectiomin = "von" Then
$lectiomin = 0
EndIf
If $lectiomax = "*" Then
$lectiomax = 0
EndIf
If $lectiomax = "von" Then
$lectiomax = 0
EndIf
If $lectiomin = "bis" Then
$lectiomin = 0
EndIf
If $lectiomax = "*" Then
$lectiomax = 0
EndIf
If $lectiomin = "*" Then
$lectiomin = 0
EndIf
GUISetState(@sw_hide)
If $lectiomax >0 Then
$LectioFilter = 1
Else
$LectioFilter = 0
EndIf
If $lectiomin >0 Then
$LectioFilter = 1
Else
$LectioFilter = 0
EndIf
Dek()
EndIf
WEnd
Case $gui = $oBeenden
If $ifSprache = "Latein" Then
MsgBox(0,"salve","saluto te!")
Else
MsgBox(0,"Auf Wiedersehen","Auf Wiedersehen "&$Name&". Komm' bald wieder!")
EndIf
If $Prot = 1 Then
FileWriteLine("Protokoll.txt",$Zeit&"Programm wird ohne Speichern beendet; Protokoll wird nicht
entfernt")
EndIf
FileDelete("Richtig.txt")
FileDelete("Falsch.txt")
Exit
Case $gui = $OK
$Eingabe = GUICtrlRead($Eingabe)
GUISetState(@sw_hide)
Korrektur()
Case $gui = $was
If $ifSprache = "Latein" Then
MsgBox(64,"auxilii",$Ausgabe)
Else
MsgBox(64,"Hilfe","Vokabel ist aus Lektion "&$Lectio&" und die Zufallszahl ist
"&$Zufall&".")
EndIf
GUISetState(@sw_hide)
HauptInterface()
Case $gui = $aeProtokoll
GUICreate("Protokoll",200,20)
$von = GUICtrlCreateButton("aktivieren",0,0,100,20)
$bis = GUICtrlCreateButton("deaktivieren",100,0,100,20)
GUISetState(@sw_show)
While 1 = 1
$gui = GUIGetMsg()
if $gui = $von Then
$Prot = 1
_FileCreate("Protokoll.txt")
GUISetState(@sw_hide)
HauptInterface()
ElseIf $gui = $bis Then
$Prot = 0
GUISetState(@sw_hide)
HauptInterface()
EndIf
WEnd
Case $gui = $Sprache
GUISetState(@sw_hide)
GUICreate("Sprache",200,20)
$von = GUICtrlCreateButton("Latein",0,0,100,20)
$bis = GUICtrlCreateButton("Deutsch",100,0,100,20)
GUISetState(@sw_show)
While 1 = 1
$gui = GUIGetMsg()
if $gui = $von Then
GUISetState(@sw_hide)
$ifSprache = "Latein"
GUISetState(@sw_hide)
Dek()
Elseif $gui = $bis Then
GUISetState(@sw_hide)
$ifSprache = "Deutsch"
GUISetState(@sw_hide)
Dek()
EndIf
WEnd
Case $gui = $Next
Dek()
Case $gui = $sBeenden
Exit
Case $gui = $Suche
MsgBox(0,"Informationen","Vokabeln aus dem Buch LIBELLUS LATINUS von LEO BAZANT-HEGEMARK; Lektion 1 - 20 Abgetippt von JUNG
CLEMENS; Lektion 21- 25 von GÜVEN BERK abgetippt; Programmiert von JUNG CLEMENS; Programmdesign von JUNG CLEMENS; Programm wurde in der Sprache AutoIt 3 geschrieben")
GUISetState(@sw_hide)
HauptInterface()
Case $gui = $aeGeschlecht
GUISetState(@sw_hide)
GUICreate("Gechlecht",200,20)
$von = GUICtrlCreateButton("männlich",0,0,100,20)
$bis = GUICtrlCreateButton("weiblich",100,0,100,20)
$configCopyZeile = 0
GUISetState(@sw_show)
While 1 = 1
$gui = GUIGetMsg()
if $gui = $von Then
$Geschlecht="m"
While 1 = 1
$configCopyZeile = $configCopyZeile + 1
$configZeilen= _FileCountLines("config.txt")
$Dat = FileReadLine("config.txt",$configCopyZeile)
if $configCopyZeile = 5 Then
$Dat = "Geschlecht: "&$Geschlecht
EndIf
FileWriteLine("config2.txt",$Dat)
If $configCopyZeile = $configZeilen Then
FileDelete("config.txt")
$Dat = FileRead("config2.txt")
FileDelete("config2.txt")
_FileCreate("config.txt")
FileWrite("config.txt",$Dat)
GUISetState(@sw_hide)
GUISetState(@sw_hide)
Dek()
EndIf
WEnd
ElseIf $gui = $bis Then
$Geschlecht="w"
GUISetState(@sw_hide)
While 1 = 1
$configCopyZeile = $configCopyZeile + 1
$configZeilen= _FileCountLines("config.txt")
$Dat = FileReadLine("config.txt",$configCopyZeile)
if $configCopyZeile = 5 Then
$Dat = "Geschlecht: "&$Geschlecht
EndIf
FileWriteLine("config2.txt",$Dat)
If $configCopyZeile = $configZeilen Then
FileDelete("config.txt")
$Dat = FileRead("config2.txt")
FileDelete("config2.txt")
_FileCreate("config.txt")
FileWrite("config.txt",$Dat)
GUISetState(@sw_hide)
GUISetState(@sw_hide)
Dek()
EndIf
WEnd
EndIf
WEnd
EndSelect
WEnd
EndFunc
Func K()
$Eingabe = GUICtrlRead($Eingabe)
GUISetState(@sw_hide)
Korrektur()
EndFunc
Func Korrektur()
if $Eingabe = "" Then
MsgBox(16,"Keine Antwort","Du hast nicht geantwortet!")
HauptInterface()
EndIf
$zaehlerA = $zaehlerA + 1
Select
Case $Eingabe = $Deutsch
GUISetState(@sw_hide)
Richtig()
Case $Eingabe = $Deutsch2
GUISetState(@sw_hide)
Richtig()
Case $Eingabe = $Deutsch3
GUISetState(@sw_hide)
Richtig()
Case $Eingabe = $Deutsch4
GUISetState(@sw_hide)
Richtig()
;Eastereggs:
Case $Eingabe = $Latein
MsgBox(64,"Haha!","Haha, Abschreiben kann ja wohl jeder!",3)
GUISetState(@sw_hide)
HauptInterface()
Case $Eingabe = "Clemo ist der größte"
MsgBox(64,"Ja!","Eine wahre Aussage!",3)
GUISetState(@sw_hide)
HauptInterface()
Case $Eingabe = "Clemo ist der Größte"
MsgBox(64,"Ja!","Eine wahre Aussage!",3)
GUISetState(@sw_hide)
HauptInterface()
Case $Eingabe = "Latein ist dumm"
MsgBox(64,"???","Dachte ich auch, ich habe Meinung aber gändert und dieses Programm geschrieben ;)",3)
GUISetState(@sw_hide)
HauptInterface()
Case $Eingabe = "Latein ist dämlich"
MsgBox(64,"???","Dachte ich auch, ich habe Meinung aber gändert und dieses Programm geschrieben ;)",3)
GUISetState(@sw_hide)
HauptInterface()
Case $Eingabe = "Latein ist scheiße"
MsgBox(64,"???","Dachte ich auch, ich habe Meinung aber gändert und dieses Programm geschrieben ;)",3)
GUISetState(@sw_hide)
HauptInterface()
Case $Eingabe = "Woher soll ich das wissen?"
MsgBox(64,"???","Das ist eine gute Frage, ich glaub weil du es in der Schule lernst!",3)
GUISetState(@sw_hide)
HauptInterface()
;Eingabe gleich falsch wenn:
Case $Eingabe = $Eingabe
Falsch()
EndSelect
Dek()
EndFunc
Func Richtig()
If $ifSprache = "Latein" Then
MsgBox(48,"bene","oh maximus est")
Else
if $zaehlerA = 1 Then
$A1 = "r"
ElseIf $zaehlerA = 2 Then
$A2 = "r"
ElseIf $zaehlerA = 3 Then
$A3 = "r"
$zaehlerA = 0
EndIf
GUISetState(@sw_hide)
If $A1 = $A2 = $A3 Then
$ZufallN =Random(1,6,1)
If $ZufallN = 1 Then
MsgBox(48,"Richtig","Du hast vollkommen richtig geantwortet!")
ElseIf $ZufallN = 2 Then
MsgBox(48,"Richtig","Super, so bin ich das von dir gewöhnt!")
ElseIf $ZufallN = 3 Then
MsgBox(48,"Richtig","Ja... hätte ich auch gesagt!")
ElseIf $ZufallN = 4 Then
MsgBox(48,"Richtig","100% korrekt, wie immer")
ElseIf $ZufallN = 5 Then
MsgBox(48,"Richtig","Gratulation, du kannst das wirklich!")
ElseIf $ZufallN = 6 Then
if $Geschlecht = "w" Then
MsgBox(48,"Richtig",$Name&", du bist die Größte!")
Else
MsgBox(48,"Richtig",$Name&", du bist der Größte!")
EndIf
EndIf
Else
$ZufallN =Random(1,15,1)
If $ZufallN = 1 Then
MsgBox(48,"Richtig","Du hast vollkommen richtig geantwortet!")
ElseIf $ZufallN = 2 Then
MsgBox(48,"Richtig","Ja "&$Name&" das stimmt!")
ElseIf $ZufallN = 3 Then
MsgBox(48,"Richtig","So ist das richtig!")
ElseIf $ZufallN = 4 Then
MsgBox(48,"Richtig","absulut korrekt!")
ElseIf $ZufallN = 5 Then
MsgBox(48,"Richtig","Ja ... hätte ich auch gesagt.")
ElseIf $ZufallN = 6 Then
MsgBox(48,"Richtig","Ja, Ja natürlich.")
ElseIf $ZufallN = 7 Then
MsgBox(48,"Richtig","Stimmt!")
ElseIf $ZufallN = 8 Then
MsgBox(48,"Richtig","Gewonnen, "&$Name&" hat 1000 Punkte.")
ElseIf $ZufallN = 9 Then
MsgBox(48,"Richtig","Ich habe auch nichts Anderes erwartet.")
ElseIf $ZufallN = 10 Then
MsgBox(48,"Richtig","Super, das ist sogar richtig!")
ElseIf $ZufallN = 11 Then
$ZufallN = MsgBox(4,"Sicher?","Sind sie sich sicher?")
If $ZufallN = 6 Then
MsgBox(48,"Richtig","Ja "&$Name&" das stimmt!")
Else
Dek()
EndIf
ElseIf $ZufallN = 12 Then
MsgBox(48,"Richtig","Korrekt!")
ElseIf $ZufallN = 13 Then
MsgBox(48,"Richtig","Naja.. kann man so sagen")
ElseIf $ZufallN = 14 Then
$ZufallN = MsgBox(4,"Wirklich?","Wirklich?")
If $ZufallN = 6 Then
$ZufallN = MsgBox(4,"Sicher?","Sind sie sich sicher?")
If $ZufallN = 6 Then
MsgBox(48,"Richtig","Ja "&$Name&" das stimmt!")
Else
Dek()
EndIf
Else
Dek()
EndIf
ElseIf $ZufallN = 15 Then
MsgBox(48,"Richtig","Ja natürlich, "&$Latein&" kann ja auch nichts anderes heißen!")
EndIf
EndIf
EndIf
$Richtig = $Richtig + 1
FileWriteLine("Richtig.txt",$Latein &"<=>"&$Deutsch)
Dek()
EndFunc
Func Falsch()
if $zaehlerA = 1 Then
$A1 = "f"
ElseIf $zaehlerA = 2 Then
$A2 = "f"
ElseIf $zaehlerA = 3 Then
$A3 = "f"
$zaehlerA = 0
EndIf
$ZufallN = Random(1,7,1)
GUISetState(@sw_hide)
$Falsch = $Falsch + 1
If $ZufallN = 1 Then
MsgBox(48,"Falsch","Du hast leider nicht richtig geantwortet!"&"Richtig wäre: "&$Latein&" <=> "&$Deutsch&"! Du hast
"&$Eingabe&" geantwortet.")
ElseIf $ZufallN = 2 Then
MsgBox(48,"Falsch","Oje leider falsch :( , "&"Richtig wäre: "&$Latein&" <=> "&$Deutsch&"! Du hast "&$Eingabe&" geantwortet,
aber ist nicht soo schlimm ;)")
ElseIf $ZufallN = 3 Then
MsgBox(48,"Falsch","Oje leider falsch :( , "&"Richtig wäre: "&$Latein&" <=> "&$Deutsch&"! Du hast "&$Eingabe&" geantwortet,
aber ist nicht soo schlimm ;)")
ElseIf $ZufallN = 4 Then
MsgBox(48,"Falsch","Was? "&$Namen&" ich bin schwer enttäuscht von dir :( Die Lösung wäre wäre: "&$Latein&" <=> "&$Deutsch&"! Du
hast "&$Eingabe&" geantwortet")
ElseIf $ZufallN = 5 Then
MsgBox(48,"Falsch",$Namen&" meinst du das ernst? Ich glaub du wolltest "&$Latein&" <=> "&$Deutsch&" sagen und nicht
"&$Eingabe&" !")
ElseIf $ZufallN = 6 Then
$ZufallN = MsgBox(4,"Wirklich?","Wirklich?")
If $ZufallN = 6 Then
$ZufallN = MsgBox(4,"Sicher?","Sind sie sich sicher?")
If $ZufallN = 6 Then
MsgBox(48,"Falsch",$name&", das geht noch nicht so gut. er sollte sich das noch einmal anschauen! ("&$Latein&"
<=> "&$Deutsch&")")
Else
Dek()
EndIf
Else
Dek()
EndIf
ElseIf $ZufallN = 7 Then
MsgBox(48,"Falsch", "Das ist jetzt leider falsch :( ; Die richtige Lösung wäre "&$Latein&" <=> "&$Deutsch&"!")
EndIf
FileWriteLine("Falsch.txt",$Latein &"<=>"&$Deutsch)
Dek()
EndFunc
Func Notaus()
$1 =MsgBox(4,"Notaus","Möchtest du wirklich das Programm verlassen?")
if $1 = 6 Then
Exit
Else
GUISetState(@sw_hide)
HauptInterface()
EndIf
EndFunc
;##########################################################################################
;##########################################################################################
;##########################################################################################
;Vokabeln:
Func Dek()
GUISetState(@sw_hide)
If $alterMod = 1 Then
$Zufall = $Zufall + 1
Else
$Zufall = Random(1,448,1)
EndIf
if $Zufall ="1" Then
$Deutsch = "hoch"
$Deutsch2 = "tief"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "altus"
$Lectio = 1
ElseIf $Zufall ="2" Then
$Deutsch = "weit"
$Deutsch2 = "geräumig"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "amplus"
$Lectio = 1
ElseIf $Zufall ="3" Then
$Deutsch = "alt"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "antiquus"
$Lectio = 1
ElseIf $Zufall ="4" Then
$Deutsch = "und"
$Deutsch2 = "auch"
$Deutsch3 = "que"
$Deutsch4 = ""
$Latein = "et"
$Lectio = 1
ElseIf $Zufall ="5" Then
$Deutsch = "wohnen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "habito"
$Lectio = 1
ElseIf $Zufall ="6" Then
$Deutsch = "in"
$Deutsch2 = "an"
$Deutsch3 = "auf"
$Deutsch4 = ""
$Latein = "in"
$Lectio = 1
ElseIf $Zufall ="7" Then
$Deutsch = "arbeiten"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "laboro"
$Lectio = 1
ElseIf $Zufall ="8" Then
$Deutsch = "loben"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "laudo"
$Lectio = 1
ElseIf $Zufall ="9" Then
$Deutsch = "lang"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "longus"
$Lectio = 1
ElseIf $Zufall ="10" Then
$Deutsch = "groß"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "magnus"
$Lectio = 1
ElseIf $Zufall ="11" Then
$Deutsch = "neu"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "novus"
$Lectio = 1
ElseIf $Zufall ="12" Then
$Deutsch = "Knabe"
$Deutsch2 = "Bub"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "puer"
$Lectio = 1
ElseIf $Zufall ="13" Then
$Deutsch = "schön"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pulcher"
$Lectio = 1
ElseIf $Zufall ="14" Then
$Deutsch = "auch"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "quoque"
$Lectio = 1
ElseIf $Zufall ="15" Then
$Deutsch = "heilig"
$Deutsch2 = "geweiht"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "sacer"
$Lectio = 1
ElseIf $Zufall ="16" Then
$Deutsch = "grüßen"
$Deutsch2 = "begrüßen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "saluto"
$Lectio = 1
ElseIf $Zufall ="17" Then
$Deutsch = "Sklave"
$Deutsch2 = "Knecht"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "servus"
$Lectio = 1
ElseIf $Zufall ="18" Then
$Deutsch = "stehen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "sto"
$Lectio = 1
ElseIf $Zufall ="19" Then
$Deutsch = "Weg"
$Deutsch2 = "Straße"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "via"
$Lectio = 1
ElseIf $Zufall ="20" Then
$Deutsch = "Mann"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "vir"
$Lectio = 1
ElseIf $Zufall ="21" Then
$Deutsch = "ein anderer"
$Deutsch2 = "der andere"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "alius"
$Lectio = 2
ElseIf $Zufall ="22" Then
$Deutsch = "lieben"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "amo"
$Lectio = 2
ElseIf $Zufall ="23" Then
$Deutsch = "gut"
$Deutsch2 = "tüchtig"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "bonus"
$Lectio = 2
ElseIf $Zufall ="24" Then
$Deutsch = "Feld"
$Deutsch2 = "Ebene"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "campus"
$Lectio = 2
ElseIf $Zufall ="25" Then
$Deutsch = "mit"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "cum"
$Lectio = 2
ElseIf $Zufall ="26" Then
$Deutsch = "haben"
$Deutsch2 = "halten"
$Deutsch3 = "besitzen"
$Deutsch4 = ""
$Latein = "habeo"
$Lectio = 2
ElseIf $Zufall ="27" Then
$Deutsch = "der mittlere"
$Deutsch2 = "Mittel"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "medius"
$Lectio = 2
ElseIf $Zufall ="28" Then
$Deutsch = "ermahnen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "moneo"
$Lectio = 2
ElseIf $Zufall ="29" Then
$Deutsch = "viele"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "multi"
$Lectio = 2
ElseIf $Zufall ="30" Then
$Deutsch = "nicht"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "non"
$Lectio = 2
ElseIf $Zufall ="31" Then
$Deutsch = "bereiten"
$Deutsch2 = "vorbereiten"
$Deutsch3 = "zubereiten"
$Deutsch4 = ""
$Latein = "paro"
$Lectio = 2
ElseIf $Zufall ="32" Then
$Deutsch = "klein"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "parvus"
$Lectio = 2
ElseIf $Zufall ="33" Then
$Deutsch = "wenige"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pauci"
$Lectio = 2
ElseIf $Zufall ="34" Then
$Deutsch = "Volk"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "populus"
$Lectio = 2
ElseIf $Zufall ="35" Then
$Deutsch = "wer"
$Deutsch2 = "wer?"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "quis"
$Lectio = 2
ElseIf $Zufall ="36" Then
$Deutsch = "oft"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "saepe"
$Lectio = 2
ElseIf $Zufall ="37" Then
$Deutsch = "Land"
$Deutsch2 = "Erde"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "terra"
$Lectio = 2
ElseIf $Zufall ="38" Then
$Deutsch = "wo"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ubi"
$Lectio = 2
ElseIf $Zufall ="39" Then
$Deutsch = "sehen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "video"
$Lectio = 2
ElseIf $Zufall ="40" Then
$Deutsch = "Landhaus"
$Deutsch2 = "Landgut"
$Deutsch3 = "Villa"
$Deutsch4 = ""
$Latein = "villa"
$Lectio = 2
ElseIf $Zufall ="41" Then
$Deutsch = "vor"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ante"
$Lectio = 3
ElseIf $Zufall ="42" Then
$Deutsch = "vorher"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "antea"
$Lectio = 3
ElseIf $Zufall ="43" Then
$Deutsch = "an"
$Deutsch2 = "bei"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "apud"
$Lectio = 3
ElseIf $Zufall ="44" Then
$Deutsch = "Wasser"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "aqua"
$Lectio = 3
ElseIf $Zufall ="45" Then
$Deutsch = "sorgen"
$Deutsch2 = "sich kümmern um"
$Deutsch3 = "kümmern"
$Deutsch4 = ""
$Latein = "curo"
$Lectio = 3
ElseIf $Zufall ="46" Then
$Deutsch = "lehren"
$Deutsch2 = "unterrichten"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "doceo"
$Lectio = 3
ElseIf $Zufall ="47" Then
$Deutsch = "Herrin"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "domina"
$Lectio = 3
ElseIf $Zufall ="48" Then
$Deutsch = "Herr"
$Deutsch2 = "Hausherr"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "dominus"
$Lectio = 3
ElseIf $Zufall ="49" Then
$Deutsch = "auch"
$Deutsch2 = "sogar"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "etiam"
$Lectio = 3
ElseIf $Zufall ="50" Then
$Deutsch = "erwarten"
$Deutsch2 = "warten auf"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "exspecto"
$Lectio = 3
ElseIf $Zufall ="51" Then
$Deutsch = "Familie"
$Deutsch2 = "Hausgemeinschaft"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "familia"
$Lectio = 3
ElseIf $Zufall ="52" Then
$Deutsch = "Tochter"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "filia"
$Lectio = 3
ElseIf $Zufall ="53" Then
$Deutsch = "Sohn"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "filius"
$Lectio = 3
ElseIf $Zufall ="54" Then
$Deutsch = "hier"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "hic"
$Lectio = 3
ElseIf $Zufall ="55" Then
$Deutsch = "denn"
$Deutsch2 = "nämlich"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nam"
$Lectio = 3
ElseIf $Zufall ="56" Then
$Deutsch = "und"
$Deutsch2 = "et"
$Deutsch3 = "-que"
$Deutsch4 = ""
$Latein = "que"
$Lectio = 3
ElseIf $Zufall ="57" Then
$Deutsch = "aber"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "sed"
$Lectio = 3
ElseIf $Zufall ="58" Then
$Deutsch = "ich bin"
$Deutsch2 = "existieren"
$Deutsch3 = "sein"
$Deutsch4 = ""
$Latein = "sum"
$Lectio = 3
ElseIf $Zufall ="59" Then
$Deutsch = "Tempel"
$Deutsch2 = "heiliger Bereich"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "templum"
$Lectio = 3
ElseIf $Zufall ="60" Then
$Deutsch = "da"
$Deutsch2 = "dann"
$Deutsch3 = "darauf"
$Deutsch4 = ""
$Latein = "tum"
$Lectio = 3
ElseIf $Zufall ="61" Then
$Deutsch = "Jahr"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "annus"
$Lectio = 4
ElseIf $Zufall ="62" Then
$Deutsch = "gut"
$Deutsch2 = "auf gute Weise"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "bene"
$Lectio = 4
ElseIf $Zufall ="63" Then
$Deutsch = "wenn"
$Deutsch2 = "wann immer"
$Deutsch3 = "sooft"
$Deutsch4 = ""
$Latein = "cum"
$Lectio = 4
ElseIf $Zufall ="64" Then
$Deutsch = "lernen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "disco"
$Lectio = 4
ElseIf $Zufall ="65" Then
$Deutsch = "lange"
$Deutsch2 = "lange Zeit"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "diu"
$Lectio = 4
ElseIf $Zufall ="66" Then
$Deutsch = "Geschichte"
$Deutsch2 = "Fabel"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "fabula"
$Lectio = 4
ElseIf $Zufall ="67" Then
$Deutsch = "menschlich"
$Deutsch2 = "gebildet"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "humanus"
$Lectio = 4
ElseIf $Zufall ="68" Then
$Deutsch = "so"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ita"
$Lectio = 4
ElseIf $Zufall ="69" Then
$Deutsch = "lesen"
$Deutsch2 = "sammeln"
$Deutsch3 = "auswählen"
$Deutsch4 = ""
$Latein = "lego"
$Lectio = 4
ElseIf $Zufall ="70" Then
$Deutsch = "Buch"
$Deutsch2 = "frei"
$Deutsch3 = "Kinder"
$Deutsch4 = ""
$Latein = "liber"
$Lectio = 4
ElseIf $Zufall ="71" Then
$Deutsch = "Sprache"
$Deutsch2 = "Zunge"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "lingua"
$Lectio = 4
ElseIf $Zufall ="72" Then
$Deutsch = "Buchstabe"
$Deutsch2 = "Schrift"
$Deutsch3 = "Brief"
$Deutsch4 = ""
$Latein = "littera"
$Lectio = 4
ElseIf $Zufall ="73" Then
$Deutsch = "Lehrer"
$Deutsch2 = "Meister"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "magister"
$Lectio = 4
ElseIf $Zufall ="74" Then
$Deutsch = "schlecht"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "malus"
$Lectio = 4
ElseIf $Zufall ="75" Then
$Deutsch = "manche"
$Deutsch2 = "einige"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nonnulli"
$Lectio = 4
ElseIf $Zufall ="76" Then
$Deutsch = "jetzt"
$Deutsch2 = "nun"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nunc"
$Lectio = 4
ElseIf $Zufall ="77" Then
$Deutsch = "Vaterland"
$Deutsch2 = "Heimat"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "patria"
$Lectio = 4
ElseIf $Zufall ="78" Then
$Deutsch = "weil"
$Deutsch2 = "da"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "qod"
$Lectio = 4
ElseIf $Zufall ="79" Then
$Deutsch = "vorlesen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "recito"
$Lectio = 4
ElseIf $Zufall ="80" Then
$Deutsch = "schreiben"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "scribo"
$Lectio = 4
ElseIf $Zufall ="81" Then
$Deutsch = "aber"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "autem"
$Lectio = 5
ElseIf $Zufall ="82" Then
$Deutsch = "klar"
$Deutsch2 = "berühmt"
$Deutsch3 = "hell"
$Deutsch4 = ""
$Latein = "clarus"
$Lectio = 5
ElseIf $Zufall ="83" Then
$Deutsch = "während"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "dum"
$Lectio = 5
ElseIf $Zufall ="84" Then
$Deutsch = "Brief"
$Deutsch2 = "littera"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "epistula"
$Lectio = 5
ElseIf $Zufall ="85" Then
$Deutsch = "Beispiel"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "exemplum"
$Lectio = 5
ElseIf $Zufall ="86" Then
$Deutsch = "schon"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "iam"
$Lectio = 5
ElseIf $Zufall ="87" Then
$Deutsch = "Reich"
$Deutsch2 = "Herrschaft"
$Deutsch3 = "Befehl"
$Deutsch4 = ""
$Latein = "imperium"
$Lectio = 5
ElseIf $Zufall ="88" Then
$Deutsch = "bewohnen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "incolo"
$Lectio = 5
ElseIf $Zufall ="89" Then
$Deutsch = "frei"
$Deutsch2 = "Kinder"
$Deutsch3 = "Buch"
$Deutsch4 = ""
$Latein = "liber"
$Lectio = 5
ElseIf $Zufall ="90" Then
$Deutsch = "in der Früh"
$Deutsch2 = "morgens"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "mane"
$Lectio = 5
ElseIf $Zufall ="91" Then
$Deutsch = "nennen"
$Deutsch2 = "benennen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nomino"
$Lectio = 5
ElseIf $Zufall ="92" Then
$Deutsch = "nicht nur"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "non solum"
$Lectio = 5
ElseIf $Zufall ="93" Then
$Deutsch = "sondern auch"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "sed etiam"
$Lectio = 5
ElseIf $Zufall ="94" Then
$Deutsch = "Zahl"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "numerus"
$Lectio = 6
ElseIf $Zufall ="95" Then
$Deutsch = "Amtsbereich"
$Deutsch2 = "Provinz"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "provincia"
$Lectio = 6
ElseIf $Zufall ="96" Then
$Deutsch = "wissen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "scio"
$Lectio = 6
ElseIf $Zufall ="97" Then
$Deutsch = "gelegen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "situs"
$Lectio = 6
ElseIf $Zufall ="98" Then
$Deutsch = "allein"
$Deutsch2 = "alleinig"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "solus"
$Lectio = 6
ElseIf $Zufall ="99" Then
$Deutsch = "verschieden"
$Deutsch2 = "bunt"
$Deutsch3 = "farbig"
$Deutsch4 = ""
$Latein = "varius"
$Lectio = 6
ElseIf $Zufall ="100" Then
$Deutsch = "bewegen"
$Deutsch2 = "führen"
$Deutsch3 = "bringen"
$Deutsch4 = ""
$Latein = "veho"
$Lectio = 6
ElseIf $Zufall ="101" Then
$Deutsch = "oder"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "vel"
$Lectio = 6
ElseIf $Zufall ="102" Then
$Deutsch = "fangen"
$Deutsch2 = "einnehmen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "capio"
$Lectio = 7
ElseIf $Zufall ="103" Then
$Deutsch = "die übrigen"
$Deutsch2 = "alle übrigen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "cetreri"
$Lectio = 7
ElseIf $Zufall ="104" Then
$Deutsch = "zusammensetzen"
$Deutsch2 = "verfassen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "compono"
$Lectio = 7
ElseIf $Zufall ="105" Then
$Deutsch = "von"
$Deutsch2 = "über"
$Deutsch3 = "von - herab"
$Deutsch4 = ""
$Latein = "de"
$Lectio = 7
ElseIf $Zufall ="106" Then
$Deutsch = "sagen"
$Deutsch2 = "sprechen"
$Deutsch3 = "nennen"
$Deutsch4 = ""
$Latein = "dico"
$Lectio = 7
ElseIf $Zufall ="107" Then
$Deutsch = "geben"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "do"
$Lectio = 7
ElseIf $Zufall ="108" Then
$Deutsch = "aus"
$Deutsch2 = "heraus"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "e"
$Lectio = 7
ElseIf $Zufall ="109" Then
$Deutsch = "heraus"
$Deutsch2 = "aus"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ex"
$Lectio = 7
ElseIf $Zufall ="110" Then
$Deutsch = "sagt"
$Deutsch2 = "er sagt"
$Deutsch3 = "sagte"
$Deutsch4 = ""
$Latein = "inquid"
$Lectio = 7
ElseIf $Zufall ="111" Then
$Deutsch = "Spiel"
$Deutsch2 = "Schule"
$Deutsch3 = "Gladiatorenschule"
$Deutsch4 = ""
$Latein = "ludus"
$Lectio = 7
ElseIf $Zufall ="112" Then
$Deutsch = "mein"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "meus"
$Lectio = 7
ElseIf $Zufall ="113" Then
$Deutsch = "schicken"
$Deutsch2 = "senden"
$Deutsch3 = "übermiteln"
$Deutsch4 = ""
$Latein = "mitto"
$Lectio = 7
ElseIf $Zufall ="114" Then
$Deutsch = "erzählen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "narro"
$Lectio = 7
ElseIf $Zufall ="115" Then
$Deutsch = "noch nicht"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nondum"
$Lectio = 7
ElseIf $Zufall ="116" Then
$Deutsch = "nie"
$Deutsch2 = "niemals"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "numquam"
$Lectio = 7
ElseIf $Zufall ="117" Then
$Deutsch = "Arbeit"
$Deutsch2 = "Mühe"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "opera"
$Lectio = 7
ElseIf $Zufall ="118" Then
$Deutsch = "sich Mühe geben"
$Deutsch2 = ""
$Deutsch3 = "sich Mühe geben"
$Deutsch4 = ""
$Latein = "operam dare"
$Lectio = 7
ElseIf $Zufall ="119" Then
$Deutsch = "Stadt"
$Deutsch2 = "(kleine befestigte) Stadt"
$Deutsch3 = "kleine befestigte Stadt"
$Deutsch4 = ""
$Latein = "oppidum"
$Lectio = 7
ElseIf $Zufall ="120" Then
$Deutsch = "öffentlich"
$Deutsch2 = "staatlich"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "publicus"
$Lectio = 7
ElseIf $Zufall ="121" Then
$Deutsch = "antworten"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "respondeo"
$Lectio = 7
ElseIf $Zufall ="122" Then
$Deutsch = "immer"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "semper"
$Lectio = 7
ElseIf $Zufall ="123" Then
$Deutsch = "dein"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "tuus"
$Lectio = 7
ElseIf $Zufall ="124" Then
$Deutsch = "hören"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "audio"
$Lectio = 8
ElseIf $Zufall ="125" Then
$Deutsch = "Himmel"
$Deutsch2 = "Luft"
$Deutsch3 = "Wetter"
$Deutsch4 = ""
$Latein = "caelum"
$Lectio = 8
ElseIf $Zufall ="126" Then
$Deutsch = "schreien"
$Deutsch2 = "rufen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "clamo"
$Lectio = 8
ElseIf $Zufall ="127" Then
$Deutsch = "laufen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "curro"
$Lectio = 8
ElseIf $Zufall ="128" Then
$Deutsch = "schulden"
$Deutsch2 = "verdanken"
$Deutsch3 = "sollen"
$Deutsch4 = ""
$Latein = "debeo"
$Lectio = 8
ElseIf $Zufall ="129" Then
$Deutsch = "Tag"
$Deutsch2 = "Frist"
$Deutsch3 = "Termin"
$Deutsch4 = ""
$Latein = "dies"
$Lectio = 8
ElseIf $Zufall ="130" Then
$Deutsch = "Reichtum"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "divitae"
$Lectio = 8
ElseIf $Zufall ="131" Then
$Deutsch = "Markt"
$Deutsch2 = "Platz"
$Deutsch3 = "Forum"
$Deutsch4 = ""
$Latein = "forum"
$Lectio = 8
ElseIf $Zufall ="132" Then
$Deutsch = "spielen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ludo"
$Lectio = 8
ElseIf $Zufall ="133" Then
$Deutsch = "Geschäft"
$Deutsch2 = "Beschäftigung"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "negotiom"
$Lectio = 8
ElseIf $Zufall ="134" Then
$Deutsch = "durch"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "per"
$Lectio = 8
ElseIf $Zufall ="135" Then
$Deutsch = "nach"
$Deutsch2 = "hinter"
$Deutsch3 = "hinter etwas"
$Deutsch4 = ""
$Latein = "post"
$Lectio = 8
ElseIf $Zufall ="136" Then
$Deutsch = "Sache"
$Deutsch2 = "Ding"
$Deutsch3 = "Lage"
$Deutsch4 = ""
$Latein = "res"
$Lectio = 8
ElseIf $Zufall ="137" Then
$Deutsch = "bemühen"
$Deutsch2 = "studieren"
$Deutsch3 = "sich eifrig bemühen"
$Deutsch4 = ""
$Latein = "studeo"
$Lectio = 8
ElseIf $Zufall ="138" Then
$Deutsch = "sein"
$Deutsch2 = "ihr"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "suus"
$Lectio = 8
ElseIf $Zufall ="139" Then
$Deutsch = "Tafel"
$Deutsch2 = "Liste"
$Deutsch3 = "Gemälde"
$Deutsch4 = ""
$Latein = "tabula"
$Lectio = 8
ElseIf $Zufall ="140" Then
$Deutsch = "kommen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "venio"
$Lectio = 8
ElseIf $Zufall ="141" Then
$Deutsch = "fehlen"
$Deutsch2 = "abwesend"
$Deutsch3 = "abwesend sein"
$Deutsch4 = ""
$Latein = "absum"
$Lectio = 9
ElseIf $Zufall ="142" Then
$Deutsch = "bei"
$Deutsch2 = "zu"
$Deutsch3 = "an"
$Deutsch4 = ""
$Latein = "ad"
$Lectio = 9
ElseIf $Zufall ="143" Then
$Deutsch = "verwalten"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "administro"
$Lectio = 9
ElseIf $Zufall ="144" Then
$Deutsch = "treiben"
$Deutsch2 = "tun"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ago"
$Lectio = 9
ElseIf $Zufall ="145" Then
$Deutsch = "hinaufsteigen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ascendo"
$Lectio = 9
ElseIf $Zufall ="146" Then
$Deutsch = "hinabsteigen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "descendo"
$Lectio = 9
ElseIf $Zufall ="147" Then
$Deutsch = "Großvater"
$Deutsch2 = "Vorfahre"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "avus"
$Lectio = 10
ElseIf $Zufall ="148" Then
$Deutsch = "Rat"
$Deutsch2 = "Plan"
$Deutsch3 = "Absicht"
$Deutsch4 = ""
$Latein = "consilium"
$Lectio = 10
ElseIf $Zufall ="149" Then
$Deutsch = "Rathaus"
$Deutsch2 = "Senatsversammlung"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "curia"
$Lectio = 10
ElseIf $Zufall ="150" Then
$Deutsch = "Gott"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "deus"
$Lectio = 10
ElseIf $Zufall ="151" Then
$Deutsch = "irren"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "erro"
$Lectio = 10
ElseIf $Zufall ="152" Then
$Deutsch = "Heer"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "exercitus"
$Lectio = 10
ElseIf $Zufall ="153" Then
$Deutsch = "flüchten"
$Deutsch2 = "fliehen"
$Deutsch3 = "meiden"
$Deutsch4 = ""
$Latein = "fugiou"
$Lectio = 10
ElseIf $Zufall ="154" Then
$Deutsch = "gestern"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "heri"
$Lectio = 10
ElseIf $Zufall ="155" Then
$Deutsch = "dort"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ibi"
$Lectio = 10
ElseIf $Zufall ="156" Then
$Deutsch = "zeigen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "monstro"
$Lectio = 10
ElseIf $Zufall ="157" Then
$Deutsch = "Dankmal"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "monomentum"
$Lectio = 10
ElseIf $Zufall ="158" Then
$Deutsch = "Staat"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "res publica"
$Lectio = 10
ElseIf $Zufall ="159" Then
$Deutsch = "Senat"
$Deutsch2 = "Ratsversammlung"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "senatus"
$Lectio = 10
ElseIf $Zufall ="160" Then
$Deutsch = "betrachten"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "specto"
$Lectio = 10
ElseIf $Zufall ="161" Then
$Deutsch = "krank"
$Deutsch2 = "mühselig"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "aeger"
$Lectio = 11
ElseIf $Zufall ="162" Then
$Deutsch = "behaften"
$Deutsch2 = "versehen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "afficio"
$Lectio = 11
ElseIf $Zufall ="163" Then
$Deutsch = "Kopf"
$Deutsch2 = "Haupt"
$Deutsch3 = "Hauptstadt"
$Deutsch4 = ""
$Latein = "caput"
$Lectio = 11
ElseIf $Zufall ="164" Then
$Deutsch = "Schmerz empfinden"
$Deutsch2 = "schmerzen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "doleo"
$Lectio = 11
ElseIf $Zufall ="165" Then
$Deutsch = "zu Hause"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "domi"
$Lectio = 11
ElseIf $Zufall ="166" Then
$Deutsch = "liegen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "iaceo"
$Lectio = 11
ElseIf $Zufall ="167" Then
$Deutsch = "befehlen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "imero"
$Lectio = 11
ElseIf $Zufall ="168" Then
$Deutsch = "Hand"
$Deutsch2 = "Schaar"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "manus"
$Lectio = 11
ElseIf $Zufall ="169" Then
$Deutsch = "wunderbar"
$Deutsch2 = "erstaunlich"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "mirus"
$Lectio = 11
ElseIf $Zufall ="170" Then
$Deutsch = "Karnkheit"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "morubs"
$Lectio = 11
ElseIf $Zufall ="171" Then
$Deutsch = "nicht mehr"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "non iam"
$Lectio = 11
ElseIf $Zufall ="172" Then
$Deutsch = "bitten"
$Deutsch2 = "sprechen"
$Deutsch3 = "beten"
$Deutsch4 = ""
$Latein = "oro"
$Lectio = 11
ElseIf $Zufall ="173" Then
$Deutsch = "suchen"
$Deutsch2 = "forschen"
$Deutsch3 = "fragen"
$Deutsch4 = ""
$Latein = "quaero"
$Lectio = 11
ElseIf $Zufall ="174" Then
$Deutsch = "ruhig"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "quietus"
$Lectio = 11
ElseIf $Zufall ="175" Then
$Deutsch = "bitten"
$Deutsch2 = "fragen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "rogo"
$Lectio = 11
ElseIf $Zufall ="176" Then
$Deutsch = "sofort"
$Deutsch2 = "sogleich"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "statim"
$Lectio = 11
ElseIf $Zufall ="177" Then
$Deutsch = "plötzlich"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "subito"
$Lectio = 11
ElseIf $Zufall ="178" Then
$Deutsch = "berühren"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "tango"
$Lectio = 11
ElseIf $Zufall ="179" Then
$Deutsch = "haben"
$Deutsch2 = "halten"
$Deutsch3 = "besitzen"
$Deutsch4 = ""
$Latein = "teneo"
$Lectio = 11
ElseIf $Zufall ="180" Then
$Deutsch = "wie"
$Deutsch2 = "sobald als"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ut"
$Lectio = 11
ElseIf $Zufall ="181" Then
$Deutsch = "Baum"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "arbor"
$Lectio = 12
ElseIf $Zufall ="182" Then
$Deutsch = "aufregen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "excito"
$Lectio = 12
ElseIf $Zufall ="183" Then
$Deutsch = "Betrug"
$Deutsch2 = "Schaden"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "fraus"
$Lectio = 12
ElseIf $Zufall ="184" Then
$Deutsch = "daher"
$Deutsch2 = "davon"
$Deutsch3 = "davon her"
$Deutsch4 = ""
$Latein = "hinc"
$Lectio = 12
ElseIf $Zufall ="185" Then
$Deutsch = "unrätlich"
$Deutsch2 = "schlecht"
$Deutsch3 = "böse"
$Deutsch4 = ""
$Latein = "improbus"
$Lectio = 12
ElseIf $Zufall ="186" Then
$Deutsch = "in"
$Deutsch2 = "nach"
$Deutsch3 = "gegen"
$Deutsch4 = ""
$Latein = "in"
$Lectio = 12
ElseIf $Zufall ="187" Then
$Deutsch = "daher"
$Deutsch2 = "und so"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "itaque"
$Lectio = 12
ElseIf $Zufall ="188" Then
$Deutsch = "ebenso"
$Deutsch2 = "auch"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "item"
$Lectio = 12
ElseIf $Zufall ="189" Then
$Deutsch = "ein wenig vorher"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "paulo ante"
$Lectio = 12
ElseIf $Zufall ="190" Then
$Deutsch = "ein weing nachher"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "paulo post"
$Lectio = 12
ElseIf $Zufall ="191" Then
$Deutsch = "darbieten"
$Deutsch2 = "reichen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "praebeo"
$Lectio = 12
ElseIf $Zufall ="192" Then
$Deutsch = "Beute"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "praeda"
$Lectio = 12
ElseIf $Zufall ="193" Then
$Deutsch = "ohne"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "sine"
$Lectio = 12
ElseIf $Zufall ="194" Then
$Deutsch = "Art"
$Deutsch2 = "Aussehen"
$Deutsch3 = "Schein"
$Deutsch4 = ""
$Latein = "species"
$Lectio = 12
ElseIf $Zufall ="195" Then
$Deutsch = "dennoch"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "tamen"
$Lectio = 12
ElseIf $Zufall ="196" Then
$Deutsch = "da"
$Deutsch2 = "damals"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "tunc"
$Lectio = 12
ElseIf $Zufall ="197" Then
$Deutsch = "sehr"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "valde"
$Lectio = 12
ElseIf $Zufall ="198" Then
$Deutsch = "Wort"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "verbum"
$Lectio = 12
ElseIf $Zufall ="199" Then
$Deutsch = "Gewand"
$Deutsch2 = "Kleidung"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "vestis"
$Lectio = 12
ElseIf $Zufall ="200" Then
$Deutsch = "rufen"
$Deutsch2 = "nennen"
$Deutsch3 = "benennen"
$Deutsch4 = ""
$Latein = "voco"
$Lectio = 12
ElseIf $Zufall ="201" Then
$Deutsch = "Stimme"
$Deutsch2 = "Ruf"
$Deutsch3 = "Laut"
$Deutsch4 = ""
$Latein = "vox"
$Lectio = 12
ElseIf $Zufall ="202" Then
$Deutsch = "ziehen"
$Deutsch2 = "fürhern"
$Deutsch3 = "leiten"
$Deutsch4 = ""
$Latein = "duco"
$Lectio = 13
ElseIf $Zufall ="203" Then
$Deutsch = "machen"
$Deutsch2 = "tun"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "facio"
$Lectio = 13
ElseIf $Zufall ="204" Then
$Deutsch = "also"
$Deutsch2 = "daher"
$Deutsch3 = "folglich"
$Deutsch4 = ""
$Latein = "igitur"
$Lectio = 13
ElseIf $Zufall ="205" Then
$Deutsch = "finden"
$Deutsch2 = "daraufkommen"
$Deutsch3 = "draufkommen"
$Deutsch4 = ""
$Latein = "invenio"
$Lectio = 13
ElseIf $Zufall ="206" Then
$Deutsch = "jung"
$Deutsch2 = "junger Mann"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "iuvenis"
$Lectio = 13
ElseIf $Zufall ="207" Then
$Deutsch = "Meer"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "mare"
$Lectio = 13
ElseIf $Zufall ="208" Then
$Deutsch = "Mutter"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "mater"
$Lectio = 13
ElseIf $Zufall ="209" Then
$Deutsch = "Nacht"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nox"
$Lectio = 13
ElseIf $Zufall ="210" Then
$Deutsch = "setzen"
$Deutsch2 = "stellen"
$Deutsch3 = "legen"
$Deutsch4 = ""
$Latein = "pono"
$Lectio = 13
ElseIf $Zufall ="211" Then
$Deutsch = "Klugheit"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "porta"
$Lectio = 13
ElseIf $Zufall ="212" Then
$Deutsch = "finden"
$Deutsch2 = "auffinden"
$Deutsch3 = "aufdecken"
$Deutsch4 = ""
$Latein = "reperio"
$Lectio = 13
ElseIf $Zufall ="213" Then
$Deutsch = "König"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "rex"
$Lectio = 13
ElseIf $Zufall ="214" Then
$Deutsch = "lachen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "rideo"
$Lectio = 13
ElseIf $Zufall ="215" Then
$Deutsch = "lassen"
$Deutsch2 = "zulassen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "sino"
$Lectio = 13
ElseIf $Zufall ="216" Then
$Deutsch = "unter"
$Deutsch2 = "unter etwas"
$Deutsch3 = "hinunter"
$Deutsch4 = ""
$Latein = "sub"
$Lectio = 13
ElseIf $Zufall ="217" Then
$Deutsch = "so"
$Deutsch2 = "derart"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "tam"
$Lectio = 13
ElseIf $Zufall ="218" Then
$Deutsch = "Ehefrau"
$Deutsch2 = "Gattin"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "uxor"
$Lectio = 13
ElseIf $Zufall ="219" Then
$Deutsch = "wahr"
$Deutsch2 = "wahrhaftig"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "verus"
$Lectio = 13
ElseIf $Zufall ="220" Then
$Deutsch = "kennen lernen"
$Deutsch2 = "erkennen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "cognosco"
$Lectio = 14
ElseIf $Zufall ="221" Then
$Deutsch = "sorgfältig"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "dilligens"
$Lectio = 14
ElseIf $Zufall ="222" Then
$Deutsch = "Haus"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "domus"
$Lectio = 14
ElseIf $Zufall ="223" Then
$Deutsch = "heute"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "hodie"
$Lectio = 14
ElseIf $Zufall ="224" Then
$Deutsch = "Mensch"
$Deutsch2 = "Mann"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "homo"
$Lectio = 14
ElseIf $Zufall ="225" Then
$Deutsch = "Weg"
$Deutsch2 = "Reise"
$Deutsch3 = "Marsch"
$Deutsch4 = ""
$Latein = "iter"
$Lectio = 14
ElseIf $Zufall ="226" Then
$Deutsch = "Legion"
$Deutsch2 = "Heer"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "legio"
$Lectio = 14
ElseIf $Zufall ="227" Then
$Deutsch = "Vater"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pater"
$Lectio = 14
ElseIf $Zufall ="228" Then
$Deutsch = "anstreben"
$Deutsch2 = "fragen"
$Deutsch3 = "bitten"
$Deutsch4 = ""
$Latein = "peto"
$Lectio = 14
ElseIf $Zufall ="229" Then
$Deutsch = "wie"
$Deutsch2 = "als"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "quam"
$Lectio = 14
ElseIf $Zufall ="230" Then
$Deutsch = "wenn"
$Deutsch2 = "falls"
$Deutsch3 = "ob"
$Deutsch4 = ""
$Latein = "si"
$Lectio = 14
ElseIf $Zufall ="231" Then
$Deutsch = "Turm"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "turris"
$Lectio = 14
ElseIf $Zufall ="232" Then
$Deutsch = "erbauen"
$Deutsch2 = "errichten"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "aedifico"
$Lectio = 15
ElseIf $Zufall ="233" Then
$Deutsch = "Zeit"
$Deutsch2 = "Zeitalter"
$Deutsch3 = "Lebensalter"
$Deutsch4 = ""
$Latein = "aetas"
$Lectio = 15
ElseIf $Zufall ="234" Then
$Deutsch = "der eine"
$Deutsch2 = "zweite"
$Deutsch3 = "der zweite"
$Deutsch4 = ""
$Latein = "alter"
$Lectio = 15
ElseIf $Zufall ="235" Then
$Deutsch = "erblicken"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "cospicio"
$Lectio = 15
ElseIf $Zufall ="236" Then
$Deutsch = "rechts"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "dexter"
$Lectio = 15
ElseIf $Zufall ="237" Then
$Deutsch = "zwei"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "duo"
$Lectio = 15
ElseIf $Zufall ="238" Then
$Deutsch = "Reiter"
$Deutsch2 = "Ritter"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "eques"
$Lectio = 15
ElseIf $Zufall ="239" Then
$Deutsch = "aussetzten"
$Deutsch2 = "darlegen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "expono"
$Lectio = 15
ElseIf $Zufall ="240" Then
$Deutsch = "fast"
$Deutsch2 = "beinahe"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "fere"
$Lectio = 15
ElseIf $Zufall ="241" Then
$Deutsch = "Bild"
$Deutsch2 = "Abbild"
$Deutsch3 = "Ahnenbild"
$Deutsch4 = ""
$Latein = "imago"
$Lectio = 15
ElseIf $Zufall ="242" Then
$Deutsch = "verstehen"
$Deutsch2 = "bemerken"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "intelleogo"
$Lectio = 15
ElseIf $Zufall ="243" Then
$Deutsch = "wiederum"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "iterum"
$Lectio = 15
ElseIf $Zufall ="244" Then
$Deutsch = "Soldat"
$Deutsch2 = "Fußsoldat"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "miles"
$Lectio = 15
ElseIf $Zufall ="245" Then
$Deutsch = "wenn nicht"
$Deutsch2 = "außer"
$Deutsch3 = "außer wenn"
$Deutsch4 = ""
$Latein = "nisi"
$Lectio = 15
ElseIf $Zufall ="246" Then
$Deutsch = "nahe bei"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "prope"
$Lectio = 15
ElseIf $Zufall ="247" Then
$Deutsch = "obwohl"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "quamquam"
$Lectio = 15
ElseIf $Zufall ="248" Then
$Deutsch = "Sturz"
$Deutsch2 = "Trümmer"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ruina"
$Lectio = 15
ElseIf $Zufall ="249" Then
$Deutsch = "so"
$Deutsch2 = "so beschaffen"
$Deutsch3 = "so (beschaffen)"
$Deutsch4 = ""
$Latein = "talis"
$Lectio = 15
ElseIf $Zufall ="250" Then
$Deutsch = "Zeit"
$Deutsch2 = "Zeitpunkt"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "tempus"
$Lectio = 15
ElseIf $Zufall ="251" Then
$Deutsch = "gründen"
$Deutsch2 = "bergen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "condo"
$Lectio = 16
ElseIf $Zufall ="252" Then
$Deutsch = "der zehnte"
$Deutsch2 = "der Zehnte"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "decimus"
$Lectio = 16
ElseIf $Zufall ="253" Then
$Deutsch = "dann"
$Deutsch2 = "hierauf"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "deinde"
$Lectio = 16
ElseIf $Zufall ="254" Then
$Deutsch = "herausgeben"
$Deutsch2 = "herausbringen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "edo"
$Lectio = 16
ElseIf $Zufall ="255" Then
$Deutsch = "Bruder"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "frater"
$Lectio = 16
ElseIf $Zufall ="256" Then
$Deutsch = "unter"
$Deutsch2 = "zwischen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "inter"
$Lectio = 16
ElseIf $Zufall ="257" Then
$Deutsch = "Mauer"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "murus"
$Lectio = 16
ElseIf $Zufall ="258" Then
$Deutsch = "Name"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nomen"
$Lectio = 16
ElseIf $Zufall ="259" Then
$Deutsch = "Hirte"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pastor"
$Lectio = 16
ElseIf $Zufall ="260" Then
$Deutsch = "durchkommen"
$Deutsch2 = "ans Ziel gelangen"
$Deutsch3 = "ans Ziel kommen"
$Deutsch4 = ""
$Latein = "pervenio"
$Lectio = 16
ElseIf $Zufall ="261" Then
$Deutsch = "die meisten"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pulurimi"
$Lectio = 16
ElseIf $Zufall ="262" Then
$Deutsch = "schließlich"
$Deutsch2 = "zuletzt"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "postremo"
$Lectio = 16
ElseIf $Zufall ="263" Then
$Deutsch = "zuerst"
$Deutsch2 = "erstens"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "primum"
$Lectio = 16
ElseIf $Zufall ="264" Then
$Deutsch = "widergeben"
$Deutsch2 = "machen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "reddo"
$Lectio = 16
ElseIf $Zufall ="265" Then
$Deutsch = "Gegend"
$Deutsch2 = "Gebiet"
$Deutsch3 = "Richtung"
$Deutsch4 = ""
$Latein = "regio"
$Lectio = 16
ElseIf $Zufall ="266" Then
$Deutsch = "Gefährte"
$Deutsch2 = "Freund"
$Deutsch3 = "Verbündeter"
$Deutsch4 = ""
$Latein = "socius"
$Lectio = 16
ElseIf $Zufall ="267" Then
$Deutsch = "Stadt"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "urbs"
$Lectio = 16
ElseIf $Zufall ="268" Then
$Deutsch = "Mädchen"
$Deutsch2 = "Jungfrau"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "virgo"
$Lectio = 16
ElseIf $Zufall ="269" Then
$Deutsch = "Ehrgeiz"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "amitio"
$Lectio = 17
ElseIf $Zufall ="270" Then
$Deutsch = "passend"
$Deutsch2 = "geeignet"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "aptus"
$Lectio = 17
ElseIf $Zufall ="271" Then
$Deutsch = "kurz"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "brevis"
$Lectio = 17
ElseIf $Zufall ="272" Then
$Deutsch = "sich setzten"
$Deutsch2 = "niederlassen"
$Deutsch3 = "setzten"
$Deutsch4 = ""
$Latein = "consido"
$Lectio = 17
ElseIf $Zufall ="273" Then
$Deutsch = "begehren"
$Deutsch2 = "wünschen"
$Deutsch3 = "sich wünschen"
$Deutsch4 = ""
$Latein = "cupio"
$Lectio = 17
ElseIf $Zufall ="274" Then
$Deutsch = "reich"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "dives"
$Lectio = 17
ElseIf $Zufall ="275" Then
$Deutsch = "also"
$Deutsch2 = "daher"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ergo"
$Lectio = 17
ElseIf $Zufall ="276" Then
$Deutsch = "Geschlecht"
$Deutsch2 = "Stamm"
$Deutsch3 = "Volk"
$Deutsch4 = ""
$Latein = "gens"
$Lectio = 17
ElseIf $Zufall ="277" Then
$Deutsch = "jender"
$Deutsch2 = "der dort"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ille"
$Lectio = 17
ElseIf $Zufall ="278" Then
$Deutsch = "anzünden"
$Deutsch2 = "entflamen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "incendo"
$Lectio = 17
ElseIf $Zufall ="279" Then
$Deutsch = "selbst"
$Deutsch2 = "sekber"
$Deutsch3 = "persönlich"
$Deutsch4 = ""
$Latein = "ipse"
$Lectio = 17
ElseIf $Zufall ="280" Then
$Deutsch = "Zorn"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ira"
$Lectio = 17
ElseIf $Zufall ="281" Then
$Deutsch = "der da"
$Deutsch2 = "der dort"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "iste"
$Lectio = 17
ElseIf $Zufall ="282" Then
$Deutsch = "Berg"
$Deutsch2 = "Gebirge"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "mons"
$Lectio = 17
ElseIf $Zufall ="283" Then
$Deutsch = "Frau"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "mulier"
$Lectio = 17
ElseIf $Zufall ="284" Then
$Deutsch = "jeder"
$Deutsch2 = "alle"
$Deutsch3 = "ganz"
$Deutsch4 = ""
$Latein = "omnis"
$Lectio = 17
ElseIf $Zufall ="285" Then
$Deutsch = "es ist nötig"
$Deutsch2 = "er gehört sich"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "opartet"
$Lectio = 17
ElseIf $Zufall ="286" Then
$Deutsch = "voll"
$Deutsch2 = "voll (von etwas)"
$Deutsch3 = "voll von etwas"
$Deutsch4 = ""
$Latein = "plenus"
$Lectio = 17
ElseIf $Zufall ="287" Then
$Deutsch = "alt"
$Deutsch2 = "betagt"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "vetus"
$Lectio = 17
ElseIf $Zufall ="288" Then
$Deutsch = "einige"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "aliquot"
$Lectio = 18
ElseIf $Zufall ="289" Then
$Deutsch = "erscheinen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "appareo"
$Lectio = 18
ElseIf $Zufall ="290" Then
$Deutsch = "und"
$Deutsch2 = "und zwar"
$Deutsch3 = "und sogar"
$Deutsch4 = ""
$Latein = "atque"
$Lectio = 18
ElseIf $Zufall ="291" Then
$Deutsch = "feieren"
$Deutsch2 = "zahlreich besuchen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "celebro"
$Lectio = 18
ElseIf $Zufall ="292" Then
$Deutsch = "sicher"
$Deutsch2 = "gewiss"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "certus"
$Lectio = 18
ElseIf $Zufall ="293" Then
$Deutsch = "herausführen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "educo"
$Lectio = 18
ElseIf $Zufall ="294" Then
$Deutsch = "nämlich"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "enim"
$Lectio = 18
ElseIf $Zufall ="295" Then
$Deutsch = "Tat"
$Deutsch2 = "Untat"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "facinus"
$Lectio = 18
ElseIf $Zufall ="296" Then
$Deutsch = "Form"
$Deutsch2 = "Gestalt"
$Deutsch3 = "Schönheit"
$Deutsch4 = ""
$Latein = "forma"
$Lectio = 18
ElseIf $Zufall ="297" Then
$Deutsch = "derselbe"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "idem"
$Lectio = 18
ElseIf $Zufall ="298" Then
$Deutsch = "Ort"
$Deutsch2 = "Platz"
$Deutsch3 = "Stelle"
$Deutsch4 = ""
$Latein = "locus"
$Lectio = 18
ElseIf $Zufall ="299" Then
$Deutsch = "kennen"
$Deutsch2 = "erkennen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nosco"
$Lectio = 18
ElseIf $Zufall ="300" Then
$Deutsch = "ein wenig"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "paulum"
$Lectio = 18
ElseIf $Zufall ="301" Then
$Deutsch = "Fuß"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pes"
$Lectio = 18
ElseIf $Zufall ="302" Then
$Deutsch = "Zeitalter"
$Deutsch2 = "Jahrhundert"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "saeculum"
$Lectio = 18
ElseIf $Zufall ="303" Then
$Deutsch = "heilig"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "sanctus"
$Lectio = 18
ElseIf $Zufall ="304" Then
$Deutsch = "lösen"
$Deutsch2 = "erlösen"
$Deutsch3 = "bezahlen"
$Deutsch4 = ""
$Latein = "solvo"
$Lectio = 18
ElseIf $Zufall ="305" Then
$Deutsch = "Zeugnis"
$Deutsch2 = "Beweis"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "testimonium"
$Lectio = 18
ElseIf $Zufall ="306" Then
$Deutsch = "übergeben"
$Deutsch2 = "überliefern"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "trado"
$Lectio = 18
ElseIf $Zufall ="307" Then
$Deutsch = "euer"
$Deutsch2 = "von euch"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "vester"
$Lectio = 18
ElseIf $Zufall ="308" Then
$Deutsch = "sich ereigenen"
$Deutsch2 = "ereigenen"
$Deutsch3 = "geschehen"
$Deutsch4 = ""
$Latein = "accido"
$Lectio = 19
ElseIf $Zufall ="309" Then
$Deutsch = "jung"
$Deutsch2 = "junger Mann"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "adulescens"
$Lectio = 19
ElseIf $Zufall ="310" Then
$Deutsch = "Gewährsmann"
$Deutsch2 = "Urheber"
$Deutsch3 = "Autor"
$Deutsch4 = ""
$Latein = "auctor"
$Lectio = 19
ElseIf $Zufall ="311" Then
$Deutsch = "glücklich"
$Deutsch2 = "reich"
$Deutsch3 = "selig"
$Deutsch4 = ""
$Latein = "beatus"
$Lectio = 19
ElseIf $Zufall ="312" Then
$Deutsch = "Körper"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "corpus"
$Lectio = 19
ElseIf $Zufall ="313" Then
$Deutsch = "glauben"
$Deutsch2 = "anvertrauen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "credo"
$Lectio = 19
ElseIf $Zufall ="314" Then
$Deutsch = "verbinden"
$Deutsch2 = "vereinigen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "iungo"
$Lectio = 19
ElseIf $Zufall ="315" Then
$Deutsch = "Werk"
$Deutsch2 = "Arbeit"
$Deutsch3 = "Mühe"
$Deutsch4 = ""
$Latein = "opus"
$Lectio = 19
ElseIf $Zufall ="316" Then
$Deutsch = "es ist nötig"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "opus est"
$Lectio = 19
ElseIf $Zufall ="317" Then
$Deutsch = "schmücken"
$Deutsch2 = "ausstatten"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "orno"
$Lectio = 19
ElseIf $Zufall ="318" Then
$Deutsch = "Pflichtgefühl"
$Deutsch2 = "Frömmigkeit"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pietas"
$Lectio = 19
ElseIf $Zufall ="319" Then
$Deutsch = "die meisten"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "plerique"
$Lectio = 19
ElseIf $Zufall ="320" Then
$Deutsch = "Rückkehr"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "reditus"
$Lectio = 19
ElseIf $Zufall ="321" Then
$Deutsch = "Gespräch"
$Deutsch2 = "Rede"
$Deutsch3 = "Sprache"
$Deutsch4 = ""
$Latein = "sermo"
$Lectio = 19
ElseIf $Zufall ="322" Then
$Deutsch = "auferstehen"
$Deutsch2 = "sich erheben"
$Deutsch3 = "erheben"
$Deutsch4 = ""
$Latein = "surgo"
$Lectio = 19
ElseIf $Zufall ="323" Then
$Deutsch = "traurig"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "tristis"
$Lectio = 19
ElseIf $Zufall ="324" Then
$Deutsch = "einer"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "unus"
$Lectio = 19
ElseIf $Zufall ="325" Then
$Deutsch = "Leben"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "vita"
$Lectio = 19
ElseIf $Zufall ="326" Then
$Deutsch = "leben"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "vivo"
$Lectio = 19
ElseIf $Zufall ="327" Then
$Deutsch = "wälzen"
$Deutsch2 = "drehen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "volvo"
$Lectio = 19
ElseIf $Zufall ="328" Then
$Deutsch = "Krieg"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "bellum"
$Lectio = 20
ElseIf $Zufall ="329" Then
$Deutsch = "denken"
$Deutsch2 = "nachdenken"
$Deutsch3 = "erwägen"
$Deutsch4 = ""
$Latein = "cogito"
$Lectio = 20
ElseIf $Zufall ="330" Then
$Deutsch = "halten"
$Deutsch2 = "festhalten"
$Deutsch3 = "umfassen"
$Deutsch4 = ""
$Latein = "contineo"
$Lectio = 20
ElseIf $Zufall ="331" Then
$Deutsch = "auslöschen"
$Deutsch2 = "vernichten"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "extinguo"
$Lectio = 20
ElseIf $Zufall ="332" Then
$Deutsch = "gestalten"
$Deutsch2 = "erdichten"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "fingo"
$Lectio = 20
ElseIf $Zufall ="333" Then
$Deutsch = "angesehen"
$Deutsch2 = "ehrenhaft"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "honestus"
$Lectio = 20
ElseIf $Zufall ="334" Then
$Deutsch = "ungeheuer"
$Deutsch2 = "riesig"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "igens"
$Lectio = 20
ElseIf $Zufall ="335" Then
$Deutsch = "der innere"
$Deutsch2 = "der Innere"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "interior"
$Lectio = 20
ElseIf $Zufall ="336" Then
$Deutsch = "tausend"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "mille"
$Lectio = 20
ElseIf $Zufall ="337" Then
$Deutsch = "Art"
$Deutsch2 = "Weise"
$Deutsch3 = "Maß"
$Deutsch4 = ""
$Latein = "mondus"
$Lectio = 20
ElseIf $Zufall ="338" Then
$Deutsch = "nichts"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nihil"
$Lectio = 20
ElseIf $Zufall ="339" Then
$Deutsch = "manchmal"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nunnumquam"
$Lectio = 20
ElseIf $Zufall ="340" Then
$Deutsch = "Doppelschritt"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "passus"
$Lectio = 20
ElseIf $Zufall ="341" Then
$Deutsch = "Vermögen"
$Deutsch2 = "Geld"
$Deutsch3 = "Vieh"
$Deutsch4 = ""
$Latein = "pecunia"
$Lectio = 20
ElseIf $Zufall ="342" Then
$Deutsch = "malen"
$Deutsch2 = "bemalen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pingo"
$Lectio = 20
ElseIf $Zufall ="343" Then
$Deutsch = "Kampf"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "proelium"
$Lectio = 20
ElseIf $Zufall ="344" Then
$Deutsch = "rauben"
$Deutsch2 = "raffen"
$Deutsch3 = "ergreifen"
$Deutsch4 = ""
$Latein = "rapio"
$Lectio = 20
ElseIf $Zufall ="345" Then
$Deutsch = "restlich"
$Deutsch2 = "übrig"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "reliquus"
$Lectio = 20
ElseIf $Zufall ="346" Then
$Deutsch = "Bündnis"
$Deutsch2 = "Gemeinschaft"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "societas"
$Lectio = 20
ElseIf $Zufall ="347" Then
$Deutsch = "wie"
$Deutsch2 = "wie z.B."
$Deutsch3 = "wie zum Beispiel"
$Deutsch4 = ""
$Latein = "velut"
$Lectio = 20
ElseIf $Zufall ="348" Then
$Deutsch = "kühn"
$Deutsch2 = "verwegen"
$Deutsch3 = "frech"
$Deutsch4 = ""
$Latein = "audax"
$Lectio = 21
ElseIf $Zufall ="349" Then
$Deutsch = "Ursache"
$Deutsch2 = "Streitsache"
$Deutsch3 = "Rechtsfall"
$Deutsch4 = ""
$Latein = "causa"
$Lectio = 21
ElseIf $Zufall ="350" Then
$Deutsch = "verbinden"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "coniungo "
$Lectio = 21
ElseIf $Zufall ="351" Then
$Deutsch = "gegen"
$Deutsch2 = "gegen etwas"
$Deutsch3 = "gegen etw."
$Deutsch4 = ""
$Latein = "contra"
$Lectio = 21
ElseIf $Zufall ="352" Then
$Deutsch = "grausam"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "crudelis"
$Lectio = 21
ElseIf $Zufall ="353" Then
$Deutsch = "nachweisen"
$Deutsch2 = "beweisen"
$Deutsch3 = "darlegen"
$Deutsch4 = ""
$Latein = "demonstro"
$Lectio = 21
ElseIf $Zufall ="354" Then
$Deutsch = "vielleicht"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "fortasse"
$Lectio = 21
ElseIf $Zufall ="355" Then
$Deutsch = "töten"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "interficio"
$Lectio = 21
ElseIf $Zufall ="356" Then
$Deutsch = "sehr"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "magnopere"
$Lectio = 21
ElseIf $Zufall ="357" Then
$Deutsch = "Verpflichtung"
$Deutsch2 = "Amt"
$Deutsch3 = "Geschenk"
$Deutsch4 = ""
$Latein = "munus"
$Lectio = 21
ElseIf $Zufall ="358" Then
$Deutsch = "Anfang"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "principium"
$Lectio = 21
ElseIf $Zufall ="359" Then
$Deutsch = "für"
$Deutsch2 = "vor"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pro"
$Lectio = 21
ElseIf $Zufall ="360" Then
$Deutsch = "kämpfen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pungo"
$Lectio = 21
ElseIf $Zufall ="361" Then
$Deutsch = "jedenfalls"
$Deutsch2 = "freilich"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "quidem"
$Lectio = 21
ElseIf $Zufall ="362" Then
$Deutsch = "ja sogar"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "quin etiam"
$Lectio = 21
ElseIf $Zufall ="363" Then
$Deutsch = "Vernunft"
$Deutsch2 = "Berechnung"
$Deutsch3 = "Art"
$Deutsch4 = ""
$Latein = "ratio"
$Lectio = 21
ElseIf $Zufall ="364" Then
$Deutsch = "wegschaffen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "removeo"
$Lectio = 21
ElseIf $Zufall ="365" Then
$Deutsch = "seiner"
$Deutsch2 = "ihrer"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "sui"
$Lectio = 21
ElseIf $Zufall ="366" Then
$Deutsch = "siegen "
$Deutsch2 = "besiegen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "vinco"
$Lectio = 21
ElseIf $Zufall ="367" Then
$Deutsch = "verwunden"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "vulnero"
$Lectio = 21
ElseIf $Zufall ="368" Then
$Deutsch = "Hügel"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "collis"
$Lectio = 22
ElseIf $Zufall ="369" Then
$Deutsch = "Volksversammlung"
$Deutsch2 = "Versammlung"
$Deutsch3 = "(Volks-)Versammlung"
$Deutsch4 = ""
$Latein = "contio"
$Lectio = 22
ElseIf $Zufall ="370" Then
$Deutsch = "zusammenkommen"
$Deutsch2 = "übereinkommen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "convenio"
$Lectio = 22
ElseIf $Zufall ="371" Then
$Deutsch = "Zusammenkunft "
$Deutsch2 = "Versammlung"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "conventus"
$Lectio = 22
ElseIf $Zufall ="372" Then
$Deutsch = "hervorbringen"
$Deutsch2 = "bewirken"
$Deutsch3 = "machen"
$Deutsch4 = ""
$Latein = "efficio"
$Lectio = 22
ElseIf $Zufall ="373" Then
$Deutsch = "beugen "
$Deutsch2 = "biegen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "flecto"
$Lectio = 22
ElseIf $Zufall ="374" Then
$Deutsch = "großartig"
$Deutsch2 = "bedeutend"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "grandis"
$Lectio = 22
ElseIf $Zufall ="375" Then
$Deutsch = "der größte"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "maximus"
$Lectio = 22
ElseIf $Zufall ="376" Then
$Deutsch = "vornehmen "
$Deutsch2 = "edel "
$Deutsch3 = "berühmt"
$Deutsch4 = ""
$Latein = "nobilis"
$Lectio = 22
ElseIf $Zufall ="377" Then
$Deutsch = "einst"
$Deutsch2 = "dereinst"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "olim"
$Lectio = 22
ElseIf $Zufall ="378" Then
$Deutsch = "zeigen"
$Deutsch2 = "entgegenstrecken"
$Deutsch3 = "zeigen (entgegnstrecken)"
$Deutsch4 = ""
$Latein = "ostendo"
$Lectio = 22
ElseIf $Zufall ="379" Then
$Deutsch = "Brücke"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pons"
$Lectio = 22
ElseIf $Zufall ="380" Then
$Deutsch = "deswegen"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "propterea"
$Lectio = 22
ElseIf $Zufall ="381" Then
$Deutsch = "Scheu"
$Deutsch2 = "Gottesverehrung"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "religio"
$Lectio = 22
ElseIf $Zufall ="382" Then
$Deutsch = "freilich"
$Deutsch2 = "natürlich"
$Deutsch3 = "nämlich"
$Deutsch4 = ""
$Latein = "scilicet"
$Lectio = 22
ElseIf $Zufall ="383" Then
$Deutsch = "aufschichten"
$Deutsch2 = "bauen"
$Deutsch3 = "(auf)schichten"
$Deutsch4 = ""
$Latein = "struo"
$Lectio = 22
ElseIf $Zufall ="384" Then
$Deutsch = "der höchste"
$Deutsch2 = "größte"
$Deutsch3 = "höchste"
$Deutsch4 = ""
$Latein = "summus"
$Lectio = 22
ElseIf $Zufall ="385" Then
$Deutsch = "ein jeder von beiden"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "uterque"
$Lectio = 22
ElseIf $Zufall ="386" Then
$Deutsch = "voneinander getrennt"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "uterque frater venit"
$Lectio = 22
ElseIf $Zufall ="387" Then
$Deutsch = "Gesundheit"
$Deutsch2 = "Gesundheit(-szustand)"
$Deutsch3 = "Gesundheitszustand"
$Deutsch4 = ""
$Latein = "valetudo"
$Lectio = 22
ElseIf $Zufall ="388" Then
$Deutsch = "Spur"
$Deutsch2 = "Standort"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "vestigium"
$Lectio = 22
ElseIf $Zufall ="389" Then
$Deutsch = "scharf"
$Deutsch2 = "spitz"
$Deutsch3 = "heftig"
$Deutsch4 = ""
$Latein = "acer"
$Lectio = 23
ElseIf $Zufall ="390" Then
$Deutsch = "Liebe"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "amor"
$Lectio = 23
ElseIf $Zufall ="391" Then
$Deutsch = "fallen"
$Deutsch2 = "stürtzen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "cado"
$Lectio = 23
ElseIf $Zufall ="392" Then
$Deutsch = "Bürger"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "civis"
$Lectio = 23
ElseIf $Zufall ="393" Then
$Deutsch = "Amtsgenosse"
$Deutsch2 = "Kollege"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "collega"
$Lectio = 23
ElseIf $Zufall ="394" Then
$Deutsch = "pflegen"
$Deutsch2 = "bebauen"
$Deutsch3 = "verehren"
$Deutsch4 = ""
$Latein = "colo"
$Lectio = 23
ElseIf $Zufall ="395" Then
$Deutsch = "höchster Staatsbeamter"
$Deutsch2 = "Konsul"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "consul"
$Lectio = 23
ElseIf $Zufall ="396" Then
$Deutsch = "hervorragend"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ergregius"
$Lectio = 23
ElseIf $Zufall ="397" Then
$Deutsch = "Amt"
$Deutsch2 = "Ehre"
$Deutsch3 = "Ehrenamt"
$Deutsch4 = ""
$Latein = "honor"
$Lectio = 23
ElseIf $Zufall ="398" Then
$Deutsch = "Amt"
$Deutsch2 = "Behörde"
$Deutsch3 = "Beamter"
$Deutsch4 = ""
$Latein = "magistratus"
$Lectio = 23
ElseIf $Zufall ="399" Then
$Deutsch = "Monat"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "mensis"
$Lectio = 23
ElseIf $Zufall ="400" Then
$Deutsch = "Sitte"
$Deutsch2 = "Charakter"
$Deutsch3 = "Brauch"
$Deutsch4 = ""
$Latein = "mos"
$Lectio = 23
ElseIf $Zufall ="401" Then
$Deutsch = "nicht - einmal"
$Deutsch2 = "nicht einmal"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "ne - quidem"
$Lectio = 23
ElseIf $Zufall ="402" Then
$Deutsch = "Botschaft"
$Deutsch2 = "Bote"
$Deutsch3 = "nicht Nutte"
$Deutsch4 = ""
$Latein = "nuntius"
$Lectio = 23
ElseIf $Zufall ="403" Then
$Deutsch = "Patrioten"
$Deutsch2 = "Aristrokraten"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "optimi"
$Lectio = 23
ElseIf $Zufall ="404" Then
$Deutsch = "der beste"
$Deutsch2 = "der Beste"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "optimus"
$Lectio = 23
ElseIf $Zufall ="405" Then
$Deutsch = "gefahr"
$Deutsch2 = "Gefahr"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "periculum"
$Lectio = 23
ElseIf $Zufall ="406" Then
$Deutsch = "hoher Beamter"
$Deutsch2 = "Gerichtsmagistrat"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "praetor"
$Lectio = 23
ElseIf $Zufall ="407" Then
$Deutsch = "richten"
$Deutsch2 = "lenken"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "rego"
$Lectio = 23
ElseIf $Zufall ="408" Then
$Deutsch = "Ratsherr"
$Deutsch2 = "Senator"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "senator"
$Lectio = 23
ElseIf $Zufall ="409" Then
$Deutsch = "Heereszug"
$Deutsch2 = "Marsch"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "agmen"
$Lectio = 24
ElseIf $Zufall ="410" Then
$Deutsch = "100"
$Deutsch2 = "Hundert"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "centum"
$Lectio = 24
ElseIf $Zufall ="411" Then
$Deutsch = "Wächter"
$Deutsch2 = "Wächterin"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "custos"
$Lectio = 24
ElseIf $Zufall ="412" Then
$Deutsch = "schwierig"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "defficilis"
$Lectio = 24
ElseIf $Zufall ="413" Then
$Deutsch = "Anführer"
$Deutsch2 = "Führer"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "dux"
$Lectio = 24
ElseIf $Zufall ="414" Then
$Deutsch = "ausführen"
$Deutsch2 = "tragen"
$Deutsch3 = "führen"
$Deutsch4 = ""
$Latein = "gero"
$Lectio = 24
ElseIf $Zufall ="415" Then
$Deutsch = "schwer"
$Deutsch2 = "heftig"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "gravis"
$Lectio = 24
ElseIf $Zufall ="416" Then
$Deutsch = "Feind"
$Deutsch2 = "Staatsfeind"
$Deutsch3 = "Fremder"
$Deutsch4 = ""
$Latein = "hostis"
$Lectio = 24
ElseIf $Zufall ="417" Then
$Deutsch = "die Stadtmauer"
$Deutsch2 = "Stadtmauer"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "moenia"
$Lectio = 24
ElseIf $Zufall ="418" Then
$Deutsch = "niemand"
$Deutsch2 = "Clownfisch"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "nemo"
$Lectio = 24
ElseIf $Zufall ="419" Then
$Deutsch = "Kreis"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "orbis"
$Lectio = 24
ElseIf $Zufall ="420" Then
$Deutsch = "der frührere"
$Deutsch2 = "vorzüglichere"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "prior"
$Lectio = 24
ElseIf $Zufall ="421" Then
$Deutsch = "Schlacht"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "pugna"
$Lectio = 24
ElseIf $Zufall ="422" Then
$Deutsch = "der vierte"
$Deutsch2 = "der 4."
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "quartus"
$Lectio = 24
ElseIf $Zufall ="423" Then
$Deutsch = "behüten"
$Deutsch2 = "bewaren"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "servo"
$Lectio = 24
ElseIf $Zufall ="424" Then
$Deutsch = "so groß"
$Deutsch2 = "so viel"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "tantus"
$Lectio = 24
ElseIf $Zufall ="425" Then
$Deutsch = "fürchten"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "timeo"
$Lectio = 24
ElseIf $Zufall ="426" Then
$Deutsch = "jenseits"
$Deutsch2 = "jenseits von etwas"
$Deutsch3 = "über etwas hinüber"
$Deutsch4 = ""
$Latein = "trans"
$Lectio = 24
ElseIf $Zufall ="427" Then
$Deutsch = "jemals"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "umquam"
$Lectio = 24
ElseIf $Zufall ="428" Then
$Deutsch = "Sieg"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "victoria"
$Lectio = 24
ElseIf $Zufall ="429" Then
$Deutsch = "zweimal"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "bis"
$Lectio = 25
ElseIf $Zufall ="430" Then
$Deutsch = "zehn"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "decem"
$Lectio = 25
ElseIf $Zufall ="431" Then
$Deutsch = "verschieden"
$Deutsch2 = "entgegengesetzt"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "diversus"
$Lectio = 25
ElseIf $Zufall ="432" Then
$Deutsch = "Grenz"
$Deutsch2 = "Ende"
$Deutsch3 = "Gebiet"
$Deutsch4 = ""
$Latein = "finis"
$Lectio = 25
ElseIf $Zufall ="433" Then
$Deutsch = "Kälte"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "frigus"
$Lectio = 25
ElseIf $Zufall ="434" Then
$Deutsch = "Geschlecht"
$Deutsch2 = "Art"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "genus"
$Lectio = 25
ElseIf $Zufall ="435" Then
$Deutsch = "Winter"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "hiems"
$Lectio = 25
ElseIf $Zufall ="436" Then
$Deutsch = "anfangen"
$Deutsch2 = "beginnen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "incipio"
$Lectio = 25
ElseIf $Zufall ="437" Then
$Deutsch = "Eingang"
$Deutsch2 = "Anfang"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "initium"
$Lectio = 25
ElseIf $Zufall ="438" Then
$Deutsch = "neun"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "novem"
$Lectio = 25
ElseIf $Zufall ="439" Then
$Deutsch = "acht"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "octo"
$Lectio = 25
ElseIf $Zufall ="440" Then
$Deutsch = "der erste"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "primus"
$Lectio = 25
ElseIf $Zufall ="441" Then
$Deutsch = "der nächste"
$Deutsch2 = "letzte"
$Deutsch3 = "ähnlichste"
$Deutsch4 = ""
$Latein = "proximus"
$Lectio = 25
ElseIf $Zufall ="442" Then
$Deutsch = "vier"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "quattuor"
$Lectio = 25
ElseIf $Zufall ="443" Then
$Deutsch = "fünf"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "quinque"
$Lectio = 25
ElseIf $Zufall ="444" Then
$Deutsch = "einmal"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "semel"
$Lectio = 25
ElseIf $Zufall ="445" Then
$Deutsch = "sieben"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "septem"
$Lectio = 25
ElseIf $Zufall ="446" Then
$Deutsch = "sechs"
$Deutsch2 = ""
$Deutsch3 = "nicht das was wir verstehen"
$Deutsch4 = ""
$Latein = "sex"
$Lectio = 25
ElseIf $Zufall ="447" Then
$Deutsch = "hinstellen"
$Deutsch2 = "haltmachen"
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "sisto"
$Lectio = 25
ElseIf $Zufall ="448" Then
$Deutsch = "drei"
$Deutsch2 = ""
$Deutsch3 = ""
$Deutsch4 = ""
$Latein = "tres"
$Lectio = 25
EndIf
If $alterMod = 1 Then
FileWriteLine("Latein.txt",$Latein)
FileWriteLine("Deutsch.txt",$Deutsch)
FileWriteLine("Deutsch2.txt",$Deutsch2)
FileWriteLine("Deutsch3.txt",$Deutsch3)
FileWriteLine("Lectio.txt",$Lectio)
if $Zufall = 448 Then
Exit
EndIf
ToolTip($Zufall&"/ 448")
Dek()
EndIf
If $LectioFilter = 1 Then
If $Lectio > $Lectiomax Then
Dek()
EndIf
If $Lectio < $Lectiomin Then
Dek()
EndIf
EndIf
If $ifSprache = "Latein" Then
$Aufgabe = "Scribe in lingua Germanicus : '"&$Latein&"'."
Nummerus1()
Else
$Aufgabe = "Was heißt '"&$Latein&"' auf Deutsch?"
EndIf
HauptInterface()
EndFunc
Func Nummerus2()
if $Zufall > 100 Then
$Zufall = $Zufall - 100
$Nummerus1 = $Nummerus1 & "C"
Nummerus2()
EndIf
if $Zufall = 99 Then
$Zufall = $Zufall - 99
$Nummerus1 = $Nummerus1 & "IC"
Nummerus2()
EndIf
if $Zufall = 90 Then
$Zufall = $Zufall - 90
$Nummerus1 = $Nummerus1 & "XC"
Nummerus2()
EndIf
if $Zufall > 50 Then
$Zufall = $Zufall - 50
$Nummerus1 = $Nummerus1 & "L"
Nummerus2()
EndIf
if $Zufall = 49 Then
$Zufall = $Zufall - 99
$Nummerus1 = $Nummerus1 & "IL"
Nummerus2()
EndIf
if $Zufall = 40 Then
$Zufall = $Zufall - 99
$Nummerus1 = $Nummerus1 & "XL"
Nummerus2()
EndIf
if $Zufall > 10 Then
$Zufall = $Zufall - 10
$Nummerus1 = $Nummerus1 & "X"
Nummerus2()
EndIf
if $Zufall = 9 Then
$Zufall = $Zufall - 9
$Nummerus1 = $Nummerus1 & "IX"
Nummerus2()
EndIf
if $Zufall = 4 Then
$Zufall = $Zufall - 4
$Nummerus1 = $Nummerus1 & "IV"
Nummerus2()
EndIf
if $Zufall > 1 Then
$Zufall = $Zufall - 1
$Nummerus1 = $Nummerus1 & "I"
Nummerus2()
EndIf
$Nummerus1=""
$Nummerus2=""
HauptInterface()
EndFunc
Func Nummerus1()
$Nummerus1 = ""
if $Lectio > 100 Then
$Lectio = $Lectio - 100
$Nummerus2 = $Nummerus2 & "C"
Nummerus1()
EndIf
if $Lectio > 50 Then
$Lectio = $Lectio - 50
$Nummerus2 = $Nummerus2 & "L"
Nummerus1()
EndIf
if $Lectio > 10 Then
$Lectio = $Lectio - 10
$Nummerus2 = $Nummerus2 & "X"
Nummerus1()
EndIf
if $Lectio = 9 Then
$Lectio = $Lectio - 9
$Nummerus2 = $Nummerus2 & "IX"
Nummerus1()
EndIf
if $Lectio = 4 Then
$Lectio = $Lectio - 4
$Nummerus2 = $Nummerus2 & "IV"
Nummerus1()
EndIf
if $Lectio > 1 Then
$Lectio = $Lectio - 1
$Nummerus2 = $Nummerus2 & "I"
Nummerus1()
EndIf
$Ausgabe="Verbum est in Lectionis "&$Nummerus2
;&" et numerus est forsque: "&$Zufall&"."
Nummerus2()
EndFunc
Druckversion