' ' POWER PLAY RULES: ' ' ' 1) PLAYING A MATCHING CARD ENABLES A POWER.... ' 2) TAPPING AN ENABLED POWER ACTIVATES THAT POWER ' A CARD PLAYED TO AN UNABLED POWER CAN BE PLAYED TO THE TABLE ' ' ' RED HEART: "HAVE A HEART" ' CONVERTS DRAW1 TO DRAW3 ' ' BLACK SPADE: "DIGGING FOR GOLD" ' IN STACK, RND HIDDEN CARD PLAYS TO BOTTOM OF STACK ' ' GREEN CLOVER: "LUCKY CARD" ' ANY PLAYABLE CARD CAN PLAY TO BOTTOM OF ANY STACK, NO RULES ' ' BLUE DIAMOND: "ROYAL POWER" ' ANY PLAYABLE CARD CAN PLAY TO EMPTY STACK, NO RULES ' ' SUM "7": "LUCKY SEVEN" ' RESHUFFLE ALL CARDS NOT IH HOME ' ' SUM "10", "PERFECT TEN" ' FIND AND PLAY A HOME'S NEXT CARD ' ' ' SPECIAL CARDS: ' ' POWER X, "ELEMENT X" ' PLAYING AN X-CARD ALLOWS STORING SAME COLOR CARD ' ' WILD CARD PLAYS AS A NEEDED# IN ITS COLOR ' PLAYING THE CORRECT #CARD ON ITS WILD CARD WILL DISCARD THAT WILD CARD ' ' USING ANY POWER OR SUMS GOING OVER TARGET# CAUSES ALL CARDS PLAYED ON THAT POWER TO GO INTO DISCARD ' ' POWRH=0 POWBS=0 POWGC=0 POWBD=0 POW07=0 POW10=0 POWX=0 RANDOMIZE TIMER REM WAS8BIT BG 1 BG COPY 0,0,20,16 TO 0,0 SPRITE 0,,,94 SPRITE 0 SIZE 1 BG 0 X=1 Y=1 FOR I=0 TO 3 FOR II=1 TO 15 C=1 PAL I CELL I*2+2,II,II CELL I*2+3,II,16+I NEXT II NEXT I PLAY 0,90,1 TOUCHSCREEN ITOUCH=0 DO IF TOUCH THEN TX=TOUCH.X\16 TX=TX*2 TY=TOUCH.Y\8 IF ITOUCH=0 THEN IF CELL.C(TX,TY)<>0 THEN ITOUCH=1 OX=TX OY=TY OC=CELL.C(TX,TY) OC1=CELL.C(TX+1,TY) OA=CELL.A(TX,TY) CALL POP(TX,TY) END IF ELSE IF ITOUCH=1 THEN SPRITE 0,TX*8,TY*8, PLAY 0,35,1 SOUND 0 END IF ELSE IF ITOUCH=1 THEN PAL OA IF CELL.C(TX,TY)=0 THEN CELL TX,TY,OC CELL TX+1,TY,OC1 WAIT 3 PLAY 1,35,6 SOUND 1 ELSE CELL OX,OY,OC CELL OX+1,OY,OC1 PLAY 1,35,3 SOUND 1 WAIT 6 PLAY 1,35,3 SOUND 1 END IF SPRITE OFF 0 ITOUCH=0 END IF END IF WAIT VBL LOOP SUB POP(X,Y) A=CELL.A(X,Y) C=CELL.C(X,Y) C1=CELL.C(X+1,Y) CELL X,Y,0 CELL X+1,Y,0 COPY $8000+16*C,16 TO $8000+16*94 COPY $8000+16*C1,16 TO $8000+16*95 SPRITE 0 PAL A END SUB #1:MAIN PALETTES 153F2A30003F2A00003F2A08003F2A07 003F2A15003F2A15003F2A15003F2A15 #2:MAIN CHARACTERS 00000000000000000000000000000000 FFFFFFFFFFFFFF0000442810284400FF FFFFFFFFFFFFFF0000102838282800FF FFFFFFFFFFFFFF0000380838203800FF FFFFFFFFFFFFFF0000380818083800FF FFFFFFFFFFFFFF0000282838080800FF FFFFFFFFFFFFFF0000382038083800FF FFFFFFFFFFFFFF0000382038283800FF FFFFFFFFFFFFFF0000380808080800FF FFFFFFFFFFFFFF0000382838283800FF FFFFFFFFFFFFFF0000382838083800FF FFFFFFFFFFFFFF00005C5454545C00FF FFFFFFFFFFFFFF0000781010502000FF FFFFFFFFFFFFFF0000304848502800FF FFFFFFFFFFFFFF0000485060504800FF FFFFFFFFFFFFFF0000444454542800FF FEFEFEFEFEFEFE000151F9F9712101FF FEFEFEFEFEFEFE00012171F9A92101FF FEFEFEFEFEFEFE00017171D9F92101FF FEFEFEFEFEFEFE00012171F9712101FF 00000000000000000000001818000000 00000000000000000000001818000018 0000000000000000000000181800003C 000000000000000000000018180000FF 00000000000000FF000000181800FF00 00000000000000FF0000001818FFFF00 00000000000000FF00000018E7FFFF00 00000000000000FF000000E7E7FFFF00 00000000000000FF0000FFE7E7FFFF00 00000000000000FF00FFFFE7E7FFFF00 00000000000000FFFFFFFFE7E7FFFF00 00000000000055FFFFFFFFE7E7FFAA00 0000000000AA55FFFFFFFFE7E755AA00 0000000045AA55FFFFFFFFE7A255AA00 000000A245AA55FFFFFFFF45A255AA00 000055A245AA55FFFFFFAA45A255AA00 00AA55A245AA55FFFF55AA45A255AA00 55AA55A245AA55FFAA55AA45A255AA00 55AA55A245AAFFFFAA55AA45A2550000 55AA55A245FFFFFFAA55AA45A2000000 55AA55A2E7FFFFFFAA55AA4500000000 55AA55E7E7FFFFFFAA55AA0000000000 55AAFFE7E7FFFFFFAA55000000000000 55FFFFE7E7FFFFFFAA00000000000000 55FFFFE7E7FFFFFFAA00000000000000 D5FFFFE7E7FFFFFF2A00000000000000 D7FFFFE7E7FFFFFF2800000000000000 FFFFFFE7E7FFFFFF0000000000000000 0F6F6F6F6F6F6F0FF0919393919090F0 F0F6F6F6F6F6F6F00F49E9E9C989090F 0F6F6F6F6F6F6F0FF0F1F3F3F1F0F0F0 F0F6F6F6F6F6F6F00F4FEFEFCF8F0F0F 0F6F6F6F6F6F6F0FF0909193929090F0 F0F6F6F6F6F6F6F00F89C9E9A989090F 0F6F6F6F6F6F6F0FF0F0F1F3F2F0F0F0 F0F6F6F6F6F6F6F00F8FCFEFAF8F0F0F 0F6F6F6F6F6F6F0FF0919193939090F0 F0F6F6F6F6F6F6F00FC9C969E989090F 0F6F6F6F6F6F6F0FF0F1F1F3F3F0F0F0 F0F6F6F6F6F6F6F00FCFCF6FEF8F0F0F 0F6F6F6F6F6F6F0FF0909193919090F0 F0F6F6F6F6F6F6F00F89C9E9C989090F 0F6F6F6F6F6F6F0FF0F0F1F3F1F0F0F0 F0F6F6F6F6F6F6F00F8FCFEFCF8F0F0F 0F6E6F6F6F6F6F0FF0919090909090F0 F036B6B6B6B6F6F00FC949494949090F 0F0E0F0F0F0F0F0FF0F1F0F0F0F0F0F0 F030B0B0B0B0F0F00FCF4F4F4F4F0F0F 0F6A6A6A6A6A6F0FF0959595959590F0 F036B6B6B636F6F00FC9494949C9090F 0F0A0A0A0A0A0F0FF0F5F5F5F5F5F0F0 F030B0B0B030F0F00FCF4F4F4FCF0F0F 3F2020202020203F001F1F1F1F1F1F00 FC040404040404FC00F8F8F8F8F8F800 00000000000000000000000100000000 00000000000000000000008000000000 3F3F3F30303F3F3F0000000F0F000000 FCFCFC0C0CFCFCFC000000F0F0000000 0000000000000000202027242720203F 00000000000000000404E424E40404FC 00FFFFFFFFFFFFFF0000020707030100 00FEFEFEFEFEFEFE000181C1C1810101 00FFFFFFFFFFFFFF0000010307050100 00FEFEFEFEFEFEFE00010181C1410101 00FFFFFFFFFFFFFF0000030306070100 00FEFEFEFEFEFEFE00018181C1C10101 00FFFFFFFFFFFFFF0000010307030100 00FEFEFEFEFEFEFE00010181C1810101 FFFFFFFFFFFFFF0000000000000000FF FEFEFEFEFEFEFE0001010101010101FF 0F6B6D6E6D6B0F0FF09492919294F0F0 F0B676F676B6F6F00F4989098949090F 0F0B0D0E0D0B0F0FF0F4F2F1F2F4F0F0 F0B070F070B0F0F00F4F8F0F8F4F0F0F C0800000000080C00000000000000000 03010000000001030000000000000000 #3:MAIN BG 000014102F002F004E004F004E004F00 4E004F004E004F004E004F004E004F00 4E004F004E004F00300031004C004D00 4A004B004A004B004A004B004A004B00 4A004B004A004B004A004B004A004B00 480049004C004D004A004B004A004B00 4A004B004A004B004A004B004A004B00 4A004B004A004B00340135014C004D00 4A004B004A004B004A004B004A004B00 4A004B004A004B004A004B004A004B00 48004900500051004A004B004A004B00 4A004B004A004B004A004B004A004B00 4A004B004A004B003802390258005900 4A004B004A004B004A004B004A004B00 4A004B004A004B004A004B004A004B00 48004900520153014A004B004A004B00 4A004B004A004B004A004B004A004B00 4A004B004A004B003C033D0358005900 4A004B004A004B004A004B004A004B00 4A004B004A004B004A004B004A004B00 48004900540255024A004B004A004B00 4A004B004A004B004A004B004A004B00 4A004B004A004B004000410058005900 4A004B004A004B004A004B004A004B00 4A004B004A004B004A004B004A004B00 48004900560357034A004B004A004B00 4A004B004A004B004A004B004A004B00 4A004B004A004B004800490058005900 4A004B004A004B004A004B004A004B00 4A004B004A004B004A004B004A004B00 480049005A005B004A004B004A004B00 4A004B004A004B004A004B004A004B00 4A004B004A004B004400450048004900 4A004B004A004B004A004B004A004B00 4A004B004A004B004A004B004A004B00 480049004C004D004A004B004A004B00 4A004B004A004B004A004B004A004B00 4A004B004A004B00480049004C004D00 4A004B004A004B004A004B004A004B00 4A004B004A004B004A004B004A004B00 48004900 #15:MAIN SOUND 08000114040F0C0008008000000C0000 28008000000C00002800303019FE0000 38002020000000003800505000000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000