10 DIM LL10
11 FOR I=0 TO 1
15 P=#800
20[
30 LDA#FD;PHA
40 LDA@4;STA#BFFF
50 JSR LL1
60 PLA;STA#BFFF
70 LDA@12;JSR#FFF4
80 JSR#F7D1;]
90 $P="ACORN ATOM + ATOMMC2"
100 P=P+L.P+1;[
105 NOP
110 JSR#FFED;JMP#FFED
111:LL1
112 JMP (#AFFE)
115]
116 NEXT
120 END