| .CIRCLE Statement Programming Example. |
|
 QuickSCREEN Details Example Contents Index |
| ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ |
| CIRCLE Statement Programming Example |
|
| The following program first draws a circle with the upper left quarter |
| missing. It then uses relative coordinates to position a second circle |
| within the missing quarter circle. Finally, it uses a different aspect |
| ratio to draw a small ellipse inside the small circle. |
| |
| CONST PI=3.141593 |
| SCREEN 2 |
| ' Draw a circle with the upper-left quarter missing. |
| ' Use negative numbers so radii are drawn. |
| CIRCLE (320,100), 200,, -PI, -PI/2 |
| ' Use relative coordinates to draw a circle within the missing |
| ' quarter. |
| CIRCLE STEP (-100,-42),100 |
| ' Draw a small ellipse inside the circle. |
| CIRCLE STEP(0,0), 100,,,, 5/25 |
| ' Display the drawing until a key is pressed. |
| LOCATE 25,1 : PRINT "Press any key to end."; |
| DO |
| LOOP WHILE INKEY$="" |
