Hallo Leute,
für statistische Untersuchungen (Rejewski-Zyklen) an der Enigma (vorzugsweise Enigma I) suche ich eine Klasse TEnigma (oder so), die mir bei gegebenen Startwerten (Walzenlage, Ringstellung, ...) und einem Eingabetext die verschlüsselte Ausgabe liefert.
Ich habe bereits über 10 Enigma-Simulatoren zu Hause, die sich aber alle nicht automatisieren lassen und suche irgend eine Klasse, die ich in der folgenden Art ansprechen kann:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
| Enigma:=TEnigma.Create;
with Enigma do
begin
SetWalzenlage('132');
SetRingstellung('AFG');
SetWalzenstart('DFG');
SetEingabe('DIESERTEXTSOLLVERSCHLUESSELTWERDEN');
Chiffriere;
Ausgabe:=GetChiffretext;
Free;
end; |
Naja, so ähnlich jedenfalls.
Ich nehme an, dass schon ...zig solcher Programme existieren und ich nicht auch noch einen Enigma-Simulator schreiben muss. Und nun meine Frage:
Kennt oder habt ihr etwas in der Art?
Besten Dank schon mal.
ub60
