KKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKT SED..... "/W" "!0X" "L0Y" "q0Z" " ".F" "KKKKKKKKKKKKKKKKKKK UG EPELLENT.)" PROGRAM #4 "RAITHS: A SHOOT-THE-ALIENS, "F "WHISTLES-AND-BELLS ARCADE GAME FOR"r "THE -128 REQUIRING THE PLAYER TO " "EXTERMINATE A MALICIOUS RACE OF " "SPACE-ROAMING LIFEFORMS. SE ORT 2" PRO ER "("SOLUTION TO RAFTY OMPARISON. ")" "E) " "n) " ") PROGRAM #17)"ALPHA SPRITE: SOLUTION TO THE EB.")"'87 OMMODA -128'S "" "INTO FOUR AREAS FOR KEEPING UP TO "-" "FOUR PROGRAMS IN MEMORY AT ONE "V" "TIME. "g" PROGRAM #9" "LT-EY 128:A PROGRAM PROVIDING "" "THE -128 WITH 37 ADDITIONAL USER-"" "DEFINA ------------------------ ** MAX OF 33 CHRS IN LENGTH **9 ---------------------------\ I124:X15:IN$(I,X):::mo PROGRAM #1p "HIS IS HOY!'S ACHINE ANGUAGE "q "ENTRY PROGRAM FOR OUR ADVENTUROUS"r "READERS WHO LIK %" "% PROGRAM #13(&"ARM ASS: SOLUTION TO THE EB- "R&"RUARY '87 OMMODARE, REQUIRING A "|&"NUMERIC VARIABLE BETWEEN 0 AND "&"65535 TO BE DEFINED IN ONE PROGRAM."&" THE SUM OF THE PRODUCTS OF",2"THE #'S IN EACH ROW IS A MAXIMUM." -7 PROGRAM #216-8"-NAP: A SECTOR EDITOR ENABLING "a-9"THE -64 USER TO MODIFY AND VIEW "-:"ANY BLOCK OF A STANDARD "-;"FORMATTED DISKETTE. GRAM #5 "ALACTIC AB O.: A DIFFICULT UNAR"1 "ANDER-TYPE GAME FOR THE -128 THAT"] "TAKES PLACE INSIDE A MASSIVE CAVERN" "UNDER THE SURFACE OF A PLANET. " "OYSTICK IN ORT 2. " PROGRAM #6 "OWER RE, REQ. A 128 PROGRAM ")"TO PUT A CHARACTER ONSCREEN, CAP-")*"TURE IT,CONVERT IT TO A SPRITE, AND"S*"MAGNIFY IT 2 TIMES HIGH AND WIDE. "e* PROGRAM #18*"LPHA PRITE: A -64 SOLUTION TO "*"ALPHA SPRITE. "* BLE FUNCTION KEYS, ACCESSED"# "BY PRESSING AN ALPHANUMERIC CHAR. "=# "IN TANDEM WITH THE EY. "O# PROGRAM #10z# "IFFIES: A UTILITY PRESENTED IN "# "SUPPORT OF THIS MONTH'S UPERT E- "#"PORT ON EGAFLOPS AND ICRO E TO TYPE IN THE" s "PROGRAMS FROM OUR MAGAZINE."t " "(y PROGRAM #2Sz "HOY!'S CHECKSUM PROGRAM, FOR MIS-"~{ "TAKEPROOF TYPING OF -64 "| "PROGRAMS PRINTED IN HOY!. (OR "} "PROGRAMS PUBLISHED FROM AY 1987 "  "& PROGRAM #14'"ARM ASS 2: ANOTHER SOLUTION TO "1'"ARM ASS. "Z'" "'" "'" "' PROGRAM #15'"RA "-<" "-A PROGRAM #22.B"OT SED..... "=.C" "f.D" ".E" ".F" "  QUARES: A -64 STATEGY GAME"  "REQUIRING THE PLAYER TO PUSH "A  "SQUARES INTO A VACANT AREA AHEAD "k  "OF HIS OPPONENT (OR COMPUTER IN "  "SOLOTAIRE MODE). "  PROGRAM #7  "AVE OF THE CE PE: A -64 GAME " "+" "1+" "C+# PROGRAM #19l+$"ALPHA SPRITE 2: ANOTHER -128 "+%"SOLUTION TO ALPHA SPRITE. "+&" SECONDS"#", DEMONSTRATING HOW QUICKLY ASIC"$$"CAN RESPOND TO YOUR JOYSTICK UTTON"6$ PROGRAM #11a$"64 WITCH OUNCE:A UTILITY INCLUDED"$"WITH THIS ISSUE'S UPERT EPORT ON "$"EGAFLOPS AND ICROSECONDS, DIS- "$"PLAYING TH ~ "ONLY! THERWISE USE 64 UG EP.)  PROGRAM #39 "HOY!'S CHECKSUM PROGRAM, FOR MIS- "b "TAKEPROOF TYPING OF -128 " "PROGRAMS PRINTED IN HOY! (OR PRO-" "GRAMS PUBLISHED FROM AY 1987 ONLY!" "THERWISE USE 128 FTY OMPARISON: SOLUTION TO THE" ("EB.'87 OMMODARE, REQUIRING A PROG"6("TO DETERMINE THE LARGEST OF FOUR "a("#'S WITHOUT USING ANY CONDITIONAL, "("COMPARISON, OR OOLEAN STATEMENTS."( PROGRAM #16("RAFTY OMPARISON 2: ANOTH.K PROGRAM #23.L"OT SED..... "/M" "D/N" "n/O" "/P" "/U PROGRAM #24/V"O  "  "REQUIRING THE PLAYER TO RESCUE "%! "AXINE WITHOUT BEING HIT BY ONE "L! "OF THE CE PE'S SNOWBALLS. "p! "OYSTICK IN ORT 1. "! PROGRAM #8! "128 MULTI RAM: A UTILITY MAKING IT "! "POSSIBLE TO SPLIT THE  "+'" ",(" "&,- PROGRAM #20Q,."AX QUARE: SOLUTION TO THE EB.'87"|,/"OMMODARE REQUIRING A PROGRAM TO ",0"ARRANGE DIGITS 1-9 IN A 3X3 SQUARE",1"SUCH THAT E SWITCH CONTACT STATUS "%"EACH TIME THE BUTTON IS PRESSED"% PROGRAM #12C%"128 SWITCH BOUNCE: A 128 VERSION "m%"OF 64 WITCH OUNCE. "%" "%" " '********************************M * MENU PROGRAM *s"* DESIGNED BY *$* DOUBLE L SOFTWARE *&* (C) 1987 ALL RIGHTS RESERVED *(********************************253265,(53265)239 34)"'":SC$(32)" "%jX828835:Y:X,Y:&k160,00,162,00,32,240,255,96%&lTX829:TY831@&mHX$"0123456789"]&nSP$" ":Z$(0):Q$(34)&oBASE50000:CB55296:LP0:PSLP&pSC00:TR18&/28&02:15:"˒ PERATION ABORTED." (L$,20)2)" "e C(L$,21)2)"" H(L$,22)1)"" R(L$,23)1)" RSR=ELECT PC=ORE /қ=XECUTE " \(L$,24)1)" O40:XX1:PO55587PO55507>X2X0(HAN$(13)21402R2080F\X0882:4100TaX22160bH3H4H5H8H9H12H17H19882:1550oX1882:230p882:225I116:POI,5:: P$(1)"LANKSPEED" P$(2)"64 U D THIS "/J(L$,18)4)" PROGRAM SUCCESSFULLY. SE THE"cT(L$,19)4)" PRESCRIBED METHOD WHICH IS..."^(L$,20)4)" OAD ''ROGNAME'' "h(L$,21)4)" [RESS ANY EY] "r(L$,22)4)"  P$(23)"" P$(24)"" 7 CL819:(L$,CL)14)" ":P (L$,P)10)" ":u657,128: DISABLE SHIFT/COM KEY775,200: DISABLE LISTING808,234: DISABLE STOP/RESTOREL$"":PT$ <:4000& P P$(25),IN$(25,5):5000O d53280,0:53281,0:(14):2500:5900k x800:53265,(53265)16 H1:G0:L8:LC55590:P8 I819:GG1:(L$,I)14)""P$(G): F(P$(H)):I0F:LCI,7::1000 (L$,P)10)PT$ AN$:AN$"&1" #";X:'" LEASE WAIT ABOUT FIVE"/'" SECONDS WHILE PERFORM THE "W'" NECESSARY PRELIMINARY"'" FUNCTIONS. "'X129159:SC$(X)(X64):%iSC$(128)"@":SC$( "C f(L$,4)10)""d p10)" " z10)""  S54272:S23,0:S24,15 S6,0:S5,12:S1,70:S3,40 S4,0:S4,65:D1100::S4,0: G EP "  P$(3)"128 UG EP II"  P$(4)"WRAITHS"= P$(5)"GALACTIC CAB CO."W P$(6)"OWER QUARES"s P$(7)"AVE F CE PE" P$(8)"128 MULTI RAM" P$(9)"ALT-KEY 128" P$(10)"IFFIES"( P$(11)"64 WITCH OUNCE"2 P$(12)"1 ">|(L$,23)3)" ":1000TAN$:AN$""1670b882:225 ************************** **** WINDOW ROUTINE **** **************************828(L$,5)11)" "=>":828-(L$,8)1)""nI914:(L$,I)1)" "t"(L$,15)1)" [/=ANCEL * PC=UN ROGRAM] ",(L$,16)1)" "206 AN$(17)1250* AN$(145)1300> AN$(13)2000^ AN$(32)G243000:140 AN$(32)3000:H13:LC55590:P8:150 204 "";:53280,0:53281,6 "OADING...";(34);P$(H)(34);"" "LOAD";(34);P$(H);(3 935:A:I,A::  160,0,185,0,4,153,0,1920 185,0,216,153,240,195,185,250T 4,153,250,192,185,250,216,153x 234,196,185,244,5,153,244,193 185,244,217,153,228,197,185,238 6,153,238,194,185,238,218,153 222,198,200,208,205 (L$,P)10)" ":I0F:LCI,14:1HH1:HGHH12EPP1:P19P8eLCLC40:LC56030LC55590n204(L$,P)10)" ":I0F:LCI,14:HH1:HG11HH12 PP1:P8P19#LCLC40:LC55590LC56030(204 28SWITCH BOUNCE" 7 P$(13)"ARM ASS"&< P$(14)"ARM ASS 2"?F P$(15)"RAFTY OMP"ZP P$(16)"RAFTY OMP 2"tZ P$(17)"ALPHA SPRITE"d P$(18)"LPHA PRITE"n P$(19)"ALPHA SPRITE 2" P$(20)"AX QUARE" P$(21)"-NAP" P$(22)"" "(L$,6)11)"EE NSTRUCTIONS"A(L$,7)11)"UN ROGRAM "g(L$,8)11)"ANCEL INDOW " (L$,9)11)""PO55507:X0 I116:POI,1::1000*AN$:AN$""20904AN$(17)2200:POP "'1(L$,23)3)" ":1000N6I15:(L$,8I)3)""IN$(H,I):d@AN$:AN$""4160}JAN$(13)882:204TH3H4H5H8H9H12H17H19882:1550^AN$(32)882:230h4160I828 4);",8" "RUN": ""?  631,13: 632,13: 198,2:| "":(L$,2)2)"" *(L$,3)2)" " 4I116:2)" ݞ ":, > ,96,160,0 185,0,192,153,0,4,185,240) 195,153,0,216,185,250,192,153M 250,4,185,234,196,153,250,216q 185,244,193,153,244,5,185,228 197,153,244,217,185,238,194,153  238,6,185,222,198,153,238,218 200,208,205,96 --- 828+(L$,13)4)""_"(L$,14)4)" HIS IS A 128 ROGRAM.T MAY ",(L$,15)4)" NOT BE LOADED IN THE 64 MODE."6(L$,16)4)" OU MUST SWITCH TO THE 128 "@(L$,17)4)" MODE IN ORDER TO LOA OT:SCOS:E0:59000: ϗTX,0:TY,22:828< ϙ" ";R ϗTX,0:TY,22:828u ϙ" ȒEX OR ĒECIMAL ? (/)" ϡA$:A$"D"A$"H"53004 ϗTX,0:TY,22:828ϙ" ";  "ӗTY,22:TX,0:828ӟ15,8,15ӄ15,A,A$,ET,ES7ә" TATUS# ="A"-"A$" "ET","ES?Ӡ15`ә"RESS ANY KEY TO CONTINUE"u ӡA$:A$""54048PӗTY,22:TX,0:828Qә" "Rә" Tà2Uà15VÞ65511 WÎ#8NjD$""D$"Y"K9ǟ15,8,15:15,RX:RX0RX7362000Z:ǟ2,8,2,"#"l;ǘ15,"B-P";2;0w<Ǟ49175=ǘ15,"U2";2;0;TR;SC>Ǡ2?Ǡ15Aǎ ˙" IRECTORY":2,8,0,"$0":#2,A$,A$!ˡ#2,A$,A$" PS,HNLN:lϗTX,0:TY,22:828)mϙ" ";?nϗTX,0:TY,22:828coϙ" NTER VALUE ==> "NUMzvϗTX,24:TY,22:828wυA$xϋ(A$)255(A$,1,1)"9"(A$,1,1)"0"53100ϗTX,0:TY,22:828ϙ" ΋TR24SC17E1:52770΋TR17SC18E1:52770-΋SC20E18"΋E0h,Ι" RROR. HE BLOCK YOU ATTEMPTED TO "-Ι" READ WAS AT TRACK"TR" SECTOR"SC".Ι" DOES NOT EXIST. T IS AN ILLEGAL"/Ι" TRACK-SECTOR REFERENCE." " ECIMAL=>"#"  EAD LOCK RITE LOCK "B#"  +EXT LOCK -REVIOUS LOCK"v#"  EXT -INK UMP CRSR-LINK "#"  HANGE  E-EAD BLOCK "#"  *EW CREEN ϗTX,0:TY,22:828ϋA$"D"53100ϗTX,0:TY,22:828QHB$(HX$,(NUM16)1,1)(HX$,NUM16(NUM16)1,1)}ϙ" NTER NEW VALUE ==>"HB$"<=="ϗTX,24:TY,22:828ϗ204,0:207,0:A$:A$""53020ϋA$"A"A$"9"53281,1:53281,0 "Sӎ2 OTTR:OSSC:" RACK ="TR" ECTOR="SC:"EAD FROM TRACK=>"M ԗTX,17:TY,3:828:100a ԋ(IN$)054501o TR(IN$) ԙ:" AND SECTOR=>" ԗTX,13:TY,5:828:100 SC(IN$) ԉ52720 Dՙ" ՠ ˡ#2,A$,B$:SZ(A$Z$)256(B$Z$):SZ07);"";4#ˋSZ0SZ;:7);J$ˡG$:G$""52101b%ˡ#2,A$:ST052100t&ˋA$Q$52005'ˡ#2,A$:A$Q$A$;:52007(˙29);)ˡ#2,A$:A$SP$52008*˙A$;+ˡ#2,A$:A$""A$;:52011,˙:ST  ";NUM(A$)ϗBASEPS,NUM:0җTY,22:TX,0:828_ҙ" "uҗTY,22:TX,0:828ҙ" NTER THE COMMAND>";ҍ100:L$(IN$,1,1):A$IN$ҋ(A$)154097ҋA$"$" 0Ι"  Œ"1ΡA$:A$""52785;2TROT:SCOS:E0:59000:O@OTTR:OSSC:E0qJTR(BASEPS):SC(BASEPS1)T΋TR1TR35E1^΋TR30SC16E1:52870h΋TR24SC17E1:52870r΋TR17SC18E1:52870|΋SC  ?RINT LOCK "$"  $IRECTORY @ OMMAND "F$"  TRING NTRY UIT ROGRAM "L$_i$`53281,0:53280,4:""t$a63000$bX045:Y:49152X,Y:$c162,2,32,198,255,162,0,32,207,255,134,253,234,23 :53020ϋA$"F"A$"0"53281,1:53281,0:53020- ϗTX,24:TY,22:H1$A$:828b!ϋA$":"HN16(9(A$)64):(128(A$));:53030w"HN16(A$):A$;&ϗ204,0:207,0:A$:A$""530300ϋA$(20)A$(157)207,1:204,0:530071ϋA$"A"A$"9"  Ϡ ?" EաA$:A$""54597!FD$A$:A$"Y"A$""\!HOTTR:OSSC:" RACK ="TR" ECTOR="SC:"RITE TO TRACK=>"w!I՗TX,16:TY,3:828:100!JՋ(IN$)054601!KTR(IN$)!Lՙ:" AND SECTOR=>"!M՗TX,13:TY,5:828:100 052001 ˙" LOCKS FREE."ˠ2:F˙"  "[ˡA$:A$""52103aˎmSCSC1͋SC16TR30TRTR1:SC0:52550(͋SC17TR24TRTR1:SC0:2͋SC18TR17TRTR1:SC0:<͋SC20TRTR1:SC 52000:54036ҋA$"@"54036ҋL$"U"L$"M"L$"B"54000&ӋL$"N"54020Rә"O YOU WANT TO THIS DISK?"gӡP$:P$""54018ӋP$""P$"Y"54097ӟ15,8,15,A$Ӡ15ӗTY,22:TX,0:828ә" 20E1΋E0#Ι" RROR. HE BLOCK YOU ATTEMPTED TO "NΙ" READ WAS AT TRACK"TR" SECTOR"SC"zΙ" DOES NOT EXIST. T IS AN ILLEGAL"Ι" TRACK-SECTOR REFERENCE."Ι"  Œ"ΡA$:A$""52885TR 4,234,234,157,80,195$%d232,208,241,96,162,2,32,201,255,162,0,189,80,195,134,253,234,234,234G%e234,32,210,255,232,208,241,96b%fX0255:SC$(X)(X):%gSC$(0)"@":X131:SC$(X)(X64):%hX129159:SC$(X)(X64):%iSC$(128)"@":SC$( 53281,1:53281,0:530302ϋA$"F"A$"0"53281,1:53281,0:53030D4ϗ204,1:TX,25:TY,22:H2$A$:828v5ϋA$":"LN(9(A$)64):(128(A$));:530506LN(A$):A$;:ϗTX,0:TY,22:828;ϙ" ";kϗBASE !NSC(IN$)!RՉ52720"x" RACK= ECTOR= "S"y"  ";"z" ";"{" OSITION=>""|" =>""}" $=>""~ 0:F͋TR35TR1:P͎xSCSC1͋SC0=TRTR1:TR18TR0SC20:T͋TR1TR35:52650g͋TR25SC18:z͋TR31SC17:SC16:OTTR:OSSC:E0TR(BASE):SC(BASE1)͋TR1TR35E1͋TR30SC16E1:52770  << CD42-6 >>= ==================================a COMMODARES PROBLEM #38-3 :x"ALPHA SPRITE " SOLUTION BY DANNY FAUGHT ===== FOR C64 ONLY =========== ==================================* X0  << CD42-7 >>= ==================================a COMMODARES PROBLEM #38-3 :w ALPHA SPRITE SOLUTION BY TIMOTHY BERRY ===== FOR C128 ONLY ===========9 1,1:1,0,5,"CHARACTER:":A$:A$" "0:1,  << CD42-10 >>> ==================================b COMMODARES PROBLEM #38-4 :{"MAXIMUM SQUARE " SOLUTION BY JIM SPEERS ==================================dA17:BA18:CB19 nIA(A)1:IA(B)1y0, 2C, 00, DC(! F0, 04, A9, 31, D0, 02, A9, 30M! 91, FB, C8, D0, EE, E6, FC, E4b! FC, D0, E8, 60k! XXPRESS BUTTON TO EXIT" 390 --LINES 500-600 FOR C64 ONLY---- CONVERT HEX TO DECIMALMS$(B$,1) LS$ ;r L3 20 : : /|"PRESS JOYSTICK BUTTON": 5072X N1 38 :" ";: :"""OR HOLD RUN/STOP & PRESS BUTTON TO EXIT" 390 --LINES 500-600 FOR C64 ONLY---- CONVERT HEX TO DECIMALMS$(B$,1) LS$ ISPLAY OF SWITCH BOUNCE.9 TO EXIT, HOLD RUN/STOP THENW PRESS JOYSTICK BUTTON~=================================""M5072 B$ B$"XX" 340 -------------------------------- FOR C64 CHANGE LINE 290l3:X(I);::"=";S:I13:Y(I);::"=";T:"TOTAL=";M:""C F,E,DY I19:IA(I)0:Id C,B,AMAXIMUM SQUARE " SOLUTION BY JIM SPEERS ==================================dA17:BA18:CB19 nIA(A)1:IA(B)1 28:" ";SC$(NUM)T TX,13:TY,12:828:" ";(HX$,((NUM16))1,1);w (HX$,NUM16((NUM16))1,1) TX,13:TY,13:828:" ";NUM  A$""A$""A$""A$""32 A$""LPPS:PSPS1:PS255PS0:6:30 50000:1:6:30, %A$"J"52800:50000:1:6:30I &A$" "50000:1:6:30f 'A$"*"59000:1:6:30 )A$"R"54500:50000:59000:1:6:30 *A$"W"54596:51000:59000:1:6:30 +A$"S"45900:59000:1:6:30 ,A$"C"53000:5 ""102 kIN$IN$A$ x" ";A$;" ";)y102/5?@3,4,7s3,"LOCK UMP OF RACK# ";TR;" ECTOR# ";SCX0255X80(X80)3,3,SC$((BASEX));$X0255%X26(X26)3,&NX(BASEX):B1$(HX$,  7: C(X):: 128,0,192,223,64,192,128,192U  X832 895:X,0::" _PRESS A KEY"k  A$: A$"" 30 (A((A$)C((A$)32))255 : 1024,A : P2048((53272)23) 2 56334,0 : 1,51 < X07: 832X3,(532488AXP): F 1,55: 563?0,0,A$:A$,0,0,20,20:A$,1:1,150,100:1,1,4,0,1,1,0:10CD42-4CD42-11CD42-5CD42-6 CD42-7 :IA(C)1" xN1:I19:IA(I)11404 IB(N)I:NN1; IX D14:ED15:FE16 N1:K1:I16:(DIEIFI)X(N)IB(I):NN1:200 Y(K)IB(I):KK1 I:RABC:SX(1)X(2)X(3):TY(1)Y(2)Y(3):QRST8 QMMQ:A;B;C;"="R:I1 * A$""LPPS:PSPS1:PS0PS255:6:30D A$""A$""6:30l A$""PS39LPPS:PSPS40:6:30 A$""PS216LPPS:PSPS40:6:30 A$""PS15LPPS:PSPS200:6:30 A$""PS16LPPS:PSPS240:6:30 A$""PS240 (B$,1) MS(MS$), & MS$"A" MS(MS$)55: 0LS(LS$)X : LS$"A" LS(LS$)55g DBMS16LSm N X --------------------------------  A9, 00, 85, FB, A9, 04, 85, FC  A0, 00, A2, 07, A9, 10, 2C, 00! DC, D0, FB, A9, 1  TO GOSUB 5008 --------------------------------\"B(B$) : < GOSUB 500 FOR C64w,CKCKB : CHECKSUM6 M,B@MM1J 230T CK6226 "DATA ERROR" : ^"USE 40-COLUMN SCREEN. ";h"PUT JOYSTICK INTO PORT 2. " 9000:1:6:30 -A$"?"42000:309 .A$""" . EADY":A c30L dIN$""Y e" ";l fA$:A$""102 g(A$""A$(20))(IN$)0102 hA$(13)" ": iA$""A$(20)"  ";:IN$(IN$,1,(IN$)1):102 jA$(32)A$ (NX16)1,1)#'B2$(HX$,NX(16(NX16))1,1)5(3,B1$B2$" ";;.Y33," Ơ":3bR3:L"O YOU WANT ΒORMAL TEXT"M " OR ՒNSTRIPPED TEXT?"NA$:A$"N"A$"U"45902OSB0:A$"U"SB128P"NTER T HE TEXT STRING ON THE NEXT LINE"Q100ARPS(IN$)256IN$(IN$,1,256PS)QVX1(IN$)fWVL((IN$,X,1))~XBASEPSX1,VL SBYZOÐPß15,8,15:15,X:X0X7362000Qß2,8,2,"#"RØ15,"U1";2;0;TR;SCSÞ49152 LPPS:PSPS200:6:30; A$""PS239LPPS:PSPS240:6:30S 59000:50000:1:6e A$:A$""30m 16 A$"+"52500:50000:1:6:30 !A$"-"52600:50000:1:6::30 "A$"$"52000:28 #A$"@"54000:28 $A$"N"52700:U34,1; PV53248 : 2040,13: V,100: V1,100: V23,1: V29,1M Z V21,1: 30OBLEM #38-3 :x"ALPHA SPRITE " SOLUTION BY DANNY FAUGHT ===== FOR C64 ONLY =========== ==================================* X0  ALT-KEY 128h SUM0:I48645392:J:I,J:SUMSUMJ::SUM54088"ERROR IN DATA STATEMENTS":rd4864 169,55,141,0,10,169,19,141 1,10,32,61,19,160,5,185 8,21,153,12,3,136,16,247 169,0,141,17,21,160,43,162  87,169  << RR42-1 >>====================================U" JIFFIES"t RUPERT REPORT #42 FOR C128/C64" DISPLAY STATE OF JOYSTICK #2" BUTTON & SHOW TIMES =================================== P ---------------------------------r Z:ADD LINE 25 GOTO 100 TO COME HERE---------------------------------------- d"0"; : (J2)P0 100 n"1"; : (J2)P1 110 x 100 BUTTON & SHOW TIMES ===================================  << RR42-3 >>;d=================================Un" SWITCH BOUNCE"sx RUPERT REPORT #42 FOR C128/C64 USE 40-COLUMN DISPLAY"PLUG JOYSTICK INTO PORT 2""PRESS JOYSTICK BUTTON AND SEE" "A DISP GOSUB 500-  --------------------------------7 " 500R ,CKCKB : CHECKSUM\ 6 M,Bf @MM1p J 230 T CK6226 "DATA ERROR" : ^"USE 40-COLUMN SCREEN. "; h"PUT JOYSTICK INTO PORT 2. "; r L3 20 : : |"PRESS  MS(MS$)55 0LS(LS$)3 : LS$"A" LS(LS$)55B DBMS16LSH No X --------------------------------  A9, 00, 85, FB, A9, 04, 85, FC  A0, 00, A2, 07, A9, 10, 2C, 00  DC, D0, FB, A9, 10, 2C, 00, DC  F0, 04, A9, 31, D,19,65,76% 84,133,109,169,0,133,13,24C# 173,118,21,101,109,173,119,21a# 105,0,205,7,21,144,3,76# 58,77,32,244,20,32,215,93# 173,19,21,10,170,224,88,240# 18,232,232,24,189,32,21,101# 109,157,32,21,144,3,254,33$ 21, 73,255,24,105# 1,133,109,169,0,133,13,24C# 173,118,21,101,109,173,119,21a# 105,0,205,7,21,144,3,76# 58,77,32,244,20,32,215,93# 173,19,21,10,170,224,88,240# 18,232,232,24,189,32,21,101# 109,157,32,21,144,3,254,33$ 21, 61,208,2,230,62,141,1,!  255,160,0,177,61,141,3,255O!( 240,37,201,34,240,221,172,20o!0 21,153,0,11,238,20,21,208!8 223,32,128,3,32,244,135,172!@ 20,21,138,153,0,11,238,20!H 21,32,134,3,76,14,20,172!P 20,21,169,0,153,0,11,32"X ,160  88,208,2,170,104,76,173,198A 72,152,72,160,2,177,61,217a 14,21,208,5,136,16,246,48 7,104,168,104,56,76,33,67 104,104,162,0,160,2,169,39 24,76,33,67,201,39,240,4 56,76,205,81,169,65,32,12  86,169,76,32,12, ,21,157,32,21,202,1523( 9,128,157,32,21,202,169,0U0 153,128,21,136,16,235,96,32u8 61,19,76,3,64,120,169,121@ 141,60,3,169,19,141,61,3H 169,84,141,20,3,169,19,141P 21,3,88,96,173,17,21,240X 29,172,18,21,177,250,240,19`  J256320 : P0111 : P1127M  (J2)P1 20 : WAIT TILL BUTTON IS PRESSEDu T0TI : START TIMER ("0"; : (J2)P0 40 2TMTIT0 : : STOP TIMER < TM;"JIFFIES (";TM60;"SECONDS)" F 20 : REPEAT" LAY OF SWITCH BOUNCE."7 TO EXIT, HOLD RUN/STOP THENU PRESS JOYSTICK BUTTON| ================================= M5072 B$ B$"XX" 340 --------------------------------  FOR C64 CHANGE LINE 290  TO JOYSTICK BUTTON"  50723  N1 38 :" ";: :""c "OR HOLD RUN/STOP & PRESS BUTTON TO EXIT"m  390s   --LINES 500-600 FOR C64 ONLY----  CONVERT HEX TO DECIMAL MS$(B$,1) LS$(B$,1) MS(MS$) & MS$"A"T0, 02, A9, 30(  91, FB, C8, D0, EE, E6, FC, E4=  FC, D0, E8, 60F  XXPRESS BUTTON TO EXIT"m  390s   --LINES 500-600 FOR C64 ONLY----  CONVERT HEX TO DECIMAL MS$(B$,1) LS$(B$,1) MS(MS$) & MS$"A" &SC$(255),QT(254),QS(254):60000ETX,11:TY,0:828:TR" ";dTX,25:TY,0:828:SC" ";o"";X0255:SC$((BASEX));:CBLP40,5:CBPS40,1NUM(BASEPS):TX,13:TY,10:828:" ";PS TX,13:TY,11:8  << RR42-3 >>;d=================================Vn SWITCH BOUNCEtx RUPERT REPORT #42 FOR C128/C64 USE 40-COLUMN DISPLAY PLUG JOYSTICK INTO PORT 2 PRESS JOYSTICK BUTTON AND SEE A D 208,234,172,20,21,185,0,$ 11,145,250,136,192,255,208,246K$ 32,134,3,96,173,19,21,10n$ 168,185,32,21,133,250,185,33$ 21,133,251,96,165,250,133,36$ 165,251,133,37,173,118,21,133$ 38,173,119,21,133,39,96,28$ 168,19,204,19,230  228,20,160,255,200,177,250,2086"` 251,152,56,237,20,21,240,107X"h 144,42,133,13,169,0,133,109y"p 32,244,20,32,192,93,173,19"x 21,10,170,224,88,240,18,232" 232,56,189,32,21,229,13,157" 32,21,176,3,222,33,21,208" 234,76,211,20, 86,169,84"  76,46,81,76,108,121,201,39B  240,4,56,76,169,75,32,128d  3,240,240,56,233,48,144,235  201,43,176,231,141,19,21,32  128,3,201,44,208,221,160,0  140,20,21,32,128,3,240,63  201,199,240,37,201,34,208,203 ! 230, 166,208,236,32,10,176,15,157;h 74,3,232,134,208,200,140,18[p 21,208,3,141,17,21,76,101zx 250,72,138,41,8,208,3,76 163,19,104,56,233,48,144,20 201,43,176,16,141,19,21,32 228,20,169,1,141,17,21,169 0,141,18,21,169,0,170 ,220,74,176,3,206,1,208,74,176,3,238,1,208,74,176,42,173\ 0,208,208,31,173,16,208,41,1,208,16,173,16,208,9,1,141,16,208 169,80,141,0,208,96,234,234,173,16,208,41,254,141,16,208,206 0,208,96,234,234,74,176,32,238,0,208,240,30,169,80,205,0 2043,194:V42,2:V6,144:V7,5402044,196:V43,2:V8,140:V9,126Z2045,195:V44,14:V10,30:V11,1322046,199:V45,2:V12,116:V13,40W1(V30):W2(V31)V21,63:V21,47:960,14,11:"GAME OVER"$7)"PLAY A ߩߩߩ ߩߩߩ "pX02:" "30)" ":Qz" ߩߩߩߩߩߩ  LIVES"x" "30)" ";LI:" "30)" "" "30)" SCORE":" ߩߩߩ ߩߩ ";33)"";SC:" "30)" ":" "30)" 0 *** 128 MULTI RAM *** BUCK CHILDRESS ***] *** P.O. BOX 13575 SALEM, OR 97309 ***(147)"LOADING AND CHECKING DATA LINE:":J3072(B011:A2B0L(66)256(65):(19)31)L:<A0A25580FJB,A:XXA:B:A:AX90 P,127,208,1499= 51,165,211,201,4,208,45,165,212,205,95,13,1575p 240,38,141,95,13,205,96,13,240,30,141,96,1348 13,201,1,208,11,141,95,13,169,4,141,94,1091 13,76,58,12,201,3,144,8,201,7,144,7,874 201,60,240,89,76,225,197,174,98,13,1410,11932 170,133,45,129,45,133,53,133,57,141,18,18,1075g 232,134,45,173,96,13,141,97,13,169,160,162,1435 39,157,0,4,202,16,250,162,3,181,243,157,1414 117,13,169,0,149,243,202,16,244,232,142,0,1527 255,166,235,164,236,142,115,13,140,#T125,255,32,42,42,42,32,66,89,84,69,83,961P^32,70,82,69,69,32,61,32,0,173,18,18,656h56,237,16,18,8,170,172,19,18,40,176,2,932r136,56,152,237,17,18,32,50,142,169,146,32,1187|210,255,174,115,13,172,116,13,24,32,240,255,1619162,0,0,0,0,0,0,0,0% 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,199,128,7,239,192,15,239,224h 15,255,224,15,255,224,15,255,224,7,255,192,3,255,128,1,255,0 0,254,0,0,124,0,0,56,0,0,16,0,0,0,0,0,0,0,0,0,0128,0,127,192,0,255,224 1,255,240,3,255,20,0,0,74,0,0,16,0,3,224,0,4,10,0,8,0,0,16,16,0,16,0,0Nx 16,0,0,15,255,248,12,107,24,14,227,184,14,235,184,15,255,248z 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0,0,0,0,0,0,31,0,0,63,128,0,127,192,0,255,224 1,255,240,3,255,2168,0) 0,188,0,0,104,0,0,40,0,0,40,0,0,40,0,0,63,0,0,0,0,0,0,0,0,0,0,0,0,0=( 0,0,0,0,0,0,02 0,0,0,3,192,0,15,252,0,63,220,0,63,92,0,63,92,0,63,92,0,63,127,0< 63,127,0,15,160,0,2,160,0,2,160,0,0,128,0,0,128,0,2,160,0,2,160,0F 0,64,,208' 208,20,173,16,208,41,1,240,13,173,16,208,41,254,141,16,208,169i 0,141,0,208,96,234,234,173,16,208,9,1,141,16,208,96,234,234 32,60,3,32,60,3,32,60,3,32,60,3,96 32,155,183,138,72,32,155,183,104,170,164,101,24,76,240,255GAIN Y OR N".SCHSHSSC8960,23,33:HS*BJK$:JK$""1090>LP$:P$""1100OVP$"Y"1140u`P$"N"65418:X024:SX,0::j1100t760:30~ 25,30,33,135,42,62,50,60,42,62,50,60,0,0 JOYSTICK PORT 1 173,1 HIGH"" "30)" ";HS7X5625656286:X,4::X19842014:X,160:oV28,45:V16,32:V37,1:V38,8:V23,96:V29,962040,P:V39,5:V,232:V1,2222041,197:V40,14:V2,36:V3,922042,195:V41,14:V4,32:V5,58 "30)" ICE APE"8*"ߩߩߩߩߩߩ********"`4" "30)" ":" "30)" TIMER"r>" "30)" "H"ߩߩߩߩߩ  "R" "30)" TNT"\" "30)" ";TNf" "30)" ":" "ERROR IN DATA LINE:"L:6 ZX0:JJ12:DD1:D3140s d"THE DATA IS OK."::3072:"128 MULTI RAM IS ACTIVE.": n169,33,162,12,141,58,3,142,59,3,173,93,1048 x13,208,17,162,10,142,93,13,157,0,19,157,991 0,104,157,0,180,202,16,244,96,165,98,16125 13,173,16,18,157,100,13,173,17,18,157,104,959h 13,174,96,13,189,96,13,133,46,189,100,13,1075 141,16,18,189,104,13,141,17,18,173,94,13,937 201,4,240,9,169,0,141,94,13,189,108,13,1181 44,169,255,133,54,133,58,141,19,18,169,116,13,32,16272 "125,255,19,18,32,82,65,77,32,61,32,0,798f ,173,94,13,240,18,169,128,141,94,13,32,125,1240 6255,78,79,82,77,65,76,0,76,19,13,173,993 @97,13,201,4,176,11,32,125,255,70,82,69,1135 J69,0,76,19,13,24,105,45,32,210,255,32,880,3,189,117,13,149,243,202,16,248,76,225,1643N197,0,128,128,255,4,4,19,28,104,180,3,1050|3,3,3,19,28,104,180,28,104,180,255,0,907,76,19,13,173,993 @97,13,201,4,176,11,32,125,255,70,82,69,1135 J69,0,76,19,13,24,105,45,32,210,255,32,88048,3,255,248,3,255,248,3,255,248,3,255,240,1,255,224= 0,255,192,0,127,128,0,31,0,0,0,0,0,0,0,0,0,0,0 0,0,0,0,12,0,0,12,0,0,55,0,0,55,0,0,14,32,0,12,128,0,2,32,0,0,8 0,0,8,3,74,12,3,90,172,3,218,172,0,0,0,0,0,0,0,0,0,0,0,0 0,0,0,0,00,0,64,0,0,64,0,2,96,0,0,0,0,08P 0,0,0,0,0,0,0,136,0,0,32,0,2,170,0,0,40,0,0,191,0,2,204,204zZ 2,255,240,2,191,12,2,159,252,10,148,0,42,150,164,40,150,160d 32,149,0,32,149,64,16,149,64,2,170,128,10,170,160,40,0,40,168,0,42,0 n 0,136,0,0,  SPRITE DATA6 0,0,0,0,60,0,0,52,0,0,20,0,0,16,0,0,40,0,0,168,0,0,170,64,0,168,0~ 0,156,0,0,40,0,0,40,0,0,130,0,0,130,0,0,243,192,0,0,0,0,0,0,0,0,0  0,0,0,0,0,0,0,0,0,0 0,0,0,0,60,0,0,52,0,0,20,0,0,16,0,0,40,0,0,168,0,0,168,0,0, * CAVE OF THE ICE APE BY JC HILTY; CAVEAPED680h943:2040,P:PP1:P194P192(L90,110,130,150,170:9432W1(V30):W11200<W2(V31):W21410F943:960,7,33:(TI$):(TI$)40410P30 ZX1X1Z:X123 :960,10,33:TN:TI$"000000"FL1:2040,P:V,232:V1,222:V2,36:V3,92:X136YA(14(6)1)A270,280,290,300,310,320,330,340,350,360,370,380,390,400W1(V30):W2(V31):30SCSC100:960,20,33:SC:V,112:V1,58:V21,127  ZZ1:Z12Z12lTI$"000000":V21,63:30%v0w65418fX024:SX,0::S24,15:S5,85:S6,85:S4,33X05:H1,N1:S1,H1:S,N1H150T0400:T0200:::X024:SX,0::S6,240:S24,1549223:53280,0:53 975:A:X,A:X1228812798:A:X,A: HS0\SC0:V53248:LI4:TN0:P192:L1:X136:Z4:TI$"000000"" "30)" ********" " "19)"HELP ME!!  CAVE"" "30)" OF THE" " 0,3,208,24,160,5,140,60#3,174,61,3,189,49,192,141,39F208,232,224,6,208,2,162,0,142h61,3,76,49,234,1,3,14,6,14,3""17)" "X1317)"   "X17)" """V,149:V1,164:V211)6755 T4(TU)X(Y)6+V,76(X1)24:V1,52(Y1)24AA(X1,Y1)TU755T XX1:YY1:420f  END OF GAMEr*V21,04X0255:53281,X:53280,255X:X>53280,0:53281,0HX12:WI1X16R53280,X1\""T$(WI)" WON!!!"1-:Y45:X15:A(X,Y)2X,Y:A(4,3)2A(5,3)2WI26D220KX0,0,0,0,0,0,0,0`b0,0,0,0,0,0,0,0yl0,0,0,0,0,0,127,252v0,127,252,0,96,12,0,9612,0,96,12,0,96,12,096,12,0,96,12,0,96,120,96,12,0,127,252,0,127252K(I): I1 I 0 K*  XI1K1 XI1K5440D A(XI1,Y)A(XI1K,Y)Q I1:480X Iu I55:YI1YI5455 A(X,YI)0 455 K(I): I1I 0 K  YI1K1 YI1K5451 A(X,YI1)A(X,YI1K) I1:480 I WI0800% T$(1)"BLUE":T$(2)"RED"G ""T$(TU)"'S TURN ":V21,1_ TU2PL1PL0750} ((56322TU)16)16280 "X((V)100)241 ,Y((V1)76)241 6J((56322TU)15) @(J1)1YY1 J(J2)2YY1 T(J4)4XX,360,370,380,390,400E W1(V30):W2(V31):S6,240:S24,15:49223:30[ V8,36:V9,94:r V8,140:V9,94: "V8,232:V9,94: ,V8,36:V9,126: 6V8,140:V9,126: @V8,232:V9,126: JV8,36:V9,158: TV8,140:V6V3,124:X1236:L2! dV2,X1:G nX1X1Z:X136X136:V3,156:L3U xV2,X1:} X1X1Z:X1236V3,188:X1236:L4 V2,X1: X1X1Z:X136X136:V3,220:L5 V2,X1: X1X1Z:X1236X132:L1:V21,61:V3,92:V2,X1:1904,17:S4,16% I254504:S1,I:J15::] S1,10:S8,1:S5,112:S6,252:S4,129:S11,129} X0130:HH1:H222H222 V1,H::X024:SX,0::S6,240:S24,15:49223 LILI1:960,17,34:LI:LI01050960,7,34:" ":TN0960,1,19:"MY HERO!!":6306&TN0:960,10,33:TN:960,7,34:" "R0960,1,19:"HELP ME!!"f:V,232:V1,222yDA(14(6)1)NA270,280,290,300,310,320,330,340,350,360,370,380,390,400XV2,36:V3,92:X136:L1:W1(V30):W2(V31)b281,0:""11)"CAVE OF THE ICE APE"M15)"BY JC HILTY":10)"READING DATA...."147,0:57812"APEMUSIC",8,1:62631:S54272:X024:SX,0:S6,240:S24,15:49223H1,N1:H10720700X828949:A:X,A:X960 ,1PRESS TO PLAY AGAIN"Lk7)"OR PRESS EITHER FIREBUTTON"Wp198,0zA$:A$(13)((56321)16)16((56320)16)16890198,0:120,169,13,141,20,3,169,192141,21,3,88,96,172,60,3,136140,6&f6)"PRESS TO PLAY AGAIN"Lk7)"OR PRESS EITHER FIREBUTTON"Wp198,0zA$:A$(13)((56321)16)16((56320)16)16890198,0:120,169,13,141,20,3,169,192141,21,3,88,96,172,60,3,136140,6,0,0,0,0,0,0,0I063:A:832I,A:I=I4915249206:A:I,A::49152IV53248eV21,0:V23,1:V29,1yV28,0:V39,12040,13V,148:V1,124 COMPUTER'S TURNY1((1)5)1X1((1)5)1T4(TU)X1(Y 270A(X,Y)0TUTU1:TU3TU15Y155:X155LX10 Y10550qYY11YY15XX11XX15550A(XX1,YY1)TU550Y111:X111:X1,Y1:560&X1,Y1:4900Y12:X15:A(X,Y)1X,Y:A(1,3)1A(2,3)1WI1 ^(J8)8XX1 hX0X1' rX6X54 |Y0Y1A Y6Y5f V,100(X1)24:V1,76(Y1)24 ((56322TU)16)16290 A(X,Y)TU290  COMPARE TO SEE IF ON SAME X / Y I55:XI1XI5443 A(XI,Y)0 443  9,158: ^V8,232:V9,158:. hV8,36:V9,190:F rV8,140:V9,190:^ |V8,232:V9,190:u V8,36:V9,222: V8,140:V9,222: 65418 2040,198:X024:SX,0::H(V1):S24,15 S5,80:S12,160:S6,255:S13,252:S V2,X1: V21,63:& W124101 65418f X024:SX,0::S,150:S1,200:S5,8:S6,248 S24,15:S4,17:T0200::X024:SX,0: TNTN1:960,10,33:TN:TN3530 A(14(5)1) A270,280,290,300,310,320,330,340,350 O %: D(15),A,J,W,U,S,H,V,X,Y,N,R,P,G,Z,D,I,T,C,Q,B,D$(6),L,BO(7),SC(7),SCX.15:D(X)::H$"##.#":S$"######":F$"###":"0":X.4:D$(X)::D$(5)D$(4):D$(6)D$(5):280:X17:BO(X)2X:SC(X):SJ(X)(J15)((J15).)1:H(X)HD((A1 : 1:5324821,.:.:560:.,.,N:%:550:280:SC.:50: "";:XWRW:SCSC1000:.,34,N:S$;SC;:15:3,5000,10,.,,,.:Y.90::.: 580: 8:.,.,N:%:550:.,34,N:"";:S$;SC:280:50 COLLISION ROUTINER!S(W):LW7:(SBO "," "," "$" SPRITE LOCATION DATA_" 64,101,73,157,128,197,207,165,264,205,303,117,294,77t" SET UP SPRITES"260:12,3:X28:H,V:X,.#.:X,H,V:2039X,58:X,1,7,,,,1::"" SCORE VALUES", 300,200,100,500,600,800,1000 ";$r"ג"20)":"6)"1000 ";<$|"ג"21)"ߒ"11)" ";\$"ג"22)"ߒ"11)" ";$" 300"18)"P"11)" ";$"òÒ"20)"A"11)" ";$"ý"20)"D"6)"800 ";$"::::ߒ"17)"۳"7)":: " ߒ"14)"’"9)"::: ";K&"̺ ̺î ߒ 100ߒ ߩ’ ߒ ߩ:::: ";~&" ߒ ͣߩ::600:::::: ";&" GALACTIC CAB CO. ";&&"FUEL V H FARES CASH$ 000000H.": 5:(X000,,,,,,,.(b000,,,,,,,.'(l000,,,,,,085,.L(v002,170,128,006,105,144,042,170q(168,038,105,152,038,105,152,042(170,168,005,085,080,085,065,085(085,,085,021,,084,005,.(080,001,,064,,,,.(000,,,,,,,.(000,,0,,,,,,001,. * 000,001,016,,001,016,,.$**084,,,017,,,017,.=*4000,016,,,068,,,068Z*>000,,068,,170,170,170,.k*H000,,,,,,,.|*R000,,,,,,,.*\000,,,,,,,.*f000,,,,,,,.*p000,004,016,,001,016,,.*z084,,,017,,,017,.*000,016,,,3,008,,,-1 * 000,001,016,,001,016,,.$**084,,,017,,,017,.=*4000,016,,,068,,,068Z*>000,,068,,170,170,170,.k*H000,,,,,,,.|*R000,,,,,,,.*\000,,,,,,,.*f000,,,,,,,.*p000,004,016,,001,016,,.*z084,,,017,,,017,.*000,016,,, 53280,0:53281,0:828,1>""13)"POWER SQUARES"W93)"BY JOHN FEDOR"(680:960:" HOW MANY PLAYERS (D, 1 OR 2) ? ";2198,0<A$:(A$"1"A$"2")A$"D"60FA$PPL(A$)Z A(5,5): THE GRID dZ1:V,100:V1$1,160,0,0,65,72,79,89,33,0,0,50093,240,23,165,161,201,212,176,4,165,160,1748vT240,13,238,32,208,160,0,32,225,255,208,6,1617^32,33,193,76,38,192,232,208,242,200,208,239,1893h32,68,229,169,0,168,174,49,193,32,186,255,1555r173,50,193,1)2):V(X)VD((A1)21):K(X)((A.A4)A6):R(X)((W)7)W:L(X)R(R.)W(D(X)(RP)T:310:.:54272,19:54273,10:54277,255:54278,255:54276,129:X3584:A::X,A:A:XX1:A121,1,13,,,,1:1,.#.:1,205,125:2040,56G<X2R(.):ZZ.:BA,59Ztn""I);D$(D(.)):.,.,N:"";:F$;F;:"";:H$;V;:"";:H$;H:TTC:T.T6CCxA(U):(W,W)NA:.:WA:15:2,5000,99,U,W,50,3:XW8:2039X,60:X,(W,.),(W,W):X,W,U:X,((XW)45)#U4(L)):LW,.:GG.015:RRW:SCSCSC(L):.,34,N:"";:S$;SC;:15:3,10000,20,1,,9000,2e!.,N,N:RW:}!:S(W):S(W):! DELTA ADJUSTMENTS! .,-.2,.2,-.2,.2,-.2,,,,,,,-.2,-.2,-.2,-.2! DOORS " ""," "," 9#6.,1:4,1:(27)"M";"ߒ"7)"";j#@"Ò"7)"";#J" "17)":"6)"ߩߩߩ ";#T""19)":"13)" ";#^" "20)":"13)" ";#h" ߒ"20)":"12)""; %":::: "28)":: ";)%"::::ߒ"29)":::: ";E%":::: ߒ"29)"::: ";f%": 200 ߒ"24)"::: ";%": "10)" 500 "7)"::: ";%":"12)""9)"::: ";%": "14)"’"10)"::: ";&":P'0590:.,.,N:(27)"Q";11)"ANOTHER GAME?(Y/N)"::A$:A$""::A$:A$"Y"A$"N":A$"Y"p':.,12:4,14:""(27)"L":'D590:.,.,N:(27)"Q";11)"SUCCESSFUL RUN !!!":'N.,.,N:(27)"Q";5)"YOU HAVE MADE $";:S$;SC;:" IN CAS,,,,,.)000,,,,,,085,.%)002,170,128,006,105,144,042,170J)168,038,105,152,038,105,152,042o)170,168,005,085,080,085,065,085)085,,085,213,,087,245,.)095,253,,127,252,,015,.)000,,,,,,,.)000,,,,,,,.) 000,,,,,,,.)00068,,,068+000,,068,,170,170,170,.+008,,008,,131,,,.>+000,140,002,008,,016,,001[+000,067,,,032,018,004,.{+000,,016,001,017,002,192,.+000,004,004,016,,064,003,.+001,,140,,008,,016,.+050,,131,,,,,140+000,032,,032,00,76 nY15:X15$ xX3Y31403 A(X,Y)Z1B Z1Z:X,YS "":TU1j ""32)"" 32)" " 32)" " 32)"  " 32)" " 32)" " 32)"" "" 11)" "+ Y115I 11)"  "P Yq 11)" " C$(1)"":C$(2)"":C$(0)"":WI0 ""12);:Y15:X15 C$(A(X,Y))"   "; X:""(13)12):Y 05:Y125:F500:R.:W1:C.5:H.:V.:B2040:G.06:Q128:U2:I15:N24:P3:&sFA(1):A(1):A(2):A(2):1,180P MAIN LOOPZ:J(U):AJ(.):JQK(.)FHH(.):VV(.):RL(.):I:B,57:FFW:.dXXH:YYV:W,X,Y:B,56:RVVG:A Ѝ!  < ة XL7N`L|䧆LN3LH1fGJP3W>/f.LOADER872A d53280,12:53281,11Mi" FLANKSPEED ";~n" MISTAKEPROOF ML ENTRY PROGRAM "s" CREATED BY G. F. WHEAT "x" COPR. 1987, ION INTERNATIONAL INC. "}A5427254296:A,0:/ 2)T(1)16/B$"ENDING ADDRESS IN HEX":430:ENBA470:B0150h254,T(2)T(1)16:BT(4)1T(3)16B255BB255:254,(254)1253,B: GET HEX LINE495:": ";:A08B01:250BA%(A)T(1)T(0)16:ADA1  A$(135)" ":620) A$(136)" ":635O A$"@"A$"G"T(B)(A$)55:295u A$"/"A$":"T(B)(A$)48:295 "415:250 'A$""; ,205 1A0320 6A1:B1330 ;220 @B0(20);(20);:AA1 EAA1 J(20);:"INPUT A 4 DIGIT HEX VALUE!":415F":"ENDING IS LESS THAN STARTING!":B0:415|":"ADDRESS NOT WITHIN SPECIFIED RANGE!":B0:415":"NOT ZERO PAGE OR ROM!":B0:415""?ERROR IN SAVE":415""?ERROR IN LOAD":415"::"END OF ML ARE5:$A$"/"A$":"T(A)(A$)48:$$T(A)16:8$ ADDRESS CHECKG$ADEN385Z$BSRBEN390$B256(B40960B49152)B53247395$$ ADDRESS TO HEX$ACAD:A4096:520$A256:520$A16:520$A1:520$%T(AN:A$"":"FILENAME";A$&SA$""590,&X:"TAPE OR DISK?":R&]B$:T1:B$"D"T8:A$"@0:"A$:c&bB$"T"605i&g&lB$"CONTINUE FROM ADDRESS":430:ADB&q475:B0620&v:195&{B$"BEGIN SCAN AT ADDRESS":430:ADB&475:B06358 (147)"LOADING AND CHECKING THE DATA...":J49152UB011:A:A0A25540tJB,A:XXA:B:A:AX50(:"ERROR IN DATA LINE:"(64)256(63):2X0:JJ12:J4945620<198,0:49456,0:A$"Y":B$A$:C$"D":D$"DISK":D8:(147)4 CKUP"::"FILENAME";F$:F$N$(F$,14):L(F$)X 49458,L:J1L:49458J,((F$,J,1)):J: "SAVING DEVICE ** "D$:"STARTING WITH ** "F$ :"IS THIS CORRECT (Y/N)";B$:B$"Y"60 770,131:771,164:49152: 169,79,32,210,255,162,38,160,,0,2,240,5,169,1215; 79,141,2,3,76,162,164,169,0,133,2,133,1064r 251,133,252,133,254,24,101,20,69,254,230,254,1975 24,101,21,69,254,170,230,254,164,252,185,0,1724 2,133,253,201,34,208,6,165,2,73,255,133,1465 2,201,32,208,4,165,2,249,169,38,141,2,3,173,1578CJ48,193,240,23,165,161,201,212,176,4,165,160,1748vT240,13,238,32,208,160,0,32,225,255,208,6,1617^32,33,193,76,38,192,232,208,242,200,208,239,1893h32,68,229,169,0,168,174,49,193,32,186,255,1555r173,50,193,154272,4:54273,48:54277,0:54278,249:54296,15HA680699:B:A,B:s169,251,166,253,164,254,32,216,255,96169,0,166,251,164,252,32,213,255,96B$"STARTING ADDRESS IN HEX":430:ADB:SRB480:B0150251,T(4)T(3)16:252,T(EN340 " ";-A:TAD((AD256)256):" "QA07:TTA%(A):T255TT255WoA%(8)T375:195A07:ADA,A%(A)::ADAD8:195 GET HEX INPUTA$:A$""250A$(20)305A$(133)535 A$(134)560220 !O LAST LINE'!T" ":TAD((AD256)256)M!YB0A1:TTA%(B):T255TT255S!^k!cA%(A)T375:195!hB0A1:ADB,A%(B):!m:"YOU ARE FINISHED!":535!r BELL AND ERROR MESSAGES!w:"LINE ENTERED INCORRECTLY"::415"|:A":#54276,17:54276,16:0#15,8,15:15,A,A$:15:A$:I# GET FOUR DIGIT HEXX#:B$;:T$p#(T$)4380:430#A14:A$(T$,A,1):450:T(A)16380:430#:B(T(1)4096)(T(2)256)(T(3)16)T(4):#A$"@"A$"G"T(A)(A$)5CA):T9A$(T55):530% A$(T48)+%A$;:ACACAT:B%A$"**SAVE**":585X%1,T,1,A$:680:1d%!ST0w%&400:T8420%+535%0A$"**LOAD**":585%51,T,0,A$:690:1%:ST64195%?405:T8420%D560%I" ":14)A$&&:670)'B07:AC(ADB):505:ADBENADSR:410:1956'" ";:BD':ADAD8['B$:B$(136)195p'495:": ";:650%+535%0A$"**LOAD**":585%51,T,0,A$:690:1%:ST64195%?405:T8420%D560%I" ":14)A$&F"DO YOU WANT AUTOMATIC SAVES (Y/N)";A$::A$"Y"90V P"NO AUTOMATIC SAVES...":150 Z49456,1:"DISK OR TAPE (D/T)";C$:C$"D"D1:D$"TAPE" d49457,D:D$D$" DRIVE"::"FILE NUMBER (0-99)";N nN$((N),2):N10N$(48)(N48)) xF$"BA 192,204,3,3,1507@ 208,10,162,131,160,164,169,70,32,210,255,44,1615o 169,78,32,210,255,142,2,3,140,3,3,76,1113 36,193,32,96,165,134,122,132,123,32,115,0,1180 170,240,243,162,255,134,58,144,3,76,150,164,1799 32,107,169,32,121,165,173 0,8,138,24,101,1125A 253,69,254,170,44,198,254,230,252,164,253,208,2349u "213,138,41,240,74,74,74,74,24,105,129,141,1327 ,44,193,138,41,15,24,105,129,141,45,193,162,1230 60,189,43,193,240,12,157,0,4,173,134,2,1147 @157,0,216,232,208,23 62,51,160,193,32,189,255,169,43,1670J|166,45,164,46,32,216,255,162,1,189,51,193,1520168,200,152,201,58,144,2,169,48,157,51,193,1543201,48,208,3,202,16,234,32,33,193,76,116,1362164,206,32,208,169,0,170,168,76,219,255,160,18271,Al8AHOY! JUNE872ABOOTERLANKSPEED 64 UG EP ɠ 128 BUG REP II WRAITHSGALACTIC CAB CO.OWER QUARES AVE F CE PE KKCAVEAPEAPEMUSICAPE TITLE(128 MULTI RAM ALT-KEY 128 IFFIES 64 WITCH OUNCE 128SWITCH BOUNCEKK ARM ASSARM ASS 2RAFTY OMP RAFTY OMP 2ALPHA SPRITE LPHA PRITE ALPHA SPRITE2 AX QUAREKK -NAP LOADERDDLOGO% DIR 1)KKKKKKKK 6 (147)"LOADING AND CHECKING THE DATA...":J4864SB011:A:A0A25540rJB,A:XXA:B:A:AX50(:"ERROR IN DATA LINE:"(66)256(65):2X0:JJ12:J521320<208,0:5213,0:A$"Y":B$A$:C$"D":D$"DISK":D8:(147)0F" :"FILENAME";F$:F$N$(F$,14):L(F$)P5215,L:J1L:5215J,((F$,J,1)):J:"SAVING DEVICE ** "D$:"STARTING WITH ** "F$:"IS THIS CORRECT (Y/N)";B$:B$"Y"60770,198:771,77:4864:32,58,20,169,41,162,19,236,3,3,208,4,95 169,0,166,235,164,236,133,253,133,254,142,47,1932] 20,140,48,20,24,101,22,69,254,230,254,24,1206 101,23,69,254,170,230,254,164,252,185,0,2,1704 133,251,201,34,208,6,165,253,73,255,133,253,1965 201,32,208,4,165,253,240,8,138,24,101,251 ,93,12982"J20,240,27,165,161,201,212,176,4,165,160,240,1771d"T17,32,65,20,238,32,208,238,1,214,32,225,1322"^255,208,6,32,49,20,76,198,77,232,208,242,1603"h200,208,239,32,66,193,173,95,20,162,96,160,1644"r20,32,189,255,169,0,170,32,104,28,206,1222,$1,214,169,0,170,168,76,219,255,32,79,20,1403_$169,26,141,0,214,173,0,214,16,251,96,162,1462$0,142,0,255,96,19,18,32,32,32,32,146,804$0,1,0,0,65,72,79,89,33,0,0,0,33920,162,96,160,1644"r20,32,189,255,169,0,170,32,104,2@)@ .,1:4,1:1,7:2,1,.:(11)(142);Y@""@4)"ߒ   ߩ ߒ    "@(4)" ߒ         ߒ "A24)" ߩ     "+Bn4)""oBx13)"(PLEASE WAIT!)":8)"---- LOADING SPRITES ----"BA4864:B6080:CAB:D:C,D::A3072:B3124:CAB:D:C,D::""(27)"Q"8)"CREATING THE WRAITH WORLD ": 4 CA2:B360:C.BA:A(X)J15:R(J)R(A5)O(A5)O(RXA5)X(RO(A5))X:S(J)76R:D(J)(RO)45:W(J)((O)6)HDM(J)((O)X)45:C(J)(JH):X(J)(O,.):Y(J)(O,O):B(L)(B(AO)L)E1,.,15,.,.,.,.:1,.#.:1,173,140:8184,77:R1:2,.ARAJT,.:T,.#.:T,X(.),Y(.):T,20;D(.):T,D(.)#X:T,O:O,9999,20,O,,500,HFW(.),M(.)#S:SSI:J(O):C(J):C(J)300,270,240FAHX:B(J)T,.:H,10000,75,.,3000,900,T:350)G:J(O):J(O):(N)H240:՗N,.:.:"0:ՁJ.400:H,.:T,J50,O,O,J,J5,T:O,.:A.10:::.vH@""(27)"@"9)"WRAITHS INVADE SECTOR!": 4::SC$:SC$""HJ11)"ANOTHER GAME?(Y/N)":SC$:SC$"Y"1,.:1,8,.," ":1,22,.,"1":1,33,.,(14)" ":170IT""(147DO YOU WANT AUTOMATIC SAVES (Y/N)";A$::A$"Y"90RP"NO AUTOMATIC SAVES...":150Z5213,1:"DISK OR TAPE (D/T)";C$:C$"D"D1:D$"TAPE"d5214,D:D$D$" DRIVE"::"FILE NUMBER (0-99)";NnN$((N),2):N10N$(48)(N48)#xF$"BACKUP":5+169,198,162,77,141,2,3,142,3,3,224,19,1143\208,7,32,125,255,79,78,0,96,32,125,255,129279,70,70,0,96,162,0,134,251,189,0,2,1053240,19,201,48,144,9,201,58,176,5,133,251,1485232,208,238,134,252,165,251,208,3,76,198,77,2042* ,16253!69,254,170,44,198,254,230,252,164,251,208,213,2307e!"138,41,240,74,74,74,74,24,105,65,141,88,1138!,20,138,41,15,24,105,65,141,89,20,32,79,769!620,189,85,20,240,6,32,210,255,232,208,245,1742!@174,47,20,172,48,20,24,32,240,255,17355,169,0,13953#|174,94,20,168,32,186,255,169,45,174,16,18,1351f#172,17,18,32,216,255,162,1,189,96,20,168,1346#200,152,201,58,144,2,169,48,157,96,20,201,1448#48,208,3,202,16,234,32,49,20,141,0,2,955#76,183,77,58,59,32,65,20,206,32,20)(12):.,12:4,14:]I^SCSCL100:SC$(SC):O,8(5(SC$)),.,SC$:HO5:TO16:A,O,T:::T2:H3:A,.:lIh0,,,,,,,.{Ir0,,,,,,,.I|0,,,,,,,.I0,,,,8,,,28I0,,8,,,,,.I0,,,,,,,.I0,,,,,,,.I0,,,,,,,.I0,24,,,24,,,24    "NA<4)"›[C] ߩߩ ͒     "yAF4)"ó"AP4)"BY CLEVELAND M. BLAKEMORE 1987"AZ4)"ó"Bd4)"ž FOR THE C128 COMPUTER 1,160,100B;C:iCC.B:.,160,10025;C::1,16:1,.,.,(14)" CORE: EVEL: 1 HIPS ":1,.C INITIALIZE VARIABLESC: J,A,R,P,S,I,O,T,H,X,B(7),N,L,K,SC:P8184:L1:K3:O1:T2:H3:I.005:X8:N53269:SC.:J.7:B(J)2J:fD,8:8185,76FEJ38:J,.#.:J,.,2:J,173,140:J,120;(J1)45:8183J,85:ES(L3)1(L3L5)2(L5)3:A.10:J(1)::5324821,253:3072E MAIN LOOPE:J(T):AA(.):AAJRR(.):P,S(.):O,P,O:ՋARAJO,D(.)#ONF "(27)"@"11)"WRAITHS ANNIHILATED!":LL1qG"11)"PREPARE FOR LEVEL"L;"!": 4:1,.:SC$(L):1,21,.,SC$:200G,O,.#.:KKO:.,33K2,.," ":T,5000,150,T,,100,3:J116:O,O,J:A.20::P,93:A.20::P,94::5324821,.(H6K20 R0,,6,,224,6,1,240S007,3,240,3,207,224,1,255#S128,,126,,,,,.2S0,,,,,,,.AS0,,,,,,,.YS0,,13,128,,22,96,.qS056,24,,96,8,,96,6S0,32,2,,96,,,48S002,,48,2,,63,96,.S013,176,,7,248,,1,104S0,,48,,,,,.S0,,,,,,, 124,4T0,88,4,,48,24,,.U032,,,32,,2,192,.U0,,,,,,,.(U0,,,,,,,2537U0,,,,,,,.HU0,,,,,16,,._U129,,,32,,2,20,64vU0,162,,1,81,,4,10U064,,84,,1,33,,.U0,,,68,,,,.U0,,,,,,,.U0,,,,,,,.U064,,2,,4,32,,128252,88,96,198,251,208W25,169,4,133,251,165W252,24,105,85,162,66W157,249,31,202,208,250NW198,252,16,4,169,7fW133,252,76,101,250,81,,4,10U064,,84,,1,33,,.U0,,,68,,,,.U0,,,,,,,.U0,,,,,,,.U064,,2,,4,32,,128 ! CAVE BOOT--BY JC HILTY; 53281,0:53280,0:50X X4915449320:A:X,A: 147,0:57812"APE TITLE",8,1:62631:49154S54272:X024:SX,0::S24,15:S6,240N1,N2,DR:N1024S1,N1:S,N2:S4,17:Z1DR2:Z:S4,16  ":"  OUR SEARCH WAS FINALLY OVER...."] 33)" ":7)"A FEW MONTHS AGO YOUR TRUE" 47)"LOVE,MAXINE,WAS ON A TRIP TO" 57)"THE HIMALAYAN MOUNTAINS. SHE WAS" 67)"NEVER HEARD FROM AGAIN. YOU" 77)"HAVE SEARCHED FOR HER EVER"I0,,24,,,24,,.J060,,,126,,,255,.0J001,255,128,,24,,,24DJ0,,60,,,126,,.bJ255,,1,255,128,3,255,192J007,255,224,7,255,224,7,24J224,,24,,,60,,.J0,,,,,8,,.J028,,,56,,,112,.J063,224,,31,192,,15,192J&0,7,192,1595,,15,130,.L015,,,14,,,,.L0,,,,,,,.&L0,,,,,,,247)"PRISONER BY,255,192,31,253K0192,63,252,192,15,252,,70K:252,,3,252,,3,252,.IKD015,252,,6,60,,2,28ZKN0,,24,,,,,.iKX0,,,,,,,.{Kb0,,,,14,,,15Kl0,,15,130,,7,195,.Kv007,227,128,39,243,192,63,255K255,63,255,255,39,243,192,7K227,128,7,1,,24,,7,24M224,7,255,224,7,255,224,3-M 255,192,1,255,128,,255,.BM0,126,,,60,,,24ZM 0,,24,,1,255,128,.pM*255,,,126,,,60,.M40,24,,,24,,,24M>0,,24,,,24,,249MH0,,,,24,,,56MR064,,60,96,,63,240,.M\063,192,,63,192,,63,22499,224,,195,224,,65,240O0,,240,,,112,,.O0,,,,,,,.0O0,,,16,,,56,.CO0,28,,,14,,,7\O252,,3,248,,3,240,.zO003,224,,3,255,240,3,191O248,3,63,252,,63,240,.O063,224,,63,192,,63,192O$0,63,240,,60,96,,56O.064,,24,,,,,. ,,128P012,,96,12,,32,24,.Q028,248,,3,96,,,."Q0,,,,,,,.1Q0,,,,,,,.@Q0,,,,,,,.QQ0,,,,,,48,.mQ004,120,,8,120,,16,124Q0,16,60,,16,30,,16Q014,,16,14,,16,6,.Q 016,6,,8,14,,8,12Q0,6,28,,3,248,,1Q240,,,,,,,.GxTX`(h轖轖轖ΔL1x1X`G 0   0   0   1` `?? 3 00???????????0 4,134,252,132C g 251,162,4,160,0,134,254,132,253,162,131,160,39,32,127,192 h 162,131,160,40,134,252,132,251,162,216,160,0,134,254,132,253 i 162,135,160,15,32,127,192,173,16,135,141,33,208,162,96,160j 0,134,252,132,251,162,32,160,0,134,254ATA% 15,122,250,12,73,250,15,122,250,12,73,250W 13,201,250,15,122,250,13,201,250,13,201,250 15,122,250,12,73,250,15,122,250,12,73,250 15,122,250,13,201,250,13,201,250,13,201,250 15,122,250,12,73,250,15,122,250,12,73,250 12,73,250,15,122,250,12,73,250> 15,122,250,13,201,250,13,201,250,13,201,250n 15,122,250,12,73,250,15,122,250,12,73,250 13,201,250,15,122,250,13,201,250,13,201,250 12,73,250,15,122,250,12,73,250,15,122,250 13,201,250,12,73,250,0 000 00????33333 *** ***??? +   @HHHJJHUUREQA@( ****<<<< R HH((!@  000??????????? 00?????? <<<33<?,132,253,162,127,160Dk 63,32,127,192,173,17,208,9,16,141,17,208,96,142,1,192l 140,0,192,160,0,177,251,145,253,165,252,205,1,192,208,8m 165,251,205,0,192,208,1,96,230,251,208,2,230,252,230,253n 208,227,230,254,76,135,192x SONG D13,201,250,15,122,250,13,201,250,13,201,250K 12,73,250,15,122,250,12,73,250,15,122,250z 13,201,250,12,73,250,12,73,250,12,73,250 15,122,250,12,73,250,15,122,250,12,73,250 13,201,250,15,122,250,13,201,250,13,201,250  15,122,250,$12,73,250,12,73,1000  0,0,0,201,250K 12,73,250,15,122,250,12,73,250,15,122,250z 13,201,250,12,73,250,12,73,250,12,73,250 15,122,250,12,73,250,15,122,250,12,73,250 13,201,250,15,122,250,13,201,250,13,201,250  15,122,250,????00 3  3?00003? <<<<<<>= ==================================a COMMODARES PROBLEM #38-1 :v" PARM PASS " SOLUTION BY JOSEPH WRIGHT ================================== ==== SAVE 10-40 AS PRG1 ===== "WHA UUUUUUUUUUUUUUUUUUUUUPUUUUPUUU@UT@@@P@@TDDD@@TU@@@@@@ ꢢ +"ЛRk0 `KbBb'R "Bb2O`Ң bR"Ң2 BOB@+k KK ;P"@KO/O k +@ @`[ KPBOJ@[ @KJ PbF[@fFF@ `֦[ [@K0K&&@K [ KPBOJ@[ @KJ P << CD42-3 >>= ==================================a COMMODARES PROBLEM #38-1 :v"PARM PASS 2" SOLUTION BY PAUL SOBOLIK ================================== --------METHOD 2-----------  ----SAVE 5 (C64 ONLY)---2 L ----SAVE LINES 80-90 AS PROG3---D P P3 : ""P3S Z"PROG4",8{ _ ----SAVE LINES 100-110 AS PROG4-- d"";: 3,3 : 3,P4 n 3 : "IN PROG4, P4=";P4================== --------METHOD 2-----------  ----SAVE  << CD42-4 >>= ==================================a COMMODARES PROBLEM #38-2 :}"CRAFTY COMPARISON " SOLUTION BY CARMEN ARTINO =================================="INPUT 4 NUMBERS, ONE AT A TIME"  << CD42-11 >>> ==================================b COMMODARES PROBLEM #38-2 :~"CRAFTY COMPARISON " SOLUTION BY PAUL VAUGHAN ====== C64 ONLY ============== N(2) N:N(1(NN(2)))N:""N" T IS A";A.  DS$"" 198,1: 631,13 : 40E  208,1 : 842,13\ (" ";A:"PRG2",8b , - === SAVE 50-60 AS PRG2 ===== . 2A0:"";A <"A IN PRG2="A ALPHA SPRITE2 AX QUAREꧧzzzz⢢*'B@@"kR"@K @ @`kP[` k`PP GG0ҋk k򻰛P۰@ 22BBۀ K'B"BR@k[+0GR" kBb@GJ k @00KG燆@ [+[ { G@F +7 `O@KF𛠫P WGg@FFK+@+@K/F+@KKZ LARGEST SO FAR ="N(2):N10(646)H 785,188: 786,168: N,(N):N(0)T "DONE" RAFTY OMP 2ALPHA SPRITE LPHA PRITE ALPHA SPRITE2 AX QUARELINE 10-30 AS PROG1------9 P1 : 8,8,8,"PARM.SEQ,S,W"I 8,P1 : 8X "PROG2",8 #----SAVE LINES 40-60 AS PROG2----- ( 8,8,8,"PARM.SEQ,S,R" 28,P2 : "IN PROG2, P2=";P2 < 8 F 15,8,15,"S0:PARM.SEQ": 15 J K ---METHOD  << CD42-5 >>= ==================================a COMMODARES PROBLEM #38-3 :w ALPHA SPRITE ENHANCED SOLUTION BY JIM SPEERS ==================================d A$(64) : 0,1 : 1,2 : 4,13 : 5 J0 3 : X N(J)X : J( MN(0)6 ( J1 3U 2M((N(J)M) N(J) M)2] Z J| c M "IS THE LARGEST VALUE"ALPHA SPRITE LPHA PRITE ALPHA SPRITE2 AX QUARE Z198,0'dI0I1:"DDLOGO",8,14i53280,6Gn55,0:56,92:Ux53265,59d53272,120|56576,(56576)25425055,0:56,16053265,2753272,2156576,(56576)1"";:53280,6:53281,0:(14); "OADING  54279,LO(X)45:54280,HI(X))  N1 DU(X)G 54286,L3(B):54287,H3(B)Q BB1c  L1 145:k  Ns  X| 350 S54272:I024:SI,0::155  16,195,21,31,25,30  28,49,21,31,28,49  33,135,37,162,25,30  33,135,71,12,143( 6,71,12,143,6,71,12,143,6,71,12,143R 6,71,12,143,6,71,12,143,6,71,12,143| 6,71,12,143,6,71,12,143,6,71,12,143,1,4,4,2,2,8 : 4,2,2,2,2,2,2,2,2,2,2,2,2,2,2 D 8,97,16,195,8,97,16,195,8,97,16,195 N 8,97,16,195,8,97, \''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''AAAAaaaAaaaAAAAAAAAAAaaAAAAAAAAAAAAAAAAAaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaarrr'''''''''''''''''''''rrrr'''''''''''''''''''''rr~ ? AIN ENU...."< "LOAD";(34);"DIR 1";(34);",8,1"T "RUN":""q 631,13:632,13:198,2: HI(25),LO(25),DU(25),H3(64),L3(64)  54291,134: 54277,136:54284,136  54292,136: 54278,134:54285,134  54290,17: 54  28,49,33,135,28,49(  25,30,28,49,31,165B  33,135,37,162,28,49]  37,165,33,135,31,165v & 25,30,22,96,18,209 0 4,2,2,3,1,4,4,2,2,8 : 4,2,2,2,2,2,2,2,2,2,2,2,2,2,2 D 8,97,16,195,8,97,16,195,8,97,16,195 N 8,97,16,195,8,97,,2.n 842,34: 208,1:"ENTER YOUR TEXT";M$Cx 1,1: I1 64i 1,0,0,(I31): A$(I),0,0,23,20y I : 0,1C32 : R50 : SC4 Z1 8 :  Z,0 : J1 : K1 12 I1 (M$) : X((M$,I,1))31 X1 CC16 : 2 8 :  I,0 : : 0,12 : 4,14 : 5,14 : Cx 1,1: I1 64i 1,0,0,(I31): A$(I),0,0,23,20y I : 0,1C32 : R50 : SC4 Z1 8 :  Z,0 : J1 : K1 12 I1 (M$) : X((M$,I,1))31 X1 CC16 : aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaNcefRSWX276,17:54283,17& " 54272,00: 54273,33> ,54279,59:54280,33_ 6 X1 25: HI(X),LO(X): Xz @ X1 25: DU(X): X J X1 64: H3(X),L3(X): X T 54296,15 ^B1: X1 25 hAN$:AN$(13)460 r 54272,LO(X): 54273,HI(X) |16,195,8,97,16,1952 X 8,97,16,195,8,97,16,195,8,97,16,195\ b 8,97,16,195,8,97,16,195,8,97,16,195 l 8,97,16,195,8,97,16,195,8,97,16,195 v 8,97,16,195  5,152,11,48,5,152,11,48,5,152,11,48  5,152,11,48  6,71,12,143,6,71,12,143,6?><?????aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa  >> ?~ > 210U J,0 :  A$(X),J :  J,C,R :  J,1,SC,0,1,1 : CC16 : JJ1 : J9 J1q C320 C32 : RR16 R229 R50 : C32 Z1 10 : Z I : 2 : I1 8 :  I,0 : : 1 0,(0)1 : SCSC1( K : I1 ????????xxxxxxxχ?|x???????? qa'$$$'  ? ``??????8xx"6*"""HIHHH1"" ```8``|8a`????????8I#qXHHςpHHp!! 00!!$$bbHHO <FEDpp C!!!  ?????xxx??{3?" "000qb  $44,,DDGDyAAqA??_ 0ఘఘ`aa`aaa̘```8!! ?aaa```aa`8????????0IIx Xq| !! '%  IIIIIy$$$???@|>|>><||?????????8,$$, qIIqQ$$D0$y? !!!ఘ```H PHE8@8??HI  8!!C? <@@@@,$LD|cL@KK  Ƈ0x?