0 D=PEEK(186):REM POKE646,PEEK(53281)
1 IFA=0 THEN A=1:LOAD"RINGSIDE KARATE",D,1
2 SYS15490
3 STOP
10000 D=PEEK(186):N$="KARATE.BOOT":OPEN15,D,15,"S0:"+N$:CLOSE15:SAVEN$,D:END