CHAPTER 4 HP-GL/2 - 20
AA - Draw absolute arc
AA [ X, Y, qc [, qd ]] [;]
X ; Arc centre X coordinate
Y ; Arc centre Y coordinate
qc
; Arc angle in degrees
qd
; Chord angle in degrees
Coordinates are absolute coordinates in current units.
Starting from the current position, this command plots an arc centred on the absolute coordinates X, Y
having the specified arc angle and chord angle, with the radius being the distance between the current
position and the point X,Y.
After execution of the command the cursor position is at the opposite end of the arc from the point at which
plotting started.
Plotting takes place only when the pen is down.
If the command is invoked with the pen up, plotting is not performed, but the cursor position moves to
what would have been the plot end point.
(X,Y)
qc = Arc Angle
qd = Chord Angle
The value for
qc
is a clamped real number.
When qc is positive, plotting is counterclockwise.
When qc is negative, plotting is clockwise.
The value for qd is a clamped real number in the range 0.5º to 180º. The default value is 5º.
10 '-- Draw Absolute Arc --
20 WIDTH "LPT1:",255
30 LPRINT CHR$(27);"E";
40 LPRINT CHR$(27);"%0B";
50 LPRINT "IN;SP1;IP1000,1000,6000,6000;"
60 LPRINT "SC0,100,0,100;"
70 LPRINT "PA0,30;"
80 LPRINT "PD;PA0,45;AA0,50,180;PA0,70;"
90 LPRINT "AA0,100,900;PA100,55;AA100,50,180;PA100,30;"
100 LPRINT "AA100,100,90;PA45,100;AA50,100,180;PA80,100;"
110 LPRINT "AA100,0,90;PA55,0;AA50,0,180;PA30,0;AA0,0,90;"
120 LPRINT "PU;PA50,50,CI20;"
130 LPRINT CHR$(27); "%0A";
140 LPRINT CHR$(27); "E";
150 END
<Sample 26>