![]() |
[Latein] Verben-Konjugations-Unit + Programm
Liste der Anhänge anzeigen (Anzahl: 3)
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:
Um ein Verb richtig konjugieren zu konnen, sind - je nach Zeit - alle vier Formen notwenig.
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) Version [Beta] daraus entstand folgendes record:
Delphi-Quellcode:
Ich hoffe die Funktion des records ist eindeutig :)
type TWort = record
Infinitiv, Praesens, Perfekt, PPP: string; end; Enstanden sind nun also folgende 12 Funktionen:
Delphi-Quellcode:
Neben dem eigentlich Verb (TWort), benötigen sie auch die Person, für die das Verb gebildet werden soll. Dies erfolgt über ein Integer:
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;
Code:
So kann man nun relativ einfach Verformen bilden:
1 - 1.P.Sg
2 - 2.P.Sg 3 - 3.P.Sg 4 - 1.P.Pl 5 - 2.P.Pl 6 - 3.P.Pl
Delphi-Quellcode:
[...]
var verb: TWort; [...] with verb do begin infinitiv := 'capere'; praesens := 'capo'; perfekt := 'cepi'; ppp := 'captum'; end;
Delphi-Quellcode:
gibt also den Wert "capti sumus" zurück.
Perfekt_Indikativ_Passiv(Verb, 4);
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:
Das sollte eigentlich selbsterklärend sein. Wie unten erwäht wurde ist es eben wie funtion point(x,y):tpoint.
function wort(InfinitivPraesensAktiv,PraesensAktiv,PerfektAktiv,PPP:string):twort;
Dann kommt die "Management-Funktion" Konjugiere:
Delphi-Quellcode:
Parameter 1:
function konjugiere(Person:integer;Zeit:string;Indikativ,Aktiv: boolean;Verb: TWort): string;
Code:
Parameter 2:
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
Code:
Parameter 3:
Zeit: (Eingabe erfolgt über einen String, der wie folgt aussehen kann)
"FuturII" "FuturI" "Praesens" "Imperfekt" "Perfekt" "Plusquamperfekt"
Code:
Parameter 4:
true = Indikativ
false = Konjunktiv
Code:
Parameter 5:
true = Aktiv
false = Passiv
Code:
So gibt der Aufruf
Verb = TWort - eben das Verb, dass Konjugiert werden soll!
TWort, wie oben erklärt
Delphi-Quellcode:
"amati erimus" zurück.
konjugiere(4,'FuturII',true,false,wort('amare','amo','amavi','amatum'))
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 |
Re: [Latein] - Verben-Konjugations-Unit
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:
so wie bei function point(x,y):tpoint.
function wort(infinitivpraesensaktiv,1ppraesensindikativaktiv,1pperfektindikativaktiv,ppp:string):twort;
begin result.:=; result.:=; result.:=; result.:=; //hier war ich faul ;) end; 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) |
Re: [Latein] - Verben-Konjugations-Unit
Zitat:
e-Konjukation -> rideo kons. Konugation: intellego kurz-i Konjugation: capio Zitat:
Zitat:
|
Re: [Latein] - Verben-Konjugations-Unit
Nett, wenn auch nicht gerade eine Meisterleistung in objektorientierter Programmierung :zwinker: . Aber was ist mit den armen Deponentien?
Zitat:
|
Re: [Latein] - Verben-Konjugations-Unit
Sind da auch die bes********* Ausnahmen mit eingebaut ?
|
Re: [Latein] - Verben-Konjugations-Unit
Zitat:
Zitat:
|
Re: [Latein] - Verben-Konjugations-Unit
Zitat:
|
Re: [Latein] - Verben-Konjugations-Unit
Könnte das mal bitte jemand auf einen Texas Instruments Taschenrechner portieren? :twisted:
|
Re: [Latein] - Verben-Konjugations-Unit
Die Sprache ist voll von Ausnahmen, in jeder Konjunktion. Außerdem mach doch noch die Deklinationen, die sind schwieriger zu lernen.
|
Re: [Latein] - Verben-Konjugations-Unit
Zitat:
Zitat:
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! |
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:28 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz