Draw a rotating cube: Difference between revisions

Content deleted Content added
Chkas (talk | contribs)
Line 2,055:
DRAW_OFFSET := 300
}</lang>
 
=={{header|OxygenBasic}}==
<lang>
% Title "Rotating Cube"
% Animated
% PlaceCentral
uses ConsoleG
 
sub main
========
cls 0.0, 0.5, 0.7
shading
scale 7
pushstate
GoldMaterial.act
static float ang
rotateX ang
rotateY ang
go cube
popstate
ang+=.5 : if ang>=360 then ang-=360
end sub
 
EndScript
</lang>
 
=={{header|Perl}}==