Sharp MZ-800 - Page 139

PCIRCLE
The above example draws the X and Y axes with scale marks from —240 to 240
at 10 unit intervals.
The coordinates can be used in the same manner as ordinary Cartesian coordinates
after setting the point of intersection of the X and Y axes as the new origin. (X= —240
to 240, Y= —240 to 240)
PCIRCLE <X coordinate>, <Y coordinate>, <radius>,
<starting angle>, <ending angle>, <step angle>
<X coordinate>: —999 to 999
<Y coordinate>: —999 to 999
<radius>: 0 to 999
Abbreviated Format
Example
PCI.
The PCIRCLE statement draws a circle, or arc counterclockwise. The circle (arc)
has a <radius> and a <step angle>, with the center at location (x,y), and starts
at <starting angle> and ends at <ending angle>. A complete circle is drawn when
<starting angle> =0, <ending angle> =360, and <step angle> =0.2.
This statement actually draws a polygon, therefore <step angle > must be as small
as possible in order to draw a smooth figure. <starting angle> must be smaller
than <ending angle>. When <step angle> =0, lines connecting the center and
the starting point and the center and the ending point are drawn, The PCIRCLE
statement is only valid in the graphics mode.
10 PMODE GR:P=0
20 PMOVE 240, — 240
30 HSET
40 FOR J=240 TO 40 STEP —60
50 PCOLOR P
60 PCIRCLE 0, 0, J, 0, 360, 2
70 P=P+1
80 NEXT J
90 PMODE TN
6-82