Apfelmännchen Problem!

Übersicht BlitzBasic Allgemein

Neue Antwort erstellen

 

Jokerchris2000

Betreff: Apfelmännchen Problem!

BeitragMo, Jul 12, 2004 20:46
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo. Wir haben in der Schule in Delphi mal die Mandelbrotmenge gemacht. Nun wollte ich das mal in blitzbasic hinkriegen. Habe auch schon viel Code durchgeschaut nur will ich es selber schreiben und dann eventuell erweitern. Folgenden Code habe ich bereits geschrieben. Aber mein Problem ist, dass ich nicht weis wie ich die Pixel nun zeichnen kann. Dachte da an "Writepixelfast i,j,farbe" aber wie gebe ich dann die Farbe an? Würde zu beginn am liebsten einfach nur Weiß als Farbe benutzen.
Hier ist der Code:

Code: [AUSKLAPPEN]

;Variablen
a_min   =-2.025
a_max   =0.6
b_min   =-1.125
b_max   =1.125
x   =0
y   =0
n   =0
n_max      =50
g   =2
;Ende Variablen

;Rechnung
dx=(a_max-a_min)/640
dy=(b_max-b_min)/480


Graphics 640, 480, 16, 2
SetBuffer BackBuffer()
While Not KeyDown(1)

   For i=0 To 639
    A=a_min+i*dx
     For j=0 To 479
      B=b_min+j*dy
       Repeat
   x_neu=(x*x)-(y*y)+A
      y_neu=2*x*y+B
      x=x_neu
      y=y_neu
      n=n+1
       Until (n=n_max) Or ((x*x)+(y*y)>(g*g))
      If (x*x+y*y)>(g*g) Then
       farbe=?
       WritePixel i,j,farbe
      EndIf
     Next
   Next


Flip
Wend
End


[/code]
  • Zuletzt bearbeitet von Jokerchris2000 am Mo, Jul 12, 2004 20:59, insgesamt 2-mal bearbeitet

Mr.Keks

BeitragMo, Jul 12, 2004 20:53
Antworten mit Zitat
Benutzer-Profile anzeigen
weiß kannst du als $FFFFFF angeben, schwarz als $000000. ansonsten findest du auf blitzbase.de bei writepixelfast weitere informationen über das errechnen und zerlegen der farbcodes.
MrKeks.net

rambo256

BeitragMo, Jul 12, 2004 20:53
Antworten mit Zitat
Benutzer-Profile anzeigen
nimm doch Plot,oder oval.
vorher kann man ja mit color jedesmal die farbe bestimmen.
Asus F53z

Das Leben ist eine reine Konkatenation...
 

Jokerchris2000

BeitragMo, Jul 12, 2004 20:57
Antworten mit Zitat
Benutzer-Profile anzeigen
Man Man Man. Hier gibt es ja sehr schnell Antworten. Oke hab das jetzt mit farbe=$FFFFFF gemacht. Aber nun wird beim Start meines Programms alles weis gemalt. Ich verstehe dass nicht. Habe keinen Fehler gefunden. Seht ihr was?

sbrog

BeitragMo, Jul 12, 2004 21:04
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich kenn mich mit Mandelbrot nicht aus, aber bei Blitz2d ist unter Samples ein Beispiel dafür

sbrog

BeitragDi, Jul 13, 2004 13:39
Antworten mit Zitat
Benutzer-Profile anzeigen
function rgb(rot,gruen,blau)
return rot or gruen shl 8 or blau shl 16
end function

und dann

writepixel x,y,rgb(rotwert,gruenwert,blauwert)

Markus2

BeitragDi, Jul 13, 2004 19:35
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich glaube du hast das # vergessen wo du die Floats definierst !?
Dann haste keine Nachkommastellen in den Berechnungen ...

Neue Antwort erstellen


Übersicht BlitzBasic Allgemein

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group