Draw a sphere: Difference between revisions
→{{header|Pascal}}
Line 3,589:
[[Category:Geometric Primitives]]
=={{header|OxygenBasic}}==
Using an OpenGl-based console
<lang>
% Title "Sphere"
'% Animated
% PlaceCentral
uses ConsoleG
sub main
========
cls 0.0, 0.2, 0.7
shading
scale 10
pushstate
GoldMaterial.act
go sphere
popstate
end sub
EndScript
</lang>
=={{header|Pascal}}==
| |||