home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / BTH2SRC.ZIP / END.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1995-12-01  |  7.6 KB  |  112 lines
  1. { TheDraw Pascal Crunched Screen Image.  Date: 12/01/95 }
  2. procedure endansi;
  3. const
  4.   IMAGEDATA_WIDTH=80;
  5.   IMAGEDATA_DEPTH=23;
  6.   IMAGEDATA_LENGTH=1721;
  7.   IMAGEDATA : array [1..1721] of Char = (
  8.      #8,#16,#26,'O','-',#24, #7,'░','░',#25, #2,'b',' ','e',' ','y',' ',
  9.     'o',' ','n',' ','d',' ',' ','t',' ','h',' ','e',' ',' ','h',' ','o',
  10.     ' ','r',' ','i',' ','z',' ','o',' ','n',#25, #2,'-',#25, #2,'i',' ',
  11.     's',' ','s',' ','u',' ','e',' ',' ','n',' ','u',' ','m',' ','b',' ',
  12.     'e',' ','r',' ',' ','t',' ','w',' ','o',#25, #3,'░','░',#24, #8,#26,
  13.     '(','-',' ',#15,'▄',' ', #8,#26,'#','-',#24,'░','░',#25, #3,'░',#25,
  14.      #3, #9,'▄','▄',#17,'▓',#16,#26, #3,'▄',#25, #4, #8,'░',' ',' ',#15,
  15.     #26,#10,'▄','█','█',#23,'▓','▓',#16,'█',#23,'▀','▓', #9,#16,'▐',#26,
  16.      #5,'▄',#25, #3, #8,'░',#25,#16,'░',#25, #3,'░','░',#24,'░',#25,#10,
  17.      #9,#17,'▓','▓','▀', #1,#16,'█','█', #9,#17,'▀','▒','▓',#16,'█',#17,
  18.     '▓',#16,'▄',' ',' ',#15,'█',#23,'▓','▒','░',#26, #3,'▀','▓','█','▓',
  19.     '▓','▀','▀','▀',#25, #2,'▒', #9,#16,'▐',#17,'▓','▀', #1,#16,'█','█',
  20.     '█', #9,#17,'▀','▓',#16,'█','▄',#25, #2,#15,'▄','█','█',#23,'░',#16,
  21.     '▀','█',#23,'▀',#16,'█','▄',#25,#12, #8,'░',#24,#25, #9,'░',' ', #9,
  22.     '▐',#17,'▓','▓', #1,#16,#26, #5,'█', #9,#17,'▀',#16,'█','▌',#15,'▐',
  23.     '█', #7,'█','█',#15,#23,'▄',' ','░', #7,#16,'█',#15,'█','▌',#23,'█',
  24.     '▄','▄','░',#16,'█','█',#23,'▓',#16,'█',#23,'▄','▓', #9,#16,'▐',#17,
  25.     '▓', #1,#16,'█', #9,#17,'░','░', #1,#16,'█','█', #9,#17,'░', #1,#16,
  26.     '█', #9,'█','▌',' ',#15,'▐',#23,'▓', #7,#16,'█',#15,#23,'░',#16,'▌',
  27.     '█',#23,'▓', #7,#16,'█','█',#15,'█','▌',' ', #8,'░',#24,'░',#25, #8,
  28.     '░',' ', #9,'▐',#17,'▓', #1,#16,'█', #9,#17,'░', #1,#16,'█','█', #9,
  29.     #17,'▄','▀', #1,#16,'█',#17,' ', #9,'░',#16,'▌',#15,'▐',#23,'▒','▒',
  30.     '▄','█','█','░', #7,#16,'█',#15,#23,'▓',#16,'▌',#23,'▓',#16,'▀', #9,
  31.     #26, #4,'▄',#15,'▀','▀','▀', #9,'▐',#17,'▓', #1,#16,'█','█', #9,#17,
  32.     '░','▄', #1,#16,'█','█','█', #9,#17,'▓',#16,'█',' ',#15,'▐','█',#23,
  33.     '▒','▓',#16,'▌','█',#23,'▓','░', #7,#16,'█',#15,#23,'▓',#16,'▌',' ',
  34.      #8,'░',#24,#25,#11, #9,'▐',#17,'▓','▓','▒','░','░', #1,#16,'█', #9,
  35.     #17,'░','░', #1,#16,'█', #9,#17,'░',#16,'▌',#15,'▐',#23,'▓', #7,#16,
  36.     '█','█','█',#15,#23,'█', #7,#16,'█','█',#15,'█','▌', #9,'▄',#17,'▓',
  37.     '▓','▀', #1,#16,'█', #9,#17,'▓','▀','▓',#16,'█','█','▐',#17,'▓', #1,
  38.     #16,'█','█', #9,#17,'▒','▓','█', #1,#16,'█', #9,#17,'░','▓',#16,'█',
  39.     ' ',' ',#15,#26, #3,'▄','▀',#23,'▓', #7,#16,'█',#15,#23,'▓','░',#16,
  40.     '▌',#24,#25,#12, #9,#17,'▓', #1,#16,'█','█','█', #9,#17,'█', #1,#16,
  41.     '█','█','█', #9,#17,'▓',#16,'█','▌',#15,'▐',#23,'▓', #7,#16,'█','█',
  42.     #15,#23,'▓', #7,#16,'█','█',#15,#23,'░','▓',#16,'▌', #9,'█',#17,'█',
  43.     '▓', #1,#16,'█','█', #9,#17,'░', #1,#16,'█','█', #9,#17,'█','▓',#16,
  44.     '▐','█',#17,' ','░','█','█', #1,#16,'█','█','█', #9,#17,'▓',#16,'█',
  45.     ' ',#15,'▐',#23,'▓','▒', #7,#16,'█',#15,#23,'░',#16,'█',#26, #3,'▀',
  46.     #24,#25,#10, #8,'░',' ', #9,'█',#17,'▄', #1,#16,'█', #9,#17,'▄',#16,
  47.     '█',#17,'▓',#16,'█','█',#17,'▓',#16,'▀',' ',#15,'▐',#23,'▓', #7,#16,
  48.     '█',#15,#23,'▓', #7,#16,#26, #3,'█',#15,#23,'▓',#16,'▌', #9,'█',#17,
  49.     '█','▒', #1,#16,#26, #3,'█', #9,#17,'▄','█','▓',#16,'▐',#17,'▓','▄',
  50.      #1,#16,'█','█','█', #9,#17,'▓', #1,#16,'█', #9,#17,'█','░','▓',#16,
  51.     ' ',#15,'▐',#23,'▓', #7,#16,'█','█',#15,#23,'▓',#16,'█','▐',#23,'▓',
  52.     '░',#16,'█','▌', #8,'░',#24,#25,#10,'░',' ', #9,'█',#17,'▓',#16,'▀',
  53.     #15,#26, #6,'▄','▌',#23,'█',#16,'█',#23,'▓',#26, #3,'▄','█','▓',#16,
  54.     '▌', #9,'█',#17,'▓','░', #1,#16,'█','█', #9,#17,'█',' ', #1,#16,'█',
  55.      #9,#17,'█','▓',#16,'▐','█',#17,'░',#16,'█',#17,'▓','▓',#16,'█',#17,
  56.     '▓',#16,'█','▀','▀',' ',' ',#15,'▀',#23,'▄',#16,'█',#23,'▓',#16,'▄',
  57.     '█','█',#23,'▓',#16,'▀',' ', #8,'░',#24,#25,#10,'░',' ', #9,'█',' ',
  58.     #15,#23,'░','▓','░','▀','▓','▀','▀','▓','▒',#16,' ',#26, #7,'▀',' ',
  59.      #9,'█',#17,'▓','░', #1,#16,'█', #9,#17,'█','▓','▓', #1,#16,'█', #9,
  60.     #17,'█','▓',#16,'▐','█','▀',#15,#26, #5,'▄','█',#23,'▓',#16,'▌',#25,
  61.     #10, #8,'░',#24,#25,#10,'░',' ','░',#15,#23,'░','▓','■', #7,#16,'█',
  62.     '█',#15,#23,'░', #7,#16,'█','█','█',#15,#23,'▀','▓',#16,'█',#23,'▓',
  63.     #16,'█','█','█','▄','▄', #8,'░',' ', #9,'█',#17,'█','░', #1,#16,'█',
  64.     '█', #9,#17,'█', #1,#16,'█','█', #9,#17,'█','▓',#16,'▐',' ',#15,'█',
  65.     #23,'▓','▀', #7,#16,'█','█',#15,#23,'▄','█','▓',#16,'█','█',#23,'▓',
  66.     '▒',#16,'█',#23,'▀',#16,'█','█','▄','▄',#25, #2, #8,'░',#24,#25,#10,
  67.     '░',' ',#15,#23,'░','▓', #7,#16,#26, #3,'█',#15,#23,'░', #7,#16,'█',
  68.     '█',#15,#23,'■', #7,#16,'▐',#26, #3,'█',#15,#23,'░', #7,#16,'█',#15,
  69.     #23,'▀','█','▓',#16,' ', #9,'█',#17,'█','▄','▀', #1,#16,#26, #3,'█',
  70.      #9,#17,'▓',#16,'█',' ',#15,'█',#23,'▓', #7,#16,'█','█','█',#15,#23,
  71.     '░','▀', #7,#16,'█',#15,#23,'█',#16,'█','▐',#23,'▓','█',' ',' ','░',
  72.     '▀','▒','▓',#16,'█',' ',' ', #8,'░',#24,#25,#12,#15,'█',#23,'▓', #7,
  73.     #16,'█',#15,#23,'░', #7,#16,'█','█','█',#15,#23,'▄','█', #7,#16,'█',
  74.     '▐','█',#15,#23,'█','░', #7,#16,'█','█','█',#15,#23,'▓','▐','▒',#16,
  75.     '▌', #9,'█',#17,'▓',' ','░', #1,#16,'█','█', #9,#17,'▄', #1,#16,'█',
  76.      #9,#17,'▓',#16,'█',#15,'▐','█', #7,'█','█','█',#15,#23,'░', #7,#16,
  77.     '█','█','█',#15,#23,'▓',#16,'█','▐',#23,'█', #7,#16,'█','█',#15,#23,
  78.     '░', #7,#16,'█','█','█',#15,#23,'▒','▓',#24,#16,#25,#11,'▐',#23,'▓',
  79.      #7,#16,#26, #4,'█',#15,#23,'▀','▀','█','▌', #7,#16,'▐','█',#15,#23,
  80.     '█','░', #7,#16,'█',#23,' ',#16,'█',#15,#23,'▓','▐','▓',#16,'▌', #9,
  81.     '█',#17,'▓', #1,#16,#26, #5,'█', #9,#17,'▓',#16,'█',#15,'▐',#23,'▓',
  82.      #7,#16,#26, #3,'█',#15,#23,'▓', #7,#16,'█','█',#15,#23,'▓',#16,'█',
  83.     '▐',#23,'█', #7,#16,'█',#15,#23,'▄', #7,#16,'█',#15,#23,'█', #7,#16,
  84.     '█','█',#15,#23,'█','▓',#16,'▌',#24, #8,'░',#25, #8,'░',' ',#15,'▐',
  85.     #23,'▓','▓','▓','▒','░', #7,#16,'█',#15,#23,'░',' ','░', #7,#16,'█',
  86.     '▐','█',#15,#23,'░','░', #7,#16,'█','█','█',#15,#23,'▓','▐','▓',#16,
  87.     '▌', #9,'█',#17,'▓', #1,#16,'█','█', #9,#17,'░','■', #1,#16,'█','█',
  88.      #9,#17,'▓',#16,'█',#15,'▐',#23,'▓', #7,#16,'█','█',#15,#23,'░','▓',
  89.     '▓', #7,#16,'█','█',#15,#23,'█','▓',#16,'▐',#23,'▓', #7,#16,'█',#15,
  90.     #23,'░', #7,#16,'█',#15,#23,'█','▓', #7,#16,'█','█',#15,#23,'▓',#16,
  91.     '▌',' ', #8,'░',#25,#10,'░',#24,#25, #8,'░',' ',' ',#15,'█',#23,'░',
  92.      #7,#16,'█','█','█',#15,#23,'■', #7,#16,#26, #4,'█','▐',#26, #3,'█',
  93.     #15,#23,'■',' ', #7,#16,'█',#15,#23,'▐','▓',#16,'▌', #9,'█',#17,'█',
  94.     '▀', #1,#16,'█','█','█', #9,#17,'▓', #1,#16,'█', #9,#17,'░','▓',#15,
  95.     #16,'▐',#23,'▓', #7,#16,'█',#15,#23,'░', #7,#16,#26, #4,'█',#15,#23,
  96.     '░','▓',#16,'▐',#23,'█', #7,#16,#26, #4,'█',#15,#23,'░',#16,'█','█',
  97.     #23,'▓',#16,' ',' ', #8,'░',#24,'░',#25, #8,#15,'▄','█','█',#23,'▒',
  98.     '▓',#26,#10,'▄','▓','▓','▄','▄','░',#16,'█','▀',' ', #9,'█',#17,'▓',
  99.     '░',#26, #3,'▄','█','░','▒',#16,' ',#15,'█','█',#23,'▄','▓','▄','░',
  100.     '▄','█','▒',#16,'█',' ',#23,'▓','▒','▄','▓','▓','▓','▄','▄','▄',#16,
  101.     '█',#23,'▓',#16,'▄',#25,#10, #8,'░',#24,'░',' ','░','░',' ','░',#25,
  102.      #6,#15,#26,#17,'▀',' ',' ', #9,#26,#10,'▀',' ',' ',#15,#26, #8,'▀',
  103.     ' ',' ',#26, #7,'▀',#25, #8, #8,'░',' ','░','░',' ','░',#24,#26,'O',
  104.     '-',#24, #7,'░','░','c',' ','o',' ','d',' ','i',' ','n',' ','g',' ',
  105.     ' ','b',' ','y',' ',' ','s',' ','h',' ','i',' ','v',' ','a',' ','n',
  106.     ' ',' ','b',' ','a',' ','s',' ','t',' ','a',' ','r',' ','d',' ',' ',
  107.     '-',' ',' ','a',' ','n',' ','s',' ','i',' ','.',' ','m',' ','i',' ',
  108.     'n',' ','d',' ','c',' ','r',' ','i',' ','m',' ','e','░','░',#24, #8,
  109.     #26,'O','-',#24);
  110. begin;
  111.      UnCrunch (IMAGEDATA,ScreenAddr[ (1*2) + (1*160) -162],IMAGEDATA_LENGTH);
  112. end;