Das Programm erzeugt Bilder der Mandelbrotmenge und kann auch beliebig vergrößern + verkleinern und fast unendlich zoomen.

Durch die Beispielbilder wird die Datei recht groß. Schaut euch mal die
Demobilder durch "Bild laden" an.
Auch in diesen kann dann weiter gezoomt werden.
Eine kleine Anleitung ist als Readme enthalten.

Schaut es euch mal an. KRITIK und ANREGUNGEN erwünscht
Direkter Downloadlink: (ca. 2.5 MB)
www.8ung.at/harth/project.zip

Auf www.8ung.at/harth/mandel.html kann man sich noch ein paar andere Beispielbilder direkt anschauen.
Downloadlinks für größere Bildmengen sind auch vorhanden.
Hier sind jeweil 4-7 hochauflösige Bilder drin. Jeder
Bildpack ca. 2,5 MB

www.8ung.at/harth/bild1.zip
www.8ung.at/harth/bild2.zip
www.8ung.at/harth/bild3.zip
www.8ung.at/harth/bild4.zip
www.8ung.at/harth/bild5.zip

{Die richitgen und überarbeiten Downloads der neuesten
Version findet ihr am Threadende...]

Hi,

ja.. funktioniert jetzt
Schaut auch gut aus (auch wenn ich immernochnet begriffen hab wofür sowas gut is )

eine ganz kleine frage hab ich noch.... Womit erstellst du das Bild..??
Also ich meine, wie zeichnest du es..??? Von der dauer, wie lange es dauert würde ich auf Canvas.Pixels tippen... stimmt's?

Wenn ja, würd ich die Bitmap.Scanline empfehlen, damit wird's um ein vielfaches schneller.

Au'revoir,
Aya

ich zeichne es erst "virtuell" in ein Bitmap mit Pixel[]... . Das dauert nur ca. 5 sekunden für ein ganzes Bild. Danach wird es erst auf das Image als komplettes Bitmap gesetzt. Was an dem Befehl pixel[] so lange dauert ist das aufrufen in Kombiation mit einem Image, weil anscheinend bestimmte Zugangsdaten jedesmal neu aufgerufen werden müssen

Wenn "Berechnung" angezeigt wird, wird jederBildpunkt berechnet für die verwendeten Farben.

Wenn "Erstellung des Bildes" angezeigt wird, wird jeder Bildpunkt nochmal berechnet und dazu die Pixel gesetzt.

Da die zweite Anzeige nicht wirklich erkennbar länger dauert macht pixel[] nicht viel aus. Wenn man nacheinander gleich aufs image die Pixel setzt, dauert ein 1000*1000 Bild 60 Minuten, so nur noch 5 Minuten. So hatte ichs am Anfang. DIe Berechnung verbraucht die Zeit bei der jetztigen Version.

Was so lange dauert, ist das alles 2 mal berechnet wird. das erste mal um die Farben festzulegen und das zweite mal um die Pixel zu setzen.

Für jeden Bildpunkt muss eine Schleife bis zu 2000 mal durchlaufen werden. Das bedeutet bei einem 1000*1000 Bild : (2000 * 1000*1000 = 2 000 000 000, also über 2 Milliarden schleifendurchläufe mit 5-6 Rechnungen)

Moderiert von Tino: Absätze entfernt.

Wozu ist sowas gut?

Tja, da dieses Gebilde aus einer wirklichen einfachen Formel besteht, aber trotzdem unendlich komplex ist wirft es einige Fragen auf. Keine Stelle gleicht wirklich der anderen. Es ist zwar alles selbstähnlich, aber es gibt trotzdem zillionen Verschiederner Stellen. Das "Anfangsbild" findet man oft abgeändert in kleinen Variationen vor, die Wiederum daraus entstehen. Es ist reiner Wahnsinn, was für eine Vielfalt ensteht

=> Genau so könnte auch unser Universum aufgebaut sein (in einer Formel)

Die Atome mit ihren Elektronen sehen so ähnlich aus wie unser SOnnensystem. Unser Sonnesystem ist widerum in einer Galaxien gefasst die So ähnlich aussehen usw.

Es geht um Selbstähnlichkeit.
Das Gebilde wirft viele Fragen auf, dazu sieht es noch schön aus.

Hi,

ich hab es jetzt eben nochmal getestet...
Mit einem Bitmap welches nur im Speicher ist und später per Canvas.Draw auf ein Image gezeichnet wird.

Hab es mit einem QueryPerformanceCounter mitgestoppt, also das genaueste was es gibt..

und siehe da... Scanline ist exakt 31,058374031113670401905863493608 mal schneller als Canas.Pixels *g*

Au'revoir,
Aya

ok du hast ja recht ich ändere es!!

Aber der größte Anteil liegt trotzdem bei der Berechnung und
das gesamte Bilderstellen mit Pixeln macht nur 10 Sekunden aus.
(bei den großen Bildern)

Jep, klar... die Berechnung is das was wirklich lange dauert...
Aber ich finde bei etwas was so lange dauert, sollte man alles so schnell machen wie irgendwie möglich.. denn selbst 10 Sekunden können lange dauern

Au'revoir,
Aya~

Bist du denn mit der Bedienung zurechtgekommen??

Makieren, zoomen , usw.?

kann man es einigermaßen verstehen?
wo ist noch nachholbedarf?

Jep.. die ging schon..

Das einzige was ein wenig umständlich ist... wenn ich einen Bereich markiere, dann muß ich erst auf den Button klicken das die Maße übernommen werden... das würde ich automatisch machen

und, eventuell das wenn man mit der RechtenMaustaste auf den Bereich klickt, das dann das bild berechnet wird

Au'revoir,
Aya

Das Programm sollte vileicht nicht im Vollbildschirmmodus starten
und bei mir entsteht immer das gleiche muster,
wie hast du "Demobild3.bmp" hinbekommen ?
und das Dauer ja zimlich lange bis er was gezeichnet hat, kann man die zeit nicht irgeniw verkürtzen ?

mimi hat folgendes geschrieben:

und das Dauer ja zimlich lange bis er was gezeichnet hat, kann man die zeit nicht irgeniw verkürtzen ?

Wie er schon sagte... die Berechnung dauert halt seine Zeit..

PS: btw.. bei mir dauert das größte Bild 40 Sekunden~~ hrhr~~

>Realteil=-0,050830241187384
Realteil<=-0,0328803339517625
>Imaginärteil=-0,690625
Imaginärteil<=-0,67625
Auflösungx=1086
Auflösungy=768

diese Werte eingeben

Du musst den gewünschten Bereich makieren und dann auf "Makierter BEreich drücken". Nun stellen sich alle WErte entsprechend ein. Danach auf "zeichnen" drücken. Du hast wahrscheinlich den Button "Makierter Bereich vergessen"

Führe eine Minimize Funktion ein.

40 Sekunden Dauer muss man verschmerzen. Du darfst aber nicht immer so hoch auflösend Bilder zeichnen. Erst kleine Bilder beim reinzoomen bis man ein geeignetes Motiv gefunden hat. Erst dann "zoom" Hochstellen und noch mal "Makierter BEreich" drücken! Du musst die Größe der Bilder so beeinflussen: Erst gewünnschte Fläche makeren, "Makierter Bereich" drücken, Falls die Auflösung zu hoch ist, zoom runterstellen und nochmal auf "Makierter Bereich" drücken. (Mehr als 200*200) ist zur Motivauswahl
sowieso nicht nötig.

keine anaung wie lange das bei mir dauer.
aber es dauer halt seine zeit.

und wie kann man damit jetzt eigene muster erzeugen wie z.b.
Demobild3.bmp ?

Wenn ich die werte eingeben bekomme ich die fehlermeldung das ich nur eine "," stelle haben darf. bei XMIN

ALso:

Auf das Bild klicken. Rechte MAustaste gedrückt halten und Viereck ziehen. Bei gewünschter Größe loslassen. Nun auf "Makierter Bereich" Button klicken. Werte werden automatisch entsprechend des Zooms eingestellt.

Nun nur noch "Zeichnen" drücken

Es macht Sinn an den Stellen die NAh an der MAndelbrotmenge (dem Rand zwischen weißen und bunten Farben zu untersuche, dabei ergeben sie coole Sachen) Einfach so nen "Ausswuchs" mehrmals mit vergrößerung Zeichnen Lassen. (am besten 200*200),sonst dauerts zu lange

Moderiert von Tino: Absätze entfernt.

probiers nochmal, bei mir und aya funkzt doch auch.

Vielleicht hast du keinen Teil makiert auf dem Bildschirm.

Fehler gefunden!!! Die nachkommastellen dürfen nicht so viele sein!
So funkzt es:

>Realteil=-0,050
Realteil<=-0,032
>Imaginärteil=-0,690
Imaginärteil<=-0,676
>Auflösungx=1086
Auflösungy<=768

Es macht Sinn an den Stellen die NAh an der MAndelbrotmenge (dem Rand zwischen weißen und bunten Farben zu untersuche, dabei ergeben sie coole Sachen)

wie das ?

Moderiert von Tino: Absätze entfernt.

Die Demobilder sind Vergrößerungen des Anfangsbildes. Es wird jeder Punkt für die kleineren Abstände neu berechnet, daraus ergibt sich ein fast unendlich ziemlich gute Vergrößerung.

Du sucht dir also so nen Gebilde aus z.B links oben den Ast der RAusragt. Makierst ihn auf den Bildschrim, stellst den zoom auf einen bestimmten WErt, drückst makierter Bereich und danach zeichnen.

Moderiert von Tino: Absätze entfernt.

und sonst nichts ?
und daraus entstehen dann so coole bilder ?

ja das Gebilde ist UNENDLICH komplex an an den Randstellen. Das ist ja der Wahnsinn, dass aus einer einfachen Formel solch ein Gebilde wird.

Ich hab noch ca. 50 gute Demobilder. Keins gleicht dem anderen. Es gibt Zillionen schöner FLecken. Viel Spaß beim erforschen.

Moderiert von Tino: Absätze entfernt.