Autor Beitrag
delfiphan
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2684
Erhaltene Danke: 32



BeitragVerfasst: 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
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1097
Erhaltene Danke: 2



BeitragVerfasst: Fr 22.12.06 14:36 
delfiphan Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2684
Erhaltene Danke: 32



BeitragVerfasst: 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
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8535
Erhaltene Danke: 473

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Fr 22.12.06 14:43 
Nö, ich glaube, das kann man jetzt so stehen lassen.

Mich haste auf jeden Fall erwischt :zustimm: - Ich steh aufm Schlauch...

_________________
We are, we were and will not be.
alzaimar
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2889
Erhaltene Danke: 13

W2000, XP
D6E, BDS2006A, DevExpress
BeitragVerfasst: Fr 22.12.06 15:22 
16 Farben ... Jedes Pixel ein Nibble?

_________________
Na denn, dann. Bis dann, denn.
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8535
Erhaltene Danke: 473

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: 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. :D

_________________
We are, we were and will not be.
Martok
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 3661
Erhaltene Danke: 604

Win 8.1, Win 10 x64
Pascal: Lazarus Snapshot, Delphi 7,2007; PHP, JS: WebStorm
BeitragVerfasst: 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 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2684
Erhaltene Danke: 32



BeitragVerfasst: 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
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
EE-Regisseur
Beiträge: 5248
Erhaltene Danke: 2

WIN XP, IE 7, FF 2.0
Delphi 7, Lazarus
BeitragVerfasst: 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
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 8721
Erhaltene Danke: 191

Win95, Win98SE, Win2K, WinXP
D1S, D3S, D4S, D5E, D6E, D7E, D9PE, D10E, D12P, DXEP, L0.9\FPC2.0
BeitragVerfasst: 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 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2684
Erhaltene Danke: 32



BeitragVerfasst: Fr 22.12.06 23:38 
Gratulation an Gausi und GTA-Place (Edit: und BenBE) :D Ich löse an dieser Stelle das Rätsel auf.

:idea: 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):
ausblenden 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 $030303shr 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
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8535
Erhaltene Danke: 473

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: 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
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 3661
Erhaltene Danke: 604

Win 8.1, Win 10 x64
Pascal: Lazarus Snapshot, Delphi 7,2007; PHP, JS: WebStorm
BeitragVerfasst: 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 :P
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.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 20451
Erhaltene Danke: 2264

Win 10
C# (VS 2019)
BeitragVerfasst: Sa 23.12.06 01:53 
user profile iconMartok 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
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 3661
Erhaltene Danke: 604

Win 8.1, Win 10 x64
Pascal: Lazarus Snapshot, Delphi 7,2007; PHP, JS: WebStorm
BeitragVerfasst: 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
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8535
Erhaltene Danke: 473

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Sa 23.12.06 10:41 
Richtig. Der nächste, bitte :D

Auflösung:
ausblenden 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.
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
EE-Autor
Beiträge: 112


C# (VS 2008 Professional)
BeitragVerfasst: 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
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1889
Erhaltene Danke: 1

XP home, ubuntu
BDS 2006 Prof
BeitragVerfasst: 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
Zitat:
www.delphi-forum.de/download.php?id=4989

:shock: :shock:

_________________
I thought what I'd do was, I'd pretend I was one of those deaf-mutes.
Arne K.
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
EE-Autor
Beiträge: 112


C# (VS 2008 Professional)
BeitragVerfasst: Sa 23.12.06 12:37 
Rechtsklick -> "Ziel speichern unter" mal versucht?

Ansonsten: Im Opera funktioniert es ... IE7 auch!
jakobwenzel
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1889
Erhaltene Danke: 1

XP home, ubuntu
BDS 2006 Prof
BeitragVerfasst: 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.