Draw a sphere: Difference between revisions

m
(→‎{{header|Processing}}: fix background bug, scale and style)
Line 370:
 
==={{header|BASIC256}}===
This is modeledbased, but afternot exactly, on the [http://rosettacode.org/wiki/Draw_a_sphere#Tcl Tcl] implementation. Thus, the output of this is almost the same to the output of Tcl implementation below.
Thus, the output is almost the same to the output of Tcl implementation below.
<lang basic256>clg
color white
rect 0,0,graphwidth, graphheight
Forfor n = 1 to 100
color rgb(2*n,2*n,2*n)
circle 150-2*n/3,150-n/2,150-n
next n</lang>
 
535

edits