18 lines
211 B
Text
18 lines
211 B
Text
|
% 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
|