Julia set: Difference between revisions

Content added Content deleted
(Julia set in various BASIC dialents)
Line 1,044: Line 1,044:
zx = (x - 150) / 100
zx = (x - 150) / 100
zy = (y - 150) / 150
zy = (y - 150) / 150
set_rgb 0 0 0
color3 0 0 0
for iter range 128
for iter range 128
if zx * zx + zy * zy > 4
if zx * zx + zy * zy > 4
set_rgb iter / 16 0 0
color3 iter / 16 0 0
break 1
break 1
.
.
Line 1,054: Line 1,054:
zx = h
zx = h
.
.
move_pen x / 3 y / 3
move x / 3 y / 3
draw_rect 0.4 0.4
rect 0.4 0.4
.
.
.</lang>
.</lang>