10 SYS57812"PLAYER832.ML",8,0:POKE780,0:POKE781,64:POKE782,3:SYS65493
20 SYS57812"13*",8,0:POKE780,0:POKE781,0:POKE782,16:SYS65493
30 SYS832
40 POKE198,0:WAIT198,1:POKE198,0:SYS835
9999 END
10000 N$="PLAY.BAS":OPEN1,8,15,"S0:"+N$:CLOSE1:SAVEN$,8:END