Mandelbrot set: Difference between revisions

Content added Content deleted
Line 3,357: Line 3,357:


=={{header|Craft Basic}}==
=={{header|Craft Basic}}==
<syntaxhighlight lang="basic">'Mandelbrot fractal example
<syntaxhighlight lang="basic">title "Mandelbrot"

title "Mandelbrot"


define max = 15, w = 640, h = 480
define max = 15, w = 640, h = 480
Line 3,376: Line 3,374:
do
do


let sy = ( py - h / 2 ) / 150
let sy = (py - h / 2) / 150
let sx = ( px - w / 2 ) / 150
let sx = (px - w / 2) / 150
let i = 0
let i = 0
Line 3,398: Line 3,396:


fgcolor 220 + i * x, 220 + i * y, 230 + i * xy
fgcolor 220 + i * x, 220 + i * y, 230 + i * xy

rect px, py, 4, 4
rect px, py, 4, 4


Line 3,410: Line 3,407:


fgcolor 255, 255, 0
fgcolor 255, 255, 0
print "done"</syntaxhighlight>
print "done"

end</syntaxhighlight>


=={{header|D}}==
=={{header|D}}==