[Latein] Verben-Konjugations-Unit + Programm

[Nicolai1234]

Hallo,
ich habe mich in den letzten Tagen ein wenig intensiver mit den verschiedenen lateinischen Konjugationen beschäftigt. Herausgekommen ist eine Unit, die ein bestimmtes Verb in allen Zeiten, Modi, Leideformen und Personen bilden kann.
Wie ihr alle wisst :wink: sieht ein lateinisches Wort i.d.R. so angegeben. Beispiel:

Code:

capere                        capo                       cepi                        captum
Infinitiv Präsens aktiv   -   1.P.Sg.Präs.Ind.akt.   -   1.P.Sg.Perf.Ind.aktiv   -   Partizip Perfekt Passiv (PPP)

Um ein Verb richtig konjugieren zu konnen, sind - je nach Zeit - alle vier Formen notwenig.

Version [Beta]

daraus entstand folgendes record:

Delphi-Quellcode:

type TWort = record
    Infinitiv, Praesens, Perfekt, PPP: string;
    end;

Ich hoffe die Funktion des records ist eindeutig :)

Enstanden sind nun also folgende 12 Funktionen:

Delphi-Quellcode:

function FuturII_Indikativ_aktiv(w:TWort;Person:integer): string;
function FuturII_Indikativ_passiv(w:TWort;Person:integer): string;

function FuturI_Indikativ_aktiv(w:TWort;Person:integer): string;
function FuturI_Indikativ_passiv(w:TWort;Person:integer): string;

function Praesens_Indikativ_aktiv(w:TWort;Person:integer): string;
function Praesens_Indikativ_passiv(w:TWort;Person:integer): string;
function Praesens_Konjunktiv_aktiv(w:TWort;Person:integer): string;
function Praesens_Konjunktiv_passiv(w:TWort;Person:integer): string;

function Imperfekt_Indikativ_aktiv(w:TWort;Person:integer): string;
function Imperfekt_Indikativ_passiv(w:TWort;Person:integer): string;
function Imperfekt_Konjunktiv_aktiv(w:TWort;Person:integer): string;
function Imperfekt_Konjunktiv_passiv(w:TWort;Person:integer): string;

function Perfekt_Indikativ_aktiv(w:TWort;Person:integer): string;
function Perfekt_Indikativ_passiv(w:TWort;Person:integer): string;
function Perfekt_Konjunktiv_aktiv(w:TWort;Person:integer): string;
function Perfekt_Konjunktiv_passiv(w:TWort;Person:integer): string;

function Plusquamperfekt_Indikativ_aktiv(w:TWort;Person:integer): string;
function Plusquamperfekt_Indikativ_passiv(w:TWort;Person:integer): string;
function Plusquamperfekt_Konjunktiv_aktiv(w:TWort;Person:integer): string;
function Plusquamperfekt_Konjunktiv_passiv(w:TWort;Person:integer): string;

Neben dem eigentlich Verb (TWort), benötigen sie auch die Person, für die das Verb gebildet werden soll. Dies erfolgt über ein Integer:

Code:

1 - 1.P.Sg
2 - 2.P.Sg
3 - 3.P.Sg
4 - 1.P.Pl
5 - 2.P.Pl
6 - 3.P.Pl

So kann man nun relativ einfach Verformen bilden:

Delphi-Quellcode:

[...]
var verb: TWort;

[...]

with verb do
  begin
  infinitiv := 'capere';
  praesens := 'capo';
  perfekt := 'cepi';
  ppp := 'captum';
  end;

Delphi-Quellcode:

Perfekt_Indikativ_Passiv(Verb, 4);

gibt also den Wert "capti sumus" zurück.

Neben der a-/e-/i-/gemischt kons.- und der kononsantischen-Konjugation, beherrscht die Unit auf das unregelmäßige Verb "esse". Andere unregelmäßige Verben werden folgen.

So, das wars erstmal, ich wäre über weitere Anregungen sehr froh.

Version [1.0]
So, hier mal ein paar Änderungen, die mir spontan möglich erschienen Very Happy

Delphi-Quellcode:

function wort(InfinitivPraesensAktiv,PraesensAktiv,PerfektAktiv,PPP:string):twort;

Das sollte eigentlich selbsterklärend sein. Wie unten erwäht wurde ist es eben wie funtion point(x,y):tpoint.

Dann kommt die "Management-Funktion" Konjugiere:

Delphi-Quellcode:

function konjugiere(Person:integer;Zeit:string;Indikativ,Aktiv: boolean;Verb: TWort): string;

Parameter 1:

Code:

Person: (Eingabe als Integer von 1 bis 6)
1 - 1.P.Sg
2 - 2.P.Sg
3 - 3.P.Sg
4 - 1.P.Pl
5 - 2.P.Pl
6 - 3.P.Pl

Parameter 2:

Code:

Zeit: (Eingabe erfolgt über einen String, der wie folgt aussehen kann)
"FuturII"
"FuturI"
"Praesens"
"Imperfekt"
"Perfekt"
"Plusquamperfekt"

Parameter 3:

Code:

true  = Indikativ
false = Konjunktiv

Parameter 4:

Code:

true  = Aktiv
false = Passiv

Parameter 5:

Code:

Verb = TWort - eben das Verb, dass Konjugiert werden soll!
TWort, wie oben erklärt

So gibt der Aufruf

Delphi-Quellcode:

konjugiere(4,'FuturII',true,false,wort('amare','amo','amavi','amatum'))

"amati erimus" zurück.

Ich hoffe, so konnte ich den umgang ein wenig einfacher machen.
Das PPP beispielsweise kann man dieser "Masterfunktion" nicht gebildet werden. Es wird später bei den Deklinationen folgen, da ich denke, dass es da mehr benötigt wird, als bei den Konjunktionen.

Version [1.0b]
Fehler behoben (gemeldet am 26.02 siehe unten)

Beispielanwendung
Im Anhang ist noch eine Beispielanwenung, sodass man die Funktionen der Unit einfach testen kann. (und natürlich ein Screenshot dazu).


Vielen Dank

[ichbins]

wie kriegst du raus ob das Verb auf ere die e- oder die konsonantische Konjugation hat (oder irgendwie so *g*)

du kannst ja auch mal ne Beispielapplikation dazuschreiben, dürfte ja kein Problem sein.

zusätzlich zur einfacheren Verwendung eine Funktion WORT:

Delphi-Quellcode:

function wort(infinitivpraesensaktiv,1ppraesensindikativaktiv,1pperfektindikativaktiv,ppp:string):twort;
begin
  result.:=;
  result.:=;
  result.:=;
  result.:=;  //hier war ich faul ;)
end;

so wie bei function point(x,y):tpoint.

dann würde ich noch ne "Management-Funktion" schreiben, etwa so:

Delphi-Quellcode:

function konjugiere(wort:twort;zeit,person:integer;aktiv,indikativ:boolean);

(PS. meine Lateinnote 5,2 zieht den Zeugnissschnitt auf 1,8 runter ;) <-Schätzungsangaben)

[Nicolai1234]

Zitat:

Zitat von ichbins

wie kriegst du raus ob das Verb auf ere die e- oder die konsonantische Konjugation hat (oder irgendwie so *g*)

Das erkennt man an der 1.P.Sg.Präs.Akt.Ind. :wink:
e-Konjukation -> rideo
kons. Konugation: intellego
kurz-i Konjugation: capio

Zitat:

Zitat von ichbins

du kannst ja auch mal ne Beispielapplikation dazuschreiben, dürfte ja kein Problem sein.

Da bin ich gerade dabei. Das ganze entstand auch dadurch, dass ich mir ein kleines Lernprogramm rund um die lat. Konjugationen basteln möchte.

Zitat:

Zitat von ichbins

dann würde ich noch ne "Management-Funktion" schreiben, etwa so:

Delphi-Quellcode:

function konjugiere(wort:twort;zeit,person:integer;aktiv,indikativ:boolean);

Ja, das wollte ich auch noch machen, mir fehlt nur noch eine Sinnvolle Idee, die Zeiten zu nummerieren!

[Khabarakh]

Nett, wenn auch nicht gerade eine Meisterleistung in objektorientierter Programmierung :zwinker: . Aber was ist mit den armen Deponentien?

Zitat:

Zitat von Nicolai1605

Zitat:

Zitat von ichbins

dann würde ich noch ne "Management-Funktion" schreiben, etwa so:

Delphi-Quellcode:

function konjugiere(wort:twort;zeit,person:integer;aktiv,indikativ:boolean);

Ja, das wollte ich auch noch machen, mir fehlt nur noch eine Sinnvolle Idee, die Zeiten zu nummerieren!

Warum willst du sie denn nummerieren? Deklariere einfach einen eigenen Enum-Typen.

[Nils_13]

Sind da auch die bes********* Ausnahmen mit eingebaut ?

[Khabarakh]

Zitat:

Zitat von Nils_13

Sind da auch die bes********* Ausnahmen mit eingebaut ?

Wer lesen kann, ist klar im Vorteil:

Zitat:

Neben der a-/e-/i-/gemischt kons.- und der kononsantischen-Konjugation, beherrscht die Unit auf das unregelmäßige Verb "esse". Andere unregelmäßige Verben werden folgen.

[Nicolai1234]

Zitat:

Zitat von Nils_13

Sind da auch die bes********* Ausnahmen mit eingebaut ?

Welche Art von Ausnahmen denn?

[DGL-luke]

Könnte das mal bitte jemand auf einen Texas Instruments Taschenrechner portieren? :twisted:

[Nils_13]

Die Sprache ist voll von Ausnahmen, in jeder Konjunktion. Außerdem mach doch noch die Deklinationen, die sind schwieriger zu lernen.

[Nicolai1234]

Zitat:

Zitat von Nils_13

Die Sprache ist voll von Ausnahmen, in jeder Konjunktion.

Das müsstest du mir mal genauer erklären. Ich muss zugeben, dass ich noch nicht allzu lange Latein habe, aber bis auf esse und posse war bis jetzt alles regelmäßig. Probleme sind vllt. noch Verben ohne aktiv-Form oder solche, die keinen Passiv haben können... Aber das liegt nicht in der Macht der Unit, sondern vielmehr in der des Benutzers. "Ich werde geseint" - das sollte der User selber erkennen.

Zitat:

Außerdem mach doch noch die Deklinationen, die sind schwieriger zu lernen.

hmm, finde ich nicht, die habe ich alle in wenigen Stunden auswendig gelernt. Und ich beherrsche sie so, dass ich sie in wenigen Sekunden "runterrattern" kann.

Nicolai

PS (zu den Deklinationen): Unser ehemaliger Lehrer wollte "homo novus" in allen Kasus in 3 (in Worten: drei) SEkunden aufgesagt bekommen. (jeweils für Singular und Plural) - Sowas prägt!

[Nils_13]

Aber was bringt ein Konjugationsprogramm, wenn es keine Deklinationen hat, der eine findet die Konjugationen schwerer und der andere die Deklinationen.

[Mr_G]

Das wurde ja mal Zeit das jemand sowas macht. :hello:

Vorschläge:
1)

Zitat:

Zitat von ichbins

[/delphi]
... dann würde ich noch ne "Management-Funktion" schreiben, etwa so:

Delphi-Quellcode:

function konjugiere(wort:twort;zeit,person:integer;aktiv,indikativ:boolean);

...

... diese Function sollte dann auch Deponenzien erkennen.

2) Bildung der Infinitive.
3) Bildung der weiteren Partizipformen (PPA & PFA).
4) Bildung des Gerundiums und des Gerundivums.

[Khabarakh]

Zitat:

Zitat von Nils_13

Die Sprache ist voll von Ausnahmen, in jeder Konjunktion.

Ich bin zwar vom Latinum noch weit entfernt, aber soweit ich weiß, sind die einzige Ausnahmen die unregelmäßigen Verben und die Deponentien, die ich ja schon erwähnt hatte. Bei Verba defectiva und Semideponentien muss der User selbst aufpassen, wie Nicolai schon sagte.
@Nicolai: Deponentien liegen allerdings nicht in der Hand des Users, diese könntest du noch unterstützen. Man könnte zwar einfach die Aktivendungen dranpacken, aber "verere - vereo" klingt doch schrecklich :wink: .

[Nils_13]

Die gesamte Sprache klingt komisch. Es gibt lustige Kombinationen aus verschiedenen Zeiten.

[malo]

Zitat:

Zitat von Nils_13

Aber was bringt ein Konjugationsprogramm, wenn es keine Deklinationen hat, der eine findet die Konjugationen schwerer und der andere die Deklinationen.

Wenn du Deklinationen üben willst, solltest du ein Deklinations-Programm nutzen :roll:

[Nils_13]

Zitat:

Zitat von malo

Zitat:

Zitat von Nils_13

Aber was bringt ein Konjugationsprogramm, wenn es keine Deklinationen hat, der eine findet die Konjugationen schwerer und der andere die Deklinationen.

Wenn du Deklinationen üben willst, solltest du ein Deklinations-Programm nutzen :roll:

:roll: gleich mal zurück, das war wirklich nur mal ein kleiner Vorschlag, um das Programm noch um einiges zu verbessern.

P.S.: Irgendwann überles ich deine Beiträge einfach ... .

[Daniel G]

Hrmpf... Zwei Jahre früher... Da hätte ich sie noch gebrauchen können...

Aber trotzdem ganz nett.

[Neotracer64]

Zitat:

gleich mal zurück, das war wirklich nur mal ein kleiner Vorschlag, um das Programm noch um einiges zu verbessern.

OT:
Nur ein ganz neutraler Kommentar: Deine ganzen Beiträge hören sich allesamt so an, als würdest du das Programm schlecht machen wollen. Ich seh keinen Lob noch irgendwelche kontruktiven Vorschläge. Wie würdest du dich fühlen, wenn man bei deiner Kompo, das Graphen zeichnen kann, die ganze Zeit bemängelt, dass es nicht in 3D ginge?

Ich finde die Komponente wunderbar. Hätte nie gedacht, dass man soetwas bewerkstelligen könnte und, dass dafür komplizierte Sprachwissenschaftliche Parser und Logiken angewendet werden müssen. Schon ein hilfrecihes Ding. Ich freu mich schon auf die Demo, die die Unit voll ausreizt.

[Nils_13]

Falls es den Eindruck hinterlassen hat, dass ich dieses Programm nur schlecht machen will: Das habe ich wörtlich nie gesagt, ich habe nur einen Vorschlag gemacht, aber da mehrere darauf geantwortet haben, habe ich weitergeschrieben. Die Unit ist wirklich gut :thumb: :)

[Nicolai1234]

Zitat:

Zitat von Nils_13

Falls es den Eindruck hinterlassen hat, dass ich dieses Programm nur schlecht machen will: Das habe ich wörtlich nie gesagt, ich habe nur einen Vorschlag gemacht, aber da mehrere darauf geantwortet haben, habe ich weitergeschrieben. Die Unit ist wirklich gut :thumb: :)

Hey, kein Streit!
Ich finde es durchaus gut, wenn soetwas wie die Deklinitionen berücksichtigt werden soll! Konstruktive Vorschläge sind - finde ich - immer zu gebrauchen.

Edit:
Es gibt ein paar kleine Änderungen, sowie ein Beispielprogramm zum Testen. Alles im ersten Beitrag!

[fLaSh11]

Hallo,

sehr gutes Programm, ich finds wirklich gut...
aber ich verstehe nicht, welcher funktion ich was übergeben muss, dasses läuft, kannst du den Sourcecode des Bspprogs mal posten?

[Nicolai1234]

Zitat:

Zitat von fLaSh11

Hallo,

sehr gutes Programm, ich finds wirklich gut...
aber ich verstehe nicht, welcher funktion ich was übergeben muss, dasses läuft, kannst du den Sourcecode des Bspprogs mal posten?

ersteinmal Dankeschön :-D
Aber das mit dem Sourcecode geht leider nicht... Die Anwendng ist nicht sonderlich gut geschrieben, sondern nur mal so dahingeklickt. Ohne Kommentare und mit den Standardobjektnamen... das wäre mir zu unangenehm und erkennen, wie es geht, kann man daran auch nicht!

Naja, ich habe oben nochmal probiert die Funktion konjugiere nochmal besser zu erklären. Ich hoffe das hilft dir etwas...

[TurboMartin]

Bei mir kommt immer bei emere emo emi emptum in irgendeiner person futur 1 konjunktiv, egal ob a oder p error!!! :)

[Nicolai1234]

Zitat:

Zitat von TurboMartin

Bei mir kommt immer bei emere emo emi emptum in irgendeiner person futur 1 konjunktiv, egal ob a oder p error!!! :)

Ja, das hat durchaus seine Richtigkeit, da das lateinische in beiden Futurtempora keinen Konjunktiv kennt. Er existiert im lateinischen schlicht und einfach nicht, daher werden auch keine Formen gebildet!

[fLaSh11]

Bei mir kommt jetzt dieser Fehler:

Delphi-Quellcode:

[Fehler] Unit1.pas(71): E2010 Inkompatible Typen: 'Konjugationen.TWort' und 'Unit1.TWort'

meine Funktion sieht so aus:

Delphi-Quellcode:

Panel1.Caption:=konjugiere(person,zeit,indikativ,aktiv,Verb);

TWort ist so definiert:

Delphi-Quellcode:

type TWort = record
    Infinitiv, Praesens, Perfekt, PPP: string;
    end;

(wie gesagt wurde)

Was is los???

P.S.: prodesse ist auch irregulär

[Daniel G]

Zitat:

Zitat von fLaSh11

Bei mir kommt jetzt dieser Fehler:

Delphi-Quellcode:

[Fehler] Unit1.pas(71): E2010 Inkompatible Typen: 'Konjugationen.TWort' und 'Unit1.TWort'

Was is los???

P.S.: prodesse ist auch irregulär

Du solltest Delphi sagen, welches "TWort" du meinst. Die Klasse "TWort" ist zweimal definiert.

[fLaSh11]

ich habs nun auch so hinbekommen...

[Nicolai1234]

Zitat:

Zitat von fLaSh11

ich habs nun auch so hinbekommen...

hmm, eigentlich brauchst du TWort gar nicht mehr zu definieren, wenn du diese Unit hier bei den "geuseden" drin zu stehen hast. Aber nungut, jetzt geht es ja...

[fLaSh11]

du, ich hab einen Fehler entdeckt: Perfekt Konj. Passiv geht:
sim, sis, sit, simus, sitis, sint.

In der Unit wird die 2. P. Pl. mit sistis konjugiert.

[Nicolai1234]

Zitat:

Zitat von fLaSh11

du, ich hab einen Fehler entdeckt: Perfekt Konj. Passiv geht:
sim, sis, sit, simus, sitis, sint.

In der Unit wird die 2. P. Pl. mit sistis konjugiert.

Danke, ist geändert. Aktuelle Version im ersten Beitrag!

[klugscheiss]die Form, die du meinst ist nicht Perfekt Konjunktiv Passiv, sondern Präsens Konjunktiv Aktiv gewesen :wink: [/klugscheiss]

[fLaSh11]

Ich hab mithilfe deiner Unit ein kleines Übungsprogramm für die Konjugationen gemacht. :coder:

Leider ist die Panel, wo die Lösung angezeigt wird noch etwas klein... :stupid:

Viel Spass!^^

[edit]PrÄsensfehler behoben[/edit]
[edit]Perfektfehler behoben[/edit]

[Neotracer64]

Witziges Übungsprogramm. :)
Ich wünsche mir allerdings ein paar mehr Verben ;)


Manchmal passt die Meldung unten aber nicht ganz hin, siehe Bild.
Und diesmal habe ich auch richtig getippt (amo) und er behauptet es sei falsch :gruebel:

//EDIT: Ich glaub ich weiss, was der Fehler sein könnte. Es passiert nur bei Präsens und du vergleichst anscheinend 'Präsens' mit 'Praesens'. ;)

[fLaSh11]

du kannst das Wort, mit dem du lernen willst ja selbst eingeben... :zwinker:
aber ich kann noch ein paar mehr rein machen

[fLaSh11]

ich hab noch ein Fehler in der Unit gefunden :zwinker:

Delphi-Quellcode:

aktiv_Ps3: Array[1..6] of String = ('i','isti','t','imus','istis','erunt');

so isses richtig:

Delphi-Quellcode:

aktiv_Ps3: Array[1..6] of String = ('i','isti','it','imus','istis','erunt');

[Nicolai1234]

Zitat:

Zitat von fLaSh11

ich hab noch ein Fehler in der Unit gefunden :zwinker:

Delphi-Quellcode:

aktiv_Ps3: Array[1..6] of String = ('i','isti','t','imus','istis','erunt');

so isses richtig:

Delphi-Quellcode:

aktiv_Ps3: Array[1..6] of String = ('i','isti','it','imus','istis','erunt');

Sorry, dass ich nicht schneller reagiert habe, aber ich hatte (wegen dieses Schulfaches :? ) in der letzten Zeit keine Zeit dafür...

Naja, jetzt ist alles (auch das Beispielprogramm) wieder aktuell

[sebjensen]

Hallo.

Ich bin noch ziemlich neu auf dem Gebiet "DELPHI". Ich wollte eigentlich mit Hilfe der Unit "Konjugationen" eine Maske zusammenbasteln, welche mir zu einen gegebenen Wort die einzelnen konjugierten Formen ausgiebt.

Doch leider bin ich dabei komplett gescheitert und schaffe einfach gar nichts. Nun wollte ich fragen, ob es jemanden gibt der bereits eine solche Maske erstellt hat und vielleicht seinen Quelltext hier zur Verfügung stellen könnte.

Ich würde mich darüber wirklich riesigen freuen und ich bedanke mich schon mal für eure Hilfe!!

[Jakob Ullmann]

Hmm... ich dachte die 1. Sg. Präs. Akt. von capere wäre capio? :gruebel:

[new32]

Zitat:

Zitat von Nicolai1605

[code]capere capo cepi captum

hab zwar kein Latein mehr, aber es heißt doch:
capere, capio, cepi, captum

/* hat offenbar schon jemand vorher gesehen */
mfg.

[zahor]

[OT] mann bin ich froh latein endlich abgewählt zu haben :D [/OT]
aber wenn ich mich recht entsinne heißt es wirklich capio...

[edit]@jakob ullmann & new32: guckt euch mal an was für ne staubschicht der thread hat...[/edit]