LB - Character plot ; LB [ cs ] < terminator > [;] ; DI - Absolute direction - Page 373

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>