10 SPRITE p(1,2,1,255,0,0,2,10,30,10,5)
20 SPRITE p(2,1,2,255,0,0,4,8,25,15,10)
30 SPRITE p(3,15,16,255,0,0,4,12,27,8,10)
55 PLAYER p(3,255,0,0,10,10)
56 PLAYER b(15,16,10,10,10,10,10,10,10,10)
57 PLAYER c(50,50,50,50,50,50)
60 SPRITE m(1)
65 SPRITE s(60)
70 a=INKEY 
80 PLAYXY a
90 a=PLAYER (1) 
95 POS 1,1:PRINT a;
100 IF a=1 THEN GOTO 200
120 GOTO 70
200 FOR i=1 TO 10
210 BEEP 90:PAUSE 10:BEEP 100
220 NEXT i
230 SPRITE m(2)
240 CLS 
250 GOTO 10