Akalabeth Preamble Files

27 thoughts
last posted March 30, 2014, 10:53 p.m.

6 earlier thoughts

repost from Akalabeth
0

AKA0 is:

1  TEXT : HOME : NORMAL : VTAB (5): HTAB (9): PRINT "WELCOME,  FOOLISH MORTAL": VTAB (7): HTAB (14): PRINT "INTO THE WORLD": VTAB (9): HTAB (16): INVERSE : PRINT "AKALABETH!": NORMAL 
2  VTAB (11): HTAB (7): PRINT "HEREIN THOU SHALT FIND GRAND": VTAB (13): HTAB (16): INVERSE : PRINT "ADVENTURE!": NORMAL 
3  VTAB (16): PRINT "        CREATED BY  LORD BRITISH": PRINT : PRINT "(C) 1980 BY CALIFORNIA PACIFIC COMPUTER"
4  VTAB (23): HTAB (8): PRINT "(PRESS SPACE TO CONTINUE) ";: GET R$: PRINT 
5  PRINT "BLOAD AKA4"
6  POKE 254,32: POKE 255,32: POKE 32840,169: POKE 32841,0: CALL 32768: POKE 32840,177: POKE 32841,8
7  PRINT "BLOADAKA2,A$2000": POKE  - 16302,0: POKE  - 16297,0: POKE  - 16300,0: POKE  - 16304,0
8  PRINT "BLOADAKA5,A$4000"
9  CALL 32768
10  PRINT "BLOADAKA3,A$4000"
11  POKE 32769,39: POKE 32888,136: POKE 32890,255: CALL 32768: POKE 32769,0: POKE 32888,200: POKE 32890,40
12  FOR O7 = 1 TO 4000: NEXT O7
13  POKE 32840,169: POKE 32841,0: CALL 32768: POKE 32840,177: POKE 32641,8
14  FOR O7 = 1 TO 500: NEXT O7
15  POKE  - 16303,0
8450  VTAB (23): HTAB (8): PRINT "    (LOADING PROGRAM)    ";
8997  PRINT 
8998  POKE 33,1: POKE 34,23
8999  PRINT "RUN AKA1"

20 later thoughts