Verschlüsselungs-algo

[glkgereon]

hi

könntet ihr mal bitte versuchen folgenden algo zu knacken?

hier der verschlüsselte Text:

Zitat:

DaS KrIeGt IhR Eh NiChT RaUs!
->
GfZ%NsHbBmFgS#Jo%QjBeOM^Tt$

kann mir einer sagen was bei dem text "DP Rulez!" rauskommt?

nur so um zu gucken wie gut der algo ist?

also ich erwarte nichts dolles, da der algo zum ent und verschlüsseln jeweils nur 9 zeilen brauch (da drin sind inits, begin, end )

[yankee]

Etwa so:

Delphi-Quellcode:

old, new:string;
new[0] :=chr(ord(old[0]+3));
new[1] :=chr(ord(old[1]+5));
for i:=2 to length(old)-1 do new[i] :=chr(ord(old[i]+i+5-i*2));

also nur vom Prinzip her. Ich weiß nicht mehr, weie das Gegenstück von chr ist, deswegen habe ich mal achr genommen. Und ich hoffe, ich habe mich bei der Berechnung in der for-Schleife nicht vertan.
Aber mal so vom Grundatz her, müsste das hinkommen. Habe leider im Moment kein Delphi installiert (windoofs sit gaanz frich installiert), deswegen ungetestet. Eben nur so vom Prinzip her konstruiert...

EDIT: achr nach Kommentar von jfheins korrigiert und achr durch ord ersetzt.
Bei meinem Beitrag weiter unten habe ich ausversehen auf zitat statt auf edit geklickt (*mit-der-hand-vor-den-kopf-schlag*)

[jfheins]

chr gibt dir aus ner zahl den Buchstaben, ord aus nem Buchstaben die Zahl ...

[yankee]

Zitat von yankee:

Etwa so:

Delphi-Quellcode:

old, new:string;
new[0] :=chr(ord(old[0]+3));
new[1] :=chr(ord(old[1]+5));
for i:=2 to length(old)-1 do new[i] :=chr(ord(old[i]+i+5-i*2));

also nur vom Prinzip her. Ich weiß nicht mehr, weie das Gegenstück von chr ist, deswegen habe ich mal achr genommen. Und ich hoffe, ich habe mich bei der Berechnung in der for-Schleife nicht vertan.
Aber mal so vom Grundatz her, müsste das hinkommen. Habe leider im Moment kein Delphi installiert (windoofs sit gaanz frich installiert), deswegen ungetestet. Eben nur so vom Prinzip her konstruiert...

EDIT: achr nach Kommentar von jfheins korrigiert und achr durch ord ersetzt.

[glkgereon]

Nein, es ist KEINE for-schleife
Ja, es wird jede stelle des strings einzeln "verschlüsselt"
Ja, es werden zahlen zum Ascii-wert hinzuaddiert
Nein, so simpel wie bei dir ist es nicht (bzw es ist anders)

ich werd den gleich zu hause ein bisschen weitermachen, mal sehen

[ibp]

Code:

DP Rulez!
GU'Wxmdw

...du hast ein problem mit nicht darstellbaren zeichen!

[glkgereon]

das ist kein problem, da es trotzdem ordungsgemäß rückverwandelt wird.

*Ätsch*

kann mir denn einer von euch ein funktionierenden code schreiben, der genauso verschlüsselt wie meiner?

[ibp]

ist es nun richtig oder nicht!
und die frage ist doch, wie gibt man einen text ein, der nicht darstellbare zeichen enthält?

[malo]

Zitat von glkgereon:

Nein, es ist KEINE for-schleife
Ja, es wird jede stelle des strings einzeln "verschlüsselt"
Ja, es werden zahlen zum Ascii-wert hinzuaddiert
Nein, so simpel wie bei dir ist es nicht (bzw es ist anders)

ich werd den gleich zu hause ein bisschen weitermachen, mal sehen

Keine For-Schleife? Wie kann man anständig verschlüsseln, ohne Schleife?

Naja, ich hab gestern ein ähnliches Verschlüsselungsprogramm geschrieben, das mir jedoch nur den veränderten ASCII-Code liefert (also ich hab es nicht wieder in Zeichen zurückverwandelt).

[glkgereon]

ja, richtig ist es.

hmm, ist doch noch besser wenn der potenzielle "hacker" schon mühe hat die buchstaben/zeichen überhaupt einzugeben!