ER - Edge rectangle relative ; ER X, Y[;] - Page 365

CHAPTER 9 HP-GL - 14 



When there is no scaling, the coordinate values for X and Y are integer numbers. 

Current position

(X, Y)

10 '*** EAEX *** 
20 LPRINT "IN;SP1;PA7000,4000;" 
30 LPRINT "PT.3;FT1;RA6000,3000;" 
40 LPRINT "SP3,;EA6000,3000;" 
50 LPRINT "SP4;FT3,100;RA8000,3000;" 
60 LPRINT "SP3,;EA8000,3000;" 
70 LPRINT "SP5;PT.3;FT2;RA8000,5000;" 
80 LPRINT "SP3;EA8000,5000;" 
90 LPRINT "SP6;FT4,100,45;RA6000,5000;" 
100 LPRINT "SP3;EA6000,5000;PG" 
110 END 

<Sample 72> 

ER - Edge rectangle relative 

ER X, Y[;] 

X ; X coordinate of opposite angle for the rectangle 
Y ; Y coordinate of opposite angle for the rectangle 



Coordinates are relative to the current position in user units or graphics units. 



Plots the rectangle formed by the current position and the opposite angle specified by X and Y. 



After plotting the cursor returns to its point of origin. 



Plotting is performed whether the pen is up or down. 



When scaling has been performed, the rectangle is plotted in user units. 



Also, when scaling has been performed, the values for X and Y are real numbers. 



When there is no scaling, the rectangle is plotted in graphics units. 



When there is no scaling, the coordinate values for X and Y are integer numbers. 

Current position

Y increment

X increment

10 '*** EREX *** 
20 LPRINT "IN;SP1;PA5000,5000;" 
30 LPRINT "PT.3;FT1;RR500,500;" 
40 LPRINT "SP3,;ER500,500;" 
50 LPRINT "PR500,0" 
60 LPRINT "SP4;FT3,;RR500,500;" 
70 LPRINT "SP3,;ER500,500;" 
80 LPRINT "PR0,500;" 
90 LPRINT "SP5;PT.3;FT2;RR500,500;" 
100 LPRINT "SP3;ER500,500;" 
110 LPRINT "SP6;FT4,100,45;RR-500,500;" 
120 LPRINT "SP3;ER-500,500;PG" 
130 END 

<Sample 74>