unit DotMatrix;

interface

type TDotZeichen = packed record
  case Byte of
    0: (Str: ShortString);
    1: (Bytes: array[0..8] of Byte);
  end;
 
var
  DotZeichen: array[0..255] of TDotZeichen;

implementation
//Spaltenweise!!!!
begin

  //DotZeichen[ASCII wert Zeichen].bytes -> je nach Anzahl der Spalten die Spalten Werte
  //DotZeichen[32].str := chr(0);                                                         // leerzeichen
  DotZeichen[33].str := chr(95);                                                                      // !
  DotZeichen[34].str := chr(2)+chr(2);                                                                // "
  DotZeichen[35].str := chr(40)+chr(124)+chr(40)+chr(124)+chr(40);                                    // #
  DotZeichen[36].str := chr(76)+chr(254)+chr(254)+chr(100);                                           // $
  DotZeichen[37].str := chr(76)+chr(44)+chr(16)+chr(104)+chr(100);                                    // %
  DotZeichen[38].str := chr(60)+chr(74)+chr(82)+chr(57)+chr(64);                                      // &
  DotZeichen[39].str := chr(2);                                                                       // '
  DotZeichen[40].str := chr(62)+chr(65);                                                              // (
  DotZeichen[41].str := chr(65)+chr(62);                                                              // )
  DotZeichen[42].str := chr(8)+chr(28)+chr(62)+chr(28)+chr(8);                                        // *
  DotZeichen[43].str := chr(8)+chr(8)+chr(62)+chr(8)+chr(8);                                     // +
  DotZeichen[44].str := chr(192);                                                                     // +
  DotZeichen[45].str := chr(8)+chr(8)+chr(8)+chr(8);                                              // -
  DotZeichen[46].str := chr(64);                                                                      // .
  DotZeichen[47].str := chr(64)+chr(16)+chr(4)+chr(1);                                                // /
  DotZeichen[48].str := chr(62)+chr(69)+chr(81)+chr(62);                                      // 0
  DotZeichen[49].str := chr(2)+chr(127);                                                     // 1
  DotZeichen[50].str := chr(113)+chr(73)+chr(73)+chr(70);                                      // 2
  DotZeichen[51].str := chr(73)+chr(73)+chr(73)+chr(54);                                      // 3
  DotZeichen[52].str := chr(15)+chr(8)+chr(8)+chr(127);                                               // 4
  DotZeichen[53].str := chr(79)+chr(73)+chr(73)+chr(49);                                              // 5
  DotZeichen[54].str := chr(62)+chr(73)+chr(73)+chr(49);                                              // 6
  DotZeichen[55].str := chr(1)+chr(121)+chr(5)+chr(3);    // 7
  DotZeichen[56].str := chr(54)+chr(73)+chr(73)+chr(54);  // 8
  DotZeichen[57].str := chr(70)+chr(73)+chr(73)+chr(62);  // 9
  DotZeichen[58].str := chr(40);                          // :
  DotZeichen[59].str := chr(64)+chr(40);                  // ;
  DotZeichen[60].str := chr(8)+chr(20)+chr(34);   // <
  DotZeichen[61].str := chr(40)+chr(40)+chr(40);          // =
  DotZeichen[62].str := chr(34)+chr(20)+chr(8);   // >
  DotZeichen[63].str := chr(2)+chr(1)+chr(89)+chr(6);     // ?
  DotZeichen[64].str := chr(62)+chr(65)+chr(93)+chr(85)+chr(93)+chr(81)+chr(14);   // @
  DotZeichen[65].str := chr(126)+chr(9)+chr(9)+chr(126);  // A
  DotZeichen[66].str := chr(127)+chr(73)+chr(73)+chr(54);   // B
  DotZeichen[67].str := chr(62)+chr(65)+chr(65)+chr(34);   // C
  DotZeichen[68].str := chr(127)+chr(65)+chr(65)+chr(62);   // D
  DotZeichen[69].str := chr(127)+chr(73)+chr(73)+chr(65);   // E
  DotZeichen[70].str := chr(127)+chr(9)+chr(9)+chr(1);   // F
  DotZeichen[71].str := chr(62)+chr(65)+chr(73)+chr(122);          // G
  DotZeichen[72].str := chr(127)+chr(8)+chr(8)+chr(127);   // H
  DotZeichen[73].str := chr(65)+chr(127)+chr(65);     // I
  DotZeichen[74].str := chr(64)+chr(128)+chr(128)+chr(127);   // J
  DotZeichen[75].str := chr(127)+chr(8)+chr(20)+chr(99);  // K
  DotZeichen[76].str := chr(127)+chr(64)+chr(64)+chr(64);   // L
  DotZeichen[77].str := chr(127)+chr(2)+chr(4)+chr(2)+chr(127);   // M
  DotZeichen[78].str := chr(127)+chr(6)+chr(8)+chr(48)+chr(127);   // N
  DotZeichen[79].str := chr(62)+chr(65)+chr(65)+chr(65)+chr(62);   // O
  DotZeichen[80].str := chr(127)+chr(9)+chr(9)+chr(6);   // P
  DotZeichen[81].str := chr(62)+chr(65)+chr(65)+chr(97)+chr(190);          // Q
  DotZeichen[82].str := chr(127)+chr(25)+chr(41)+chr(70);   // R
  DotZeichen[83].str := chr(70)+chr(73)+chr(73)+chr(49);     // S
  DotZeichen[84].str := chr(1)+chr(1)+chr(127)+chr(1)+chr(1);   // T
  DotZeichen[85].str := chr(63)+chr(64)+chr(64)+chr(64)+chr(63);  // U
  DotZeichen[86].str := chr(15)+chr(48)+chr(64)+chr(48)+chr(15);   // V
  DotZeichen[87].str := chr(63)+chr(64)+chr(48)+chr(8)+chr(48)+chr(64)+chr(63);   // W
  DotZeichen[88].str := chr(99)+chr(20)+chr(8)+chr(20)+chr(99);   // X
  DotZeichen[89].str := chr(3)+chr(4)+chr(120)+chr(4)+chr(3);   // Y
  DotZeichen[90].str := chr(97)+chr(81)+chr(73)+chr(69)+chr(67);   // Z
  DotZeichen[91].str := chr(127)+chr(65)+chr(65);          // [
  DotZeichen[92].str := chr(1)+chr(4)+chr(16)+chr(64);   // \
  DotZeichen[93].str := chr(65)+chr(65)+chr(127);    // ]
  DotZeichen[94].str := chr(2)+chr(1)+chr(2);   // ^
  DotZeichen[95].str := chr(64)+chr(64)+chr(64)+chr(64);  // _
  DotZeichen[96].str := chr(1)+chr(2);   // `
  DotZeichen[97].str := chr(32)+chr(84)+chr(84)+chr(120);   // a
  DotZeichen[98].str := chr(127)+chr(72)+chr(72)+chr(48);   // b
  DotZeichen[99].str := chr(56)+chr(68)+chr(68)+chr(40);   // c
  DotZeichen[100].str := chr(56)+chr(68)+chr(68)+chr(127);   // d
  DotZeichen[101].str := chr(56)+chr(84)+chr(84)+chr(24);         // e
  DotZeichen[102].str := chr(8)+chr(126)+chr(9);   // f
  DotZeichen[103].str := chr(152)+chr(164)+chr(164)+chr(124);    // g
  DotZeichen[104].str := chr(127)+chr(4)+chr(120);   // h
  DotZeichen[105].str := chr(125);  // i
  DotZeichen[106].str := chr(128)+chr(122);   // j
  DotZeichen[107].str := chr(127)+chr(24)+chr(100);   // k
  DotZeichen[108].str := chr(127);   // l
  DotZeichen[109].str := chr(124)+chr(4)+chr(120)+chr(4)+chr(120);   // m
  DotZeichen[110].str := chr(124)+chr(4)+chr(4)+chr(120);   // n
  DotZeichen[111].str := chr(56)+chr(68)+chr(68)+chr(56);         // o
  DotZeichen[112].str := chr(248)+chr(36)+chr(36)+chr(24);   // p
  DotZeichen[113].str := chr(24)+chr(36)+chr(36)+chr(248);    // q
  DotZeichen[114].str := chr(124)+chr(8)+chr(4);   // r
  DotZeichen[115].str := chr(72)+chr(84)+chr(84)+chr(36);  // s
  DotZeichen[116].str := chr(4)+chr(63)+chr(68);   // t
  DotZeichen[117].str := chr(60)+chr(64)+chr(64)+chr(124);   // u
  DotZeichen[118].str := chr(60)+chr(64)+chr(60);   // v
  DotZeichen[119].str := chr(124)+chr(32)+chr(16)+chr(32)+chr(124);   // w
  DotZeichen[120].str := chr(108)+chr(16)+chr(108);   // x
  DotZeichen[121].str := chr(28)+chr(160)+chr(252);   // y
  DotZeichen[122].str := chr(100)+chr(84)+chr(12)+chr(68);   // z
  DotZeichen[123].str := chr(8)+chr(119)+chr(65);    // {
  DotZeichen[124].str := chr(255);   // |
  DotZeichen[125].str := chr(65)+chr(119)+chr(8);  // }
  DotZeichen[126].str := chr(8)+chr(4)+chr(8)+chr(4);   // ~
  DotZeichen[0128].str := chr(60)+chr(90)+chr(90)+chr(66)+chr(36); //€
  DotZeichen[129].str := chr(60)+chr(65)+chr(65)+chr(124);   // ü
  DotZeichen[132].str := chr(56)+chr(69)+chr(69)+chr(124);   // ä
  DotZeichen[142].str := chr(125)+chr(18)+chr(18)+chr(125);   // Ä
  DotZeichen[148].str := chr(56)+chr(69)+chr(69)+chr(56);   // ö
  DotZeichen[153].str := chr(60)+chr(67)+chr(67)+chr(60);   // Ö  
  DotZeichen[154].str := chr(60)+chr(65)+chr(65)+chr(60);   // Ü 
  DotZeichen[167].str := chr(2)+chr(5)+chr(2);   // ° 
  DotZeichen[225].str := chr(254)+chr(1)+chr(73)+chr(54);   // ß

  DotZeichen[254].str := chr(70)+chr(73)+chr(73)+chr(53)+chr(127)+chr(68)+chr(72)+chr(72)+chr(28)+chr(8);   // StL->


end.