UC - User-defined character ; UC X1, Y1, X2, Y2..., Xn, Yn[;] - Page 376

CHAPTER 9 HP-GL - 25 

10 '"*** SLEX *** 
20 LPRINT "DF;SP1;SI1.3,1.3;PA100,6000;" 
30 LPRINT "SL2;LBLASER";CHR$(3) 
40 LPRINT "SL-2;PR3000,0;LBLASER";CHR$(3) 
50 END 

<Sample 91> 

UC - User-defined character 

UC X1, Y1, X2, Y2..., Xn, Yn[;] 

Xi : Number of grids in X direction 
Yi : Number of grids in Y direction 



Draws user-generated character or symbol. 



Values for Xi and Yi are clamped real numbers. 



If a value between 99.0000 and 127.9999 is entered between(Xi, Yi) and (Xi+1, Yi+1), the pen will be 
lowered at that point. 



If a value between -128.0000 and -99.0000 is entered between (Xi, Yi) and (Xi+1, Yi+1), the pen will be 
raised at that point. 

(-4,0)

(2, -4)

(-2, -4)

(4, 0)

(0, 1)

(0, 1)

UC 4, 99, 0, 1, -4, 0, 2, -4, -2, -4, 4, 0, 0, 1;

Character point of origin

10 '*** UCEX1 *** 
20 LPRINT "IN;SP2;PA2000,2000;" 
30 FOR AA=19 TO 89 STEP 10 
40 A=AA/100 
50 LPRINT "SI",A,A*1.7 
60 LPRINT "UC4,7,99,0,1,-4,0,2,-4,-2,-4,4,0,0,1;" 
70 NEXT AA 
80 LPRINT "PA2000,3750;" 
90 FOR BB=19 TO 89 STEP 10 
100 B=BB/100 
110 LPRINT "SI",B,B*1.7 
120 LPRINT "LBE";CHR$(3) 
130 NEXT BB 
140 END 

<Sample 92> 

10 '*** UCEX2 *** 
20 LPRINT "SP1;PA3000,5000;SI.5,.8" 
30 LPRINT "UC0,4,99,1.75,0,1.5,4,3,-8,3,8,3,-8,3,8,3,-
8,1.5,4,1.75,0;" 
40 LPRINT "CP5,0;LB1000 ohms";CHR$(3) 
50 END 

<Sample 93> 

10 '*** UCEX2 *** 
20 LPRINT "SP1;PA3000,4500;SI.5,.8" 
30 LPRINT "UC0,8,99,3.5,0,3,8,6,-16,6,16,6,-16,6,16,6,-
16,3,8,3.5,0;" 
40 END 

<Sample 94>