2001/10/02
CHAPTER 9 HP-GL - 10
Current position
(X1, Y1)
(X2,Y2)
(X3, Y3)
(Xn, Yn)
10 '*** PAEX1 ***
20 LPRINT "IN;SP1;"
30 LPRINT "PA2000,6000;PD0,6000,2000,7500,2000,6000;PU2500,6000;"
40 LPRINT "PAPD4500,6000,2500,7500,2500,6000;PU10365,500;"
50 END
<Sample 62>
10 ' *** PAEX2 ***
20 LPRINT "IN;SP1;SC0,100,0,100;"
30 LPRINT "PA50,30;PD25,30,50,50,50,30;PU55,30;"
40 LPRINT "PAPD80,30,55,50,55,30,PU;"
50 END
<Sample 63>
PR - Relative coordinate pen move
PR [X, Y [,...]] [;]
X ; X coordinate of the cursor movement destination
Y ; Y coordinate of the cursor movement destination
•
Coordinates are relative to the current position in user units or graphics units.
•
Plots a straight line only when the pen is down.
•
When scaling has been performed, the cursor is moved by relative coordinates in user units.
•
Also, when scaling has been performed, the values for X and Y are real numbers.
•
When there is no scaling, the cursor is moved by relative coordinates in graphics units.
•
When there is no scaling, the coordinate values for X and Y are integer numbers.
Current position
Y
X1
Y2
Y3
X3
10 ' *** prex 1 ***
20 LPRINT "IN;SP1;"
30 LPRINT "PA5000,4500,;PDPR-2000,0,2000,2000,0,-2000;PU500,0;"
40 LPRINT "PD2000,0,-2000,2000,0,-2000;PU;"
50 END
<Sample 64>