Subversion Repositories AndroidProjects

Rev

Blame | Last modification | View Log | RSS feed

Define CharList
 ( 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P',
   'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z', 'a', 'b', 'c', 'd', 'e', 'f',
   'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v',
   'w', 'x', 'y', 'z', '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', '!',"'",
   '"', ',', '.', '?');

Define WidthList
 (  12,  12,  12,  12,  12,  12,  12,  12,   6,  12,  12,  12,  12,  12,  12,  12,
    12,  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,
    12,  12,   6,  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,
    12,  12,  12,  12,  12,   9,  12,  12,  12,  12,  12,  12,  12,  12,   6,   6,
    10,   6,   6,  12);

Define RectList
 ( (   0,  0,  9, 12), (  10,  0,  9, 12), (  20,  0,  9, 12), (  30,  0,  9, 12),
   (  40,  0,  9, 12), (  50,  0,  9, 12), (  60,  0,  9, 12), (  70,  0,  9, 12),
   (  80,  0,  3, 12), (  84,  0,  9, 12), (  94,  0,  9, 12), ( 104,  0,  9, 12),
   ( 114,  0,  9, 12), ( 124,  0,  9, 12), ( 134,  0,  9, 12), ( 144,  0,  9, 12),
   ( 154,  0,  9, 12), ( 164,  0,  9, 12), ( 174,  0,  9, 12), ( 184,  0,  9, 12),
   ( 194,  0,  9, 12), ( 204,  0,  9, 12), ( 214,  0,  9, 12), ( 224,  0,  9, 12),
   ( 234,  0,  9, 12), ( 244,  0,  9, 12), ( 254,  0,  9, 12), ( 264,  0,  9, 12),
   ( 274,  0,  9, 12), ( 284,  0,  9, 12), ( 294,  0,  9, 12), ( 304,  0,  9, 12),
   ( 314,  0,  9, 12), ( 324,  0,  9, 12), ( 334,  0,  3, 12), ( 338,  0,  9, 12),
   ( 348,  0,  9, 12), ( 358,  0,  9, 12), ( 368,  0,  9, 12), ( 378,  0,  9, 12),
   ( 388,  0,  9, 12), ( 398,  0,  9, 12), ( 408,  0,  9, 12), ( 418,  0,  9, 12),
   ( 428,  0,  9, 12), ( 438,  0,  9, 12), ( 448,  0,  9, 12), ( 458,  0,  9, 12),
   ( 468,  0,  9, 12), ( 478,  0,  9, 12), ( 488,  0,  9, 12), ( 498,  0,  9, 12),
   ( 508,  0, 10, 12), ( 519,  0,  6, 12), ( 526,  0,  9, 12), ( 536,  0,  9, 12),
   ( 546,  0,  9, 12), ( 556,  0,  9, 12), ( 566,  0,  9, 12), ( 576,  0,  9, 12),
   ( 586,  0,  9, 12), ( 596,  0,  9, 12), ( 606,  0,  3, 12), ( 610,  0,  3, 12),
   ( 614,  0,  8, 12), ( 623,  0,  3, 12), ( 627,  0,  3, 12), ( 631,  0,  9, 12));

Define OffsetList
 ( ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0));

CreateLayer               Main;
LayerSetImage             Main 'Kiloton9';
LayerSetAscent            Main 10;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (6);
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 9;

SetDefaultPointSize  9;