Apfelmännchen

[Kaeru Gaman]

@bobobo

ich habs halt no nej gsehn...

...ich find halt das wort 'almondbread' fürn armutszeugnis.

[bobobo]

@bobobo

ich habs halt no nej gsehn...

...ich find halt das wort 'almondbread' fürn armutszeugnis.

Nein .. Satire ist das

[Froggerprogger]

Hier noch ein code, um die Mandelbrot-Menge extrem schnell direkt auf einen Screen zu zeichnen.
Dazu gabs hier im alten englischen Forum mal einen Thread zu, wo ausgehend vom Einfärben einzelner Pixel per Plot() dieser optimierte Code entstand:

Code: Alles auswählen

#xmax=1024
#ymax=768

#maxcolor=24

#leftside   =-2
#top        =1.25
xside.f     =2.5
yside.f     =-2.5
xscale.f    =xside/#xmax          
yscale.f    =yside/#ymax

If InitSprite()=0 Or InitKeyboard()=0
  End
EndIf

OpenScreen(#xmax,#ymax,32,"")

StartDrawing(ScreenOutput())
  Buffer = DrawingBuffer()
  Pitch  = DrawingBufferPitch()
  For y= 0 To #ymax-1
    *Line.LONG = Buffer+y*Pitch
    cY.f=y*yscale+#top
    For x= 0 To #xmax-1
      cX.f=x*xscale+#leftside
      zx.f=0
      zy.f=0
      colorcounter=0
      
      PowZX.f = 0
      PowZY.f = 0
      While (PowZX+PowZY<4 And colorcounter<#maxcolor)
        tempX.f = PowZX-PowZY+cX
        zy      = 2 * zx * zy + cY
        zx      = tempX
        colorcounter+1
        PowZX = zx*zx
        PowZY = zy*zy
      Wend
      *Line\l = colorcounter * $111104
      *Line+4
    Next
  Next
StopDrawing()
FlipBuffers()

Repeat
  ExamineKeyboard()
Until KeyboardPushed(#PB_Key_Escape)
CloseScreen()

Bzgl. almondbread: Das ist ja echt mal nen Knaller

[remi_meier]

Öhm lol, sehr optimiert (rein Programmiertechnisch) is das Ding aber nich, oder eigentlich doch, aber ein Riesending is drin:
cY.f=y*yscale+#top
Wieso in der x-Schleife? Das kannst du 2 Zeilen weiter oben reindrücken
Der Rest ist glaub gut, wobei ich da in Asm gleich noch was ändern würde.

cu
Remi

[Zaphod]

in den usa heißt das jetzt bestimmt freedombread...

[Froggerprogger]

@remi
Whoops, gut aufgepasst !
(Habs oben Code geändert)

[Andre]

@Kaeru: AlmondBread habe ich verzapft Wird mit der neuen Version geändert...

[bobobo]

@Kaeru: AlmondBread habe ich verzapft Wird mit der neuen Version geändert...

Schade