Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 1067 | chris | 1 | Define CharList |
| 2 | ( '0', '1', '2', '3', '4', '5', '6', '7', '8', '9'); |
||
| 3 | |||
| 4 | Define WidthList |
||
| 5 | ( 9, 7, 14, 10, 13, 9, 10, 10, 11, 10); |
||
| 6 | |||
| 7 | Define RectList |
||
| 8 | ( ( 0, 0, 9, 34), ( 10, 0, 8, 34), ( 19, 0, 16, 34), ( 36, 0, 13, 34), |
||
| 9 | ( 50, 0, 14, 34), ( 65, 0, 14, 34), ( 80, 0, 9, 34), ( 90, 0, 11, 34), |
||
| 10 | ( 102, 0, 12, 34), ( 115, 0, 11, 34)); |
||
| 11 | |||
| 12 | Define OffsetList |
||
| 13 | ( ( 0, 0), ( 0, 0), (-2, 0), (-2, 0), ( 0, 0), (-2, 0), ( 0, 0), ( 0, 0), |
||
| 14 | ( 0, 0), ( 0, 0)); |
||
| 15 | |||
| 16 | CreateLayer Main; |
||
| 17 | LayerSetImage Main 'VinerHandITC16'; |
||
| 18 | LayerSetAscent Main 21; |
||
| 19 | LayerSetCharWidths Main CharList WidthList; |
||
| 20 | LayerSetCharWidths Main (' ') (5); |
||
| 21 | LayerSetImageMap Main CharList RectList; |
||
| 22 | LayerSetCharOffsets Main CharList OffsetList; |
||
| 23 | LayerSetAscentPadding Main 0; |
||
| 24 | LayerSetLineSpacingOffset Main 0; |
||
| 25 | LayerSetPointSize Main 16; |
||
| 26 | |||
| 27 | SetDefaultPointSize 16; |