PROGRAM ORGINEEL;

Uses Crt,Dos;

Type
  ByteArray = Array[0..15] of Byte;
  Chararray = Array[0..255] of Record
  CN        : Byte;
  CD        : Bytearray;
End;

Const
  NewChars  : CharArray =

 ((CN:0;CD:(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)),
  (CN:1;CD:(0,0,126,129,165,129,129,189,153,129,129,126,0,0,0,0)),
  (CN:2;CD:(0,0,126,255,219,255,255,195,231,255,255,126,0,0,0,0)),
  (CN:3;CD:(0,0,0,0,108,254,254,254,254,124,56,16,0,0,0,0)),
  (CN:4;CD:(0,0,0,0,16,56,124,254,124,56,16,0,0,0,0,0)),
  (CN:5;CD:(0,0,0,24,60,60,231,231,231,153,24,60,0,0,0,0)),
  (CN:6;CD:(0,0,0,24,60,126,255,255,126,24,24,60,0,0,0,0)),
  (CN:7;CD:(0,0,0,0,0,0,24,60,60,24,0,0,0,0,0,0)),
  (CN:8;CD:(255,255,255,255,255,255,231,195,195,231,255,255,255,255,255,255)),
  (CN:9;CD:(0,0,0,0,0,60,102,66,66,102,60,0,0,0,0,0)),
  (CN:10;CD:(255,255,255,255,255,195,153,189,189,153,195,255,255,255,255,255)),
  (CN:11;CD:(0,0,30,14,26,50,120,204,204,204,204,120,0,0,0,0)),
  (CN:12;CD:(0,0,60,102,102,102,102,60,24,126,24,24,0,0,0,0)),
  (CN:13;CD:(0,0,63,51,63,48,48,48,48,112,240,224,0,0,0,0)),
  (CN:14;CD:(0,0,127,99,127,99,99,99,99,103,231,230,192,0,0,0)),
  (CN:15;CD:(0,0,0,24,24,219,60,231,60,219,24,24,0,0,0,0)),
  (CN:16;CD:(0,128,192,224,240,248,254,248,240,224,192,128,0,0,0,0)),
  (CN:17;CD:(0,2,6,14,30,62,254,62,30,14,6,2,0,0,0,0)),
  (CN:18;CD:(0,0,24,60,126,24,24,24,24,126,60,24,0,0,0,0)),
  (CN:19;CD:(0,0,102,102,102,102,102,102,102,0,102,102,0,0,0,0)),
  (CN:20;CD:(0,0,127,219,219,219,123,27,27,27,27,27,0,0,0,0)),
  (CN:21;CD:(0,124,198,96,56,108,198,198,108,56,12,198,124,0,0,0)),
  (CN:22;CD:(0,0,0,0,0,0,0,0,254,254,254,254,0,0,0,0)),
  (CN:23;CD:(0,0,24,60,126,24,24,24,24,126,60,24,126,0,0,0)),
  (CN:24;CD:(0,0,24,60,126,24,24,24,24,24,24,24,0,0,0,0)),
  (CN:25;CD:(0,0,24,24,24,24,24,24,24,126,60,24,0,0,0,0)),
  (CN:26;CD:(0,0,0,0,0,24,12,254,12,24,0,0,0,0,0,0)),
  (CN:27;CD:(0,0,0,0,0,48,96,254,96,48,0,0,0,0,0,0)),
  (CN:28;CD:(0,0,0,0,0,192,192,192,192,254,0,0,0,0,0,0)),
  (CN:29;CD:(0,0,0,0,0,36,102,255,102,36,0,0,0,0,0,0)),
  (CN:30;CD:(0,0,0,0,16,56,56,124,124,254,254,0,0,0,0,0)),
  (CN:31;CD:(0,0,0,0,254,254,124,124,56,56,16,0,0,0,0,0)),
  (CN:32;CD:(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)),
  (CN:33;CD:(0,0,24,60,60,60,24,24,24,0,24,24,0,0,0,0)),
  (CN:34;CD:(0,99,99,99,34,0,0,0,0,0,0,0,0,0,0,0)),
  (CN:35;CD:(0,0,0,108,108,254,108,108,108,254,108,108,0,0,0,0)),
  (CN:36;CD:(24,24,124,198,194,192,124,6,134,198,124,24,24,0,0,0)),
  (CN:37;CD:(0,0,0,0,194,198,12,24,48,96,198,134,0,0,0,0)),
  (CN:38;CD:(0,0,56,108,108,56,118,220,204,204,204,118,0,0,0,0)),
  (CN:39;CD:(0,48,48,48,96,0,0,0,0,0,0,0,0,0,0,0)),
  (CN:40;CD:(0,0,12,24,48,48,48,48,48,48,24,12,0,0,0,0)),
  (CN:41;CD:(0,0,48,24,12,12,12,12,12,12,24,48,0,0,0,0)),
  (CN:42;CD:(0,0,0,0,0,102,60,255,60,102,0,0,0,0,0,0)),
  (CN:43;CD:(0,0,0,0,0,24,24,255,24,24,0,0,0,0,0,0)),
  (CN:44;CD:(0,0,0,0,0,0,0,0,0,24,24,24,48,0,0,0)),
  (CN:45;CD:(0,0,0,0,0,0,0,255,0,0,0,0,0,0,0,0)),
  (CN:46;CD:(0,0,0,0,0,0,0,0,0,0,24,24,0,0,0,0)),
  (CN:47;CD:(0,0,0,0,2,6,12,24,48,96,192,128,0,0,0,0)),
  (CN:48;CD:(0,0,124,198,198,206,214,214,230,198,198,124,0,0,0,0)),
  (CN:49;CD:(0,0,24,56,120,24,24,24,24,24,24,126,0,0,0,0)),
  (CN:50;CD:(0,0,124,198,6,12,24,48,96,192,198,254,0,0,0,0)),
  (CN:51;CD:(0,0,124,198,6,6,60,6,6,6,198,124,0,0,0,0)),
  (CN:52;CD:(0,0,12,28,60,108,204,254,12,12,12,30,0,0,0,0)),
  (CN:53;CD:(0,0,254,192,192,192,252,14,6,6,198,124,0,0,0,0)),
  (CN:54;CD:(0,0,56,96,192,192,252,198,198,198,198,124,0,0,0,0)),
  (CN:55;CD:(0,0,254,198,6,6,12,24,48,48,48,48,0,0,0,0)),
  (CN:56;CD:(0,0,124,198,198,198,124,198,198,198,198,124,0,0,0,0)),
  (CN:57;CD:(0,0,124,198,198,198,126,6,6,6,12,120,0,0,0,0)),
  (CN:58;CD:(0,0,0,0,24,24,0,0,0,24,24,0,0,0,0,0)),
  (CN:59;CD:(0,0,0,0,24,24,0,0,0,24,24,48,0,0,0,0)),
  (CN:60;CD:(0,0,0,6,12,24,48,96,48,24,12,6,0,0,0,0)),
  (CN:61;CD:(0,0,0,0,0,0,254,0,0,254,0,0,0,0,0,0)),
  (CN:62;CD:(0,0,0,96,48,24,12,6,12,24,48,96,0,0,0,0)),
  (CN:63;CD:(0,0,124,198,198,12,24,24,24,0,24,24,0,0,0,0)),
  (CN:64;CD:(0,0,0,124,198,198,222,222,222,220,192,124,0,0,0,0)),
  (CN:65;CD:(0,0,16,56,108,198,198,254,198,198,198,198,0,0,0,0)),
  (CN:66;CD:(0,0,252,102,102,102,124,102,102,102,102,252,0,0,0,0)),
  (CN:67;CD:(0,0,60,102,194,192,192,192,192,194,102,60,0,0,0,0)),
  (CN:68;CD:(0,0,248,108,102,102,102,102,102,102,108,248,0,0,0,0)),
  (CN:69;CD:(0,0,254,102,98,104,120,104,96,98,102,254,0,0,0,0)),
  (CN:70;CD:(0,0,254,102,98,104,120,104,96,96,96,240,0,0,0,0)),
  (CN:71;CD:(0,0,60,102,194,192,192,222,198,198,102,58,0,0,0,0)),
  (CN:72;CD:(0,0,198,198,198,198,254,198,198,198,198,198,0,0,0,0)),
  (CN:73;CD:(0,0,60,24,24,24,24,24,24,24,24,60,0,0,0,0)),
  (CN:74;CD:(0,0,30,12,12,12,12,12,204,204,204,120,0,0,0,0)),
  (CN:75;CD:(0,0,230,102,108,108,120,120,108,102,102,230,0,0,0,0)),
  (CN:76;CD:(0,0,240,96,96,96,96,96,96,98,102,254,0,0,0,0)),
  (CN:77;CD:(0,0,195,231,255,219,219,195,195,195,195,195,0,0,0,0)),
  (CN:78;CD:(0,0,198,230,246,254,222,206,198,198,198,198,0,0,0,0)),
  (CN:79;CD:(0,0,56,108,198,198,198,198,198,198,108,56,0,0,0,0)),
  (CN:80;CD:(0,0,252,102,102,102,124,96,96,96,96,240,0,0,0,0)),
  (CN:81;CD:(0,0,124,198,198,198,198,198,198,214,222,124,12,14,0,0)),
  (CN:82;CD:(0,0,252,102,102,102,124,108,102,102,102,230,0,0,0,0)),
  (CN:83;CD:(0,0,124,198,198,96,56,12,6,198,198,124,0,0,0,0)),
  (CN:84;CD:(0,0,255,219,153,24,24,24,24,24,24,60,0,0,0,0)),
  (CN:85;CD:(0,0,198,198,198,198,198,198,198,198,198,124,0,0,0,0)),
  (CN:86;CD:(0,0,198,198,198,198,198,198,198,108,56,16,0,0,0,0)),
  (CN:87;CD:(0,0,195,195,195,195,195,219,219,255,102,102,0,0,0,0)),
  (CN:88;CD:(0,0,198,198,108,108,56,56,108,108,198,198,0,0,0,0)),
  (CN:89;CD:(0,0,102,102,102,102,60,24,24,24,24,60,0,0,0,0)),
  (CN:90;CD:(0,0,255,195,131,6,12,24,48,97,195,255,0,0,0,0)),
  (CN:91;CD:(0,0,62,48,48,48,48,48,48,48,48,62,0,0,0,0)),
  (CN:92;CD:(0,0,0,128,192,224,112,56,28,14,6,2,0,0,0,0)),
  (CN:93;CD:(0,0,62,6,6,6,6,6,6,6,6,62,0,0,0,0)),
  (CN:94;CD:(16,56,108,198,0,0,0,0,0,0,0,0,0,0,0,0)),
  (CN:95;CD:(0,0,0,0,0,0,0,0,0,0,0,0,0,255,0,0)),
  (CN:96;CD:(48,48,24,0,0,0,0,0,0,0,0,0,0,0,0,0)),
  (CN:97;CD:(0,0,0,0,0,120,12,124,204,204,204,118,0,0,0,0)),
  (CN:98;CD:(0,0,224,96,96,120,108,102,102,102,102,220,0,0,0,0)),
  (CN:99;CD:(0,0,0,0,0,124,198,192,192,192,198,124,0,0,0,0)),
  (CN:100;CD:(0,0,28,12,12,60,108,204,204,204,204,118,0,0,0,0)),
  (CN:101;CD:(0,0,0,0,0,124,198,254,192,192,198,124,0,0,0,0)),
  (CN:102;CD:(0,0,56,108,100,96,240,96,96,96,96,240,0,0,0,0)),
  (CN:103;CD:(0,0,0,0,0,118,204,204,204,204,204,124,12,204,120,0)),
  (CN:104;CD:(0,0,224,96,96,108,118,102,102,102,102,230,0,0,0,0)),
  (CN:105;CD:(0,0,24,24,0,56,24,24,24,24,24,60,0,0,0,0)),
  (CN:106;CD:(0,0,6,6,0,14,6,6,6,6,6,6,102,102,60,0)),
  (CN:107;CD:(0,0,224,96,96,102,108,120,120,108,102,230,0,0,0,0)),
  (CN:108;CD:(0,0,56,24,24,24,24,24,24,24,24,60,0,0,0,0)),
  (CN:109;CD:(0,0,0,0,0,230,255,219,219,219,219,219,0,0,0,0)),
  (CN:110;CD:(0,0,0,0,0,220,102,102,102,102,102,102,0,0,0,0)),
  (CN:111;CD:(0,0,0,0,0,124,198,198,198,198,198,124,0,0,0,0)),
  (CN:112;CD:(0,0,0,0,0,220,102,102,102,102,102,124,96,96,240,0)),
  (CN:113;CD:(0,0,0,0,0,118,204,204,204,204,204,124,12,12,30,0)),
  (CN:114;CD:(0,0,0,0,0,220,118,98,96,96,96,240,0,0,0,0)),
  (CN:115;CD:(0,0,0,0,0,124,198,96,56,12,198,124,0,0,0,0)),
  (CN:116;CD:(0,0,16,48,48,252,48,48,48,48,54,28,0,0,0,0)),
  (CN:117;CD:(0,0,0,0,0,204,204,204,204,204,204,118,0,0,0,0)),
  (CN:118;CD:(0,0,0,0,0,102,102,102,102,102,60,24,0,0,0,0)),
  (CN:119;CD:(0,0,0,0,0,195,195,195,219,219,255,102,0,0,0,0)),
  (CN:120;CD:(0,0,0,0,0,198,108,56,56,56,108,198,0,0,0,0)),
  (CN:121;CD:(0,0,0,0,0,198,198,198,198,198,198,126,6,12,248,0)),
  (CN:122;CD:(0,0,0,0,0,254,204,24,48,96,198,254,0,0,0,0)),
  (CN:123;CD:(0,0,14,24,24,24,112,24,24,24,24,14,0,0,0,0)),
  (CN:124;CD:(0,0,24,24,24,24,0,24,24,24,24,24,0,0,0,0)),
  (CN:125;CD:(0,0,112,24,24,24,14,24,24,24,24,112,0,0,0,0)),
  (CN:126;CD:(0,0,118,220,0,0,0,0,0,0,0,0,0,0,0,0)),
  (CN:127;CD:(0,0,0,0,16,56,108,198,198,198,254,0,0,0,0,0)),
  (CN:128;CD:(0,0,60,102,194,192,192,192,194,102,60,12,6,124,0,0)),
  (CN:129;CD:(0,0,204,204,0,204,204,204,204,204,204,118,0,0,0,0)),
  (CN:130;CD:(0,12,24,48,0,124,198,254,192,192,198,124,0,0,0,0)),
  (CN:131;CD:(0,16,56,108,0,120,12,124,204,204,204,118,0,0,0,0)),
  (CN:132;CD:(0,0,204,204,0,120,12,124,204,204,204,118,0,0,0,0)),
  (CN:133;CD:(0,96,48,24,0,120,12,124,204,204,204,118,0,0,0,0)),
  (CN:134;CD:(0,56,108,56,0,120,12,124,204,204,204,118,0,0,0,0)),
  (CN:135;CD:(0,0,0,0,60,102,96,96,102,60,12,6,60,0,0,0)),
  (CN:136;CD:(0,16,56,108,0,124,198,254,192,192,198,124,0,0,0,0)),
  (CN:137;CD:(0,0,198,198,0,124,198,254,192,192,198,124,0,0,0,0)),
  (CN:138;CD:(0,96,48,24,0,124,198,254,192,192,198,124,0,0,0,0)),
  (CN:139;CD:(0,0,102,102,0,56,24,24,24,24,24,60,0,0,0,0)),
  (CN:140;CD:(0,24,60,102,0,56,24,24,24,24,24,60,0,0,0,0)),
  (CN:141;CD:(0,96,48,24,0,56,24,24,24,24,24,60,0,0,0,0)),
  (CN:142;CD:(0,198,198,16,56,108,198,198,254,198,198,198,0,0,0,0)),
  (CN:143;CD:(56,108,56,0,56,108,198,198,254,198,198,198,0,0,0,0)),
  (CN:144;CD:(24,48,96,0,254,102,96,124,96,96,102,254,0,0,0,0)),
  (CN:145;CD:(0,0,0,0,0,110,59,27,126,216,220,119,0,0,0,0)),
  (CN:146;CD:(0,0,62,108,204,204,254,204,204,204,204,206,0,0,0,0)),
  (CN:147;CD:(0,16,56,108,0,124,198,198,198,198,198,124,0,0,0,0)),
  (CN:148;CD:(0,0,198,198,0,124,198,198,198,198,198,124,0,0,0,0)),
  (CN:149;CD:(0,96,48,24,0,124,198,198,198,198,198,124,0,0,0,0)),
  (CN:150;CD:(0,48,120,204,0,204,204,204,204,204,204,118,0,0,0,0)),
  (CN:151;CD:(0,96,48,24,0,204,204,204,204,204,204,118,0,0,0,0)),
  (CN:152;CD:(0,0,198,198,0,198,198,198,198,198,198,126,6,12,120,0)),
  (CN:153;CD:(0,198,198,0,56,108,198,198,198,198,108,56,0,0,0,0)),
  (CN:154;CD:(0,198,198,0,198,198,198,198,198,198,198,124,0,0,0,0)),
  (CN:155;CD:(0,24,24,60,102,96,96,96,102,60,24,24,0,0,0,0)),
  (CN:156;CD:(0,56,108,100,96,240,96,96,96,96,230,252,0,0,0,0)),
  (CN:157;CD:(0,0,195,102,60,24,126,24,126,24,24,24,0,0,0,0)),
  (CN:158;CD:(0,252,102,102,124,98,102,111,102,102,102,243,0,0,0,0)),
  (CN:159;CD:(0,14,27,24,24,24,126,24,24,24,24,24,216,112,0,0)),
  (CN:160;CD:(0,24,48,96,0,120,12,124,204,204,204,118,0,0,0,0)),
  (CN:161;CD:(0,12,24,48,0,56,24,24,24,24,24,60,0,0,0,0)),
  (CN:162;CD:(0,24,48,96,0,124,198,198,198,198,198,124,0,0,0,0)),
  (CN:163;CD:(0,24,48,96,0,204,204,204,204,204,204,118,0,0,0,0)),
  (CN:164;CD:(0,0,118,220,0,220,102,102,102,102,102,102,0,0,0,0)),
  (CN:165;CD:(118,220,0,198,230,246,254,222,206,198,198,198,0,0,0,0)),
  (CN:166;CD:(0,60,108,108,62,0,126,0,0,0,0,0,0,0,0,0)),
  (CN:167;CD:(0,56,108,108,56,0,124,0,0,0,0,0,0,0,0,0)),
  (CN:168;CD:(0,0,48,48,0,48,48,96,192,198,198,124,0,0,0,0)),
  (CN:169;CD:(0,0,0,0,0,0,254,192,192,192,192,0,0,0,0,0)),
  (CN:170;CD:(0,0,0,0,0,0,254,6,6,6,6,0,0,0,0,0)),
  (CN:171;CD:(0,192,192,194,198,204,24,48,96,206,147,6,12,31,0,0)),
  (CN:172;CD:(0,192,192,194,198,204,24,48,102,206,154,63,6,15,0,0)),
  (CN:173;CD:(0,0,24,24,0,24,24,24,60,60,60,24,0,0,0,0)),
  (CN:174;CD:(0,0,0,0,0,51,102,204,102,51,0,0,0,0,0,0)),
  (CN:175;CD:(0,0,0,0,0,204,102,51,102,204,0,0,0,0,0,0)),
  (CN:176;CD:(17,68,17,68,17,68,17,68,17,68,17,68,17,68,17,68)),
  (CN:177;CD:(85,170,85,170,85,170,85,170,85,170,85,170,85,170,85,170)),
  (CN:178;CD:(221,119,221,119,221,119,221,119,221,119,221,119,221,119,221,119)),
  (CN:179;CD:(24,24,24,24,24,24,24,24,24,24,24,24,24,24,24,24)),
  (CN:180;CD:(24,24,24,24,24,24,24,248,24,24,24,24,24,24,24,24)),
  (CN:181;CD:(24,24,24,24,24,248,24,248,24,24,24,24,24,24,24,24)),
  (CN:182;CD:(54,54,54,54,54,54,54,246,54,54,54,54,54,54,54,54)),
  (CN:183;CD:(0,0,0,0,0,0,0,254,54,54,54,54,54,54,54,54)),
  (CN:184;CD:(0,0,0,0,0,248,24,248,24,24,24,24,24,24,24,24)),
  (CN:185;CD:(54,54,54,54,54,246,6,246,54,54,54,54,54,54,54,54)),
  (CN:186;CD:(54,54,54,54,54,54,54,54,54,54,54,54,54,54,54,54)),
  (CN:187;CD:(0,0,0,0,0,254,6,246,54,54,54,54,54,54,54,54)),
  (CN:188;CD:(54,54,54,54,54,246,6,254,0,0,0,0,0,0,0,0)),
  (CN:189;CD:(54,54,54,54,54,54,54,254,0,0,0,0,0,0,0,0)),
  (CN:190;CD:(24,24,24,24,24,248,24,248,0,0,0,0,0,0,0,0)),
  (CN:191;CD:(0,0,0,0,0,0,0,248,24,24,24,24,24,24,24,24)),
  (CN:192;CD:(24,24,24,24,24,24,24,31,0,0,0,0,0,0,0,0)),
  (CN:193;CD:(24,24,24,24,24,24,24,255,0,0,0,0,0,0,0,0)),
  (CN:194;CD:(0,0,0,0,0,0,0,255,24,24,24,24,24,24,24,24)),
  (CN:195;CD:(24,24,24,24,24,24,24,31,24,24,24,24,24,24,24,24)),
  (CN:196;CD:(0,0,0,0,0,0,0,255,0,0,0,0,0,0,0,0)),
  (CN:197;CD:(24,24,24,24,24,24,24,255,24,24,24,24,24,24,24,24)),
  (CN:198;CD:(24,24,24,24,24,31,24,31,24,24,24,24,24,24,24,24)),
  (CN:199;CD:(54,54,54,54,54,54,54,55,54,54,54,54,54,54,54,54)),
  (CN:200;CD:(54,54,54,54,54,55,48,63,0,0,0,0,0,0,0,0)),
  (CN:201;CD:(0,0,0,0,0,63,48,55,54,54,54,54,54,54,54,54)),
  (CN:202;CD:(54,54,54,54,54,247,0,255,0,0,0,0,0,0,0,0)),
  (CN:203;CD:(0,0,0,0,0,255,0,247,54,54,54,54,54,54,54,54)),
  (CN:204;CD:(54,54,54,54,54,55,48,55,54,54,54,54,54,54,54,54)),
  (CN:205;CD:(0,0,0,0,0,255,0,255,0,0,0,0,0,0,0,0)),
  (CN:206;CD:(54,54,54,54,54,247,0,247,54,54,54,54,54,54,54,54)),
  (CN:207;CD:(24,24,24,24,24,255,0,255,0,0,0,0,0,0,0,0)),
  (CN:208;CD:(54,54,54,54,54,54,54,255,0,0,0,0,0,0,0,0)),
  (CN:209;CD:(0,0,0,0,0,255,0,255,24,24,24,24,24,24,24,24)),
  (CN:210;CD:(0,0,0,0,0,0,0,255,54,54,54,54,54,54,54,54)),
  (CN:211;CD:(54,54,54,54,54,54,54,63,0,0,0,0,0,0,0,0)),
  (CN:212;CD:(24,24,24,24,24,31,24,31,0,0,0,0,0,0,0,0)),
  (CN:213;CD:(0,0,0,0,0,31,24,31,24,24,24,24,24,24,24,24)),
  (CN:214;CD:(0,0,0,0,0,0,0,63,54,54,54,54,54,54,54,54)),
  (CN:215;CD:(54,54,54,54,54,54,54,255,54,54,54,54,54,54,54,54)),
  (CN:216;CD:(24,24,24,24,24,255,24,255,24,24,24,24,24,24,24,24)),
  (CN:217;CD:(24,24,24,24,24,24,24,248,0,0,0,0,0,0,0,0)),
  (CN:218;CD:(0,0,0,0,0,0,0,31,24,24,24,24,24,24,24,24)),
  (CN:219;CD:(255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255)),
  (CN:220;CD:(0,0,0,0,0,0,0,255,255,255,255,255,255,255,255,255)),
  (CN:221;CD:(240,240,240,240,240,240,240,240,240,240,240,240,240,240,240,240)),
  (CN:222;CD:(15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15)),
  (CN:223;CD:(255,255,255,255,255,255,255,0,0,0,0,0,0,0,0,0)),
  (CN:224;CD:(0,0,0,0,0,118,220,216,216,216,220,118,0,0,0,0)),
  (CN:225;CD:(0,0,0,0,0,252,198,252,198,198,252,192,192,192,0,0)),
  (CN:226;CD:(0,0,254,198,198,192,192,192,192,192,192,192,0,0,0,0)),
  (CN:227;CD:(0,0,0,0,128,254,108,108,108,108,108,108,0,0,0,0)),
  (CN:228;CD:(0,0,0,254,198,96,48,24,48,96,198,254,0,0,0,0)),
  (CN:229;CD:(0,0,0,0,0,126,216,216,216,216,216,112,0,0,0,0)),
  (CN:230;CD:(0,0,0,0,102,102,102,102,102,124,96,96,192,0,0,0)),
  (CN:231;CD:(0,0,0,0,118,220,24,24,24,24,24,24,0,0,0,0)),
  (CN:232;CD:(0,0,0,126,24,60,102,102,102,60,24,126,0,0,0,0)),
  (CN:233;CD:(0,0,0,56,108,198,198,254,198,198,108,56,0,0,0,0)),
  (CN:234;CD:(0,0,56,108,198,198,198,108,108,108,108,238,0,0,0,0)),
  (CN:235;CD:(0,0,30,48,24,12,62,102,102,102,102,60,0,0,0,0)),
  (CN:236;CD:(0,0,0,0,0,126,219,219,219,126,0,0,0,0,0,0)),
  (CN:237;CD:(0,0,0,3,6,126,207,219,243,126,96,192,0,0,0,0)),
  (CN:238;CD:(0,0,28,48,96,96,124,96,96,96,48,28,0,0,0,0)),
  (CN:239;CD:(0,0,0,124,198,198,198,198,198,198,198,198,0,0,0,0)),
  (CN:240;CD:(0,0,0,0,254,0,0,254,0,0,254,0,0,0,0,0)),
  (CN:241;CD:(0,0,0,0,24,24,255,24,24,0,0,255,0,0,0,0)),
  (CN:242;CD:(0,0,0,48,24,12,6,12,24,48,0,126,0,0,0,0)),
  (CN:243;CD:(0,0,0,12,24,48,96,48,24,12,0,126,0,0,0,0)),
  (CN:244;CD:(0,0,14,27,27,24,24,24,24,24,24,24,24,24,24,24)),
  (CN:245;CD:(24,24,24,24,24,24,24,24,216,216,216,112,0,0,0,0)),
  (CN:246;CD:(0,0,0,0,24,24,0,255,0,24,24,0,0,0,0,0)),
  (CN:247;CD:(0,0,0,0,0,118,220,0,118,220,0,0,0,0,0,0)),
  (CN:248;CD:(0,56,108,108,56,0,0,0,0,0,0,0,0,0,0,0)),
  (CN:249;CD:(0,0,0,0,0,0,0,24,24,0,0,0,0,0,0,0)),
  (CN:250;CD:(0,0,0,0,0,0,0,0,24,0,0,0,0,0,0,0)),
  (CN:251;CD:(0,15,12,12,12,12,12,236,108,108,60,28,0,0,0,0)),
  (CN:252;CD:(0,216,108,108,108,108,108,0,0,0,0,0,0,0,0,0)),
  (CN:253;CD:(0,112,152,48,96,200,248,0,0,0,0,0,0,0,0,0)),
  (CN:254;CD:(0,0,0,0,124,124,124,124,124,124,124,0,0,0,0,0)),
  (CN:255;CD:(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)));

Var
  P    : Integer;
  Regs : Registers;

Procedure Demo_Nieuw_Font;

Begin
  For P :=0 to 255 do With Regs do Begin
    ah := $11;
    al := $0;
    bh := $10;
    bl := 0;
    cx := 1;
    dx := NewChars[p].CN;
    es := seg(Newchars[p].CD);
    bp := ofs(NewChars[p].CD);
    intr($10,Regs);
  End;
End;

Begin
  Demo_Nieuw_Font;
End.