TOUCHSCREEN RANDOMIZE TIMER REM WAS8BIT SOLITAIRE GAME REM COPY ROM(0),1024 TO $8000+3072 FONT 0 BG 1 BG COPY 0,0,20,16 TO 0,0 BG 0 GLOBAL GX,GY,IPLACE DIM GLOBAL STACK(20,14,100),DECK(96),DCHAR(96) DIM GLOBAL NAME$(20,14),NUM(20,14) DIM BX(96),BY(96),DX(96),DY(96) BI=0 FOR I=1 TO 96 READ DCHAR(I) DECK(I)=I NEXT I DATA 64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79 DATA 096,097,098,099,100,101,102,103,104,105,106,107,108,109,110,111 DATA 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 DATA 160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175 DATA 192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207 DATA 224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239 NAME$(1,1)="DEAL" FOR I=3 TO 6 NAME$(I,1)="REG" NUM(I,1)=I-2 NEXT I FOR I=8 TO 19 NAME$(I,1)="TREG" NUM(I,1)=I-7 NEXT I ISTACK=0 FOR Y=3 TO 13 STEP 2 INC ISTACK FOR X=1 TO 19 REM NAME$(X,Y)="STACK"+STR$(ISTACK)+":" NAME$(X,Y)="STACK" NUM(X,Y)=X NEXT X NEXT Y FOR I=1 TO 500 C1=RND(95)+1 C2=RND(95)+1 SWAP DECK(C1),DECK(C2) NEXT I T=0 FOR I=1 TO 96 CALL PUSH(1,1,DECK(I)) CALL STACKTOTALS WAIT 2 NEXT I FOR Y=3 TO 13 STEP 2 FOR IY=Y TO 13 STEP 2 FOR X=1 TO 11 STEP 10 CARD=0 CALL POP(1,1,CARD) CALL PUSH(X,IY,CARD) CALL STACKTOTALS WAIT 6 NEXT X NEXT IY NEXT Y GX=-2 GY=0 PX=-2 PY=0 SPRITE 0,GX*8,GY*8,12 SPRITE 0 SIZE 3 PAL 3 SPRITE 1,PX*8,PY*8,12 SPRITE 1 SIZE 3 PAL 3 CWAIT=0 CFLASH=0 IPLACE=0 CALL STACKTOTALS DO IF TOUCH THEN IF IPLACE=0 THEN CALL TOUCHSET(GX,GY) IPLACE=1 REM NUMBER 10,3,GX,2 REM NUMBER 14,3,GY,2 REM TEXT 10,4," " REM TEXT 10,4,NAME$(GX,GY)+STR$(NUM(GX,GY)) GNAME$=NAME$(GX,GY) ELSE CALL TOUCHSET(PX,PY) REM NUMBER 10,6,PX,2 REM NUMBER 14,6,PY,2 REM TEXT 10,7," " REM TEXT 10,7,NAME$(PX,PY)+STR$(NUM(PX,PY)) PNAME$=NAME$(PX,PY) END IF ELSE IF IPLACE=1 THEN IPLACE=2 END IF IF IPLACE=2 THEN IF PX>0 AND PX<20 AND PY>0 AND PY<16 THEN PLAY 1,20,10 SOUND 10 GCARD0=STACK(GX,GY,0) GCARD1=STACK(GX+1,GY,0) PCARD0=STACK(PX,PY,0) PCARD1=STACK(PX-1,PY,0) REM GCOLOR=(GCARD0-1)\32 PCOLOR=(PCARD0-1)\32 GNUM=(GCARD0-1) MOD 8 PNUM=(PCARD0-1) MOD 8 PNUM1=(PCARD1-1) MOD 8 PCOLOR1=(PCARD1-1)\32 IF GCOLOR=PCOLOR OR GCARD0=0 THEN COLOR0=0 ELSE COLOR0=1 IF GCOLOR=PCOLOR1 OR GCARD0=0 OR PCARD1=0 THEN COLOR1=0 ELSE COLOR1=1 NUMBER0=GNUM-PNUM NUMBER1=GNUM-PNUM1 REM TEXT 10,9,"COLOR0="+STR$(COLOR0) REM TEXT 10,10,"COLOR1="+STR$(COLOR1) REM TEXT 10,11,"NUM0="+STR$(NUMBER0)+" " REM TEXT 10,12,"NUM1="+STR$(NUMBER1)+" " TRACE COLOR1,NUMBER1 REM IPLACE=0 IF GNAME$="DEAL" AND PNAME$="DEAL" THEN CALL ROLL(GX,GY) PLAY 1,70,10 SOUND 1 WAIT 15 END IF IF GNAME$="DEAL" AND PNAME$="REG" THEN GOSUB GETPUTCARDS GX=-10 GY=-10 PX=-10 PY=-10 END IF END IF SPRITE 0,GX*8-8,GY*8-8, SPRITE 1,PX*8-8,PY*8-8, WAIT VBL LOOP MOVESTACK: REM HOW MANY CARDS TO MOVE GG=STACK(GX,GY,0) IX=GX WHILE GG<>0 INC IX IF IX>18 THEN GG=0 ELSE GG=STACK(IX,GY,0) WEND TOMOVE=IX-GX REM HOW MUCH SPACE TO MOVE TO TOGO=19-PX IF TOMOVE<=TOGO THEN FOR I=0 TO TOMOVE-1 GGX=GX+I PPX=PX+I CARD=0 CALL POP(GGX,GY,CARD) CALL PUSH(PPX,PY,CARD) CALL STACKTOTALS PLAY 1,70,10 SOUND 1 WAIT 6 NEXT I END IF RETURN GETPUTCARDS: CARD=0 CALL POP(GX,GY,CARD) CALL PUSH(PX,PY,CARD) CALL STACKTOTALS PLAY 1,70,10 SOUND 1 WAIT VBL RETURN DOWIN: SPRITE 1 SIZE 0 CARD=0 T=0 S=0 FOR I=1 TO 52 DECK(I)=I ADD S,1,1 TO 13 IF S=1 THEN INC T CALL POP(9+T*2,1,CARD) BX(I)=(9+T*2)*8 BY(I)=8 DX(I)=0 WHILE ABS(DX(I))<0.5 DX(I)=RND-RND WEND DY(I)=-RND*4 SPRITE I,BX(I),BY(I),DCHAR(I) SPRITE I PAL 1 NEXT I II=1 DO FOR I=1 TO II DY(I)=DY(I)+0.1 BY(I)=BY(I)+DY(I) IF BY(I)>124 THEN DY(I)=-ABS(DY(I)*0.95) BY(I)=124 END IF BX(I)=BX(I)+DX(I) IF BX(I)<0 THEN DX(I)=ABS(DX(I)) IF DY(I)<0.1 AND BY(I)=124 THEN PLAY 2,30+RND(30),30 SOUND 2 SPRITE I,0,0,0 DX(I)=0 BX(I)=60 END IF END IF IF BX(I)>155 THEN DX(I)=-ABS(DX(I)) IF DY(I)<0.1 AND BY(I)=124 THEN PLAY 2,30+RND(30),30 SOUND 2 SPRITE I,0,0,0 DX(I)=0 BX(I)=60 END IF END IF SPRITE I,BX(I),BY(I), NEXT I JWAIT=(JWAIT+1) MOD 60 IF JWAIT=0 AND II<52 THEN INC II WAIT VBL LOOP END SUB TOUCHSET(X,Y) TX=(TOUCH.X-4)\8 TY=(TOUCH.Y-16)\8 X=TX Y=TY IF X<1 THEN X=1 IF Y<1 THEN Y=1 IF X>19 THEN X=19 IF Y/2=Y\2 THEN Y=Y+1 IF Y>13 THEN Y=13 END SUB SUB STACKTOTALS PAL 4 TEXT 0,0," " FOR X=1 TO 11 STEP 10 FOR Y=1 TO 13 STEP 2 FOR I=0 TO 100 IF STACK(X,Y,I)=0 THEN TOT=I I=100 END IF NEXT I IF Y=1 THEN YY=Y-1 ELSE YY=Y TEXT X-1,YY,STR$(TOT) NEXT Y NEXT X FOR X=3 TO 6 FOR I=0 TO 100 IF STACK(X,1,I)=0 THEN TOT=I I=100 END IF NEXT I TEXT X,0,STR$(TOT) NEXT X FOR X=8 TO 19 FOR I=0 TO 100 IF STACK(X,1,I)=0 THEN TOT=I I=100 END IF NEXT I TEXT X,0,STR$(TOT) NEXT X END SUB SUB POP(X,Y,COUT) IF STACK(X,Y,0)>0 THEN COUT=STACK(X,Y,0) FOR I=0 TO 99 STACK(X,Y,I)=STACK(X,Y,I+1) NEXT I CALL SETPAL(STACK(X,Y,0)) CELL X,Y,DCHAR(STACK(X,Y,0)) CELL X,Y+1,DCHAR(STACK(X,Y,0))+16 END IF END SUB SUB PUSH(X,Y,CIN) FOR I=100 TO 1 STEP -1 STACK(X,Y,I)=STACK(X,Y,I-1) NEXT I STACK(X,Y,0)=CIN CALL SETPAL(CIN) CELL X,Y,DCHAR(CIN) CELL X,Y+1,DCHAR(CIN)+16 PLAY 0,90,1 SOUND 0 END SUB SUB ROLL(X,Y) CARD=0 CALL POP(X,Y,CARD) FOR I=0 TO 100 IF STACK(X,Y,I)=0 THEN TOT=I I=100 END IF NEXT I STACK(X,Y,TOT)=CARD IF TOT=0 THEN CALL SETPAL(CARD) CELL X,Y,DCHAR(CARD) CELL X,Y+1,DCHAR(CARD)+16 PLAY 0,90,1 SOUND 0 END IF END SUB SUB SETPAL(I) IF I<=32 THEN PAL 0 ELSE IF I<=64 THEN PAL 1 ELSE PAL 2 END IF END SUB #1:MAIN PALETTES 153F3020003F1A08003F1B070014283C 003F3F04002A2A20002A1C0A002A0307 #2:MAIN CHARACTERS 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00030003000300030000000000000000 00C300C300C300C30000000000000000 00C000C000C000C00000000000000000 0000000000547C830000000000000000 00837C54000000000000000000000000 00000000007E22630000000000000000 2063227E000000000000000000000000 3C7EFFFFFFFFFFFF0000000000000000 3C428181818181810000000000000000 00000000000704050000000000000303 0000000000C300000000000000008100 0000000000E020A0000000000000C0C0 00000000000000000000000000000000 0000000000000000001C2222221C0000 000000000000000000180808081C0000 0000000000000000003C021C203E0000 0000000000000000003C021C023C0000 00000000000000000022223E02020000 0000000000000000003E203C023C0000 0000000000000000001C203C221C0000 0000000000000000001E020202020000 0000000000000000001C221C221C0000 0000000000000000001C221E021C0000 FFFFFFFFFF7E3C000000000000000000 8181818181423C000000000000000000 04040000000000000200000000000000 00000000000000000000000000000000 20200000000000004000000000000000 00000000000000000000000000000000 3C428181BDFFFFFF0000000000182442 3C428181BDFFFFFF0000000000003004 3E428181BDFFFFFF0000000000080814 3C428181BDFFFFFF0000000000005A24 3E428181BDFFFFFF000000000000363E 3E428181BDFFFFFF000000000000187E 3C428181BDFFFFFF000000000000081C 3C428181BDFFFFFF0000000000002418 3C428181BDFFFFFF0000000000002434 3C428181BDFFFFFF0000000000003820 3C428181BDFFFFFF0000000000001820 3E428181BDFFFFFF0000000000004444 00000000000004040000000000000002 00000000000000000000000000000000 00000000000020200000000000000040 00000000000000000000000000000000 FFFFFFBD8181423C4224180000000000 FFFFFFBD8181423C3804300000000000 FFFFFFBD8181423C22221C0000000000 FFFFFFBD8181423C005A240000000000 FFFFFFBD8181423C1C08080000000000 FFFFFFBD8181423C7E18000000000000 FFFFFFBD8181423C1C08000000000000 FFFFFFBD8181423C1824000000000000 FFFFFFBD8181423C2C24000000000000 FFFFFFBD8181423C3020380000000000 FFFFFFBD8181423C1804180000000000 FFFFFFBD8181423C5428000000000000 05040700000000000303000000000000 0000C300000000000081000000000000 A020E00000000000C0C0000000000000 00000000000000000000000000000000 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 E3FFFFFFFFFFFF7E1C00182442422418 E1FFFFFFFFFFFF7E1E00182442422418 80FFFFFFFFFFFF7E7F00182442422418 81FFFFFFFFFFFF7E7E00182442422418 FCFFFFFFFFFFFF7E0300182442422418 81FFFFFFFFFFFF7E7E00182442422418 C1FFFFFFFFFFFF7E3E00182442422418 F9FFFFFFFFFFFF7E0600182442422418 E3FFFFFFFFFFFF7E1C0038023C023800 E1FFFFFFFFFFFF7E1E0038023C023800 C0FFFFFFFFFFFF7E3F0038023C023800 81FFFFFFFFFFFF7E7E0038023C023800 FCFFFFFFFFFFFF7E030038023C023800 81FFFFFFFFFFFF7E7E0038023C023800 C1FFFFFFFFFFFF7E3E0038023C023800 F9FFFFFFFFFFFF7E060038023C023800 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 E3FFFFFFFFFFFF7E1C0008081422221C E1FFFFFFFFFFFF7E1E0008081422221C C0FFFFFFFFFFFF7E3F0008081422221C 81FFFFFFFFFFFF7E7E0008081422221C FCFFFFFFFFFFFF7E030008081422221C 81FFFFFFFFFFFF7E7E0008081422221C C1FFFFFFFFFFFF7E3E0008081422221C F9FFFFFFFFFFFF7E060008081422221C E3FFFFFFFFFFFF7E1C005A24005A2400 E1FFFFFFFFFFFF7E1E005A24005A2400 C0FFFFFFFFFFFF7E3F005A24005A2400 81FFFFFFFFFFFF7E7E005A24005A2400 FCFFFFFFFFFFFF7E03005A24005A2400 81FFFFFFFFFFFF7E7E005A24005A2400 C1FFFFFFFFFFFF7E3E005A24005A2400 F9FFFFFFFFFFFF7E06005A24005A2400 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 E3FFFFFFFFFFFF7E1C00363E1C080800 E1FFFFFFFFFFFF7E1E00363E1C080800 80FFFFFFFFFFFF7E7F00363E1C080800 81FFFFFFFFFFFF7E7E00363E1C080800 FCFFFFFFFFFFFF7E0300363E1C080800 81FFFFFFFFFFFF7E7E00363E1C080800 C1FFFFFFFFFFFF7E3E00363E1C080800 F9FFFFFFFFFFFF7E0600363E1C080800 E3FFFFFFFFFFFF7E1C00187E7E180000 E1FFFFFFFFFFFF7E1E00187E7E180000 80FFFFFFFFFFFF7E7F00187E7E180000 81FFFFFFFFFFFF7E7E00187E7E180000 FCFFFFFFFFFFFF7E0300187E7E180000 81FFFFFFFFFFFF7E7E00187E7E180000 C1FFFFFFFFFFFF7E3E00187E7E180000 F9FFFFFFFFFFFF7E0600187E7E180000 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 E3FFFFFFFFFFFF7E1C00081C1C1C0800 E1FFFFFFFFFFFF7E1E00081C1C1C0800 80FFFFFFFFFFFF7E7F00081C1C1C0800 81FFFFFFFFFFFF7E7E00081C1C1C0800 FCFFFFFFFFFFFF7E0300081C1C1C0800 81FFFFFFFFFFFF7E7E00081C1C1C0800 C1FFFFFFFFFFFF7E3E00081C1C1C0800 F9FFFFFFFFFFFF7E0600081C1C1C0800 E3FFFFFFFFFFFF7E1C00221C1C1C2200 E1FFFFFFFFFFFF7E1E00221C1C1C2200 80FFFFFFFFFFFF7E7F00221C1C1C2200 81FFFFFFFFFFFF7E7E00221C1C1C2200 FCFFFFFFFFFFFF7E0300221C1C1C2200 81FFFFFFFFFFFF7E7E00221C1C1C2200 C1FFFFFFFFFFFF7E3E00221C1C1C2200 F9FFFFFFFFFFFF7E0600221C1C1C2200 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 E3FFFFFFFFFFFF7E1C000024342C2400 E1FFFFFFFFFFFF7E1E000024342C2400 80FFFFFFFFFFFF7E7F000024342C2400 81FFFFFFFFFFFF7E7E000024342C2400 FCFFFFFFFFFFFF7E03000024342C2400 80FFFFFFFFFFFF7E7F000024342C2400 C1FFFFFFFFFFFF7E3E000024342C2400 F9FFFFFFFFFFFF7E06000024342C2400 E3FFFFFFFFFFFF7E1C00382038203800 E1FFFFFFFFFFFF7E1E00382038203800 80FFFFFFFFFFFF7E7F00382038203800 81FFFFFFFFFFFF7E7E00382038203800 FCFFFFFFFFFFFF7E0300382038203800 81FFFFFFFFFFFF7E7E00382038203800 C1FFFFFFFFFFFF7E3E00382038203800 F9FFFFFFFFFFFF7E0600382038203800 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 7EE3C1889C9C88C1001C3E776363773E 7EE3E3F3F3F3F3E1001C1C0C0C0C0C1E 7E8180FCE1C39F80007E7F031E3C607F 7E8180FCE1E1FC80007E7F031E1E037F 7E9C9C9C8080FCFC006363637F7F0303 7E80809F8180FC80007F7F607E7F037F 7EC1819F81809C80003E7E607E7F637F 7E8080FCFCF8F9F9007F7F0303070606 E3FFFFFFFFFFFF7E1C00182018041800 E1FFFFFFFFFFFF7E1E00182018041800 80FFFFFFFFFFFF7E7F00182018041800 81FFFFFFFFFFFF7E7E00182018041800 FCFFFFFFFFFFFF7E0300182018041800 81FFFFFFFFFFFF7E7E00182018041800 C1FFFFFFFFFFFF7E3E00182018041800 F9FFFFFFFFFFFF7E0600182018041800 E3FFFFFFFFFFFF7E1C0000222A2A1400 E1FFFFFFFFFFFF7E1E0000222A2A1400 80FFFFFFFFFFFF7E7F0000222A2A1400 81FFFFFFFFFFFF7E7E0000222A2A1400 FCFFFFFFFFFFFF7E030000222A2A1400 81FFFFFFFFFFFF7E7E0000222A2A1400 C1FFFFFFFFFFFF7E3E0000222A2A1400 F9FFFFFFFFFFFF7E060000222A2A1400 #3:MAIN BG 00001410000000000000000000000000 00000000000000000000000000000000 00000000000000000000000003070A00 04070B070B070B070B07040720052105 22052305240625062606270628072907 2A072B0703071A0004071B071B071B07 1B070407300531053205330534063506 36063706380739073A073B0700000805 06050605060506050605060506050000 00000805060506050605060506050605 06050000000009050705070507050705 07050705070500000000090507050705 07050705070507050705000000000805 06050605060506050605060506050000 00000805060506050605060506050605 06050000000009050705070507050705 07050705070500000000090507050705 07050705070507050705000000000805 06050605060506050605060506050000 00000805060506050605060506050605 06050000000009050705070507050705 07050705070500000000090507050705 07050705070507050705000000000805 06050605060506050605060506050000 00000805060506050605060506050605 06050000000009050705070507050705 07050705070500000000090507050705 07050705070507050705000000000805 06050605060506050605060506050000 00000805060506050605060506050605 06050000000009050705070507050705 07050705070500000000090507050705 07050705070507050705000000000805 06050605060506050605060506050000 00000805060506050605060506050605 06050000000009050705070507050705 07050705070500000000090507050705 07050705070507050705000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000 #15:MAIN SOUND 38001000000000003800212201FF0000 210060AA00F0E0002800303019FE0000 38002020000000003800505000000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000