home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 2 / ctrom_ii_b.zip / ctrom_ii_b / PROGRAM / PASCAL / MKMSG104 / MKMSGCVT / MKMCVT.INC < prev    next >
Text File  |  1994-01-09  |  3KB  |  42 lines
  1. Procedure DoBanner;
  2.   Begin
  3.   AvStr('');
  4.   AvStrLn('░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  5.   AvStrLn('░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  6.   AvStr('░░░░╔═══════════════════════╗░░░░░░░░░╔══════[ Input Msg Area ]══════╗░░░░░░░░░');
  7.   AvStrLn('');
  8.   AvStr('░░░░║   Mythical  Kingdom   ║░░░░░░░░░║                              ║░░░');
  9.   AvStrLn('░░░░░░');
  10.   AvStr('░░░░║       Software        ║░░░░░░░░░╚══════════════════════════════╝░░░');
  11.   AvStrLn('░░░░░░');
  12.   AvStr('░░░░║    ▄ ▄         ▄ ▄    ║░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  13.   AvStrLn('░░░░░░░░░');
  14.   AvStr('░░░░║    ███  ▐▀ ▐▀  ███    ║░░░░░░░░░░░░░░░░░░░░');
  15.   AvStrLn('░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  16.   AvStr('░░░░║    ███████████████    ║░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  17.   AvStrLn('░░');
  18.   AvStr('░░░░║    ██████░░░██████    ║░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  19.   AvStrLn('░░░░░░░░░░░░');
  20.   AvStr('░░░░║▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒║░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  21.   AvStrLn('░░░░░░░░');
  22.   AvStr('░░░░╚═══════════════════════╝░░░░░░░░░╔═════[ Output Msg Area ]══════╗░');
  23.   AvStrLn('░░░░░░░░');
  24.   AvStr('░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░║                              ║░░░');
  25.   AvStrLn('░░░░░░');
  26.   AvStrLn('░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░╚══════════════════════════════╝░░░░░░░░░');
  27.   AvStrLn('░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  28.   AvStrLn('░░░░╔═══════════════════════╗░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  29.   AvStrLn('░░░░║                       ║░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  30.   AvStrLn('░░░░║ MKMsgCvt Version 1.02 ║░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  31.   AvStrLn('░░░░║  Copyright 1993-1994  ║░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  32.   AvStr('░░░░║     By: Mark May      ║░░░░░░░░░╔═══════[ Message Number ]═════╗░');
  33.   AvStrLn('░░░░░░░░');
  34.   AvStr('░░░░║                       ║░░░░░░░░░║                              ║░');
  35.   AvStrLn('░░░░░░░░');
  36.   AvStr('░░░░╚═══════════════════════╝░░░░░░░░░╚══════════════════════════════╝░');
  37.   AvStrLn('░░░░░░░░');
  38.   AvStr('░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  39.   AvStrLn('░░░░░░');
  40.   AvStrLn('░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░');
  41.   End;
  42.