10 READ a$:l=30060:FOR j=1 TO 60 STEP 2:POKE l,VAL("&"+MID$(a$,j,2)):l=l+1:NEXT:l=10000:FOR n=1 TO 6:READ a$:FOR j=1 TO LEN(a$) STEP 2:POKE l,VAL("&"+MID$(a$,j,2)):l=l+1:NEXT:NEXT:DATA 0100004600000f0600000200004800000f0600000100000000000f030000:BORDER 0 20 MODE 1:PAPER 0:CLS:PEN 2:CALL &BB03:INPUT "Skill 1-255 ";a:POKE 10449,a:MODE 0:x=12:y=8:a=382:b=620:c=2:d=6:e=10:GOSUB 40:x=572:y=76:a=244:b=40:GOSUB 40:x=32:y=338:a=40:b=580:c=4:d=9:e=12:GOSUB 40:y=18:c=2:d=3:e=11:GOSUB 40:x=30:y=76:a=244:b=520:c=6 30 d=2:e=0:GOSUB 40:PRINT m$:PAPER 11:PEN 4:LOCATE 4,23:PRINT y$:PEN 2:PAPER 10:j=9:FOR k=1 TO 3:FOR t=14 TO 4 STEP -5:LOCATE t,6+4*k:PRINT STR$(j):j=j-1:NEXT:NEXT:FOR t=1 TO 700:NEXT:CALL 10000:PAPER 0:LOCATE 6,12:PRINT t$:FOR k=1 TO l/3:NEXT:GOTO 20 40 PAPER 12:INK 0,0:INK 5,15:t$="Game Over!":m$="+ Whack Attack +":y$="Score-":LOCATE 3,3:PEN 11:PLOT x,y:FOR t=1 TO 2:DRAWR 0,a,c:DRAWR b,0:DRAWR 0,-a,d:DRAWR -b,0:MOVER -4,2:NEXT:MOVER 12,0:FOR t=1 TO (a/2)-2:DRAWR b-12,0,e:MOVER -b+12,2:NEXT:RETURN 50 DATA AF32307532B888CD73282140C3221E4ECD2028CD0B28CD6528CDD028CDCD27CD3A273AB888FE0028EAC93A3075FE00202C210100223075CDB8274FCDB82721DCC247111400CDC52741114001CDC52722327511F000ED52237EFE0020D43A3075FE0228163A31753C323175FE0B201E3E02323075CD9D27C3AB283A 60 DATA 31753D323175FE0020083230753C32B888C92A32753A317532272847CD29BC10FB11E428CD26283E0B322728C9ED5F47AF3CFE032001AF10F8C978FE00C81910FDC92A1E4E11F000193A3275BDC03A3375BCC0119429CDFF27CDB728CD9A280EC8CDD2280EC8CDD22811EC29CDFF27AF323075C92A3275060BCD29 70 DATA BC10FB181B21DB281E0306037EE5CD1EBB2020E12310F51D20F0113C292A1E4E0E0BE506081A77132310FAE1CD26BC0D20F0C9E14BED43187911EC29CD232821ECC11140013A18793D28031918FA1114003A19793D28031918FA221E4E18BB3E1BCD1EBBC83E3ECD1EBB28F9C9060721C05D36302310FB21170BCD 80 DATA 75BB3E04CD90BB3E0BCD96BB060721C05D7ECD5ABB2310F9C921C55D7E3CFE3A28037718D736302B18F2216C75CDAABC217675C3AABC3E0FF5328675328575218075CDAABC06FA0010FDF13D20EAC90E14068C0010FD0D20F8C9050E0D040C14030B0A0000000000000000000000CFCF0000000000CFCFCFCF0000 90 DATA 00459A659A658A00004534659A388A0000CF30CFCF30CF0000CFCF9ACDCFCF0000CFCFCECDCFCF0000CF9ACFCF65CF0000CFCF3030CFCF0000CFCFCFCFCFCF0000050F0F00000000001E3C3C0A000000001E2C3C0A000000001E1C3C0F0F0F00001E3C3C3C3C3C0A001E3C3C3C3C3C0A001E3C3C3C3C3C0A001E3C 100 DATA 3C0F0F0F00001E3C3C0A000000001E3C3C0A00000000050F0F00000000000000000000000000444488CC4488000044CC444488880000CCD8D8D8D8CC000088E0F0D0E488000044D8C0C0D0440000CCF0C0F0C4CC0000CCC8F0E4F0CC000044F0D8D8E488000088CC4488CCCC00004488CC44CC0000000000000000