CHAPTER 9 HP-GL - 22 
LB - Character plot 
LB [ cs ]  < terminator > [;] 
cs : character string 
  Plots character strings,  numerical expressions, variables etc. 
  Plotting is performed whether the pen is up or down. 
  After plotting,  the cursor moves to the position of the next character. 
 
10 '*** LBEX1 *** 
20 LPRINT "SP2;PA1000,4000;" 
30 X=30 
40 LPRINT "LB",X,X+1,X+2,CHR$(3) 
50 END 
<Sample 81> 
 
10 '*** LBEX2 *** 
20 LPRINT "SP2;PA4000,5000;" 
30 X=30 
40 LPRINT "LB";X;X+1;X+2,CHR$(3) 
70 END 
<Sample 82> 
 
10 '*** LBEX3 *** 
20 LPRINT "SP2;PA5000,6000;" 
30 X=30 
40 LPRINT "LB";X;"   ";X+1;"   ";X+2,CHR$(3) 
70 END 
<Sample 83> 
 
DI - Absolute direction 
DI [ run, rise ] [;] 
run : X direction component 
rise : Y direction component 
  Specifies the character plot direction. 
  Values for the run and rise are clamped real numbers. 
  The instruction is ignored when the values for both run and rise are 0. 
  When the parameter field is omitted,  the default value (horizontal direction) is used. 
 
run
rise
tan
 =
cos
sin
 
 
10 '*** DIEX *** 
15 DEG=-45 
16 RAD3.1416/180*DEG 
20 LPRINT "IN;SP2;PA3050,4450;" 
30 LPRINT "DI0,2;LB_*_1988";CHR$(3);"DI2,2;LB_*_1989";CHR$(3) 
40 LPRINT "DI2,0;LB_*_1990";CHR$(3);"DI2,-2;LB_*_1991";CHR$(3) 
50 LPRINT "DI0,-2;LB_*_1992";CHR$(3);DI-2,-2;LB_*_1993";CHR$(3) 
60 LPRINT "DI-2,0;LB_*_1994";CHR$(3);"DI-2,2;LB_*_1995";CHR$(3) 
70 LPRINT 
"PA3500,5350;DI",COS(0),SIN(0);"LB_*_2000";CHR$(13);CHR$(3); 
80 LPRINT "DI",COS(RAD);SIN(RAD);"LB_RETURN 
POINT";CHR$(13);CHR$(3) 
90 END 
 
<Sample 84>