1 POKE816,165:POKE817,244
5 IFATHEN40
10 POKE53281,0:POKE53280,0
20 PRINT"[147][158]                PLEASE WAIT"
30 IFA=0THENA=1:LOAD"BATSPR $2E00",8,1
40 IFA=1THENA=2:LOAD"BATFONT $3000",8,1
50 IFA=2THENA=3:LOAD"BAT9.COM",8
60 NEW:END