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>