TKFAXIN4 ;PG&A,TK-FAX,1.11,FONT INITIALIZATION;
 ;
 F J=1:1 S A=$P($T(DATA+J),";;",2,99) Q:A=""  S L="L=$C("_$P(A,";",3)_")",@L,D=D_L S:A["*" ^TKFAXF(+A,.1,+$P(A,";",2))=D,D=""
 G ^TKFAXIN5
 ;
DATA ;
 ;;13;6*;37,13,7,4,3,5,10,10,2,19,1,11
 ;;13;7;1,2,1,3,10,11,15,1,2,6,1,1,2,1,2,21,9,18,18,7,19,7,7,2,7,14,2,2,19,1,6,2,27,13,9,7,27,18,6,5,13,7,7,13,18,11,11,14,6,31,13,7,2,7,2,11,11,2,4,7,34,7,1,1,1,15,9,7,5,7,10,8,13,7,13,13,7,11,13,7,9,9,6,9,2,38,2,3,11,8
 ;;13;7*;18,33,2,32,1,4
 ;;13;8;17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17
 ;;13;8*;17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17
 ;;13;9*;1,1,1,1,1,1,1,1,1,1,1,1,6,1,1,1,1,1,1,1,1,1,1,1,1,1,1,6,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,14,1,1,7,1,1,1,1,1,6,36,1,1,1,1,1,1,1,14,1,1,1,1,1,1
 ;;20;1;39,40,41,41,43,39,55,61,63,61,39,39,39,39,39,69,71,40,78,78,81,68,86,66,78,78,39,39,63,39,61,78,71,89,66,93,94,68,68,93,49,97,98,49,67,54,54,55,85,46,85,78,66,60,112,54,54,112,42,113,62,113,114,39,52,39,67,39,87
 ;;20;1*;39,80,39,67,40,70,67,120,39,39,39,39,39,39,39,40,39,39,39,39,39,39,135,51,111,137,39
 ;;20;2;39,40,41,41,44,49,56,61,40,52,49,40,39,39,39,70,72,77,49,41,82,67,64,70,49,49,40,40,40,39,52,49,54,65,92,53,50,67,67,53,49,40,70,49,67,100,103,41,49,60,49,49,40,60,112,54,49,83,79,61,67,51,55,39,52,39,67,39,87,39
 ;;20;2*;82,39,67,39,39,67,40,39,39,39,39,39,39,39,40,39,39,39,39,39,39,52,51,40,138,114
 ;;20;3;39,40,41,42,45,50,57,62,64,51,65,40,39,39,39,63,73,40,79,70,41,85,67,87,49,49,40,40,64,68,51,79,90,49,92,62,49,67,67,62,49,40,70,50,67,101,104,54,49,60,49,111,40,60,112,54,65,56,87,61,64,51,41,39,40,46,66,46,85,78
 ;;20;3*;52,44,118,120,70,83,40,122,85,78,71,48,128,88,97,83,60,54,49,60,68,40,51,52,39,55
 ;;20;4;39,40,39,41,46,51,58,39,64,51,42,66,39,68,39,40,74,40,80,80,83,79,85,63,78,88,39,39,67,39,87,87,91,49,66,62,49,94,94,62,68,40,70,94,67,102,105,54,85,60,85,55,40,60,83,74,55,57,51,61,40,51,54,39,39,70,49,60,117,49
 ;;20;4*;113,117,119,40,70,121,40,123,49,49,126,59,129,67,40,83,60,74,65,60,87,136,39,131,39,41
 ;;20;5;39,40,39,42,47,52,59,39,64,51,65,40,39,39,39,64,75,40,64,70,84,79,49,51,49,79,39,39,64,39,51,51,90,68,92,62,49,67,67,95,49,40,60,50,67,74,106,54,67,108,50,98,40,60,56,102,65,40,52,61,63,51,39,39,39,71,49,62,117,68
 ;;20;5*;52,117,49,40,70,94,40,124,49,49,126,59,61,78,40,83,50,134,89,60,89,40,51,52,39,54
 ;;20;6;39,39,39,41,48,53,60,39,40,52,49,40,52,39,52,67,76,40,67,41,70,49,49,40,49,87,40,40,40,68,52,39,62,49,92,53,50,67,67,53,49,40,99,49,67,54,107,41,67,109,49,49,40,99,57,100,41,40,67,61,70,51,39,39,39,60,49,60,117,67
 ;;20;6*;52,117,49,40,60,121,40,125,49,49,126,59,61,79,130,83,133,68,65,66,64,52,51,40,39,54
 ;;20;7;39,40,39,41,43,54,58,39,63,61,39,39,52,39,52,62,71,44,68,78,70,78,44,40,78,89,40,40,63,39,61,51,46,49,66,93,94,68,67,96,49,97,46,49,68,54,54,55,67,110,49,78,40,85,40,54,54,40,42,113,69,113,39,39,39,116,66,46,85,78
 ;;20;7*;52,44,49,57,60,83,57,112,49,78,71,48,61,85,131,132,120,41,49,87,68,135,51,111,39,42