2006/05/31 
CHAPTER 9 HP-GL - 19 
PW-Pen width 
PW n[;] 
w ; width (unit = 1/300 inch) 
•  This command specifies the width of the currently selected pen. 
•  The value of w is an integer number from 1 to 10. 
 
SM - Symbol mode 
SM c[;] 
c ; ASCII character or symbol code 
•  The command specifies the symbol to be drawn. 
•  When the PA, PR, PD or PU instruction is used,  the specified symbol will be drawn at the end of each 
vector. 
•  The specified symbol will be drawn at the end of each vector even if the pen is up when the PA or PR 
instructions are used. 
•  Omitting the parameter field cancels the symbol mode. 
10 '*** SMEX *** 
20 LPRINT "IN;SP1;SM*;PA500,1500;" 
30 LPRINT "PD600,1590,670,1860,850,1960,1320,1900,1940,2350:" 
40 LPRINT "PU;SM;PA500,500;SM3;" 
50 LPRINT "PA550,800,680,720,800,950,1150,1230,1870,1350;PU;" 
60 LPRINT "SM;PA1850,600;PD;SMY;PA3000,1450;" 
70 LPRINT "SMZ;PA3300,1150;SMX;PA1850,600;PU;" 
80 END 
 
<Sample 78> 
 
SP - Select pen 
SP [ n ] [;] 
n ; Pen number 
•  Selects the pen specified by the pen number. 
•  The value for n must be an integer from 0 to 6. 
 
TL - Tick length 
TL l1(,l2)[;] 
1-Length of ticks in the positive X- and Y-axes 
2-Length of ticks in the negative X- and Y-axes 
•  Tick length is a percentage of the vertical and horizontal distances between P1 and P2. 
•  Sets the length of tick marks for the XT and YT instructions. 
•  Values for 
1 and 2 are clamped real numbers. 
•  When the parameter field is omitted, the default values for tick length are used, for both l1 and l2, these are 
0.5% of the horizontal and vertical distances between P1 and P2. 
10 '*** TLEX *** 
30 FOR I=1 TO 10 
40 LPRINT "PR800,0;XT;" 
50 NEXT I 
60 LPRINT "TL;PU;PA300,279;PD;" 
70 GOSUB 1000 
80 LPRINT "TL1,0;PU;PA1100,279;PD;" 
20 LPRINT "IN;PA300,279;SP2;PD;TL90;XT;"; 
90 GOSUB 1000 
100 LPRINT "TL0,5;PU;PA1900,279;" 
110 GOSUB 1000 
120 LPRINT "PA300,6759;TL80;YT;PU;" 
130 END 
1000 '* SUBROUTINE DRAW TICKS * 
1010 FOR J=1 TO 8 
1020 LPRINT "PRO,720;YT;" 
1030 NEXT J 
1040 RETURN 
 
<Sample 77>