Umwandlung charkombination nach integer

[qwertz543221]

hallo ich suche eine möglichkeit folgendes schneller berechnen zu können oder sogar zu umgehen:

für rsa habe ich eine umwandlung von buichstabenkombinationen (immer zwei zusammen) zu einer zahl.
dies geht wie folgt:

ABCD

AB=256*65+66=16706 (zb ascii werte in einem stellenwertsystem)
CD=256*67+68=17220

umgekerht wäre:

16706 div 256=65=A
16706 mod 256=66=B
17220 div 256=67=C
17220 mod 256=68=D
gibt ABCD



Da dies ziemlich viele Rechenoperationen sind, bräuchte ich eine methode um diese umwandlungen in beide richtungen effizienter zu gestalten.

[DeddyH]

Aus dem Kopf, daher ohne Gewähr:

Delphi-Quellcode:

ErsteZahl := Ord('A') shl 8 or Ord('B');

//umgekehrt:

Char1 := ErsteZahl shr 8;
Char2 := ErsteZahl and $00FF;

[qwertz543221]

ok danke das hat gut geklappt.

[qwertz543221]

und wenn ich die blöcke jetzt vergößern möchte, mit mehr buchstaben - wie wäre das möglich?

[DeddyH]

Wenn es nicht mehr als 4 Buchstaben sein sollen, kommst Du mit DWORD aus.

Delphi-Quellcode:

Zahl := Ord(Buchstabe1) shl 24 or Ord(Buchstabe2) shl 16 or Ord(Buchstabe3) shl 8 or Ord(Buchstabe4);

//umgekehrt:
Buchstabe1 := Chr(Zahl shr 24);
Buchstabe2 := Chr(Zahl shr 16 and $000000FF);
Buchstabe3 := Chr(Zahl shr 8 and $000000FF);
Buchstabe4 := Chr(Zahl and $000000FF);

Wieder aus dem Kopf

[qwertz543221]

Zitat:

wieder aus dem kopf

nicht schlecht


gibt es auch eine möglichkeit, die anzahlder verkettungen variieren zu lassen, um zb nur zahlen(blöcke) größer 30000 zu bekommen?

[DeddyH]

Kannst Du das mal genauer beschreiben? So ganz versteh ich es noch nicht.

[qwertz543221]

kein problem


ich bin dabei rsa zu programmieren.
bisher habe ich immer zweier blöcke benutzt - das hat auch funktioniert.
das problem dabei sind die enorm langen chiffretexte und die langen rechenzeiten. wenn ich also die anzahl der blöcke reduziere, in dem ich die blockgröße erhöhe, verkürze ich beides.

[DeddyH]

Ach, und wenn die Anzahl der verbleibenden Buchstaben kleiner als 4 ist, soll die Zahl trotzdem größer als 30.000 sein, richtig?

[qwertz543221]

normalerweise schon - aber dafür fragte ich ja an ob es eine möglichkeit gäbe die blockgröße variieren zu lassen - sodass ichb zb sagen könnte, wenn die textlänge mod 7 oder mod 12=0 ist (willkürlich gewählt), dass ich dann blöcke mit einer eben solchen länge (7 bzw 12) behandeln könnte