8-Bit Software Online Conversion
Big Screen Alien Demo - Listing
0IFPAGE<>&1200THEN PAGE=&1200:CHAIN"
Alien"
1ONERRORGOTO200
10DEFFNN="Alien"
20:
30*TV0
40MODE1
50HIMEM=&1A00
55FORF%=1TO3
56VDU19,F%;0;0
57NEXT
60VDU23,1,0,0,0,0,0,0,0,0,0
70?&FE00=12:?&FE01=&1A00 DIV 8 DIV 25
6
80?&FE00=13:?&FE01=&1A00 DIV 8 MOD 25
6
90?&FE00=1:?&FE01=96
100?&FE00=6:?&FE01=34
110?&FE00=2:?&FE01=105
120:
140*L. ALIENS 1A00
150VDU19;7;0;19,3;0;0,19,2,6;0;19,1,1;
0;
160REPEATUNTIL0
200CHAIN"!MENU"