aUCBLogo Demos and Tests / drawcross


be drawcross [x 0][y 0][z 0][csize 30]
   perspective
   hideTurtle
   PenUp
   home
   setXYZ x y z
   setPenColor "brown
   drawcubes 8
   bk csize*3
   left 90  fd csize
   drawcubes 2
   right 180 fd csize*4
   drawcubes 2
;   rotatescene2

   be drawcubes n
      repeat n
      [   (pcube csize)
         fd csize
      ]
   end
end