DR - Relative direction ; DR [ - Page 195

2001/10/02 

CHAPTER 4 HP-GL/2 - 47 

90 LPRINT "DT";" 

100 LPRINT "DT0,2;LB_*_1988#"; "DI2,2;LB_*_1989#"; 

110 LPRINT "DT2,0;LB_*_1990#"; "DI2,-2;LB_*_1991#"; 

120 LPRINT "DT0,-2;LB_*_1992#"; "DI-2,-2;LB_*_1993#"; 

130 LPRINT "DT-2,0;LB_*_1994#"; "DI-2,2;LB_*_1995#"; 

140 LPRINT "PA3500,5350;DI", COS(0),SIN(0); "LB_*_2000"; CHR$(13); "#"; 

150 LPRINT "DI", COS(RAD); SIN(RAD); "LB_RETURN POINT"; CHR$(13); "#"; 

160 LPRINT CHR$(27); "%0A"; 

170 LPRINT CHR$(27); "E"; 

180 END 

<sample 54> 

DR - Relative direction 

DR [ 

run

, 

rise

 ] [;] 

run

 : X-component of the printing direction expressed as a percentage of the x-component of the distance 

between P1 and P2. 

rise

 : Y-component of the printing direction expressed as a percentage of the y -component of the distance 

between P1 and P2. 

• 

This command determines the direction in which subsequent labels will be printed.

• 

Values for 

run 

and 

rise

 are clamped real numbers. 

• 

The instruction is ignored if 

run

 and 

rise

 are both 0. 

• 

When you issue a DR instruction the carriage return point is set to the current pen location. 

• 

Any text path that you set with the DV instruction will combine with the current printing direction to 
determine the layout of characters on the page. 

• 

If you change the positions of P1 and P2 the printing direction will change accordingly. 

• 

If you omit the parameters the printing direction is horizontal and the 

run

 = 1% of |P2X-P1X|. 

• 

Actual values for 

run

 and 

rise

 are changed relative to the P1 and P2 value.  It is calculated as below: 

actual run = 

run

 parameter ÷ 100 x (P2x - P1x) 

actual rise = 

rise

 parameter ÷ 100 x (P2y - P1y) 

θ

run=70%

rise = 60%

(70,0)

(0,60)

(0, 100)

(0, 100)

(100, 100)