MEGA.BAS

SCREEN 9
COLOR 1, 3
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT "                       A MEGABITE SOFTWARE PRODUCTION..."
'PLAY IN 7 DIFFERENT OCTAVES
MEGA$ = "F#GP2F#GP2F#GCA#F#G"
PLAY "T200"
FOR I = 0 TO 0
PLAY "X" + VARPTR$(MEGA$)
NEXT I
CLS
COLOR 3, 1
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT "                                THE STORY OF..."
PRINT
PRINT "         M     M EEEEEEE GGGGGGG AAAAAAA BBBBBBB    I   TTTTTTT EEEEEEE"
PRINT "         M  M  M E       G       A     A B     B    I      T    E      "
PRINT "         M     M EEEEEEE G   GGG AAAAAAA BBBBBBB    I      T    EEEEEEE"
PRINT "         M     M E       G     G A     A B     B    I      T    E"
PRINT "         M     M EEEEEEE GGGGGGG A     A BBBBBBB    I      T    EEEEEEE"
PRINT
PRINT "                                 PRODUCTIONS"
SLEEP 10
CLS
COLOR 3, 1
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT "                            CREDITS"
PRINT
PRINT "  WRITTEN BY............................................CHRISTINA FRANCK"
PRINT "  EDITED AND CONFIGURED BY..............................BENJAMIN FRANCK"
PRINT "  GRAPHIC ARTIST........................................ERIC FRANCK"
PRINT "  TITLE IDEAS BY........................................DAVID FRANCK"
SLEEP
CLS
COLOR 1, 3
PRINT
PRINT
PRINT "DEAR USERS AND FRIENDS OF MEGABITE PRODUCTIONS,"
PRINT "     WELCOME TO THE STORY BEHIND MEGABITE PRODUCTIONS.  MY NAME IS CHRISTINA"
PRINT "FRANCK AND I AM ONE OF THE AUTHORS OF OUR CLASSIC TEXT ADVENTURE GAMES.  IN"
PRINT "THIS SPECIAL INTRODUCTORY PROGRAM THE PRODUCERS OF MEGABITE PRODUCTIONS WILL"
PRINT "RELATE TO YOU EVERYTHING, INCLUDING THE UPS AND DOWNS, OF MEGABITE PRODUCTIONS."
PRINT "PLEASE RELAX AND SKIM THROUGH THIS COMPLIMENTARY PROGRAM."
PRINT "                                                            FROM, CHRISTINA"