Program makekey;
uses crt,coder;
Const
  IMAGEDATA_WIDTH = 80;
  IMAGEDATA_DEPTH = 25;
  IMAGEDATA_LENGTH = 4000;
  IMAGEDATA : Array [1..4000] Of Char = (
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, 'Ú', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, '¿', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, '³', #15, ' ',  #8, ' ',  #8, 'R',  #8, 'e',  #8, 'g',  #8,
  'i',  #8, 's',  #8, 't',  #4, 'r',  #4, 'a',  #4, 't',  #4, 'i',  #4,
  'o',  #4, 'n', #12, ' ', #12, 'c', #12, 'o', #12, 'd', #12, 'e',  #4,
  ' ',  #4, 'g',  #4, 'e',  #4, 'n',  #4, 'e',  #8, 'r',  #8, 'a',  #8,
  't',  #8, 'o',  #8, 'r',  #8, ' ',  #8, ' ',  #8, '³', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, '³', #15, ' ',  #8, ' ',  #8,
  ' ',  #8, ' ',  #8, ' ',  #8, ' ',  #8, ' ',  #8, ' ',  #4, ' ',  #4,
  ' ',  #4, 'f',  #4, 'o',  #4, 'r',  #4, ' ', #12, 'J', #12, 'e', #12,
  'z', #12, 'e', #12, 'b',  #4, 'e',  #4, 'l',  #4, ' ',  #4, ' ',  #4,
  ' ',  #8, ' ',  #8, ' ',  #8, ' ',  #8, ' ',  #8, ' ',  #8, ' ',  #8,
  ' ',  #8, '³', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  '³', #15, 'C',  #8, 'o',  #8, 'p',  #8, 'y',  #8, 'r',  #8, 'i',  #8,
  'g',  #8, 'h',  #4, 't',  #4, ' ',  #4, '(',  #4, 'c',  #4, ')',  #4,
  ' ', #12, '1', #12, '9', #12, '9', #12, '6', #12, ' ',  #4, 'G',  #4,
  'o',  #4, 'r',  #4, 'd',  #4, 'y',  #8, ' ',  #8, 'F',  #8, 'r',  #8,
  'e',  #8, 'n',  #8, 'c',  #8, 'h',  #8, '³', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, 'À', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ù', #15, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, 'Ú', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, '¿', #15,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  '³', #15, ' ', #11, 'S', #13, 'y', #13, 's', #13, 'o',  #5, 'p',  #8,
  ' ',  #8, 'N',  #8, 'a',  #5, 'm', #13, 'e', #13, ':', #13, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, '³', #15, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, '³', #15, ' ', #11, ' ', #13, ' ', #13,
  'B', #13, 'B',  #5, 'S',  #8, ' ',  #8, 'N',  #8, 'a',  #5, 'm', #13,
  'e', #13, ':', #13, ' ',  #7, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ', #11, '³', #15, ' ', #11,
  ' ', #11, ' ', #11, ' ', #11, ' ', #11, ' ',  #7, ' ',  #7, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, '³', #15,
  ' ', #15, ' ', #13, ' ', #13, 'R', #13, 'e',  #5, 'g',  #8, ' ',  #8,
  'c',  #8, 'o',  #5, 'd', #13, 'e', #13, ':', #13, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, '³', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ',  #7, ' ',  #7, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, 'À', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15,
  'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ä', #15, 'Ù', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #10, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15, ' ', #15,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10,
  ' ', #10, ' ', #10, ' ', #10, ' ', #10, ' ', #10);
  

Type ScreenType = Array [0..3999] Of Byte;
Var Screen : ScreenType Absolute $B800: 0000;
var sname, bname, code: String;
    regfile:text;
label another;
Begin

  another:Move (ImageData, Screen, 4000);
  gotoxy(1,20);
  textcolor(11);
  writeln('Press ENTER to quit...');
  gotoxy(22,8);
  textcolor(15);
  ReadLn (sname);
  if sname = '' then halt;
  gotoxy(1,20);
  writeln('                       ');
  gotoxy(22,9);
  ReadLn (bname);
  gotoxy(22,10);
  textcolor(9);
  assign(regfile,'PRINT.ME');
  rewrite(regfile);
  writeln(regfile,'Here is your registration code, just run Jez-CFG, and you can enter');
  writeln(regfile,'it. Your BBS name and sysop name must match EXACTLY to the below');
  writeln(regfile,'or your code WILL NOT work. Remember, it''s case sensitive.');
  writeln(regfile);
  writeln(regfile,'BBS Name: '+bname);
  writeln(regfile,'Sysop Name: '+sname);
  writeln(regfile,'Code: '+normalize(encrypt (bname+' '+sname)));
  writeln(regfile);
  writeln(regfile,'Thank you for choosing Zodian Software!');
  close(regfile);
  writeln(normalize(encrypt (bname + ' ' + sname) ) );
  gotoxy(1,20);
  textcolor(3);
{  writeln('Press any key...');
  readkey;
  goto another;}
end.