Draw a sphere: Difference between revisions

Content deleted Content added
→‎{{header|zkl}}: opps, left out a line
m →‎{{header|zkl}}: extraneous character
Line 3,608: Line 3,608:
The radius of 100 is the max before the color calculation overflows 24 bits so for a radius (R) of, say 200, use
The radius of 100 is the max before the color calculation overflows 24 bits so for a radius (R) of, say 200, use
<lang zkl>img[X+X0,Y+Y0]=C*140+C;</lang>
<lang zkl>img[X+X0,Y+Y0]=C*140+C;</lang>
Perhaps a more useful solution is to use GnuPlot (I grabbed the code from (http://ayapin-film.sakura.ne.jp/Gnuplot/):
Perhaps a more useful solution is to use GnuPlot (I grabbed the code from http://ayapin-film.sakura.ne.jp/Gnuplot/):
<lang zkl>#<<<
<lang zkl>#<<<
cmd:=0'|
cmd:=0'|