RANDOMIZE TIMER
TOUCHSCREEN
REM WAS8BIT


XC=10*8
YC=7.5*8
DIM A(63),RR(63),N(3)

RESET:

N(0)=73
N(1)=65
N(2)=56
N(3)=48
NN=RND(24)


FOR I=0 TO 3
    SPRITE I,XC,YC-16-I*8,8
NEXT I


CC=1+RND(6)
DA=RND*0.005+RND*0.005+RND*0.005

FOR I=4 TO 63
    A(I)=RND*PI*2
NEXT I

DO

  FOR I=4 TO 63
      R=I+1
      SPRITE I,XC+R*COS(A(I)),YC+R*SIN(A(I)),CC
      ADD A(I),DA
  NEXT I
  
  FOR I=0 TO 3
    IF SPRITE HIT(I) THEN
       PLAY I,N(I)-NN,1 SOUND I
    END IF
  NEXT I
  
IF TOUCH THEN GOTO RESET
WAIT VBL
LOOP




#1:MAIN PALETTES
003F300C00383400003C0C00003F3C00
003F2A15003F2A15003F2A15003F2A15

#2:MAIN CHARACTERS
00000000000000000000000000000000
00220008002200000000000000000000
00001824241800000000000000000000
00400810200400000000000000000000
3C428181818142000000000000000000
00080800630008080000000000000000
C3810000000081C30000000000000000
06090906609090600000000000000000
00000000000000000000000010000000

#15:MAIN SOUND
0800F58F100000000800F58F10000000
0800F58F100000000800F58F10000000
38002020000000003800505000000000
0800000F000000000800000F00000000
0800000F000000000800000F00000000
0800000F000000000800000F00000000
0800000F000000000800000F00000000
0800000F000000000800000F00000000