lROM IPS HOY! - XPLODED HAR- ACTERS PROVIDES AN EXPLODED (64X) VIEW OF ANY OF THE -64'S CHARACTERS. - UR CURRENT PROGRAM AND LOAD THE PROGRAM YOU WISH TO VIEW. E FACTORS. . xROM IPS HOY! - RIG UNCTIONS ALLOWS YOU TO SPEED UP SINE AND COSINE CALCULATIONS WHEN USED WITH SPRITE MOVEMENT. - ROGRAM AND LOAD THE PROGRAM YOU WISH TO VIEW. E FACTORS. . ROM IPS HOY! - ISK OTCHER IS A SHORT -64/128 PROGRAM THAT WILL INFORM YOU WHETHER OR NOT A DISK'S NOTCH IS COVERED BY A WRITE PROTECT TAB. WISH TO VIEW. E FACTORS. . YROM IPS HOY! - ISK HECK INSPECTS THE ENTIRE DISK OF A SINGLE TRACK FOR ERRORS. - - ETHER OR NOT A DISK'S NOTCH IS COVERED BY A WRITE PROTECT TAB. WISH TO VIEW. E FACTORS. . HIS IS HOY!'S ACHINE ANGUAGE ENTRY PROGRAM FOR OUR ADVENTUROUS READERS WHO LIKE TO TYPE IN THE PROGRAM FROM OUR MAGAZINE. - Y A WRITE PROTECT TAB. WISH TO VIEW. E FACTORS. . HOY!'S CHECKSUM PROGRAM FOR MIS- TAKEPROOF TYPING OF -64 PROGRAMS PRINTED IN HOY!. (OR PROGRAMS PUBLISHED FROM AY 1987 ONLY! THERWISE USE 64 UG EP.) . E FACTORS. . HOY!'S CHECKSUM PROGRAM FOR MIS- TAKEPROOF TYPING OF -128 PROGRAMS PRINTED IN HOY!. (OR PROGRAMS PUBLISHED FROM AY 1987 ONLY! THERWISE USE 128 UG EP.) E FACTORS. . 94,185,238,218,153 222,198,200,208,205,96,160,0' 185,0,192,153,0,4,185,240K 195,153,0,216,185,250,192,153o 250,4,185,234,196,153,250,216 185,244,193,153,244,5,185,228 197,153,244,217,185,238,194,153  238,6,185,222,19RYSTALLUS TRAPS YOU IN A HUGE MAZE MADE OF 36 CONNECTING CUBICLES EACH CONTAINING SHIMMERING CRYSTALS THAT EMIT AUDIBLE TONES. OU MUST GATHER THE CRYSTALS AND ESCAPE THE MAZE. 6XX15:AT,7XX,3:""TX$(XX):@AN$:AN$""4160+JAN$(13)882:204fTB1H3B1H4B1H5B1H8B1H9B1H124195VB2H5B2H74195W IF B=3X IF B=4^882:V21,1`I035:V,X1I:D135::bV2OOPS COMBINES THE GAMES OF BASKETBALL AND COMPUTER PONG INTO A FAST ACTION CONTEST FOR ONE OR TWO PLAYERS. OYSTICK IN ORT 1. - MUST GATHER THE CRYSTALS AND ESCAPE THE MAZE. 7,128:REM DISABLE SHIFT/COM KEYPOKE775,200:REM DISABLE LISTINGHPOKE808,234:REM DISABLE STOP/RESTORENl828:V21,0:ZZ$IN$(B,H) 2,8,2,"@0:"ZZ$",S,R" XX15 2,TX$(XX) :2AT,7,1:"ED LERT TAKES ITS CUE FROM THE ARCADE CLASSIC ISSLE OMMAND. HE OBJECT IS TO DEFEND SIX CITIES AND YOUR BASE FROM ENEMY MISSLES FROM THE SKY. OYSTICK IN ORT 2. THE MAZE. SPRITESHELL 128 ENABLES 7.0 GRAPHIC PROGRAMMERS TO ACHIEVE SMOOTHER MORE CONTROLLABLE SPRITE MOVEMENT KEEPING THE SPRITES WITHIN PRESCRIBED LIMITS. EE SHELL DEMO. E MAZE. tSHELL DEMO SHOWCASES THE CAPABIL- ITIES OF PRITESHELL 128. HIS PROGRAM LOADS PRITESHELL 128 AND DEMO.SPRITES. - THE SPRITES WITHIN PRESCRIBED LIMITS. EE SHELL DEMO. E MAZE. NO NEWS 128 PROVIDES AN ? PROMPT BEFORE A - OR COMMAND TO PREVENT ERASURE OR DESTRUCTION OF A PROGRAM. - THIN PRESCRIBED LIMITS. EE SHELL DEMO. E MAZE. O EWS 64 PROVIDES AN ? PROMPT BEFORE A - OR COMMAND TO PREVENT ERASURE OF DESTRUCTION OF A PROGRAM. - THIN PRESCRIBED LIMITS. EE SHELL DEMO. E MAZE. 8,153,238,218 200,208,205,96 FI9601022:N:I,N::" P 0,0,0,0,0,0,06 Z 0,0,0,0,0,0,0L d 0,0,0,0,0,1,192d n 0,0,224,0,0,112,0 x 255,252,0,255,255,0,255  252,0,0,112,0,0,224  0,1,192,0,0,0,0  0,0,0,0,0,0,0  0ENTERFOLD GIVES THE ILLUSION OF UNFOLDING YOUR SCREEN FROM THE IN- SIDE OUT. HARACTERS SEEM TO SPRING FORTH FROM THE CENTER OF THE SCREEN AWAY FROM EACH OTHER. DEMO. E MAZE. 1,0:230c882:1550h4160I828935:A:I,A::. 160,0,185,0,4,153,0,192R 185,0,216,153,240,195,185,250v 4,153,250,192,185,250,216,153 234,196,185,244,5,153,244,193 185,244,217,153,228,197,185,238 6,153,238,1CHAINMAIL! IS A TWO-PLAYER MED- IEVAL SWORDFIGHTING GAME FOR THE -128 REQUIRING STRATEGY AND DEXTERITY. WO JOYSTICKS REQUIRED. - THE SCREEN AWAY FROM EACH OTHER. DEMO. E MAZE. "#I813:AT,I,1:" ")c"AT,14,1:" [/=ANCEL * PC=UN ROGRAM] ",AT,15,1:""1AT,22,3:" ":1000 TO EOS ALLOWS YOU TO IMPORT GRAPHICS FROM RINT HOP TO FORMAT. HE PROGRAM CONSISTS OF INARY TO AND PS TO GEOS.ML; SEE DOCUMENTATION IN THE MAGAZINE. MO. E MAZE. RESENTED IN CONJUNCTION WITH THIS MONTH'S UPERT EPORT ON HE 128 VS HE LONES BENCHMARKS PERFORMS A VARIETY OF TESTS FOR COMPARING THE SPEED OF THE TWO COMPUTER SYSTEMS. ZE. j OMMODA^E CONTAINING TWO SHORT SORTING ROUTINES FOR THE -128 - AN INSERTION SOS AND A SHELLSORT. - - ARIETY OF TESTS FOR COMQRING THE SPEED OF THE TWO COMPUTER SYSTEMS. ZE. OLUTION TO THE AY '87 OMMODARE TO WRITE A PROGRAM TO DISPLAY THE EXACT VALUE OF 2^127-1 - THE LARGEST FLOATING POINT NUMBER THE OMMODORE COMPUTERS CAN USE. UTER SYSTEMS. ZE. OLUTION TO THE AY '87 OMMODARE - REQUIRING A PROGRAM THAT WILL GENERATE ALL POSSIBLE FIVE-LETTER NAMES FOR A NEW COMPANY ACCORDING TO SPECIFIED RULES. USE. UTER SYSTEMS. ZE. ,0,0,0,0=0,053 222=198,200,208,205,96,160,0' 185,0,192,153,0,4,185,240K 195,153,0,216,185,250,192,153o 250,4,185,234,196,153,250,216 185,244,193,153,244,5,185,228 197,153,244,217,185,238,194,153  238,6,185,222,19 '********************************M * MENU PROGRAM V2.0 *s"* DESIGNED BY *$* DOUBLE L SOFTWARE *&* (C) 1987 ALL RIGHTS RESERVED *(********************************):53296,1 *AT67 NS" 11)"UN ROGRAM ",11)"ANCEL INDOW "K 11)""\PO55507:X0x I116:POI,0::1000*AN$:AN$""20904AN$(17)2200:POPO40:XX1:PO55587PO55507>X2X0HAN$(13)2140 230882:225I116:POI,5::= P$(1,1)"LANKSPEED":IN$(1,1)"LANK IN"o P$(1,2)"64 UG EP ":IN$(1,2)"UG EP IN" P$(1,3)"128 UG EP II":IN$(1,3)"BUG REP IN" P$(1,4)"RYSTALLUS":IN$(1,4)"RYSTAL IN" P$(1,5)"OOPS D THIS "%J4)" PROGRAM SUCCESSFULLY. SE THE"QT4)" PRESCRIBED METHOD WHICH IS..."}^4)" OAD ''ROGNAME'' "h4)" [RESS ANY EY] "r4)""|AT,22,3:" 10)"O EWS IN"&( P$(1,11)"ENTERFOLD":IN$(1,11)"ENTERFOLD IN"X2 P$(1,12)"CHAINMAIL":IN$(1,12)"CHAINMAIL IN"7 P$(2,1)"INARY TO ":IN$(2,1)"INARY IN"< P$(2,2)"BENCHMARKS":IN$(2,2)"BENCHMARK IN"F P$(2,3)"SHORT SORT":IN$(2,3)"S Y1Y18:Y1188Y1100+V1,Y1:I0F:LCI,0:?HH1:H12H1SPP1:P18P7sLCLC40:LC56030LC55590|204Y1Y18:Y1100Y1188V1,Y1:I0F:LCI,0:HH1:H1H12 PP1:P7P18#LCLC40:LC55 ,9)"ORDERLINE (64)":IN$(2,9)"ORDERLINE IN"F P$(2,10)"BORDERLINE (128)":IN$(2,10)"BORDERLINE IN"| P$(2,11)"THE GREAT ESCAPE":IN$(2,11)"ESCAPE IN" P$(2,12)"URTAIN FFECT":IN$(2,12)"URTAIN IN" P$(3,1)"LIST":IN$(3,1)"LIST IN" - >AT,20,2:" "d CAT,21,2:"" HAT,22,1:"" RAT,23,1:" RSR=ELECT PC=ORE /Ґ=XECUTE "\AT,24,1:" 8,15:15,"M-W";(106)(0)(1)(133):A7,8,9` 15:198,0:"ERROR CHECKING COMPLETE.":198,1:1 T135:11:S0LS:13::: T135:S0:13:: 198,0:"WHICH TRACK (1-35)";T:T1T359 11:S0LS:13:: LS16:T31LS17:T2 )1250 AN$(145)1300) AN$(13)2000J AN$(32)3000:Y1100:140S 204w "";:53280,0:53281,6:V21,0 "OADING...";(34);P$(B,H)(34);"" "LOAD";(34);P$(B,H);(34);",8" "RUN": ""  631,13 9:NATAT22:M:N,M:4 ,32,180,2,132,251,32,180,2W .166,251,76,240,255,32,253,174u 032,158,173,32,170,177,96 253265,(53265)239 <4000:V53248:X175:Y1100 P P$(4,12),PG$(4,12),IN$(4,12):5000:NN3:B.:5190 d53280,6:53281,1: R2080\X0882:4100aX22180EbB1H3B1H7B1H8B1H9B1H122155ycB2H2B2H3B2H6B2H10B2H112155d IFB=3e IF B=4f2159k882:1550oX1882pI035:V,X1I:D135::zV21,0: ":IN$(1,5)"OOPS IN") P$(1,6)"ED LERT":IN$(1,6)"ED LERT IN"[ P$(1,7)"SHELL DEMO":IN$(1,7)"SHELL DEMO IN" P$(1,8)"SPRITESHELL 128":IN$(1,8)"SHELL 128 IN" P$(1,9)"NO NEWS 128":IN$(1,9)"NO NEWS IN" P$(1,10)"O EWS 64":IN$(1,  ":1000(AN$:AN$""1670>882:V21,1:225_ ************************** **** WINDOW ROUTINE **** **************************828AT,4,11:""11)"EE NSTRUCTIO HORT SORT IN"P P$(2,4)"EAL HING":IN$(2,4)"EAL IN"GZ P$(2,5)"EW AME":IN$(2,5)"EW AME IN"vd P$(2,6)"WORD SLIDER":IN$(2,6)"SLIDER IN"n P$(2,7)"ORD LIDER":IN$(2,7)"LIDER IN" P$(2,8)"MITH UMBERS":IN$(2,8)"MITH IN"  P$(2 590LC56030(204828:V21,0IAT,12,4:""u"4)" HIS IS A 128 ROGRAM.T MAY ",4)" NOT BE LOADED IN THE 64 MODE."64)" OU MUST SWITCH TO THE 128 "@4)" MODE IN ORDER TO LOA  P$(3,2)"XPLODED HARAC.":IN$(3,2)"XPLODED IN"> P$(3,3)"RIG UNCTION":IN$(3,3)"RIG IN"o P$(3,4)"ISK OTCHER":IN$(3,4)"OTCHER IN" P$(3,5)"ISK HECK":IN$(3,5)"HECK IN" CL718:AT,CL,14:" "::POKE65 ":fAT,3,10:""`pAT,4,10:" "zAT,5,10:""S54272:S23,0:S24,15S6,0:S5,12:S1,70:S3,40S4,0:S4,65:D1100::S4,0:q5LS18:T18LS20 C 2,8,2,"#":15,"U1,2"0;T,S:15,E,E$,T$,S$` E0E","E$","T$","S$i 2:3. CHECK 1 TRACK""4. EXIT/END":"YOUR CHOICE";A:A1A41"INSERT DISK TO CHECK.":198,1:"CHECKING...":A4* 15, : 632,13: 198,2:F "":AT,2,2:""u %AT,1,5:"(C)1987 OUBLE OFTWARE V2.0" *AT,3,2:" " /I419 4AT,I,2:2)" ݚ ": (14):2500+ n2040,15:V39,10:V,X1:V1,Y1P x800:53265,(53265)16:53296,0m LC55590:P7:H1:V21,1 BB1:BNNB1 I112:AT,I6,14:""P$(B,I)::V1,Y1 F(P$(B,H)):A0F:LCA,8::1000 AN$:AN$""206 AN$(17 ;S700: *** CHANGE S TO RELOCATE *** C-64 VERSION ***S(147)::JSS20A:J,A:XXA:J:X3473"ERROR IN DATA...":"THE DATA IS LOADED..."::"SYS"S"TO ACTIVATE...":32,228,255,240,3,133,251,96,238,32,208,162 90,202, =S3072: *** CHANGE S TO RELOCATE *** C-128 VERSION ***U(147)::JSS20A:J,A:XXA:J:X3468"ERROR IN DATA...":"THE DATA IS LOADED..."::"SYS"S"TO ACTIVATE...":32,228,255,240,3,133,251,96,238,32,208,16285,202#A$">>> G A M E O V E R <<<"3A$(A$,40)?L(A$)RTB((40L)2)Xf,TB,0,A$oS24{ S0 I1 2 J1 S (27); I1 "W";: "V"; JSS1 I 'dLOC 50000: - FULLY RELOCATABLEJ}T0103:A:CHCHA:LOCT,A:o CH15839 "ERROR IN DATA": LOC: - USE ANYWHERE IN PROG. 169,0,72,169,0,133,251 169,4,133,252,169,0,133 253,169,216,133,254,162,0  160,1,177w165,253,105,40,133,2532 165,254,105,0,133,254,232S 224,25,208,182,104,168,200o 152,192,20,208,155,96LOC: - USE ANYWHERE IN PROG. 169,0,72,169,0,133,251 169,4,133,252,169,0,133 253,169,216,133,254,162,0  160,1,177 ="ONE MOMENT..":49,(47):50,(48):T$(77):T1:K41x(K)127A$A$((K)128):T$(T)A$:TT1:A$"":5030A$A$((K)):O$(0)15:15,8,15:"PROGRAM TO LIST";A$:2,8,2,""A$:5140 "PRESS TO PAUSE <_> TO EXIT"y#15,N:N0> N6"PROGRAM NOT ON THIS DISK":K12000::b ("DISK ERROR. PROGRAM ABORTEDq 215:198,0A$A$((K)):O$(0)15:15,8,15:"PROGRAM TO LIST";A$:2,8,2,""A$:5140 "PRESS TO PAUSE <_> TO EXIT" $"J":L$"S":NV5:NL244V1NV:A1NL1:AV260KBA1NL:BV250vA$(X$,A,1):B$(X$,B,1):V$(X$,V,1) F$V$A$B$L$" "F$V$B$A$L$" "F$A$B$V$L$" "F$A$V$B$L$" "F$B$V$A$L$" "F$B$A$V$L$:NN6BAVN;"NAMES PRINTED"  52,48: 56,48: +B$" "^M$(147):H$(19):R$(18):O$(146):D$(17)} ""M$D$D$D$D$" "R$B$" " J1 8: " "R$" "O$B$R$" ": J: " "R$B$" " H$D$B$B$: B$B$# H$D$;: " CHARACTER ";C$:CH(1077)853248  52,48: 56,48: +B$" "^M$(147):H$(19):R$(18):O$(146):D$(17)} ""M$D$D$D$D$" "R$B$" " J1 8: " "R$" "O$B$R$" ": J: " "R$B$" " H$D$B$B$: B$B$# H$D$;: " CHARACTER ";C$:CH(1077)853248 208,253,141,18,208,240,235WORD SLIDERORD LIDERMITH UMBERSTIPS AHOY! ,208,253,141,18,208,240,235WORD SLIDERORD LIDERMITH UMBERSTIPS AHOY! d DEFINE SPRITE!eV53248<fI83283263:I,255:Yg2040,13:V21,1:V39,1yn PRECALCULATE SINE, COSINEp SN(360),CS(360):D0360:SN(D)(D180):CS(D)(D180):x PUT SPRITE IN ORBITX0360 V,16590CS(X): V1, ,253,72,177,251/ 136,145,251,104,145,253,200P 200,192,20,208,239,136,169p 32,145,251,160,38,177,253 72,177,251,200,145,251,104 145,253,136,136,192,18,208 239,24,165,251,105,40,133 251,165,252,105,0,133,252 24,14090SN(X): 140 LIST XPLODED HARAC. :#2,B$,C$ (197)575170/ (653)15070U #2,Z$,B$,C$,D$:Z$""B$""5170 V$((C$O$)(D$O$)256)" ":V$(V$,2)::V$;:Q0 #2,C$:C(C$O$):C05060 C127C204Q0T$(C127);:5100 C34Q1Q (C);:5100  " *** DISK NOTCH SENSOR ****C *** AUTHOR: NGHIA TRAN ***h"PRESS ANY KEY TO CHECK DISK"q A$ A$"" 2215,8,15:""(15,"M-R"(30)(0)2#15,K$<N(K$(0))F N16 100 Z"DISK'S NOTCH IS WRITE-PROTE#"":53280,0:53281,0:646,1L ==================================p COMMODARES PROBLEM #41-2 : NEW NAME SOLUTION BY JIM SPEERS ==================================X$"AEIOUBCDFGHKLMNPQRTVWXYZ":F ( 56334,(56334)254:1,(1)251? - I0 7:A(I)(CHI): IN 2 1,(1)4d 756334,(56334)1 < H$D$D$D$D$: X0 7: X$"" A Y7 0 1 F A(X)2Y X$X$(113): A(X)A(X)2Y: 80 KX$X$" " P Y: (158)2)X$: X: 30CTED":1102 d"DISK'S NOTCH IS NOT PROTECTED"c n"PRESS R TO RE-CHECK OR Q TO QUIT."l x I$~ I$"" 120 I$"R" 40 15: C:A53280:A,.:A1,.:"DISK ERROR CHECKER:":"1. CHE";"CK WHOLE DISK":"2. QUICK CHECK":"3. CHECK 1 TRACK""4. EXIT/END":"YOUR CHOICE";A:A1A41"INSERT DISK TO CHECK.":198,1:"CHECKING...":A4* 15, AHAHOY! SEPTEMBER872A  ""3 ==================================W COMMODARES PROBLEM #40-2 :k SHORT SORT SOLUTION BY SCOTT DUNCAN ================================== N8 : # OF ITEMS TO SORT SELECT RANDOM NUMBERS TO B ORDERLINE INBORDERLINE INESCAPE INURTAIN INLIST INXPLODE^ INRIG IN OTCHER:IN OOPS IN ED LERT IN SHELL 128 IN SHELL DEMO INNO NEWS IN  EWS IN ENTERFOLD IN CHAINMAIL INORDERLINE INBORDERLINE INESCAPE INURTAIN INLIST INXPLODED INRIG IN OTCHER IN----------------SGTIPS AHOY!SG----------------SGORDERLINE (64)SGBORDERLINE (128)SGTHE GREAT ESCAPESG URTAIN FFECTSG LISTCHAINMAIL&SGINARY TO ӠSGPS TO GEOS.MLSG----------------SGRUPERT REPORTSG----------------SGBENCHMARKSSG----------------D 2 IN INSERTION SORT WITH H AND H+1)ZH2((N)(2))1::IH1N:TS(I):KI: S(KH)T:S(K)S(KH):KKH: KH:S(K)T::H(H2): H0d I21 N: S(I2);::"SHELLSORT"= N8 : # OF ITEMS TO SORT SELECT RANDOM NUMBERS TO BBOOTERSGLANKSPEED SG64 UG EP ɠ SG128 BUG REP II SGRYSTALLUSSGCRYSTALLUS.ML SGOOPSSGHOOPS.ML153280,0:53281,0:646,1:"PLEASE WAIT..."Z ==================================~ COMMODARES PROBLEM #41-1 : REAL THING SOLUTION BY CLIFFORD DEDMORE JR. ==================================@ N E SORTEDB I1 N : J(I)((1)1000300):S(I)J(I): J(I);::]( -- INSERTION SORT --2 I2 N:TJ(I):KI: J(K1)T:J(K)J(K1):KK1: K1:J(K)T:< I21 N: J(I2);::"INSERTION SORT"F -- SHELLSORT --!P (REPLACE 1 AN HECK IN LANK IN UG EP IN BUG REP IN(1)1: K1127:J15:N(J)N(J)2C%:C%N(J)1E8:N(J)N(J)C%1E8}J,K:N(1)N(1)1:K15:N$(N(6K)):(N$,2,(N$)1);: BENCHMARKSCOMMODARES SHORT SORT INARY IN BENCHMARK IN SHORT SORT IN EAL IN EW AME IN SLIDER INLIDER INMITH IN HECK IN LANK IN UG EP IN BUG REP IN XPLODED HARAC.SG RIG UNCTIONSG ISK OTCHER ISK HECK LOADERDDLOGO% DIR 1 RYSTAL INCOMMODARESSG----------------SG SHORT SORTSGEAL HINGSGEW AMESGWORD SLIDERSGORD LIDERSGMITH UMBERS #"":53280,0:53281,0:646,1L ==================================p COMMODARES PROBLEM #41-2 : NEW NAME SOLUTION BY JIM SPEERS ==================================X$"AEIOUBCDFGHKLMNPQRTVWXYZ":FED LERTSGRED ALERT.ML SGSHELL DEMOSGDEMO.SPRITESSGSPRITESHELL 128SGNO NEWS 128SGO EWS 64SG ENTERFOLD (d* BINARY TO GEOS V1.0 FROM AHOY!!On* (E)NGENDERED BY SHAWN K. SMITHxPN$"PS TO GEOS": 000,006,087,003,008,004,030D116:P$P$(160):PN$(PN$P$,1,16):Z$(0)D17: DI(D):(147):: "ENTER NAME OF BINARY  '$䟉$' {ݐBQr]BE{RsVRPS TO GEOS V1.0Shawn K. SmithConvert your Print Shop graphics into GEOS format with PS To GEOS . . . . SSFUL CONVERSION!ENTER NAME OF FILE ORPRESS RETURN FOR LIST ©=T= T S V¥`ح=T SΩ=T S Š 2RL>S ^T`a {8 `  S 0'S : HHpq &ȱ!8T T }T CU|{i CU{zx CUxyzߤ}T CUvUwU`svvws`tU L2R` 2RhhLRT@``` P5PـS!\Ynffl8pSPhoto Scrap V1.1Photo ScrapAHAHOY! SEPTEMBER872AED LERTSGRED ALERT.ML SGSHELL DEMOSGDEMO.SPRITESSGSPRITESHELL 128SGNO NEWS 128SGO EWS 64SG ENTERFOLD5333:YB5340xSPRTG5347@FLAGS5365:CFLAGS5375:SHELL4864F:U XB,24,60e YB,50,220x SPRTG,5,6,58 FLAGS,1,1,1 CFLAGS,8,70,1:1,3:4,1:1,11,0,0,310,190:3,A$:A$,4:2,A$:A$,3:1,A$:A$,2!X38:COMMODARESSG----------------SG SHORT SORTSGEAL HINGSGEW AMESGWORD SLIDERSGORD LIDERSGMITH UMBERS,"U1"8;0;(TD$)(SD$)+ 1,"B-P"8;0:#8,T2$,S2$S 1,"B-P"8;0:8,(0)(255)(3)(21);o 1,"U2"8;0;(TD$)(SD$) 1,"U1"8;0;T;S:1,"B-P"8;TB:8,(131);T2$S2$PN$TD$SD$; D17:8,(DI(D));: 1,"U2"8;0;T;S ;0;T;S:220 1,"B-P" XPLODED HARAC.SG RIG UNCTIONSG ISK OTCHER ISK HECK LOADERDDLOGO% DIR 1 RYSTAL INFILE";B$( 1,8,15,"I0":8,8,8,B$",P,R"; 220:250:390X :(18)PN$" CONVERTED!"d 8:1:} 1,E,E$,A$,A$:E0 :"***";E;E$;" ***" 8:1: :"WORKING . . .": T18:S1:8:8,8,8,"#" 1,"U1"8;0;T;S:220 1,"B-P" ?n8 N 2R >S T T RUL,Š SRtTRuJRLV tHaRRRRRRRINSERT PRINT SHOP GRAPHIC DISKINSERT GEOS WORK DISK . . .FILE NOT FOUND!ERROR READING FILE!ERROR WRITING FILE!THIS IS NOT A GEOS WORK DISK!SUCCE`i ˮЬ`$T V¥` 6THH ʝuɭ <ݩɮɽDɍȽgɍȢɝ`ɭڍɮɽDɍȽgɍȢ`  ƙ?ęԈЍЩЍТĝ'нĝ%Щ &Щ Ѝ!РĈ â   â & - nésĩxmĩauĩvĩyč{č| .ĩ3Щĥ) Ģ  MŢ3 -81}Ĩ)  _Ţ7 -Íx8*~Ģ o  )ĬĹč ìĥ93syĪyyĬm J sĥy`Ĺč `;<8!JJJ;i(; ()*PQRxyzo{,ss[yy  ’ ɲ      ’ «      ’ ˱      ý     UUTUUT̈3# A0A1:"RED ALERT.ML",8,1/ 49152 64 UG EP ɠ 128 BUG REP II RYSTALLUSCRYSTALLUS.ML OOPSHOOPS.ML ũ @q\qbq"_qqZ ( $Y $Y $Y ( $Y $Y $Y (  PRESS FIRE BUTTON TO é?)ܢ /ܮ} j / .L) JJuyą{yą8ĥĐ8ĥİ uĥ{`sm~ąyi8v| `ii čĬĥ9_myĨsĭy J ,3̈́&H néĩĠ Ȍ hĥmL ¥{ Ţȭ))LK@ԌȎԌ` éƥ)ǩ 1H i(Ţ h` H* h. í HG hK;< čĽčĢ NnĐQđ;`  L`9:9 :L`;<مr{{ h-/ϐAAAAAZZ@@@@@PLAYERS (1/2) LEVEL (1-6) LEVEL PRESS FIRE BUTTON    î    󈋋"" .. """ 330 "#&&IIII&?  y c2Oք`] BRC5 ޤ?KnZ!B PRESS FIRE BUTTON TO w 0wwŭ) ŠC3wȌ4wРԢ ԩ 'ԩԭ)?') + ĥL{8  íƢп( ĬŢІ$ũEHwIwH #Ģ ԩ hҭwͅť LLܪ)y2 VL΄ŭ) ŝ(Р ȝŘũǝwŝŭ)Ũƅ ƅƅ /ŠȌԼ 3w4wLéŹŨEHwIwL`8ŝťŝŝ8ŝũ`}ŝŽ}ŝŽ}ŝ}ŝŽ}ŝ` řнřЭ SPRITESHELL 128 DEMO2 CLEVE BLAKEMOREU 5765 TIVOLI CIRCLE APT. #103n( RICHMOND,VA. 23227t2:< MAKE SURE THESE FILES BELOW EXIST ON DISK BEFORE RUNNING THIS PROGRAMF:P"SPRITESHELL 128Z"DEMO.SPRITESd: nXB E"ԹF ԹGƍԹE L`)ܥ)Ѕ:x<9;9;:<  ܠ/6Ǚz ݭ) ݩލЩt`START SCORE 000000 WAVE 01 HIGH 00000077000<@2 .u c@ Ѝ!  < ة XL7N`|䧆N3LH1fGJP3W>/f.LOADER 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$$ AD^RESS 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:B06357 (147)"LOADING AND CHECKING THE DATA...":J49152TB011:A:A0A25540sJB,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)3FKUP"::"FILENAME";F$:F$N$(F$,14):L(F$)W49458,L:J1L:49458J,((F$,J,1)):J:"SAVING DEVICE ** "D$:"STARTING WITH ** "F$:"IS THIS CORRECT (Y/N)";B$:B$"Y"60770,131:771,164:49152: 169,79,32,210,255,162,38,160,10,2,240,5,169,1215: 79,141,2,3,76,162,164,169,0,133,2,133,1064q 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,240,169,38,141,2,3,173,1578B"J48,193,240,23,165,161,201,212,176,4,165,160,1748u"T240,13,238,32,208,160,0,32,225,255,208,6,1617"^32,33,193,76,38,192,232,208,242,200,208,239,1893"h32,68,229,169,0,168,174,49,193,32,186,255,1555#r173,50,193,1654272,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$&"DO YOU WANT AUTOMATIC SAVES (Y/N)";A$::A$"Y"90UP"NO AUTOMATIC SAVES...":150Z49456,1:"DISK OR TAPE (D/T)";C$:C$"D"D1:D$"TAPE"d49457,D:D$D$" DRIVE"::"FILE NUMBER (0-99)";NnN$((N),2):N10N$(48)(N48)(xF$"BAC 92,204,3,3,1507?208,10,162,131,160,164,169,70,32,210,255,44,1615n169,78,32,210,255,142,2,3,140,3,3,76,111336,193,32,96,165,134,122,132,123,32,115,0,1180170,240,243,162,255,134,58,144,3,76,150,164,1799 32,107,169,32,121,165,173, ,8,138,24,101,1125@!253,69,254,170,44,198,254,230,252,164,253,208,2349t!"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,2392,51,160,193,32,189,255,169,43,1670I#|166,45,164,46,32,216,255,162,1,189,51,193,1520~#168,200,152,201,58,144,2,169,48,157,51,193,1543#201,48,208,3,202,16,234,32,33,193,76,116,1362#164,206,32,208,169,0,170,168,76,219,255,160,1827$1,1A HAHOY! SEPTEMBER 872ABOOTERLANKSPEED 64 UG EP ɠ 128 BUG REP II RYSTALLUSCRYSTALLUS.ML OOPSHOOPS.ML ENTERFOLD IN CHAINMAIL IN INARY IN BENCHMARK IN SHORT SORT IN EAL IN EW AME INSLIDER INED LERTRED ALERT.ML SHELL DEMODEMO.SPRITESSPRITESHELL 128NO NEWS 128O EWS 64 ENTERFOLDLIDER INMITH INORDERLINE IN BORDERLINE IN ESCAPE IN URTAIN IN LIST IN XPLODED IN INARY TO ӠPS TO GEOS.ML---------------- RUPERT REPORT  BENCHMARKSCOMMODARES SHORT SORT EAL HING RIG IN OTCHER IN HECK IN LANK IN UG EP IN BUG REP IN EW AMEWORD SLIDERORD LIDERMITH UMBERSTIPS AHOY! ORDERLINE (64) BORDERLINE (128) THE GREAT ESCAPE URTAIN FFECT LIST XPLODED HARAC. RIG UNCTION ISK OTCHER ISK HECKLOADERDDLOGO% DIR 1 RYSTAL IN OOPS IN ED LERT IN SHELL 128 IN SHELL DEMO IN NO NEWS IN EWS IN 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,23# A0A1:"CRYSTALLUS.ML",8,1/ 4915279,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 } [ ­I I J$ íL 9 L w4`}4`> >        !       =` `  9 "ЭJ$ `` ~ ©XH mG ­ } ©XH KG ­ { ©H mG# ­ w ©H KG © ````` 9LɀL@L¢½ͽͽ Í¢ `` 7@@4<7071``яяhڏhhhhh`hڏҏ       @@@iifZZvv}}}}UjjjjjjjUfiUUUjifijjjj== UUUU> > e  9` Ʃ DO 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؝؝؝ٝٝڝ&i(؝؝!ٝIٝqٝٝٝٝڝ9ڝaڝڝԢ `[ǭ[ɀ`[ǢzcwDɠzcciXǰLiXǰLɭ9ƩcǍǩzǩǩɍɍɍɮɽ mɍ ȰL Ȯɽɍ` iX ȰL ɭ٩ɭ Яɍɍɭ$КɮɽɍhȽɍiȢ*ʝ` ɭکɢɹ4ʝ^u>ʝuɭ <ݩɮɽDɍȽgɍȢɝ`ɭڍɮɽDɍȽgɍȢ`o âLkC G`CɘIG` !"!mH!Li" `!"!8H!L" `!"`…` iXiх i(iiXi`/lJ `:l?(eeuuwwcc)îý}čԽčԽčԽ=ōԩAԩ! `é@ԩ í@`8 ĝ8&ĝ@8Cĝ8`ĝ8Ý+ ©JGI/lÝ`@ Y   GGhhGGhhGGGG hhGGhhGGGG hhhhGGGGhhhhGGGGhhhhGGGGaa GGhhGGGG        )ܥ)Н0ŭ70ũЍť  ܢŝ4`i}}fi@<<<~<<@~88||Nl98l?9sA8F:P"SPRITESHELL 128Z"DEMO.SPRITESd: nXB xX`* mL=8L1 8)8H hJȘML1JȘML1L1L1JȘML1JȘML1 `8` @* mL=8L1 8)8H hJȘML1JȘML1L1L1JȘML1JȘML1  0 *** NO NEWS (128) *** 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:DD1:B:A:AX,76,47,12,793=169,70,32,210,255,174,12,13,172,13,13,142,1275m2,3,140,3,3,76,210,255,162,255,134,60,130332,147,79,134,61,132,62,32,128,3,170,240,1220239,176,3,76,226,77,32,10,67,169,1,141,121710,13,169,0,160,255,141,9,13,141,11ɭ#۩ɍɮɽ>ɍ8mɍɢ`i ɭ<֩ɭ`B‚BfiknqtFPdnFPd$",z:NXbl",ffffiikknnqqqttghhhjjjjjmmpppppssss^hr|(2ʝuɭ <ݩɮɽDɍȽgɍȢɝ`ɭڍɮɽDɍȽgɍȢ`ʃ128,77,11,13,141,11,13,240,197,169,18,32,1050X!6210,255,76,166,12,32,228,255,201,78,240,4,1757!@201,89,208,212,32,210,255,201,78,208,3,76,1773!J55,77,169,13,32,210,255,76,220,77,0,0,11844,2048240,209,201,17,240,4,201,27,208,201,173,790 P"ERROR IN DATA LINE:"L:8 ZX0:JJ12:D24040S d"THE DATA IS OK...":| n"SYS 53000 TOGGLES ON AND OFF...": x169,79,32,210,255,160,207,204,3,3,240,19,1581 173,2,3,174,3,3,141,251,207,142,252,207,1558 169,78,162,59,76,50,2 7,141,250,207,141,246,207,200,185,2428Q 0,2,240,107,201,34,208,6,77,246,207,76,1404 99,207,174,246,207,208,235,201,138,240,8,201,2164 147,240,4,201,162,208,223,165,214,141,247,207,2159 174,247,207,160,0,24,32,240,255,169,224,160,1892- AHAHOY! SEPTEMBER872A ED LERTSGRED ALERT.ML SGSHELL DEMOSGDEMO.SPRITESSGSPRITESHELL 128SGNO NEWS 128SGO EWS 64SG ENTERFOLD 0 P"ERROR IN DATA LINE:"F:6 ZE0:DD12:C31240Q d"THE DATA IS OK...":s n"SYS 49152 TO ACTIVATE...": x169,18,162,192,160,0,120,141,143,2,142,144,1393 2,140,49,193,88,96,173,49,193,208,28,165,1384 207,208,24,173,141,2,174,50 41,49,193,96,169,0,1391H 166,214,164,211,141,52,193,142,53,193,140,54,1723| 193,32,68,229,32,11,193,140,60,193,173,52,1376 193,141,55,193,172,55,193,177,107,141,56,193,1676 177,111,141,58,193,169,39,56,237,55,193,168,1597 177,107,149* "105,40,32,31,193,144,3,32,40,193,206,60,1079a ,193,208,155,238,52,193,173,52,193,201,20,208,1886 6139,174,53,193,172,54,193,24,32,240,255,76,1605 @88,192,32,11,193,168,177,105,145,107,177,109,1504J145,111,200,208,245,32,40,193,165COMMODARESSG----------------SG SHORT SORTSGEAL HINGSGEW AMESGWORD SLIDERSGORD LIDERSGMITH UMBERS XPLODED HARAC.SG RIG UNCTIONSG ISK OTCHER ISK HECK LOADERDDLOGO% DIR 1 RYSTAL IN INARY IN BENCHMARK IN SHORT SORT IN EAL IN EW AME IN SLIDER INLIDER INMITH IN HECK IN LANK IN UG EP IN BUG REP IN << RR45-1 >>4 BENCHMARKS GALOREN RUPERT REPORT #45` C-128fo4,4~ B1 11% : T0TI B 100,200,300,400,500,600,700,800,900,1000,1100(4, "BENCHMARK #";B24, (TIT0)60;"SECONDS"<BOOTERSGLANKSPEED SG64 UG EP ɠ SG128 BUG REP II SGRYSTALLUSSGCRYSTALLUS.ML SGOOPSSGHOOPS.MLCHAINMAIL&SGINARY TO ӠSGPS TO GEOS.MLSG----------------SGRUPERT REPORTSG----------------SGBENCHMARKSSG----------------,193,141,50,193,1556C 236,50,193,240,10,201,5,208,9,141,49,193,1535v 32,67,192,76,72,235,201,6,208,249,141,49,1528 193,32,94,192,76,72,235,173,32,208,141,51,1499 193,24,105,8,141,32,208,32,242,192,173,51,1401 193,141,32,208,169,0,141,57,193,177,111,141,59,193,169,19,1544U 56,237,52,193,24,109,55,193,168,173,56,193,1509 145,105,173,58,193,145,109,169,20,24,109,52,1302 193,56,237,55,193,168,173,57,193,145,105,173,1748 59,193,145,109,206,55,193,16,179,165,105,24,14,106,201,8,1654:T144,236,96,169,4,162,194,133,106,134,108,169,1655q^216,162,198,160,25,133,110,134,112,169,0,133,1552h105,133,107,133,109,133,111,96,230,106,230,108,1601r230,110,230,112,96,0,0,0,0,0,0,0,77855,193,16,179,165,105,24,14----------------SGTIPS AHOY!SG----------------SGORDERLINE (64)SGBORDERLINE (128)SGTHE GREAT ESCAPESG URTAIN FFECTSG LIST OOPS IN ED LERT IN SHELL 128 IN SHELL DEMO INNO NEWS IN  EWS IN ENTERFOLD IN CHAINMAIL INORDERLINE INBORDERLINE INESCAPE INURTAIN INLIST INXPLODED INRIG IN OTCHER IN BF4 : 4 : 3d #1 - SIMPLE FOR/NEXT LOOPKn N1 10000 : NQxp #2 - FLOATING POINT MATH N1 1000KK(K.6)K(K.03) : , #3 - STRING MANIPULATIONS6 N1 1000@N$((N$"AHOY",3),2,1)J :  RINTING N1 1000 N;% : ?  #8 - RANDOM NUMBERSP* N1 1000l4K(0)320 : K(0)200v> :  #9 - RANDOM POINTS 0 : 1,1 N1 1000,(0)320,(0)200 0 : 5 :  #10 - RANDOM LINE  << CD45-4 >>= ==================================a COMMODARES PROBLEM #41-3 :y WORD SLIDER SOLUTION BY BOB RENAUD ====== FOR C-128 ONLY ==========% AT65520:0,12,39,13::J034:AT,,0,J:"   53280,0: 53281,0:646,1I ==================================m COMMODARES PROBLEM #41-3 : WORD SLIDER SOLUTION BY CASEY GORSUCH ROBERT MARCUS J.V. HENRY ==================#"":53280,0:53281,0:646,1L ==================================p COMMODARES PROBLEM #41-4 : SMITH NUMBERS SOLUTION BY BARRY WARREN ================================== X(29):Z4PZ:I1:510):XY: X0 90d-nZZ1: "PRIME": 20========================p COMMODARES PROBLEM #41-4 : SMITH NUMBERS SOLUTION BY BARRY WARREN ================================== X(29):Z4PZ:I1:AHAHOY! SEPTEMBER872AED LERTSGRED ALERT.ML SGSHELL DEMOSGDEMO.SPRITESSGSPRITESHELL 128SGNO NEWS 128SGO EWS 64SG ENTERFOLDCOMMODARESSG----------------SG SHORT SORTSGEAL HINGSGEW AMESGWORD SLIDERSGORD LIDERSGMITH UMBERS XPLODED HARAC.SG RIG UNCTIONSG ISK OTCHER ISK HECK LOADERDDLOGO% DIR 1 RYSTAL IN #4 - DISK WRITE( #1,"@TEST,S",W9 N1 1000B1,NQ :  : f #5 - DISK READy #1,"TEST,S" N1 10001,K :  : X #6 - VERTICAL PRINTINGb N1 1000l Nv :  #7 - HORIZONTAL PS  0 : 1,1  N1 100E ,(0)320,(0)200 (0)320,(0)200K ]  0 : 5 : x L #11 - RANDOM CIRCLES V 0 : 1,1 ` N1 50 j,(0)320,(0)200,(0)50 t ~ 0 : 5 : Nv :  #7 - HORIZONTAL P+STRING":AT,,0,34J:"SLIDER": 1:::E================? I037:""I)"CAT"37I)"DOG":X040::Y1: Z,&YY1: YYP X(I)P: 60>(QPY: (Q)Q 30^2PQ:X(I)Y:II1:YY1: 30< I 110:S0: J1 I:XX(J): X;: 90::SXSFS0:XZ: 90: SSX : Z "IS A SMITH NUMBER";PZZ1:: 20ZY(X10):SS((X10Y.05) OOPS IN ED LERT IN SHELL 128 IN SHELL DEMO INNO NEWS IN  EWS IN ENTERFOLD IN CHAINMAIL INBOOTERSGLANKSPEED SG64 UG EP ɠ SG128 BUG REP II SGRYSTALLUSSGCRYSTALLUS.ML SGOOPSSGHOOPS.MLCHAINMAIL&SGINARY TO ӠSGPS TO GEOS.MLSG----------------SGRUPERT REPORTSG----------------SGBENCHMARKSSG---------------- ----------------SGTIPS AHOY!SG----------------SGORDERLINE (64)SGBORDERLINE (128)SGTHE GREAT ESCAPESG URTAIN FFECTSG LIST  Z198,0'dI0I1:"DDLOGO",8,14i53280,2Gn55,0:56,92:Ux53265,59d53272,120|56576,(56576)25425055,0:56,16053265,2753272,2156576,(56576)1"";:53280,6:53281,0:(14); "OADING  276,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) |  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,,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,\''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''0pp p 0p p p`  INARY IN BENCHMARK IN SHORT SORT IN EAL IN EW AME IN SLIDER INLIDER INMITH IN HECK IN LANK IN UG EP IN BUG REP IN''aaaaaaaaaaa''''''''''''''''''aaaaaaaaaaaaaaa''''''''''''''''''aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabcefQSWX ~ ?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 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,13516,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?>< ` p``pppp p`a!!!!!!!!!!aaaaaaaaaaaaaaaaaaaaaaaaaaa''''''''''''''''''aaaaaaaaaaaaaaaaaa''''''''''''''''ORDERLINE INBORDERLINE INESCAPE INURTAIN INLIST INXPLODED INRIG IN OTCHER INaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa666666666'''''''''''''''''''''6666666666666666666'''''''''''''''''''''6666666666   >> ?~ > ```8``|8a`????????8I#qXHHςpHHp!! H PHE8@8??HI  | !! '%   ???????{3????????xxxxxxxχ????qa'$$$'  ? ``??????8xx"6*"""HIHHH1""????????8,$$, qIIqQ$$D0$y? !!!ఘ```!! ?aaa```aa`8????????0IIx Xq00!!$$bbHHO <FEDpp : C!!! 8!!C? <@@@@,$LD|cL@|x????????@|>|>><||??????xxx?IIIIIy$$$ " "000qb  $44,,DDGDyAAqA??_ 0ఘఘ`aa`aaa̘```8-128 SOLUTION TO THE AY '87 OMM- ODARE REQUIRING THE PROGRAMMER TO SLIDE TWO WORDS THROUGH EACH OTHER ON ONE SCREEN LINE - ONE COMING FROM THE RIGHT THE OTHER THE LEFT. . ZE. &-64 VERSION OF WORD SLIDER. - - - - DARE REQUIRING THE PROGRAMMER TO SLIDE TWO WORDS THROUGH EACH OTHER ON ONE SCREEN LINE - ONE COMING FROM THE RIGHT THE OTHER THE LEFT. . ZE. OLUTION TO THE AY '87 OMMODARE REQUIRING A ROUTINE THAT WILL FIND THE PRIME FACTORS OF A NUMBER - THE SUM OF THE DIGITS OF THE NUMBER - AND THE DIGITS OF THE PRIME FACTORS. .  eg DD((DDDD x?xxx???xxxx?xxxxxx?x?x?xx?xxఘ333? ``ROM IPS HOY! - ORDERLINE 64 ADDS COLORFUL STRIPES TO YOUR SCREEN BORDER. HE STRIPES MOVE CONTINUOUSLY DOWNWARD UNTIL YOU PRESS A KEY. AND THE DIGITS OF THE PRIME FACTORS. . ROM IPS HOY! - BORDERLINE 128 ADDS COLORFUL STRIPES TO YOUR SCREEN BORDER. HE STRIPES MOVE CONTINUOUSLY DOWNWARD UNTIL YOU PRESS A KEY. ND THE DIGITS OF THE PRIME FACTORS. . kROM IPS HOY! - THE GREAT ESCAPE DEMONSTRATES THE PROGRAMMING CAPABILITIES OF THE -128'S APE KEY. - Y DOWNWARD UNTIL YOU PRESS A KEY. ND THE DIGITS OF THE PRIME FACTORS. . eROM IPS HOY! - URTAIN FFECT CLEARS THE -64'S SCREEN MUCH LIKE AN OPENING SET OF CURTAINS. - - EY. - Y DOWNWARD UNTIL YOU PRESS A KEY. ND THE DIGITS OF THE PRIME FACTORS. . ROM IPS HOY! - LIST ALLOWS YOU TO LIST ANOTHER PROGRAM DIRECTLY TO THE SCREEN WITHOUT HAVING TO SAVE YOUR CURRENT PROGRAM AND LOAD THE PROGRAM YOU WISH TO VIEW. E FACTORS. . DĎb@???~~33 ``  Ƈ0?x?xxxx?xxxxxxxK  Ƈ0?x?xxxx?xxxxxxx