Autor |
Beitrag |
delfiphan
Beiträge: 2684
Erhaltene Danke: 32
|
Verfasst: Fr 22.12.06 14:05
Hallo Delphi-Forum Freunde!
Ich denke die meisten teilen die Meinung, dass das Adventsgewinnspiel/Rätsel sehr gut gelungen war. Einige haben vielleicht schon daran gedacht, selbst ein Rätsel zu bauen. Deswegen wage ich es mal, einen Rätsel-Thread zu eröffnen. Es gilt: Der erste, der ein Rätsel knackt, darf das nächste Rätsel posten. Wenn jemand kein Rätsel weiss, dann kann an der Stelle jemand anders ein Rätsel posten.
Viel Spass!
delfiphan
Im Anhang schon mal das erste Rätsel. Im Anhang sind zwei Bilder, wer eines davon knacken kann, hat gewonnen Tips gibt's später. Mit der richtigen Idee in wenigen Minuten lösbar (oder sogar Sekunden).
1. Tip: Es ist kein Hex-Editor notwendig.
2. Tip: Die Loesung ist ein Text als Bild. Beide Bilder sind prinzipiell auch z.B. in Photoshop loesbar (in 3 Sekunden).
Einloggen, um Attachments anzusehen!
Zuletzt bearbeitet von delfiphan am Fr 22.12.06 18:26, insgesamt 2-mal bearbeitet
|
|
Chryzler
Beiträge: 1097
Erhaltene Danke: 2
|
Verfasst: Fr 22.12.06 14:36
|
|
delfiphan
Beiträge: 2684
Erhaltene Danke: 32
|
Verfasst: Fr 22.12.06 14:42
Ich kann versichern, dass die Lösung nicht im Geringsten mit dem Adventsrätsel zu tun hat. Aber meinetwegen könnt ihr den Thread löschen, dann stelle ich ihn übermorgen nochmals.
|
|
Gausi
Beiträge: 8538
Erhaltene Danke: 475
Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
|
Verfasst: Fr 22.12.06 14:43
Nö, ich glaube, das kann man jetzt so stehen lassen.
Mich haste auf jeden Fall erwischt - Ich steh aufm Schlauch...
_________________ We are, we were and will not be.
|
|
alzaimar
Beiträge: 2889
Erhaltene Danke: 13
W2000, XP
D6E, BDS2006A, DevExpress
|
Verfasst: Fr 22.12.06 15:22
16 Farben ... Jedes Pixel ein Nibble?
_________________ Na denn, dann. Bis dann, denn.
|
|
Gausi
Beiträge: 8538
Erhaltene Danke: 475
Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
|
Verfasst: Fr 22.12.06 15:46
Das kleine Bild habe ich geknackt, glaube ich.
Edit: Das zweite auch, allerdings habe ich da immer noch ein starkes Rauschen drin, was ich nicht wegbekomme.
Jetzt bin ich gespannt, wie die richtige Lösung aussieht, und ob (und wenn ja wie) man das Rauschen wegbekommt.
_________________ We are, we were and will not be.
|
|
Martok
Beiträge: 3661
Erhaltene Danke: 604
Win 8.1, Win 10 x64
Pascal: Lazarus Snapshot, Delphi 7,2007; PHP, JS: WebStorm
|
Verfasst: Fr 22.12.06 17:44
Was ist eigentlich gesucht? Ein Bild, Text, Audio?
_________________ "The phoenix's price isn't inevitable. It's not part of some deep balance built into the universe. It's just the parts of the game where you haven't figured out yet how to cheat."
|
|
delfiphan
Beiträge: 2684
Erhaltene Danke: 32
|
Verfasst: Fr 22.12.06 18:29
Es ist ein Bild mit dem Loesungswort bzw. Satz. Ich hab oben noch einen Tipp mehr gegeben.
@alzaimar: Das ist es nicht
|
|
GTA-Place
Beiträge: 5248
Erhaltene Danke: 2
WIN XP, IE 7, FF 2.0
Delphi 7, Lazarus
|
Verfasst: Fr 22.12.06 23:23
Message 2: Gratulation! Nachricht enschlüsselt
Message 1: entwicklerecke.de
Filter Bas Relief von Photoshop hat geholfen. Das schwere war nicht das finden, sondern das lesen. War mit Bas Relief etwas undeutlich .
_________________ "Wer Ego-Shooter Killerspiele nennt, muss konsequenterweise jeden Horrorstreifen als Killerfilm bezeichnen." (Zeit.de)
|
|
BenBE
Beiträge: 8721
Erhaltene Danke: 191
Win95, Win98SE, Win2K, WinXP
D1S, D3S, D4S, D5E, D6E, D7E, D9PE, D10E, D12P, DXEP, L0.9\FPC2.0
|
Verfasst: Fr 22.12.06 23:37
Mit GIMP geht's auch recht einfach:
Filter --> Kanten finden --> Differenz der Mittelwerte --> X: 4, Y: >X, Y=13 ergibt das ganze recht gut lesbar ... Danach noch Gamma korrigieren für den Kontrast (brauch man aber nicht).
_________________ Anyone who is capable of being elected president should on no account be allowed to do the job.
Ich code EdgeMonkey - In dubio pro Setting.
|
|
delfiphan
Beiträge: 2684
Erhaltene Danke: 32
|
Verfasst: Fr 22.12.06 23:38
Gratulation an Gausi und GTA-Place (Edit: und BenBE) Ich löse an dieser Stelle das Rätsel auf.
Um die Lösung zu erhalten muss man die Bilder lediglich etwas verunschärfen. Im 1. Bild muss man eine Verunschärfung in x-Richtung (4 Pixel Breite) anwenden, im 2. Bild eine kleine Verunschärfung in x- und y- Richtung.
In Delphi könnte man das z.B. so machen (funktioniert für Bild 1):
Delphi-Quelltext 1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14:
| var x, y, i: Integer; c: TColor; begin with Image1.Canvas do for y := 0 to Height - 1 do for x := 0 to Width - 1 do begin c := 0; for i := 0 to 3 do inc(c, (Pixels[x+i,y] and not $030303) shr 2); Pixels[x,y] := (c-$787878)*17; end; end; |
In Photoshop geht das so:
Bild 1: Filter->Blur->Motion Blur (Standardeinstellung)
Bild 2: Filter->Blur->Blur more
Danach ist die Lösung schon lesbar, jedoch nur schwach. Um die deutlichen Bilder im Anhang zu erhalten macht man dann noch folgendes: Einige Pixel des Randes wegschneiden und dann Image->Adjustments->Auto Contrast (oder manuell Kontrast erhöhen).
Erstaunlich, was ein bisschen Blur alles bewirken kann
Gausi hat gewonnen, er kann jetzt das nächste Rätsel posten. Wenn länger kein neues Rätsel gepostet wird kann einfach jemand anders posten.
Einloggen, um Attachments anzusehen!
|
|
Gausi
Beiträge: 8538
Erhaltene Danke: 475
Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
|
Verfasst: Fr 22.12.06 23:46
Na gut, ein kleines einfaches hab ich noch (das war der allererste Versuch fürs dritte Rätsel):
Zitat: | Dem Weihnachtsmann ist was ganz dummes passiert. Ihm ist seine neue Digitalkamera hingefallen, und irgendwie sind die Bilder dabei kaputt gegangen. Wen hat er zuletzt fotografiert? |
Einloggen, um Attachments anzusehen!
_________________ We are, we were and will not be.
|
|
Martok
Beiträge: 3661
Erhaltene Danke: 604
Win 8.1, Win 10 x64
Pascal: Lazarus Snapshot, Delphi 7,2007; PHP, JS: WebStorm
|
Verfasst: Sa 23.12.06 01:46
Och Mensch Gausi, ich wollte meins auch noch loswerden.... Naja, jetzt muss ich halt deins lösen
Übrigens: der Weichnachtsmann ist ja wohl im Schnee tätig. Wenn ne Digicam da reinfällt, ist sie aber nicht gleich kaputt
Zumindest sollte die Speicherkarte noch lesbar sein. Nur mal so am Rande bemerkt. So, jetzt aber ran ans Rätsel!
_________________ "The phoenix's price isn't inevitable. It's not part of some deep balance built into the universe. It's just the parts of the game where you haven't figured out yet how to cheat."
|
|
Christian S.
Beiträge: 20451
Erhaltene Danke: 2264
Win 10
C# (VS 2019)
|
Verfasst: Sa 23.12.06 01:53
Martok hat folgendes geschrieben: | Zumindest sollte die Speicherkarte noch lesbar sein. Nur mal so am Rande bemerkt. So, jetzt aber ran ans Rätsel! |
Der Weihnachtsmann fotografiert im RAW-Format und hat sich dafür ein Microdrive im CF-Karten-Format gekauft. Und die sind halt etwas anfällig gegen Stöße
_________________ Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".
|
|
Martok
Beiträge: 3661
Erhaltene Danke: 604
Win 8.1, Win 10 x64
Pascal: Lazarus Snapshot, Delphi 7,2007; PHP, JS: WebStorm
|
Verfasst: Sa 23.12.06 02:11
Das dir aber auch immer ne Antwort einfällt...
So, habs raus. Siehe Anhang. Lenna Söderberg, ist ja klar.
Die Auflösung überlasse ich mal dir, vor allem weil ich wissen will wie man das ohne Rauschen macht Bei Paint Shop Pro siehts leider so aus...
Einloggen, um Attachments anzusehen!
_________________ "The phoenix's price isn't inevitable. It's not part of some deep balance built into the universe. It's just the parts of the game where you haven't figured out yet how to cheat."
|
|
Gausi
Beiträge: 8538
Erhaltene Danke: 475
Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
|
Verfasst: Sa 23.12.06 10:41
Richtig. Der nächste, bitte
Auflösung:
Delphi-Quelltext 1: 2: 3:
| for x := 0 to Image1.Width-1 do for y := 0 to Image1.Height-1 do Image1.canvas.Pixels[x,y] := (Image1.Canvas.Pixels[x,y] + Image2.Canvas.Pixels[x,y]) MOD $ffffff; |
_________________ We are, we were and will not be.
|
|
Arne K.
Beiträge: 112
C# (VS 2008 Professional)
|
Verfasst: Sa 23.12.06 11:09
Ich habe zwar vorher kein Rätsel gelöst, aber wer gerne Rätsel löst, für den habe ich auch eins!
Aufgabe:
"Folgende Datei (im Anhang) bekam ich von einem Freund zugesandt. Anfangen konnte ich damit leider nichts, doch er meinte noch am Telephon, er habe einen alten, allseits bekannten Spruch gefunden, den er mir mitteilen werde. Ich denke daher, dass diese Datei den Spruch in irgendeiner Form beinhaltet!"
Wie lautet der (wirklich allseits bekannte) Spruch?
EDIT: Hinweis: Es ist völlig korrekt, dass die Datei so klein ist!
Einloggen, um Attachments anzusehen!
|
|
jakobwenzel
Beiträge: 1889
Erhaltene Danke: 1
XP home, ubuntu
BDS 2006 Prof
|
Verfasst: Sa 23.12.06 12:33
Ich kann die Datei irgendwie nich runterladen, da öffnet sich einfach n neuer Tab (Firefox) und da steht dann
_________________ I thought what I'd do was, I'd pretend I was one of those deaf-mutes.
|
|
Arne K.
Beiträge: 112
C# (VS 2008 Professional)
|
Verfasst: Sa 23.12.06 12:37
Rechtsklick -> "Ziel speichern unter" mal versucht?
Ansonsten: Im Opera funktioniert es ... IE7 auch!
|
|
jakobwenzel
Beiträge: 1889
Erhaltene Danke: 1
XP home, ubuntu
BDS 2006 Prof
|
Verfasst: Sa 23.12.06 12:42
Da kommt ne ungültige Datei raus
_________________ I thought what I'd do was, I'd pretend I was one of those deaf-mutes.
|
|