akkartik
/
mu
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

mandelbrot: add some garish color

This commit is contained in:
Kartik K. Agaram 2021-05-09 22:14:42 -07:00
parent cf8ccb0a09
commit 208dab2256
2 changed files with 12 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
mandelbrot-fixed.mu
View File

@ -143,16 +143,14 @@ fn mandelbrot screen: (addr screen), scene-cx-f: int, scene-cy-f: int, scene-wid
break-if->=
var real-f/edx: int <- viewport-to-real-f x, width, scene-cx-f, scene-width-f
var iterations/esi: int <- mandelbrot-iterations-for-point real-f, imaginary-f, 0x400/max
compare iterations, 0x400/max
iterations <- shift-right 3
var color/edx: int <- copy 0
{
break-if->=
pixel screen, x, y, 0xf/white
}
compare iterations, 0x400/max
{
break-if-<
pixel screen, x, y, 0/black
var dummy/eax: int <- copy 0
dummy, color <- integer-divide iterations, 0x18/24/size-of-cycle-0
color <- add 0x20/cycle-0
}
pixel screen, x, y, color
x <- increment
loop
}

17
mandelbrot.mu
View File

@ -51,22 +51,17 @@ fn mandelbrot screen: (addr screen), scene-cx: float, scene-cy: float, scene-wid
compare y, height
break-if->=
var imaginary/xmm1: float <- viewport-to-imaginary y, width, height, scene-cy, scene-width
var x/edx: int <- copy 0
var x/ebx: int <- copy 0
{
compare x, width
break-if->=
var real/xmm0: float <- viewport-to-real x, width, scene-cx, scene-width
var iterations/eax: int <- mandelbrot-iterations-for-point real, imaginary, 0x400/max
compare iterations, 0x400/max
{
break-if->=
pixel screen, x, y, 0xf/white
}
compare iterations, 0x400/max
{
break-if-<
pixel screen, x, y, 0/black
}
iterations <- shift-right 3
var color/edx: int <- copy 0
iterations, color <- integer-divide iterations, 0x18/24/size-of-cycle-0
color <- add 0x20/cycle-0
pixel screen, x, y, color
x <- increment
loop
}