CHAPTER 9 HP-GL - 16 
RA - Fill rectangle absolute 
RA X, Y[;] 
X ; X coordinate of opposite angle for the rectangle 
Y ; Y coordinate of opposite angle for the rectangle 
 
  X and Y coordinates are absolute coordinates in user units or graphics units. 
  Fill in 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
(X, Y)
Fill pattern specified by FT and PT
 
10 '*** RAEX *** 
20 LPRINT "IN;SP1;PA5000,4000;" 
30 LPRINT "PT.3;FT1;RA4250,3250;" 
40 LPRINT "FT3,100;RA5750,3250;" 
50 LPRINT "FT2;RA5750,4750;" 
60 LPRINT "FT4,100,45;RA4250,4750;" 
70 END 
 
<Sample 71>   
 
RR - Fill rectangle relative 
RR 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. 
  Fill in 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
Fill pattern specified by FT and PT
Y increment
X increment
 
10 '*** PREX *** 
20 LPRINT "IN;SP1;PA5000,5000;" 
30 LPRINT "PT.3;FT1;RR500,500;" 
35 LPRINT "PR500,0;" 
40 LPRINT "FT3,70;RR500,500;" 
45 LPRINT "PR0,500;" 
50 LPRINT "FT2;RR500,500;" 
60 LPRINT "FT4,70,45;RR-500,500;" 
70 END 
 
<Sample 73>