TRUE = 1=1 FALSE= NOT TRUE BG 1 BG SOURCE ROM(3) BG COPY 0,0, 20,16 TO 0,0 BG 0 GAMEPAD 1 READP=ROM(5)+1 'N=PEEK(ROM(5)) N=3 DIM BX(N),BY(N),R(N),RR(N),XA(N),YA(N),BRIGHTNESS(N) WRITEP=$A000 RANDOMIZE TIMER DOHARD=FALSE SP=0.1 O=1 FOR I=0 TO N BRIGHTNESS(I)=0.5+RND/2 BX(I)=RND*15 BY(I)=RND*15 'BX(I)=PEEK(READP)/8-0.5 'BY(I)=PEEK(READP+1)/8-0.5 READP=READP+2 R(I)=5 RR(I)=R(I)^2 XA(I)=(RND-0.5)*SP YA(I)=(RND-0.5)*SP NEXT I PX=0 PY=0 DO IF TIMER MOD 3= 0 THEN PY=PY+UP(0)-DOWN(0) PX=PX+LEFT(0)-RIGHT(0) IF BUTTON(0,1) THEN IF WA=FALSE THEN POKE WRITEP,PX WRITEP=WRITEP+1 LENG=LENG+1 POKE WRITEP,PY WRITEP=WRITEP+1 LENG=LENG+1 END IF END IF IF BUTTON(0,0) THEN SAVE 5,"PLACES",$A000,LENG END IF WA= BUTTON(0,1) END IF SPRITE 0,PX,PY,19 TIME=TIME + 1 SCROLL 0, (TIME MOD 2),0 FOR X=TIME MOD 2 TO 19 STEP 2 FOR Y=(TIME/2)MOD 2 TO 15 STEP 2 F=0 D=10000000 FOR I=0 TO N D2=(X-BX(I))^2+(Y-BY(I))^2 F=F+RR(I)/(D2) D2=D2/R(I) IF D216 THEN XA(I)=-ABS(XA(I)) IF BY(I)<0 THEN YA(I)=ABS(YA(I)) IF BY(I)>16 THEN YA(I)=-ABS(YA(I)) NEXT I WAIT VBL LOOP #1:MAIN PALETTES 0014283C0004080C0010203000050A0F 001020300010243800051A2F00002A35 #2:MAIN CHARACTERS 00000000000000000000000000000000 AA55AA55AA55AA550000000000000000 FFFFFFFFFFFFFFFF0000000000000000 AA55AA55AA55AA5555AA55AA55AA55AA 0000000000000000FFFFFFFFFFFFFFFF AA55AA55AA55AA55FFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FF24FF92FF49FF240000000000000000 FF92FF49FF24FF920000000000000000 FF49FF24FF92FF490000000000000000 C040C040C040C0400000000000000000 03020F093F24FF920000000000000000 C040F090FC24FF490000000000000000 00000000000000000000000000000000 00000000000000000000400000000000 00000000000000000000000000000000 42FF4242FF4242FF0000000000000000 FF4242FF4242FF420000000000000000 4242FF4242FF42420000000000000000 FF80808080808080FF80808080808080 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 FF49C97FC949FF240000000000000000 C040C040C040C0000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 FF9393939393FF4B0000000000000000 FF49497F4949FF240000000000000000 00000000000000000000000000000000 FFEDEDD9CDA821230000000000000000 FFFAEEB6484898980000000000000000 FF553319090810000000000000000000 00C0E070D89C16670000000000000000 00000000000000000000000000000000 000018187E7E18180000000000000000 000000C0404040400000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 0055331B0F0703010000000000000000 0055331B0F8FCFEF0000000000000000 00000000000000000000000000000000 0080C0E0F0F8FCFE0000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000FF0000000000000000 3119092C644040800000000000000000 1C13080C040400000000000000000000 00000000000103020000000000000000 311B0E2C644040800000000000000000 80C0E030788C9F370000000000000000 00000000000000E00000000000000000 00000000000000000000000000000000 FF7F3F1F0F0F0F0F0000000000000000 0080C0E0F0F0F0F00000000000000000 00000000000000000000000000000000 FF7F3F1F0F0703010000000000000000 80C0E0F0F8FCFEFF0000000000000000 07030100000000000000000000000000 80C0E0F0F0F0F0F00000000000000000 00000000000000000000000000000000 7A7A7AFD7A7A7AFF0000000000000000 FF00FF64485060400000000000000000 FF00FF48902040800000000000000000 FF00FF00000000000000000000000000 00000000000000000000000000000000 10387CFE444444280000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 FF00FF52644850600000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000111155550000000000000000 00000000101054540000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 FF00FFA9B2A4A8B00000000000000000 FF00FF52644850600000000000000000 80808000000000000000000000000000 00000000000000000000000000000000 101010107C1010100000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 FF555555555555550000000000000000 FE545454545454540000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 A0A0A0A0A0A0A0A00000000000000000 00000000000000000000000000000000 02020202020202020000000000000000 00000000000000000000000000000000 10101010101010100000000000000000 00000000000000000000000000000000 00000000003844440000000000000000 00000000003844820000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000000C6C38140000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000243C2424240000000000000000 000000090F09093F0000000000000000 00000000000000FF0000000000000000 000000121E1212120000000000000000 101010101010387C0000000000000000 00000000000000000000000000000000 44381030509894120000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000241455550000000000000000 08040C04845455550000000000000000 00000000101054540000000000000000 414952B3121C10100000000000000000 0E1B3030303060600000000000000000 3C7E7E7E4A7E527E0000000000000000 00000000000000000000000000000000 2427243F242424240000000000000000 118F8F89898F888F0000000000000000 4478C040407008F80000000000000000 12FE92FE929292920000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 10101814122242820000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 0000000000FF22220000000000000000 0000000000F010100000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 0038449A8A8244380000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 FF7B7B7B7B7B7B000000000000000000 FFDDDDDDDECEFF490000000000000000 FFDADADAE9EDFF240000000000000000 E0A0A0D8679CFF900000000000000000 00000000C040C0000000000000000000 FF49FF24FF92FF490000000000000000 F020E040C040C0400000000000000000 000010927C5454380000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 FFDADADAE9EDFF240000000000000000 E0A0A0D8679CFF900000000000000000 00000000C06098C80000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 FF010101010101010000000000000000 F020E040C040C0400000000000000000 00000000000000000000000000000000 FF92FF24FF49FF920000000000000000 C040C040C142FD7F0000000000000000 105438F03050B8100000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 0000FF7B7B7B7B7B0000000000000000 0000FFDDDDDDDECE0000000000000000 0000FFDADADAE96D0000000000000000 0000E0A0A0D8679D0000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 F020E040C040C0400000000000000000 10387CFE444444280000000000000000 #3:MAIN BG 00008010000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000000A3700000000000000000000 00000000000000000E07000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000E07000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000E07 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000000A3700000000000000000000 00000000000000000000000000000000 0000000000000E070000000000000000 0E07000000000E070000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 0E070000000000000000000000000000 00000000000000000000000000000000 0E070000000000000000000000000000 00000000000000000000000000000000 00000E07000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000000A37000000000E0700000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000002000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000000000000000000E0700000000 000000000E0700000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000008E2700000000000000000000 00000000000000000000000000000000 00000000000000000000140000000000 0000000000072A27333F000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000000000000000000E0700000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000009E2700000000000000000000 000000000000000000000E0700000000 00000000000000001400140000000000 0007232720373D3F2A27000000000000 00000000000000000000000000000000 0000000000000E070000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000000A2700000000000000000000 00070007000000000000000000000000 000700000000000014000E0700000000 0007383F023F2A2F37273D272A2F292F 001F0000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 0000000000000E070000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000000A279427000000000E070007 00070000000000070000000000000E07 00000000000000001400140000070007 000000373727373F37373C2F372F2A2F 292F000000000E070000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 0000000000000000000000000E070000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000000A2754270007000000072F27 442700072F2700070000000700070020 00000000000000001400140000003C37 423F42374237023F023F3D2702273A2F 392F0000000000000000000000000000 0000001F000000000000000000000000 00000E07000000000000000000000000 00000000000000000E07000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 000000005B275B270007000000073F27 742700073F2700270007000700070020 000000000000000014001400001F7327 623F1E3F1E3737270227373702270020 00200000000000000000000000000000 0000001F000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000072708270927072708270927 072708270727082709270C2700070000 00000000000000001400140000008327 623F623F62273C270227022702270020 0000000000000000000000000000003F 00000000000000000000000000200020 00200000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000082707270827092707270727 0827092707270727082709270C270007 000000000000000014001400522F412F 50274227422F402F0227022702270020 00000000000700000000000029272A27 6D2F2B27002000207C27002700000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000072708270927072708270927 07270827192F07270727082709270C27 00070000442700070007140700000000 602700200020522F0227022702270020 00000000000000000000000039073A27 373F003F000F232F222F212F202F0020 00200000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000072708270927092707270827 09270727082709270727072708270927 0C2779277427792F0007000700070000 60270020002000200227022702270020 00000000000000000000000000077927 37273827342F323F332F312F302F0020 00200000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000072708270827082709270727 08270927072708270927072708270927 09272027212722272327242700000000 602744274B274B274B274B274B274B27 4B274B274C2700000000240F232F222F 212F202F332F3327382F3337312F0020 00200000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000072708270927072708270927 08270927072708270927072708270927 09273027312732273327342735270007 602774275B275B275B275B275B275B27 5B275B275C2700270020342F332F322F 312F302F3C373B2F023F3C3F00200020 00200000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000 #5:LAMPS 020B3C33458365