Related Products
A dark cloud appears on the horizon and inches towards you. The invasion is on and they fire, blowing away bits of your shields. You thrust left and right, avoiding bombs while you knock the invaders off one by one. But they inch closer, thirteen rows, seven to a row. Can you get them before
Gallery
Source Code
0 REM \76\76\2A\0C\40\11\22\00\19\06\20\3E\8A\77\23\10\FC\3E\80\0E\15\06\20\23\77\10\FC\23\0D\20\F6\06\20\3E\03\23\77\10\FC\11\30\00\ED\52\36\A6\22\3C\40\1E\B2\ED\52\06\03\1E\05\AF\36\07\23\77\23\77\23\77\23\77\23\36\84\19\10\F0\1D\3E\02\0E\03\23\23\23\06\06\72\23\10\FC\19\0D\20\F6\3D\20\EE\06\03\23\23\23\77\19\23\77\19\10\F8\C9\2A\0C\40\11\A6\00\19\22\3E\40\11\07\00\3E\BC\4B\06\0D\77\23\23\10\FB\19\0D\20\F5\3E\5B\32\40\40\3E\80\32\41\40\21\01\00\22\48\40\C9\E5\21\FF\7F\36\07\2B\7E\00\23\36\0F\2B\56\23\36\07\2B\00\2A\3C\40\01\FE\EF\ED\78\00\01\00\00\CB\47\CA\18\42\CB\5F\28\08\CB\67\C0\11\FF\FF\18\06\CB\67\C8\11\01\00\36\80\19\7E\FE\76\20\02\ED\52\22\3C\40\36\A6\FE\97\C0\C3\D5\43\21\FF\7F\36\06\2B\36\1F\23\36\09\2B\36\0F\23\36\07\2B\36\C9\3A\41\40\CB\7F\28\0B\CD\AF\41\ED\5B\48\40\CD\CF\41\C9\CD\AF\41\11\21\00\CD\CF\41\21\48\40\7E\EE\FE\77\23\7E\EE\FF\77\3A\41\40\CB\FF\00\32\41\40\FE\81\C0\0E\02\C9\2A\3E\40\11\94\48\0E\07\06\0D\7E\FE\BC\20\02\36\80\12\23\23\13\10\F3\06\07\23\10\FD\0D\20\E9\C9\2A\3E\40\19\22\3E\40\11\94\48\0E\07\06\0D\1A\FE\BC\20\21\CD\92\45\7E\FE\9B\CC\A6\43\23\7E\2B\FE\76\28\07\2B\7E\23\FE\76\20\08\3A\41\40\CB\BF\32\41\40\36\BC\23\23\13\10\D5\06\07\23\10\FD\0D\20\CB\21\FF\7F\36\07\2B\74\C9\ED\5B\42\40\CB\72\C0\11\DF\FF\19\7E\FE\97\C8\FE\BC\CA\30\43\36\9B\22\42\40\CD\6A\45\C9\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\2A\44\40\CB\74\C0\2A\3C\40\11\DF\FF\01\00\13\19\7E\FE\BC\28\03\10\F8\C9\06\00\ED\52\7E\FE\9B\CC\A6\43\FE\80\28\03\36\80\C9\36\97\22\44\40\C9\00\00\00\2A\42\40\CB\74\C8\11\DF\FF\36\80\19\7E\FE\BC\CA\30\43\FE\94\CA\58\43\FE\8A\CA\A6\43\FE\C3\CC\C1\43\FE\80\28\05\36\80\C3\A6\43\36\9B\22\42\40\C9\00\00\2A\44\40\CB\74\C8\11\21\00\36\80\19\7E\FE\A6\CA\D5\43\FE\03\CA\C1\43\FE\9B\CC\A6\43\FE\80\28\05\36\80\C3\C1\43\36\97\22\44\40\C9\00\00\00\00\00\00\00\2A\46\40\CB\74\C0\2A\0C\40\11\43\00\19\3A\34\40\CB\47\20\05\1E\1F\19\CB\FC\36\94\22\46\40\C9\00\00\00\00\00\00\00\00\00\2A\46\40\CB\74\C8\36\80\CB\7C\28\02\2B\2B\23\7E\FE\76\20\06\26\00\22\46\40\C9\FE\9B\CA\58\43\36\94\22\46\40\C9\00\00\00\36\80\21\FF\7F\36\0C\2B\36\0A\23\36\07\2B\36\FE\23\36\0D\2B\36\09\0E\03\CD\8A\43\21\40\40\35\C0\0E\03\C9\00\00\00\00\00\36\80\21\FF\7F\36\00\2B\36\32\23\36\06\2B\36\00\23\36\0C\2B\36\19\23\36\07\2B\36\F6\23\36\0D\2B\36\03\2A\34\40\26\00\7E\E6\0F\C6\05\4F\21\47\40\36\00\2A\0C\40\11\0F\00\19\59\41\4A\34\7E\FE\A6\20\03\36\9C\0C\10\F5\2B\79\FE\00\20\ED\43\22\7B\40\2A\42\40\7E\FE\9B\20\02\36\80\21\00\00\22\42\40\2A\7B\40\3E\80\C9\00\00\22\7B\40\21\00\00\22\44\40\2A\7B\40\3E\80\C9\00\00\00\00\00\01\01\00\36\80\C9\00\00\00\21\FF\7F\EB\21\FE\7F\3E\01\12\36\00\3C\12\36\00\3C\12\36\0A\3C\12\36\00\3C\12\36\0F\3C\3C\12\36\FF\3C\12\36\10\3C\3C\12\36\0F\3C\12\36\00\21\00\1E\E5\11\00\84\01\00\02\ED\B0\E1\0E\A0\ED\B0\E5\21\70\44\0E\08\ED\B0\E1\0E\08\09\0E\10\ED\B0\E5\21\78\44\0E\08\ED\B0\E1\0E\08\09\0E\18\ED\B0\E5\21\80\44\0E\08\ED\B0\E1\0E\08\09\0E\50\ED\B0\E5\21\88\44\0E\08\ED\B0\E1\0E\08\09\0E\A8\ED\B0\E5\21\90\44\0E\08\ED\B0\E1\0E\08\09\0E\18\ED\B0\C9\00\00\00\00\3C\7E\A5\7E\3C\00\00\24\3C\3C\18\18\00\00\00\00\18\18\18\18\00\00\00\18\3C\7E\7E\5A\42\00\00\42\24\7E\DB\FF\A5\99\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\2A\4A\40\78\FE\15\30\07\58\16\00\19\22\4A\40\06\00\79\FE\00\28\03\E6\FC\C8\06\5A\CD\1E\46\00\10\FA\C3\E8\44\00\00\00\00\01\00\00\21\4C\40\34\7E\21\C0\44\E5\21\AE\42\00\CB\47\C2\7C\42\00\CB\4F\C2\1A\41\CB\57\5F\C4\08\43\3A\40\40\57\E6\70\CB\3F\CB\3F\CB\3F\CB\3F\C6\02\4F\7A\FE\05\DA\65\41\51\0E\00\3E\02\CB\53\20\19\3C\CB\5B\20\14\3C\CB\63\20\0F\3C\CB\6B\20\0A\3C\CB\73\20\05\3C\CB\7B\28\04\BA\CA\65\41\7B\E6\FF\CA\4A\42\2A\34\40\CB\BC\CB\B4\7E\00\BD\CA\E0\42\C9\00\00\00\00\00\00\00\00\00\00\00\00\C9\00\00\00\21\FF\7F\36\00\2B\36\C8\23\36\06\2B\36\12\23\36\09\2B\36\10\23\36\0C\2B\36\0C\23\36\07\2B\36\EE\23\36\0D\2B\36\09\C9\00\ED\53\7B\40\11\21\00\19\7E\ED\52\ED\5B\7B\40\FE\03\C0\3A\41\40\CB\C7\32\41\40\C9\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\C9\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00 1 REM *** SPACE INVADERS *** 2 REM *** BY DAVE EDWARDS *** 3 REM %W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W%W% %W%W%W%W%W%W%W%W%W%W%W%W% %W%W%W%W%W%W%W%W%W%W%W%W% % %W%W 4 GOTO 10 5 SAVE "SPIN%V" 10 RAND USR 17374 11 LET A=32767 12 LET D=32766 13 LET C$=" \' \' \' \' \' \' \ '\ '\ '\ '\ '\ '\ '\ '\ '\''\ '" 14 LET F$="%?\7F%4RNDCHR$ RND\7D\' \7D\68RND%E%ECHR$ IF IF IF IF \.:%B%B IF IF B IF " 15 LET L$="\:'\:'\:'\:')\ '\: \ '\ '\ '\ '\.'\.'£\~~\##\' £\##\' \##\' \##\' $" 16 LET H=0 17 LET H$="%0%0%0%0%0" 18 LET N$="" 19 CLS 22 POKE A,14 23 POKE D,0 25 PRINT AT 4,0;"% %W% %W% %W% %W% %W% %W% %W% %W% %W% %W% %W% %W% %W% %W% %W% %W" 26 LET P=1 27 LET Q=5 28 GOSUB 850 30 PRINT AT 8,0;"THERE ARE 3 LEVELS OF PLAY:" 35 PRINT AT 11,2;"%1 BEGINNERS;" 40 PRINT AT 13,2;"%2 ADVANCED;" 45 PRINT AT 15,2;"%3 EXPERT." 50 PRINT AT 20,0;"WHICH LEVEL DO YOU SELECT?" 55 INPUT L 60 LET L=INT L 65 IF L<1 OR L>3 THEN GOTO 55 70 CLS 75 LPRINT 80 POKE 17736,255 85 POKE 17223,L 90 POKE 17626,65+(4-L)*25 91 POKE 17049,151 92 POKE 16666,0 93 POKE 17655,229 94 POKE 17661,225 95 GOSUB 790+10*L 100 LET B=2 105 LET S=1 110 POKE 16626,67+33*L 120 POKE 16627,0 130 RAND USR 16516 140 PRINT AT 0,0;"%A%A% \@@% %S%C%O%R%E% %0%0%0%0%0% \@@% %H%I%G%H%E%S%T% ";H$ 142 LET P=1 144 LET Q=5 146 GOSUB 850 150 LET X=(PEEK 16626)+33*((S+L)<9) 155 IF X>255 THEN POKE 16627,1 160 IF X>255 THEN LET X=X-256 165 POKE 16626,X 170 RAND USR 16622 180 LET X=1+PEEK 17736-2**(S+1)*2**(L+1) 190 POKE 17736,X AND X>0 200 LET X=USR 17640 205 IF X>3 THEN GOTO 200 210 IF X=1 THEN GOTO 280 220 IF X=2 THEN GOTO 390 230 FOR N=1 TO 15 235 NEXT N 240 LET P=6 245 LET Q=14 250 GOSUB 830 260 LET S=S+1 265 IF S<>5-L THEN GOTO 150 270 LET B=B+1 274 PRINT AT 0,B-1;"%A" 278 GOTO 150 280 GOSUB 700 290 LET B=B-1 300 IF B=-1 THEN GOTO 350 310 PRINT AT 0,B;"% " 320 POKE PEEK 16444+256*PEEK 16445,166 330 POKE 16453,0 340 GOTO 200 350 LET P=15 353 LET Q=25 356 GOSUB 830 357 GOSUB 991 358 CLS 360 PRINT AT 3,0;"WE HAVE DESTROYED YOUR LAST BASE" 370 GOSUB 600 380 GOTO 430 390 LET P=15 393 LET Q=25 396 GOSUB 830 397 GOSUB 991 398 CLS 400 PRINT AT 3,2;"WE HAVE INVADED YOUR PLANET" 410 GOSUB 600 430 PRINT AT 10,0;"YOUR SCORE IS ";SC 440 IF SC>H THEN GOTO 490 450 PRINT AT 14,0;"HIGHEST SCORE IS ";H;" BY",N$ 460 PRINT AT 20,0;"PRESS ""0"" FOR ANOTHER GO" 470 IF INKEY$="0" THEN GOTO 50 480 GOTO 470 490 PRINT AT 14,0;"YOU HAVE SET A NEW HIGHEST SCORE" 493 LET P=6 496 LET Q=14 498 GOSUB 830 500 GOSUB 600 510 LET S$=STR$ SC 520 LET X=LEN S$ 530 FOR N=1 TO X 540 LET H$(5-X+N)=CHR$ (CODE S$(N)+128) 550 NEXT N 560 PRINT AT 14,0;"PLEASE INPUT YOUR NAME " 570 INPUT N$ 580 LET H=SC 590 GOTO 440 600 FOR N=1 TO 30 610 NEXT N 620 RETURN 700 POKE A,8 705 POKE D,16 710 POKE A,9 715 POKE D,16 720 POKE A,10 725 POKE D,16 730 POKE A,12 735 POKE D,2 740 POKE A,7 745 POKE D,199 750 POKE A,13 755 POKE D,13 760 POKE A,6 765 POKE D,31 770 POKE D,16 775 POKE D,0 780 POKE A,12 785 POKE D,30 790 POKE A,13 791 POKE D,9 795 POKE A,6 796 FOR N=0 TO 31 797 POKE D,N 798 NEXT N 799 RETURN 800 POKE 17677,203 802 POKE 17678,63 804 POKE 17688,5 806 POKE 17692,0 808 RETURN 810 POKE 17677,203 812 POKE 17678,63 814 POKE 17688,4 816 POKE 17692,0 818 RETURN 820 POKE 17677,230 821 POKE 16666,229 822 POKE 17678,112 823 POKE 17655,0 824 POKE 17688,2 825 POKE 17661,0 826 POKE 17692,5 827 POKE 17049,195 828 RETURN 830 POKE A,10 840 POKE D,15 850 FOR N=P TO Q 860 POKE A,7 870 POKE D,255 880 POKE A,4 890 POKE D,CODE F$(N) 900 POKE A,5 910 POKE D,CODE C$(N) 920 POKE A,7 930 POKE D,251 940 FOR J=1 TO CODE L$(N)-2 950 NEXT J 960 NEXT N 970 POKE A,7 980 POKE D,255 990 RETURN 991 LET SC=0 992 LET HL=15+PEEK 16396+256*PEEK 16397 993 FOR N=0 TO 3 994 LET SC=SC+(PEEK (HL-N)-156)*10**(N+1) 995 NEXT N 996 RETURN 999 REM % %7%K% % %B%Y%T%E%S% 1000 SAVE "IN%V" 1010 RUN