  % Title "Rotating Cuboid 1x3x4"
  % Animated
  % PlaceCentral
  uses ConsoleG

  sub main
  ========
  cls 0.0, 0.2, 0.7
  shading
  scale 3
  pushstate
    Material Gold
    static float ang
    rotateX ang
    rotateY ang
    scale 1,3,4
    go cube
  popstate
  ang+=.5 : if ang>=360 then ang-=360
  end sub

  EndScript
