RosettaCodeData/Task/Draw-a-sphere/Run-BASIC/draw-a-sphere-2.basic
2023-07-01 13:44:08 -04:00

5 lines
192 B
Text

'This is a simple Circle
graphic #g, 300, 300 'create a graphic object
#g place(100,100) 'place the drawing pen at 100,100
#g circle(75) 'make a circle with radius 75
render #g 'show it