10 lines
464 B
QBasic
10 lines
464 B
QBasic
10 BORDER 0 : PAPER 7 : INK 7 : CLEAR 24575
|
|
20 LOAD "moebius" CODE
|
|
30 POKE 23388,16 : OUT 32765,16 : LOAD "page0" CODE
|
|
40 POKE 23388,17 : OUT 32765,17 : LOAD "page1" CODE
|
|
50 POKE 23388,19 : OUT 32765,19 : LOAD "page3" CODE
|
|
60 POKE 23388,20 : OUT 32765,20 : LOAD "page4" CODE
|
|
70 POKE 23388,22 : OUT 32765,22 : LOAD "page6" CODE
|
|
80 POKE 23388,23 : OUT 32765,23 : LOAD "page7" CODE
|
|
90 POKE 23388,16 : OUT 32765,16 : LOAD "splash" CODE
|
|
100 RANDOMIZE USR 33155 |