(@@~w#~w~/W#~вw@N 'N @@@@N 'N @@@@N 'N @@@@N ' OUTLET <CONTENTS =Tana ]Uucheckout vcod .editorialLexo letters1 qlookaheadlookout outboard ?outclass /@[run \dwre eAmbleside INDEX MarkethallSelf yaut cat 6Bcha CFminichars4Gcsca dpsstvinfo qsup tim top OUTLET 5&5 "9930" N=" "̯"4"ͧ*:.02{# =,N:N:"(":X$:"9986":"23658",O8:I:I:٧+:O:O,O;"THESPCRUD R I V E MAGAZINE 1989ISSUECHEZRONNo.017S/WAREJAN89"  "EDITORIAL....A SCANDUMP.....MOUTLETTERS...B CAT-KIT......NCODESHIFTER..C CHAOS!.......OOUTBOARD.....D TOP....PLOOKOUT!.....E TIME4ACTION..QEXOCAT.......F AUTOCHRSPLUS.RCHECKOUT.....G SUPA-QUIT....SANAGRAMMER...H INDEX..TWRECKED 2....I minichars4...UOUTCLASS.....J run..........VLOOKAHEAD....K RESET(0).WSSTV INFO....L Ed.:R&B.Cavers__" "editorial","letters1 ","cod","outboard ","lookout ","exo","checkout ","ana","wre","outclass ","lookahead","sstvinfo ","sca","cat","cha","top","tim","aut","sup","OUTDEX","minichars4","run","0",ç,,"8","23608",ç,"3E3","23728","65368" ("HAPPY NEW YEAR!! "," SELECT ANY OF THE ABOVE ITEMS BY PRESSING THE BLACK KEYLETTER. PLEASE KEEP YOUR OUTLET DISK IN DRIVE 1... " <\"9997":#O;O,O;O;"":"4500":L>"3E3""90" F="65490",I:"65491","4":"A":ïG:þ"23560"X$:G P*K$=¾"23560":K$<"A"K$>(H+"@")"F" ZKK$-"8"-("12"K$>"L"),"14"+("16"K$>"L");I;I;O;ڧ+;(K$"L");" " kK$="T"װ".05",*:װ".1","20":M$="PUT YOUR LATEST COPY OF 'OUTDEX' IN DRIVE 1 (OR LOAD ISSUE 12 FOR THE ORIGINAL) THEN LOAD NEW DATA FROM THIS ISSUE":"4E3" lK$="U"װ".05",*:װ".1","20":X$=" Loads into Tasword... read the Editorial for details... Press any key.... ":"65490",O:"65491",2:G:* xfװ".05",*:װ".1","20":X$=" ONE MOMENT PLEASE...":"65491",O:G:NIF,K$-"@":NIF=HO TC$(K$-"@",*)"""23606",O:"23607","<":G-I:"9988":*"M";I;C$(K$-"@") ,5"9990":"34567":"9988":*"M";I;C$(K$-"@") %OB=(K$="D"):"9986":OBO:O:٧+ 6O::C$(K$-"@",̰"5")="check"ڰ"7":"34591",""  O::PG=I 8OB;:"23692",O:"21",O'""+(" O U T B O A R D January, 1989 "ƺ((PG+I+I)/3)=(PG+I+I)/3)+"" :/OP=PG:װ".05",O8:PG:"34568":OB"3582" =D$=(PGƱPG="2")+("0"+PGƱPG=I):#O;O,O;"FORWARD BACK";O,"19";"CONTENTS NEXT INTRO PRINT PAGE:THIS ALL SET";O,O;("LASTPAGE"PG="34818"):#O;O,"13";("4"ƾ"23624"ɯ" ");" ";ٰ"9";I;D$;(+ƾ"23624"ɯ"0");" ":PG=IAT=("15",O):AT-(AT/O8)*O8:"21",O;I;I;"Press 2 digits or use keys below" BpO:K$=:K$"0"K$"9"D$=K$:#O;O,"15";D$;I;"+":O:K$=:K$"0"K$"9"#O;O,"16";K$:D$=D$+K$:PG=D$ GPG=IOB"21",O,, LPG=PG+(K$="F"ůK$="13")-(K$="B"):PGPG>"34818";:#O;I,"9";I;("NO SUCH PAGE"OPɾ"34818");(" LAST PAGE!"OP="34818"):װ".1",O:װ".5",-I:PG=OP jOPPG"1080" t K$="C"* K$="I""1030" 3K$="T"PR="I"PR="O"ӧ;"T":"1700":''''':ԧ 2K$="T"PR="K""1415":"1700":''''':"1420" )K$="T"PR="D"PR="L""1700":''''' 5K$="A"PR="I"PR="O"ӧ;"T":"1600":ԧ:"1030" 4K$="A"PR="K""1415":"1600":"1420":"1030" +K$="A"PR="D"PR="L""1600":"1030" *K$="T"PR="Z":PG:"34568"::''''' K$="A"PR="Z""1600" Z(K$="T"K$="A")PR;:#O;I,"4";I;"PLEASE SET PRINTER FIRST!":װ".1",O:I,-I:K$="S" ]K$="N"NIF,NIF+I:K$=(NIF+"@"):#O;O,"28";"NEXT":G,"":"n" K$="S""1800" "1085"-("5"K$="T")  "B";BR #:ӧ;"B":"1410":ԧ: L"@lQ7"::III T@6,I:"1410": x:0 "@lQ7": :0  :1  @"23692","":F=PG̾"34818"::F:"34568":#O;O,"15";I;F;I,O;I;"HOLD 'Q'QUIT AFTER THIS PAGE";O::"1700"+(PR="Z"):'("--------------------------------"OB)::"23560"ɯ"Q"F J ''''': 9(10 PR="D");:"34761":(10 PR="D");: : /I;"4",O8;"":M=OI:"1800":F="5"̰"17"2:A$:F,8;1;" ";1;A$(1);0;(PR=A$);A$(2);0;" ";F+1,8;" ":F:F,8;"":;:"21",O;"";#O;I,O;I;I;" Select by Initial letter. " .M:K$=(M)+(K$M):PR=(K$(K$="I"K$="O"K$="K"K$="Z"K$="D"K$="L")):M:װ".1",I:װ".3",*:"65203",PR:"1432"-(""K$="I")-(""K$="O")-(" "K$="K")-("D"K$="D")-("L"K$="L"):"INTERFACE 1","OPUS I'FACE","KEMPSTON E ","ZX PRINTER ","LPRINT III ","DISCIPLE ","BAUD ("+BR+")" :K$"B""1080" l2I;I;"BAUD RATE REQUIRED? ";BR:K$="S":"1800" m#O;I,O;(M$="L");"   ":X$=" "+M$(̧*)+"":"9994":"9997":"65490",I:"65491",O:G:X$=M$("11")+". PRESS ANY KEY OR A TO ABORT... "+M$(̧*):"65491","4":G:J$=:"9990"::"34567":"9988":װ".02","2":"9997":"65490",I:"65491",O:X$=" ":G:"4500":J$="A"  "120" W#O;I,O;O;"           ": "B,C,S:2*X,B:X,C:X,S: M=I16:B:Z,B:M: DN=IO8:B:Y,B:N:X,14:X,19:X,7:25: 4B,C,S,E,F:2*X,B:Z,C:Y+Z,S:Z,E:Y+Z,F: N=I12 :B:Z,B:N: 0X,19:N=I12 :B:Z,B-12 :N: :B,C,S:2*X,B+5:X,C+5:X,S+5: 12 ,16,19,11 ,12 ,14,12 ,21,19,24,9 ,11 ,12 ,14,16,17,19,21,19,17,16,14,12 ,11 ,9 ,7,9 ,11 ,12 ,14,16,17,19,17,16,14,12 ,11 ,9 ,7,5,7,9 ,11 ,12 ,14,16,17,16,14,12 ,11 ,9 ,7,5,4,5,7,9 ,11 ,12 ,14,16,14,12 ,11 ,9 ,7,5,4,2,4,5,7,9 ,11 ,13 ,14,9 ,11 ,13 ,14,16,17,19 21,23,24,23,21,19,17,16,17,19,21,19,17,16,14,12 ,11 ,19,16,12 ,14,19,16,12 26,23,19,21,23,21,19,21,19,21,19,18,18,26,-1,2,7,11 ,26,23,19,16,0,4,7,12 ,16,19,16,24,-3,0,6,9 ,24,21,18,14,-1,2,6,11 ,14,18,14,23,-5,-1,4,7,23,19,16,12 ,-3,0,4,9 ,12 ,16,12 ,21,-6,-3,2,6,21,18,14,11 ,-5,-1,2,7,19,14,11 ,9 ,11 ,12 ,15,16 m19,14,19,23,26,23,19,23,24,21,18,21 19,14,19,22,26,22,19,22,24,21,18,21,7,-17,-15,-14,-12 ,-10 ,-8,-6,-5,19,22,21,19,17,16,14,13 ,-15,-13 ,-11 ,-10 ,-8,-6,-4,-3,25,28,26,25,22,21,19 -7,2,4,5,7,9 ,11 ,13 ,14,2,5,4,2,0,-1,-3,-4,11 ,12 ,14,16,18,20,21,23,-4,-1,-3,-4,-7,-8,-10 ,-12 ,21,28,26,24,23,21,19,17,2,9 ,7,3,4,2,0,-1,19,26,24,23,21,19,17,16,0,7,5,4,2,0,-1,-3,17,24,23,21,19,17,16,14,-1,5,4,2,0,-1,-3,-4,16,23,21,20,17,16,14,12 ,-3,0,-1,-3,-5,-7,-8,-10 ,10 ,14,12 ,10 ,9 ,7,5,4,5,7,9 ,10 ,12 ,14,16  .14,13 ,14,13 ,14 14,2,4,5,7,9 ,11 ,13 ,14,9 ,11 ,13 ,14,16,17,19 21,23,24,26,28,26,24,23,21,19,17,16,14,12 (L"62933":"5e3":X=1/2:Y=X/2:Z=X/4:A=X/8:5E3:B,C,S,E:X+Y,B:Z,C:Z,S:X,E:T5:5E3:X,19:N=I3:A,19:A,17:N:A,16:A,17:X,16:T5:N=Ḭ"5":B:Y,B:M=I14:B:Z,B:M:N:5010:5020:N=I2:M=114 2Z,(N=1):Z,2:M:N:N=I2:5090:B,C,S,E,F,W,U,Q,J,K,V,M,P:Y,B:Y,C:X+Y,S:Z,E:Z,F:Y,W:Y,U:A,Q:A,J:A,K:A+Z,V:Z,M:X,P:"2":N:N=I4:5010:N:5030:Z,20:X+Z,21:A,23:A,21:A,20:A,21:Y,24:Y,21:Y,24:Y,21:Y,23:Y,19:2*X,26:Z,24:Z,23:Z,21:Z,19:N=I15:A,23:A,21:N:Z,19:Z,21:X,19 <5040:5100:5050:X,7:X,23:X,19:T5:X,7:5040:5110:5050:N=I2:5010:N:X,17:5110:N=I12 :B:Z,B-5:N:X,14:5110:N=I12 :B:Z,B-17:N:5120:N=I7:5010:N:5070:5060:B,C,S,E:X+Y,B+5:Z,C+5:Z,S+5:X,E+5:T5 F5060:X,24:N=I3:A,24:A,22:N:A,21:A,22:X,21:T5:N=I4:B:Y,B+5:M=I14:B:Z,B+5:M:N:2*X,21:T5:X,"21":2*X,19:T5:X,"19":2*X,17:T5:X,"17":2*X,16:T5:X,"16":5140:5010:5080:5E3:5020:N=I2:M=I4 PZ,6-(N=2):Z,7:M:N:N=I2:5090:B,C,S,E,F,W,U,Q,J,K,V,M,P:Y,B-7:Y,C-7:X+Y,S-7:Z,E-7:Z,F-7:Y,W-7:Y,U-7:A,Q-7:A,J-7:A,K-7:A+Z,V-7:Z,M-7:X,P-7:"2":N:N=I2:M=I16:B:Z,B-7:M:N:N=I2:M=I16:B:Z,B+5:M:N:5130 :5030:2*X,21:Z,20:Y+Z,21:Z,20:Y+Z,21:Y,19:5150 ZN=I14:B:Z,B:N:N=I15:A,16:A,14:N:Z,12 :Z,14:X,12 :5100:N=I12 :B:Z,B-7:N:X,12 :5100:N=I12 :B:Z,B-14:N:X,0:X,16:X,12 :"2":"62958": &W"9930":"9994":"23606",O:"23607","":"65203",O:"65201","&":"65202","" &^NIF="ER""9986":#O;I,"9";"HOLDDOWN ANY KEY":"5160" &þNIFžNIF>H* &(K$=(NIF+"@"):"23658","8":"300" &UH="23":T5="20":BR="9600":C$(H,*)::N=H:C$(N):N:O,I,O8,NIF,PR,L,D,G: &"m";;"CONTENTS" &*"m";;"CONTENTS"ʰ"9900": '"23637+256*23638+5": '!U\N#FJX!X>R + ?????~`}ccCg{ccc 'Y"23637+256*23638-0058"::*v\:f\<0&K=\ 2B\ 2C\ 2D\"\6>+!s=\v!5J 'a"23637+256*23638-0041"::der 5e4  !JPP!n!o#nѧR ' "64E3":"23637+256*23638-148"::AUTOCHARS +!*v\%"6\!?~/wy [v\!P > ^#= 0R6-U^ kk6Y2\͛#N#F4>>>>#>>>~:\ x *K\>Xn #^#V#v #~(~( :\ x !O > + BBBBB< c"|f``` `x``f<ckk6c678@ n"9E3":I:I:O5:O::O9;"ANAGRAM SOLVER":O9;"______________":"This program displays or prints all combinations of a givengroup of letters. If some letterpositions are known it can also cope with that.For a recognisable word, theexact combination is not always needed.Thus it is possible torealise the word by seeing asimilar combination of letters" 2FQ=:"How many letters in the word?[ q to quit ] ",N:N=Q"8E3" 7 NɺNN" ""830":"2" RM-NTT=TA:TA=O:TT33!ZX#P;L$ K=J B$(Q(K))=A$(Q(K)) Q(K)=Q(K)+1 Q(K)L460  K=K-1 K1670 J  P=O3L$;L$ d;:#(O3P=O3);"That's all the possible anagrams printed. ";#O;"PRESS ANY KEY...":P=O3L$;L$  I:I:O: >7װ".4",O:װ".5",-T:'I;"ERROR! Please re-enter"'': \I"Output to Printer? (Y/N) ";P$:P$="Y"P$="y""9800":U$="Q""860" bHL$="":P=O2+(P$="Y"P$="y"):RM=" ":P=O3ZXRM="@":L$=°"13"+I0 p +K$="--------------------------------"(N) "The program can make anagrams ofless than the whole number ofletters(e.g.'OUT' and 'LET' fromTLOTUE)What number of letters doyou want to start at (just pressENTER if you only want anagrams formed from ALL the letters). ";W$:ñW$ L&W=W$:WNWɺW"820":"1050" ~ @,"9994":"9986":"9E3":I:O2:O7:O::"  " N" Sort out your angry gran... ...with Peter Groves ":"8955" "S23560\,O:I:M=OIO:Z=Ḭ"30":٥*7;"","/",Z:þ23560\Z:M "K$=¾23560\:O " K$="R" "WK$="C"#O;I,"14";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "BK$="N"#O;I,"25";"NEXT":*"M";I;"wre" " "8905" "S#O;O,O ;"RUN PROGRAM CONTENTS NEXT ": #(w"9E3":O,I,O2,O3,O4,O5,O6,O7,O8,O9,I0,T,ZX:"23658",O8::ç,,"2",,"4","5","6","7","8","9","10","20",O &z#O;O,O;"KEMPSTON E I'FACE 1 OPUS USER ZX DISCIPLE QUIT" &|O:U$=:U$="Q" &~U$="K";:"9881": &"U$="I""BAUD RATE? ";BD:"B";BD &U$="I"U$="O";:"9887": &U$="U";:"9888": &U$="D";:"9889": &U$="Z";:ZX=I: & "9852" &"9883":"9895": &:0 & &ԧ:ӧ;"B":"9895": &O"9895": INITIALIZE USER'SI'FACE HEREALTERCODES  9895NECESSARY &@"6",I:"9895": &°"27";"@";°"27";"l";O8: &"M";;"ana" &*"M";;"ana"ʰ"8E3": &"ANAGRAMMER"ʰ"8e3": '"23637+256*23638+5": '!U\N#FJX?????????????zł|S[kV8q8S ' "64E3":"23637+256*23638-148":: AUTOCHARS PLUS !*v\%"6\!?~/wy [v\!P > ^#= 0R6-U^ kk6Yuh>oN>i4>e>a #~a> ^(\(> **< S>>*̞B< ![#R0~ 8~> > >z*T_;i1S~ Menu-driven, MICROMATE has: 1. FULL CAT giving detailed information including sectors  \ MICRODRIVE MANAGEMENT SYSTEMS,\ CHRIS CLAYTON- A rۈ ew\ o pgmwc assand\ enn t oo ot\ cd, incn ok\ aۡ ot so ofr\ ------------------------------\Reurocd}n\gatlbno or\զ ot cd -\npgmta aib\ asstm. T igat\etoeaib\o t fnpgms. ^Altuga en¦lsct-\orsys ocs}o is\sb te ll\badlin t lnthe\}es, tugi l\}pgm, oi of\pgms, l m as\o }es:\\\\1. BOOTING .....\\Esnalltty opgm\eb w}n\alad tcdt\զ icklanefently,\caang, nand\entpss\oe so insaot\r ng-nsynx. ^2. DOCTORING .....\\T pgme, ղfy\aniult tt,\icssl, wch\pt "Fi und"\r} ad.\\3. PROGRAMMING ....\\Uºewcpgmng\aneb etoefcts\ acely.A emp\ot rsty iCHEZRON'S\CATLOADER. So pgm\ng-rا caZAP fm\OUTLET wcI uni\ul, ebn of\ dn w r m-\ounna ed\܇}llf }rtd. ^S afI acimrst\cd I } acsMICRO-\DRIVE CONTROLLER bSD MICRO-\SYSTEMS. Ba}lltpĘd\}o}rtd th\cpg al}ta\tr, A,B,C etc. ebntm\ ad, d, eth\ng pss. Arst\tI unsu s\a ܇art\to ob۠ by\t M/DRIVE DOCTOR rt\tscw. SD,w\pmoul\Sct spgms, \MAILING LIST/LABEL PRINTER,d\pl mst\ n i ss.\Hor,iloen-\npg }lMICRODRIVE ^MANAGER n f 7,\CURLEW DRIVE, HYTHE at srt\o1988. Text as\ca|cng-u}rtds,\nanlp p-\oic ang.\\M/DRIVE DOCTOR bPIPEQ r\ t bak-thugh, and,\altugtpg apars\ o w, otr\pgma apanth\as. M/DRIVE DOCTOR\anitnarts\m}rtd aun100K,\pnti}e(ty\o,sraddss,-n\s, etc.) cԢ}rtds,\stal t crd\ oces, plp\˾eo t }rtd,\in´eultcrs, ^atmpt iults,\an on.I ud\ nrrlu t\t pno scen\ot ASCII nntoa\rp wcult\ain mrdpڗsr.\\T toM/DRIVE DOCTOR r\ۡo itexpt\t զ mp}cr\ety,iimpty\itl u.T wР uºty,\ ¡o t \}rtd, adrickly.In\s}tt զ itn\it enn* CAT, or\* LLIST, o*READ, o* CHAR$ or\*RESTORE an on. Foemp,\* MOVE tnsrerytnfm\o }rtd at(th\t ds). ^\M/DRIVE DOCTOR sul\ntM-DOC f SEVEN\STARS PUBLISHING, 34 SQUIRREL\RISE, MARLOW, BUCKS. w al\p t exlnQUALITAS\pnuºeTASWORD 2\anTASWORD 3. M-DOC ir\inanenulty\crs/s, incnBASIC.\I unrsniiۡ\efrt. O ewڨ "ts\ipg t\iment" carliit\pg ! Hor, fm\mexn totpgms\f SEVEN STARS antill-\ings lI a nnt\tۡ cdrl nd\irul. ^RAMDOS MICRODRIVE MANAGEMENT AND\RECOVERY SOFTWARE f ROYBOT,\45 HULLBRIDGE ROAD, RAYLEIGH,\ESSEX, nas\ M/DRIVE DOCTOR os\i fntly. Ii-\d anI nisa\tt զ fl u,\inۡ stcnaund\o}rtdanrnt\wci o t is\ed. Hor,imp-\n, aۈblcaand\ll-pndok. I am\ iii s sr\anul uiզ iI\al M/DRIVE DOCTOR\ lon. Ado as\oinsa t at\ omwР\}rtd (OUTLET r ^emp)altugt \a|c RAMDOS; ant\t scaas\o}rtd'sy' tty\l  ud, n ng\t }rtd զ ab.\Compn inro } \obio t s o}rt-\dans. RAMDOS p\mootpgmof\inst, incnMICRODRIVE\OPERATING SYSTEM.\\TRANSFORM,o24 WEST OAK,BECKEN-\HAM, KENT al pĘ SUPADRIVE\trt}rtd aut\100k, terps\anpntl }e.\\Msanp|blst\u acio iMICROMATE\f LERM o11 BEACONSFIELD ^CLOSE, WHITLEY BAY. Iit\smpn c,\nx ot l-\ieaib i ۡ ot\aʪ pgms. I ado \t }rtd }st is\ppet|cpoۡ of\t }rtd pgms, ps\"RUN", rmp ng y\psBOOT uºty, r\BASIC pgmonl(wcof\ur incc ˘\pgmtBASIC ar).\T irind-\o wcnor-\aninstcont\rtoMICROMATE al\och} inrt-\ o t cd rks\wcil oinr-\es nOUTLET bscrs. ^Me-dn, MICROMATE s:\\1. FULL CAT nid\inro incncrs\uan} t inrm-\ao u tpnr,\palno- s,\ane.\\2. TOOLKIT nong\}rtds, incrs,\n|oub,\lp e. T i wch\riinro aut\t s o}rtd is\pĘo sce iry\imps, an i\inting. I a alsong\rr "Fi und"\r I } trit\pڤrly. ^3. BACKUP 1 o2 ds,\˾es, cԢ}rtds,\-s,cckerrand\ on. Irimps\rty, alna\ci o10 fntngs\nnf aun85 104k.\(Hig}tiiby\ԫatI t\unm100 }rtdfm\M/DRIVE DOCTOR unab in\pc—).\\4. TAPER ialadpnry\ul, ai˾efm\}rtd tunr\a nt o܇}lly\tt rfon. T\tis o}st\ gani ¡\anen ! A wР }rtd\ ^} mo} \ci adn, anty\a|c innntlof\MICROMATE, un RAMDOS. I am\mnOUTLET, nrst\cunns,\tfnab }rtds\ OUTLET u , ng\ie tբy!\\5. MINITAPE 8 ˾ef \ d, pڨcd\pgms.\\Ea ou? Well, r,I \unMICROMATE i sy, th\lp on-sce pmpts. T\ndo ul off-tnat\rsiein} wt\iesna ananwis\opol. I e rpd ^al I tЧ\nconI ted. Afa\up orlsery-\tnrll.\\IMBOS f COMPANION o193\BRAMPTON ROAD, CARLISLE, CUMBRIA\iۡtntfn\t aʪ pgms. [V.2 of\IMBOS iaib fm\KOBRAHSOFT an ora\pew- Ban]Ies\ 10 cd nt\mnds, tpgm}n\ ad, d, ed, etc.\bmp mndcaRUN\"", OUT! "", * ERASE\"" (զ nsnsynx\ul e e mpr).\LIST CAT p}in\wcanpڨc(. ^unCHR$ 0) a sand\in}d.BuIMBOS icզ\t ts. Ittunr\}r3: PROGRAMMING AID,\ninrr mr\omnd asspgmm-\inpnimps und,\gpcs, ur, pnt, nt,\sclng, ռnanotr\efcts.I n' anpgmm-\in I itunrsnr\ cu r rt\ot c (ۡ owch\nd oSUPERCODE III) t\I kt efcta impss-\i }u 10 n-\sto pg ipĘd.\T ii iwcI\tn gh ab if\I } ar wiiall\aut. T ndo iwtn ^ۡo cզ kwdg-\ab t I am.Reew en\rentasanf mm-\entbsi OUTLET aut\OUTLET u¢s, IMBOS\ul 'ghut stet'\onbscrs, rps\ ۡ pf tm\enally. IMBOS acallus\Inr 1 } r tut\ds.COMPANION al pplEX-\BASIC, a exnro wch\ei Inr 1.\\So, wculI mnd? It\ndo uina eds\our.Al ot a ul\esally,I sct, ۡo\ trkw-\d, ¡ anen. Ps\n f au f-\e und(CATLOADER ien ^car) I tn ta all\oesalltЧ tt\eb  inca t }p-\ato}rtds. IM/DRIVE\DOCTOR aib iuld\sl go msr\sempty.II ulonly\ ONE ot pgmI uld\ LERM'MICROMATE.\\ - ChCyn\--------------------------------\Ni o, Chs! Y' ˪d\t t! Ian el\ul ni a arc\o anuºet (en\ialadei OUTLET)\n'! ANY rt, \aOUTLETTERS an1 OR 2 SCREEN$\} nwcI'l MERGE\i aid. - Ban.^ - ChCyn\--------------------------------\Ni o, Chs! Y' ˪d\t t! Ian el\ul ni a arc\o anuºet (en\ialadei OUTLET)\n"9E3" D  R  R  R D  R  R  R  R "D % &R ' (R ) *H - .R / 0R 1D 2D 5 6R 7 8R 9 :H = >R  D  R  D A=A+1:2E3+A: D R R  D R D  R  D R D A=A+1:3E3 +A: R  D  D  R  D  D A=A+1:1E3+A: R  D  D  R  D  D A=A+1:3E3 +A: R  'E * +D 2 3H 4E 5 6E : ;D =E B CH EE J KD NE R SH VE Z [D _E b cH E  E  E  E  E  E  E  E  E D  E  H  E R A=A+1:R E  E R E R E R E R E R %E &R 'E -R .E /R 5E 6R =E >R EE FR ME NR UE VR ]E ^R eE fR mE nR uE vR E A=A+2:2E3+A: R E  E  E  E  E  E  {A=A+1:WD=A+256*(A+1)+DIF:A=A+1:WDSTARTWD"9"BP:"6010" $N:A$"65530"BP:"6010" 0 O,O;"START ADDRESS (RAMTOP 32767) ";B$ N=I̧+:N B$=""BP:"6050" +N=I̱B$:B$(N)<"0"B$(N)>"9"BP:"6050" ,N:B$"65531"ŰB$=A$BP:"6050" ( O,O;"LENGTH OF (MAX 25K) ";L$ N=I̧+:N L$=""BP:"6072" +N=I̱L$:L$(N)<"0"L$(N)>"9"BP:"6072" #N:L$"25E3"BP:"6072" "23658","8"  DIF=B$-A$  START=B$ nEND=START+L$-I:END>"65535":'''''''''''" IS TOO LONG THADDRESS...":BP:I:O: A$Ȱ"16384"F$="":"6400" ޷:"8","7";" ";"9","7";" The code is being ";"10","7";" altered and moved ";"11","7";" - Please wait... ";"12","7";" " t"23606",O:"23607","<":A=STARTEND:15,15;END-A;" ":23692\,0:A:A:"15",O,, "8","7";" ";"9","7";" The code has now ";"10","7";" been moved and is ";"11","7";" ready to be SAVEd ";"12","7";" ":װ".1","20":װ".3"," ":F$="":"6400":"9994" 8G:#O;I,O; " COMPLETED - PRESS ANY KEY":I:O: ="23658",O: O,O;"NAME OF ";(F$);"?(C=CAT A=ABORT) ";N$  N$="A"N$="a" 2EI,O;"DRIVE No.? (0=TAPE) ";DR:(DR=O(N$="C"N$="c"))BP:"6400" \+2:PK+256*(PK+1)=6120 #2*.05|L," ":R$(8,8):9E3(#:O,I,I5,E,W,D,X,R,H,BP,SET,E$,R$(1),R$(2),R$(3),R$(4),R$(5),R$(6),R$(7),R$(8):6E3p:ç,,"15","3256","3300","3350","3400","3450","3500","9600",O,°"27","B","C","D","E","H","L","(HL)","A" %װ".4",O:װ".5",-*: &"M";;"cod" &*"M";;"cod"ʰ"7900": &"CODESHIFTR"ʰ"7900" '"23637+256*23638+5": '!U\N#FJX?????????????zł|S[kV8q8S 'Y"23637+256*23638-0058"::*v\:f\<0&K=\ 2B\ 2C\ 2D\"\6>+!s=\v!5J ' z"64E3":"23637+256*23638-71"::AUTOCHARS*v\!?~/wy *v\%"6\>jmw#wL>cw#w#>kw#>>w#>6w ?z( *v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >znZtact has an AMX mouse-enhancing program for review. We can't review it with- out the mouse but if anyone would like to volunteer please      \A VerHappNeY all!\\A զ anզ ars\ a unincanps\ pa eniis\tt n na orr\o ruery! We'\trn l t pbm. ^No tnee} only\ ansi OUTLETTERS \pa nx all\(oinsaof!)i o,\esallia nna\bn sk, etc. anyy!\Hand-wt opntrs\a it'esr-\an pnd-ery\lna A4 ܛtth\t ur'bn sk!\\WaԵ Nor Utt. We\cJoh Tayts\pgm: CHRISTMAS LIST st\nth!Sorrautt!(mr\er- am!)\\Atag- We' \|c CRALDON CREEK Part\up onth g. ^I tise,"crs4" isn't\niTasrnt\ ain Tasrd. U\LOAD... et"crs4"CODExxx\w xxi61184 Tasr2\54528 Tasr+2 an38400\Tasr3. Tnk Da\CowntЧ addsand\tnk tЧ w ly\ni t nwcs\f t w-exncZXC.\\A oranca AMX\u-ennnpg r\ew. W}n'eith-\t u ian\ul nepa\w. No t sl ait\rso f t t \ts. We' iwt\ft acalles. ^In |ck-upy\otCONTENTS BASIC t \NOT iafananxt\ at int i-\ om. Re-ait\rst.\\Now, t'wt ar\ ofr....\\\\ Ro & Ba Cars\ CHEZRON SOFTWARE\ 605, LghugRd\ Birsll,LsLE4 4NJ\ (Ps Mlx:014703943).^NTENTS BASIC t \NOT iafananxt\ at int i-\ om. Re-ait\rst.\\Now, t'wt ar\ ofr....\\\\ Ro & Ba Cars\ CHEZRON SOFTWARE\ 605, LghugRd\ BiF@Fk"9E3":O7:O7:I:O::"  EXOCAT  EXTENDED CATALOGUE"'':"9800":;:K$="Q":"8010" A#O;O,O;" PRESS DRIVE NUMBER, 18 PRESS QQUIT..." O:K$=:K$="Q" K$<"1"K$>"8"I0 ;:D=K$:԰"14":"53780":#O8;5;O2;I,O;:Z$="":#"14",D:"23766",D:"23678","14":#S;"Cartridge Title: ";z$( I0),'':z$=z$("13") lz$0))/2):K$=" "+K$:K$=K$+(".0"K$(K$-1)"."):K$=K$(K$-3):M$="00000"+(a$(O8)+256*a$(O9)):N$=M$(M$-3):L$="line: "+(N$M$"0000065535")+("None"M$="0000065535"):#H;" BASIC ";L$;" ";K$;"K";: F&#H;" Array ";(a$(O6)-" ");"()";: n,#H;" Array ";(a$(6)-"`");"$()";: F#H;" Code ";a$(O4)+256*a$(O5);",";A$(O2)+"256*A$(O3)";: ԰"14":z$=z$("12"):#S;F$: @0#:"5E4":"9E3":"9994":"9991":"9977" EeBAUD=9600%:"50002",(BAUD/"256"):"50001",BAUD-"50002"*"256":DEFAULT BAUD RATE JT"9986" :"   _  __  __ " ^"   EXOCAT gives extra catalogue   information on microdrives.It   uses the #14 to Z$ routine by   Andy Pennell. Several readers   sent the routine in to us but   we already had the book. Many   thanks anyway.     The routine is not very rapid   but provides extremely useful   information about file types,   code lengths, etc. even BASIC   sizes (rounded UP to next .5K   to show sectors used) - Brian    ":I0,"o":O;".",O:"8955" " O:K$= " K$="R" "WK$="C"#O;I,"14";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "VK$="N"#O;I,"25";"NEXT":"23608","7":*"M";I;"CONTENTS" " "8905" "R#O;O,O ;"RUN PROGRAM CONTENTS NEXT": #("9E3":O,I,O2,O3,O4,O5,O6,O7,O8,O9,I0,T,H,S,BD,F$:"23658",O8::ç,,"2",,"4","5","6","7","8","9","10","20",O8,O2,"50001+256*50002","" &z#O;O,O; "SCREEN KEMPSTON E USER ZX I'FACE 1 BAUD=";BD;" QUIT" &|O:K$=:K$="Q"K$="S" &~1K$="K""9883":"9895":"9900":S=O3:H=O3: &XK$="B""BAUD RATE? ";BD:"50002",(BD/"256"):"50001",BD-"50002"*"256":"9800" &'K$="I""B";BD:"9887":S=O3:H=O3: &1K$="U""9888":"9895":"9900":S=O3:H=O3: &K$="Z"S=O3:H=O3: & "9852" &:0 & &!ԧ:ӧ;"B":"9895":ԧ:ӧ;"T": &H: INITIALIZE USER'SI'FACE HEREALTERCODES  9895NECESSARY & °"27";"@";°"27";"l";°"18": &^"DO YOU NEED A FEED SENDING THE END OF EACH LINE?[Y/N] ";Y$:Y$="Y"Y$="y"F$=I0+I3 & &P#:"23637+256*23638-1322": :!J*S\+ U !8!"&\LH(( 7777:/Y >X2/񇇇W:+=21X *>2/!-8 W!.F!)>2)20@O >Y2/ >X2/:02) >2.>2,>*2-*D"J 2.>2,>32-*F"J >2.>2,>@2-*H"J > >2+=21>20>2* ':*(!+8>21>20>>2* [Jo&)))"2>2*K0:+=ͬ"24"5*5#:4[. *2~#"2o:4(G&=:B[5:4( :00|*5$"5:0!,8>2*:1!+8>21>!.20:1v !Z:\wZ>21|Xg:\w*@@@@@@PPPPPPP p`` @@``@X @ @@@@@@ @ @p p @  @@`А` ` p` @` ` ```0 @@@````p` @ @@ @ @` @@pp`𐐐pppp𐐐p px`𐐐𰰐```аpࠐ``` p``````  @`@@@@@@`@@ ` ` p pP@@@pppppp`p0P@@@@`p@@@@@ @@@@@@ 𐐐```pp``@@@@@ p````p @`@@@@`@@@@@@@@`  `HpȨp &"M";;"exo" &*"M";;"exo"ʰ"8E3": &"EXOCAT"ʰ"8e3": '"23637+256*23638-0186"::UDGS  !JXX????????????? '"23637+256*23638-0231"::tru53780  !J*S\+ U!; s#r#  #KO\B"2\Z(( *K\~Z( p͸#N#F R#p+q:\'!B2\! "\*{\"\:\!\_"F( !,!s#r~CO ' "64E3":"23637+256*23638-148":: AUTOCHARS PLUS !*v\%"6\!?~/wy [v\!P > ^#= 0R6-U^ kk6YG^>?GV*[\ :\ (% >2\BDM[Y\R8C[\}> 2\> 2\ T]*a\++R8S[\}> 2\ ' "64E3":"23637+256*23638-148":: AUTOCHARS PLUS !*v\%"6\!?~/wy [v\!P > ^#= 0R6-U^ kk6Y 2\> 2\ T]*a\++R8S[\}> 2\ ' "64E3":"23637+256*23638-148":: AUTOCHARS PLUS !*v\%"6\!?~/wy [v\!P > ^#= ?F*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *J< S>>*̞B< ![#R0~ 8~> > >z*tɋōdCJ D~=Ǡ*ԧI-i޶QԹFǼz˾(gv................................\\Jaary, 1989 Pa Reply\\ Ho w us...02 -\ Gor Rorts.......03 04\ K.A. Scml........05 07\ TeWiln...........08 11\ PercEls..........13 14\ AndCpm.......17 17\ ChCyn........18 22\ Mi H...........24 27\ PeBucn.........28 33\ Joh McCa........34 36\ Mall Gdn......38 42 ^ HOW TO WRITE TO OUTLET\ ----------------------\Letra acp i alst\anr b}o i r\OUTLETTERS: BASIC PRINT o DATA\snts, ndwt otyd\s, mp JOTTER pgm\ipĘi Is2(O#4);\ilsPs No.\014703943 t esus\ ea Tasr2 th\t ght-nr a32.\\Pa s it sul \rtout t\sbs alyu\sco anyy. Letrs\al e  cty\anngth... Pa as i u\lˡ c rsnn\f otOUTLET aran\l bsul addss. ^Fm: Gor Rorts, Cumba\\Hel antn ry\enғb Ȣ. Hel my\laro. Joh Luby\s t b t t\pgmta al o t\}rtd }u y\"Geunrt!" anI\ ̢ stt.\\I a 50 yolau(VERY!)\[~ I pgmr?] "sr\aut" o myard. Set-uis\+2, m/d's, I LTR1 pnr\(Ke E i/f). I } saut\uro enanace\abltnaal th\t gaso, I \enmylf. MŚ ys\imw! ^Tit rs¡ I' er\wt anmȢ\aasI tn ii- t old\re cod,\anI uls y\tiit fendl of\OUTLET wcl \t u . AUTOCHARS?\- Terc! It'al rc!\ B w.\ Gor Rorts.\\P.S. Itt Demr\ist "Compntot\a all". If, aI sct\ighl , ii\ano tn\"Bec.o.t.s.t.a."\\Tnks, Gor anw.t.h.d.t.m.\ u! - Ban ^Fm: K.A. Scml, Notngm\\Gentn,\\Cl ۡ adė on\CHARCOL anSKETCH ampnr\HR5 a ܇ed.\\I a e lԫoOUTCLASS\c ˘ sns. T rst\instco ta asmbr\ansx-aain\t 5 oko m/o mok-\slf. Al 5 okf զ\zzt I Φ rk-\inthugtm. Now, tnk\OUTLET I acallsrd\inۡtnmylinsad\ospnmrand\ unrsnۡ ot\ff i t oks. Pa ep ^iamp aa ing\ t olεe}n\eup. W ot\60 r (64) t olgtr\em sw t.\\Witssal ou\aOUTLET!\\ K. Scml ^To: K. Scm f Ban\\Rearcswtent\nacª bin\thy nt sng\w pڗs (OUTCLASS acs\t rtotm/˘ sns\}n't!).\\SduHR5 a nif\t eansn} \cnd.I o a5050\ au6500 i CHARCOL. Iis\l mnd. Y ghtry\nt CHR$10 i 5300,5400\an5600. Y ghal adst\t stci t HR5 (e\al).SKETCH m/˘ gh\mp.Iul s\-w. Ca an el adħ\o t HR5? - Ban ^F DE.J.Wiln\\DRo anBan\\Asafin̮n\o OUTLETI pcup\fenu da\ anallsmigr-\an an cI \enҭuefrtnt\sar. I a unJOTTER t\ultu Tasr3. Do\acpch?\\I  PhD, aas\mra nrI a o\otЧ 'tces' noin\trntly!\\I Sct +2 tc-\danBtM1109 ^pnr. A up oara I\rcSfsanth\tiE \tnsomacd\rpڗsn~ i Tasrd\3 on sc. I a g \Sixrt en ty\ t.\\RentlI n pnt\t antc\˘, i ace\anytnbslng\t ua |u entrof\1200 anI Inr 1. It\sn'un I ught rly\eonoOUTLET tI al-\iisb pnt\t tuflty.\Sin t I scot\iseoOUTLET anntt ^n no un2\}rtdt pnnet\a.\\Nonaanmpint\f an el I asd\imt-up, Ыn\t rs4 }rtdr OK,\pa, pa wiwng.\Wa I inwng?\\Furtrզ, o sest\-- } pplOUTLET on\SWIFTDISC(MF/2DD)?\\Kut ork. May I\l w ain!!\\ TED ^To: TeWil f Ban\\Y' uartwcs\e i OUTLET al a- it\afctcisf 5 16!\Ia tisn'en\un˪Φ I } only\iw t ctI\u |u 9600 wcit\ul|u.Trct\pb BREAK in CONTENTS and\enGO SUB 9994 (tens\tAUTOCHARS CHUNKY CHARS\ioª - t ts\xunda~b w eng).\Mo 1290 1291 bung\LIST 1290, EDIT, al1290 \1291 anENTER. T en1290\ 1290.U RUN 9980\ -SAVE. Ba Gafn a\ilt ote twt ^s e t pbm!\I dn'tiat ¡.\SorrBan!\\Yes, u Tasr3 bal ans\pa t ght-nd\r a32. Ial lpif\in} wno\isb, e.g. scbb Ta3\ ۡw! (EacntRon\anI pa"Gswnd\o THIS o is!"\\Sorr- }n'pplOUTLET\o SWIFTDISK apnt. I sh\ uld!\ - Ban ^F PercEls, STROUD\\I ll- pnr:\SHINWA CP 80 TYPE 1\\I u Tas Inr ft.\\I Sct 48K mr.\\I a ub pnanot\inro  ct- I'm\at snբo w\inr - ano- t\iidn unt nd.\\Angsons? Wli\ inr? I, a\ib o anspa.\\Tnkal t ows. ^To: PercElf Ban\\Y ett oBASIC\pgmnkwd pad\uTas inr al. If\ampl Ke Hunr\i snth'OUTLETTERu\l wce \ald. Y t ext\pb oant ˘. Y\ulsaitct\mnt t pgm\ai anpnt-t. Alrly\ulii REM ung\REMSTORE f is6. Hor,\  t addsof\t ˘ oitngth. I tnk\i aun64000 wch\ulcstAUTOCHARS wch\ii spgms. Y } t\untbenng:- ^9994 RETURN\ ... oalnt\64000 i 9994 atr\addss.\\Manpgmrant a\al rtomp}on,\unsa ath\pgmn(anI n'tnk\ul asni)\I } onlgsan\inr prbOUTLET.\Y appa } onlpp-\ort m inrand\Epn-mb pnrot\en¦ isul l of\pnu¢s!\\It'tupnit\RS232 at ulu ur\Inr 1. AiiI uld ^mnt Kemps E\a`37.95 f MICROSNIPS, 37\SeRd,Waly,Mery\L45 4QN. Exn ght\cc csead c up\o nd-nd.\\Sorry,t' sansr\I' afid!\ - Ban ^F AndCpm, Notngm\\DBa & Ron,\\I sl n'k alr\t gpcnt ccrs\i Tasr2 [Tiu\tt BtM1009 pnr]\\ AndCpm\\I oao ot anty\n'NEED alnat M1009\iirlepn-mb. If\WANT alt t u\'g' at i , ent\CODE mt gp(NOT\t gpitlf) t ch\˘ lԫbENTER, lly\enno sENTER.Tt\gpci t xst\u SHIFT 9. - Ban ^Fm: ChCyn, CARLISLE\\\\DRon/Ban,\\Li Joh LubI ught ECHO\yarf Om~ ( \ mcld aChsts) and\patit. I uld\lˡ adė o \tnst ft c-\d ananadė o itu.\I rI rpI\ultt und\thugm}st rr(why\its?) anat it\ounlˡ zf mTV\saI ul a\ib amper/ads, t\ iw o r. ^ECHO p a ampe\ tt yar(wcs\ollt BBC I unr-\snd). Dan kits\isl aib?\\Sotnel I elth\iTHE ARTIST II 128. Sa\itant pТ\}ll pan-\sn f SOFTECHNICS. I ed\lt-\\1. Ho tnst pgm\ cd.\\2. Ho pnInr I.\I } ۡtnbinrng\t ua rt/on# mnds\i t BASIC t mit\i gh(eds?). ^3. Wht SPRITE GENERATOR ll\r aal tcds\(iipا). I tnk\ARTIST II ii tr\t ART STUDIO t ndok\(an|cp?) iVERY inor.\\I iPHANTOM BB tn\unI ulo ain.\VERY fstng! I sl ed\ltmVOYAGER 7 ՘ and\NEWTERM mmft it\ian t w im-\iattm.\\I FLEXIPAGE 200. Iiry\oineanul ry\u i scolwcsll\ SPECTRUMS i u. Yes,iis\tզ fl o\arst ittems ^ tn  e lpl\i rnpbmanon\t noit, it\ˡi stightrrd\anic u (e ).\\Filly, ngono t\ninatoOUTLET. I\ Ф ro eexnd\airs. Pgm\ROTATOR, esalltt\ղ}o a exlnt\anI al t |nkof\ccts, altugI\aladSigft's. A |nk\ogpcs/UDGiwI am\onw.\\ - CHRIS CLAYTON. ^TChCy f Ban\\I onl t 48K ro of\ArsII.Y n'wt\pb is. I}st ndng\if c ˘ il \rfl alif\iSAVEanLOADf BASIC as\t 48K ro et u\salt BASIC synx. U\OLIVER'READER f OUTLET 14\ at aroArsII\o itow }st t u\kt BASIC sr, ˘\ngthetc. Iifl\ զ ltung\t ft. Haan el\tnsrts?\\I unmylub g\o Pn BB. I snt ^oբo ng-sn pТ\}llΦ nup!\\WhtrJoh Luby'FONT-GEN\i t Chstise. Is\gnUDGsy. Y uld\al iOUTLET pgmwch\ s˦otm!\\ - Ban ^F Mi H.\\DRo & Ban..\\RnKel McW'tr\pmpt gs ght\ i uctt Mic-\'Scr' dw em\l 'UP' o t +3. T nct\gh Ba Gaff.\\Tal pmpt gst\tOUTLET ghpĘ r-\ė lu i n-\cto atctly\tbpТ, mbx. otr.\Joh Niclls' to Tas.2 &\Ban'plnd tI\ e an w on\tbct. I unTa2\ropg. }u t ^onliia aa rd\pڗsr, t ctt\˘ u¢a }lf a\|pg. ie\ղf io'ow u. As\empI srt\BASIC tuansi l-\ies, a alo r\i oext ˘. T\u¢I adl }rry\rtnot-\ns, ca r40\cr/ Ps mb\actlin mrl\x, rOUTLET x\64 cr/ pnng; \pnxpo s2 i 2\64 cr. mns, anu¢\ alt po of\(cal.ms.) \pl(ia OU ^inx). T a notr\ses.Iul inr-\esn knars\oOUTLET t pg. Ia\odlpro igh\Ԥa'OUR SPECIAL'.\Comnto tangsons\otimpڪntul\oinst.... Ba uld\pا u inrpt\ot w u¢? I\ ̢ ioarch-\inth 2 ˘  t\unis } nt\u¢s. Li omrc-\ ˘ iir|dlorn-\id.Foemp awaddss\it PC atաnin\¡?... I a ci uof\t esoni ia. Iuld\ esallinsn\ ^ a alyot eipmnt\ubaral at\i uºtpgs. aib \t ansbltisal\insts.\ Mi H.\I' ppOUTLET ud\ac cn-\ctotSct urs,\Mi- i ct, ialadHAS \ۡ exnt.An sntir\addss, pТ ombmr\ bsi a OUTLETTER\ss ti ctr.\\Re: uninrpt et\Tasr2 xer,mu¢\(}lSAVESOON - xise!)\ecc t o of\t PC unt¡ antn\rnt u SAVE t xt!\ - Ban ^Fm: PeBucn\\\DR & B,\\Mantnknnmrst\iseo"OUTLET" mp th\t Sampr. I' simpsd\tt wР tng-t aty\ot pnon, exlnt\gpcs, ns}llst\ann obctr.\\ C * O * N * G * R * A * T * S\\Iul insniu\ulubscr\ni [ilof] tir\u uºe t\} al f kng\wt'aib. ^I o u:- Be Bac, MDOC\anTnExpss. Al tha\allpښsollpd\and, i moon,insnb\ an w cnin\otr'pgs!!\\Atia!- Y gh \gs tЧ w tir\tropgs. bsin\"OUTLET" ttinc tir\'pТ mr tan\insi in ult\i ucickly.\\\Fillgh bl-\ist lnpaut\Sct tЧ w sty\tngpnf ¡ \¡! ^T Sct on\unaty. O.K. tt's\t"twys\r" i trlaniis\afal rcamr\wies.\\Numo a in- ny\ectڼės- CONNECTIONS!\T ثpg/ciof\t sults. I \cnt arnnby\nsr(4 in.) ngtof\fstighon t ard.\[t 9V pNOT t inثr\pg! - BC]\\\T"il" n-rb\pnc iana\tcncˡufm ^t ثpply. I ury\casapg/ct\snst `1 anit's\e 100% ab up\oars.\\(O ulour Ŧ ct\ t ثpply, I'\unstighf t\cof toux-\pib pngs!!)\\\T b }bte I/F 1\ant mdal }u\ss. Ta sn\eug snnnauon\|s. Ansr?? Gea\ngtocparau12\incnan Ř tn\obi pploub-d ^sck. Ca ut l-\ncrtughlth\a in banغsth\usw ne. Ma t\nconant sc t\wР asmbl t arth\t . Rel- aty\ u' Φ.\\Neb }ba aib\f aaso pper, and\iiŧ o if\u' pbmtds\"nnay"f ¡ ¡.\\\So, Ф tt'oۡ u \ۡo - n'r tat\t }rtdVERY }ll-\tl o w if\tapڤrlI nd. ^Ian ntcaut\Sct pbm ng\o 0703-253532 (PeBuc is\t ) altugmexen\iTHAT exn!\\Al t sChstRo &\Ba and\\ KEEP UP THE GOOD WORK!!\\ Kinrds,\\ Per.\\Tnks,Per! HappNeYr!\Rernurs' uºe- u\sulenChCyn's\Ř-nno acd\ft i CHECKOUT tnth.\ - Ro & Ban.^F Joh McCa, Pנ,Dort\\DRon,\\I a ntub to of\mMicds. Il acpt\mnds, i.e. CAT ant r\l n...ann...ann,\tue t BREAK s-\abnit.T onlospp-\int i t\mant en'STOP'.\\I teal t mp\cckcarty/o nn-\econand, aI iof\Micds, I tn tInr-\ 1 s rnrctly\at otd rkO.K.\\A t anrd ccks ^tI } o any\iwt pb ul?\I n'ngnaund\in t d. I ulry\cappa anltt\ul ,\ BesRerds,\\ Joh McCa\ ^TJoh McCa f Ban\\1. Disnct od and\-st |o.\\2. Re-cc t b }b(e\stf PeBucn)\\3. TrBa Gaff'DRIVECHAT 4.\\4.W t }ng'ժtry\adsnt sed(DRIVECHAT 14\(OPD st).Y } t d\t}nժild\t }rtd tnr.\\5. Ca t rata\}st acar.\\6 As MICROSAT o 0228 24579 if\t} iit. ^7.Biacst o an\nng{ggggghhhhh!!!\(trk)\\ - Ban ^Fm: Mall Gdn, Lds\\\\DBa & Ron,\\....} onlOUTLET iy\ u. Nilܛtand\VERY ur-fendlesally\t opon COPY pnr.\\\O t ...\\Oops!! #1 (OUTLET 15)\---------------------\I t 48K Sct t g\bc o255 (#FF) srtat\14446 (#0386E) an#0385E as\si "Inr",\[Qè ght! - B.C.] ^Oops!! #2 (OUTLET 15)\---------------------\\I t arc  an\emp o ua\cb unt bck\ժ instcons. Unrly\t er itt\ur isw as:\\ LD HL,(64512)\ LD DE,(64513)\ etc.\\Sultsul\\ LD HL,64512\ LD DE,64513\ etc.\\[Qè ghain! - B.C.] ^Oops!! #3 (OUTLET 15)\---------------------\To  OUTCLASS 4\ansrtaPa 26 unNib-\b& Bys.I e tt y\it'scirerڢs\ansang. Sulisuld\atcsrnat\t ghtsi2 i t\ث0 t 1, 2...7 a p-\e t ftst?Furtr\զ,t ثrn'ub as\ ժ ftrds-onlt e\ott.T ثronlժ\ui spoo.O t tm\oPa 27 t i}l\emp wcrtmunds\t err:\ (1!1)+(1!2)+(1!4)+(1!8)\ [!= upghar- B.C.]\ = 4 anNOT 15 aswn. ^Al, tatmp sw\asnnثre\ t one i\HAD mght.\[3 NIL  r! - BC]\\Tan atmpn arn\aubbanby- my\symtes!\\Anyy, tt'mt-nnyrth\id. In's enng\OUTLET cnth[Tt'wt\tnk- al tubrs\snd! - BC] a\ c ar f ch\otr.\\O ertI uli\[Gan! - BC] tugh, Ban\itI alyunt\ ^impso tietnIM2\t RETI uanRET.\A I rci ttnnas\I' e nop w only\u RET at enoIM2?\\ BesRerds,\ Mall Gdn\\StctlsanI tn tt's\tI' e ab \nwhanwRETI es\tt'fnanwhit's\llud. RET em\r algh I' red\iI nr? - PerpRETI\ea ܇EI oy it\iinnu tadd-on\rd i IM1? I sad\kntt auts. Ds\an el k?-Ban.^ R tI' e ab \nwhanwRETI es\tt'fnanwhit's\llud. RET em\r akF*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >z    \Nexnth: SAVESOON(ndu\ SAVE o}lly); Par3 of\OUTPUT o pnrs;gpD &\D-ty ; PEEK uºty;\a arc o Sctm'fgs'; a\n mr-ot|ll\ols;scenstcr;pgm\ o aBASIC isܦd;a\Tant;a OCAT uºty\angpc/xadn.All\t r- Nic Les's\OUTCLASS anI sl o or\t otimI'l tr cm\in! S tn! - Ban.^PEEK uºty;\a arc o Sctm'fgs'; a\n mr-ot|ll\ols;scenstcr;pgm\ o aBASIC isܦd;a\Tant;a OCAT uºty\angpcF*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >z  \It'o ataltugh\t HigSt. snno is\llsng, oС\mranft ,ts\Chsts, exenery-\o'excons! Ien\scat sChsts\n 1983.Altugpperof\t ST anA gФs\an pd, i\ot t 8-Sctm\anCom̦ 64 t}ught\stranci sܦby\rp.Ta sl t-\lnt 16-trs.O\ ^} onlas tch\atno e i t\gh-pڴ bt a\ t ST anA wch, afr\all, a tmrs\m t Sctm! T\Ռ is: Don' i by\t 16-by hy!\\Ap it s~ t\mf MGT ˡ\aib. T entry-l,-\|ron, }lt COUPE\l pa`150. Iis\cii} sSctm\ft. Il ˡ ta\ilt-i s onsysm\ u t 3.5" d} \sti oron\wcinco d l \aib a`220. ^T EEC vo imrJan-\e pnrok \f 47% aun24%.\\Mats Ԥw\3.5" s d t542 tcks\incn 11000K of\s܌ o csk!\\Not nthlȢs...\\YOUR SINCLAIR snga\128K er, ssrd\u¢, int-lana\BORDER st u¢.\\CRASH ewTasCal- t\spadseanDB1 - +3 sk\˾epgm\\I uldn'SinciUr ^oComSpΦ r\ad.\\PERSONAL COMPUTER WORLD Z80\sng32-sa and\sa ou¢s.\\T JaarisoEVERYDAY\ELECTRONICS I ugho 1st\Dem pblFebary\l bw! Anyy, it\t ectڼcpڞcts:\Ho ilSct ll\pninr anChst-\tghtntlr..^ad.\\PERSONAL COMPUTER WORLD Z80\sng32-sa and\sa ou¢s.\\T JaarisoEVERYDAY\ELECTRONICS I ugho 1st\Dem pblFebary\l bw! Anyy, it\t ectڼcpڞcts:\Ho ilSct ll\pninr an F*v\")J!J~#N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *{< S>>*̞B< ![#R0~ 8~> > >µ*h9/BEM3z3zzzz3zz3,'z4zCoCoCIG)]v>Y } ni alsan tyos entri OUTBOARDi anrt: DATA snt,Tasr, ndwt ttc. "Ially", isulrt 10 sce s.Yrs l bsd, fcr, nthlunl: 1. YesitՐl; 2. I ts"cwoff" b ss(w applai it -end); 3.Wn llitrا(e.g."Ceno t 6th").^WANTED: Inron/adė on\unt Sct nt a\MODEL RAILWAY. Conct: CHRIS\CLAYTON, 21 RUDCHESTER CLOSE,\CARLISLE,CA2 7XL(Cars 32150) ^ZX-COMAL inc Engsh\al. Stc upgms\tPROC, LOOP, CASE, etc.\Sing entry, 32K\pgmb RAM fe. Norlly\onl oonin\inctpo  usocd. Onl135 dkr(au`12) incns.\Pa u GIRO 8 56 41 91.\Addss: LMornn,\Brygrn 29, DK-7120 Vej\0st, Denrk. DELIVERY: 14 DAYS ^Au܇tnsopgms\f cd, Os\Dis˪ry, Be, Disp or\PD unSOFT-CRACK th\SOFT-ROM. Bett Mul€?525 dk+ s (au`47)\Sen LarJesrn, Mons16a, DK-8000 ArC, Denrk\(Tel:06-183661) ils.^O R.D. Di Tr\, `25.00 oasofr. -A Rutrrd, 33 Montϡry\Rd, Co, Farnugh, Hants,\GU14 0AY ^ OPUS DISCOVERY CLUB \W ilotiws-twcio sans\ft, in, ps, etc. :-\57 St.SarRd,WEST CROYDONSury, CR0 2XE ^ OUTBOARD BB ADVERT \T G֡ AHo iBB tt\SPECCY co }ld\SPECTACULAR. Y } nion\(01)888-8894 ,iurl\ew~( PRESTEL) s/w.T\ Sccyi*sct.0#\t! - Ba Gaff.\\^Re stbnnuoldbpnbn:\ALADDINK, 4 HurCsnt,\Euth, Bercks, TD14 5AP -ind. Ta ofr:-\ONLY `1.25 bn! (08907 50965)^Micda`24.95, I'Fa 1\+ M/D cka`69.95(orrn`35 ad`3 s) Fm\E.E.C. LTD. 18-21 Misur\H, Clr Hill, Clnt\St. Per, Bucks, SL9 9UE\(Tel:0753 888866) ^Micd }rtds-`1.60 chUnbnDS/DD sks:- 3.5"-`1.50, 5.25"-50p.\cd ls:-30se (=20 inrs+30 rs) \s ls(55*35mm)-1520\ComatC10 }st\(unld)-30cfmCHEZRON(bc aity)ORDERS SENT WITH YOUR NEXT ISSUE ^T es tnsurft d ibsh-\t rd. Wmnd\MULTIFACE 1 (48K) a`39.95 anMULTIFACE 128 (128K) or\MULTIFACE 3(+3)ta`44.95\f ROMANTIC ROBOT, 54\DnscfAe,Lonn,NW9 8EN(Tel:01 200 8870) ^APPLIED TECHNOLOGY ofI'Fa\1 anMicd c `57.50(`83.50 t2 ds). Sing\Micda`27.50. Fm:-\64 TanrDft, Roysn,\Herts, SG8 5DE (Tel:0763 41754)^Can'afrMul€? LERM\ f cd\tnstnrtst\pgma`11.99 () or\`12.99 (}rtd, 48K Sctms\only). W LERM, 11\BnselCԧ, WtBay,\NE25 9UW (Tel.091-2533615). Ask\TRANSFER PACK 4 ans\ty oSct and. E.g.\SPECTRUM PLUS anMICRODRIVE.\Alrªly, na SAE r\ilotiin sets.\\^REPAIRS:Sct 48K/Ps-`12.90128K-`14.90, P2-`15.90, OsDis˪ry-`21.90. Sena\VSE TECHNICAL SERVICES, U6,\8 NurrRd, Lonn, SW9 8BP\(Tel: 01 738 7707) ^t and. E.g.\SPECTRUM PLUS anMICRODRIVE.\Alrªly, na SAE r\ilotiin sets.\\^REPAIRS:S0F*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >z $^ ŎwL?Ø@ *ɤy)ĪWRz 40 STAR EQU 42 50 COL EQU 16 60 ROW EQU 10 _ \ Mac Co Par6\ BNic Les\ -------------------\Lasnth'eo oOUTCLASS\ t ast, stly\tory. TntЫ\} srunԵ lin\nnpgms. Lasnth\I nthugcԵor-\arsuntantn\anu bys. Incd\ |u¢cas\ant yarwcI'll\˪i զ i xnth. ^Al sntI sЫu\pgmnches\ sng.\\TntI a in sw\ۡ mp u¢ung\Եc, wcl lin\pgmnuow ft.\T rsou¢a \ taddsnry. T\rl p|ble\addsicklit scen\ry. Senn~ tt\aorl r tr\uinro oi\inro o scen. T i\inro u6K oRAM,\anisܦi t rp\a16384 22527. T ur\inro illy\i ry. Be}u ot w\o ouo t\ ^Sct ionlu768\by(32 mn* 24 ws).\Tisܦo t rp\a22528 23295. I\ POKE in anot aas\teotuld\apaosa our\ulapar.Foemp trt\pg wcllt\ur(ot att) up\tfsnbanbck\sas:\ 10 FOR L = 0 TO 767\ 20 POKE 22528+L,129\ 30 NEXT L\ 40 PAUSE 0\\A} t att\ iui Ե}l\orinf f ght\an tm. T i (or\spy) iЫt ^i stn nr.Trt xt\pg anl wI\an:\ 10 FOR L = 0 TO 6143\ 20 POKE 16384+L,255\ 30 NEXT L\ 40 PAUSE 0\\T sp i|}lly\spin thrtch\n2K oRAM. I cot\thcra bcko32\bywci e\cotnt ll\ngtot scen.Afery\32 byt iccr\sa mlԫbt xt\32 bys. Afacnt end\ot ct sns\sr l up, aaʪ th\ccsa mps. Ts\neun t cis ^ll. T t nantrd\cra lut \y. Wht icmpx\l s˪wn\ sraddsnt scen.\\FirstlΦ I srany\addsne kw\t i anu~ a\rf t mrPOKE\in. T i ~ it er\ unrsnot t. At\ ca U.D.G. or\cctappe scen\i ~. In't\cauow gpcΦ\(ghlunly) n'kw\wI an. T a 8 t\by. Eaco ot ts\} stco (pnt)\oof(abnt).Wpnt\o a1 anofa0.Be}u\ ^ addsby a¡ \}nen0 o1. Tans\ esys wckws\wcti t by nt\o ooff. W tbng\ثromrs. Foemp\1 ul tŗ aثrl\a0 ul l\o2, aopا 0\in1 (1*2 = 2). Bi2 tn\ul tŗ aثr as\1 ulea 4 (2*2 = 4)\an o u 7 wcs\o128(2 t ثof\7).\\ BIT = 76543210\IMAGE = 01100110\VALUE = ( 6=64)+( 5=32)+\ ( 2=4) +( 1=2) =\ 64+32+4+2=\ ANS = 102 ^Bnثran }n\ anto oofas\ ata inn~nt\ocotr. Untsysm\an } ca ani \nt. T att(ur) by\i ut (aa\al bys) ca\sang. Ta as\lws:\\\ Bi7 = Fson/off\ Bi6 = Bghon/off\ Bi5 = PaBon/off\ Bi4 = PaReon/off\ Bi3 = PaGe on/off\ Bi2 = In Bon/off\ Bi1 = In Reon/off\ Bi0 = In Ge on/off ^Y } our t pm-\arurge anbe\ t otaib\urcal(+\gen), orp (b+ gen)\\\ Att Fi\ --------------\I l srofwtaddsng\t att atis\t eot t. Eacb-\u¢ l entt\X anY -orot\scen. O r f t ut-\i l t addsawch\ w to on\scen. T r napply\ t -ori.e.Y>=0 AND\<=23/ X>=0 AND <=31.It a\exei}u csh. ^ 10 LD B,Row\ 20 LD C,Comn\\T X anY -or a\sܦi BC aaʪ.\\ 30 LD A,B\ 40 SRA A\ 50 SRA A\ 60 SRA A\\Al Եoona ̢ in\t A s B (t w\mr) i˾e A. T xt\thinstcona Sft\mnds. T l ժ t\tot sesr\tfoght. SRA ժs\t tr o t\ght. T nno7 is\ժ 6, 6 ժ\ ^5 an on. Bi0 is\sfin t }rrfg.\Tmnia ath}l\sft. Bi7 i ۡ rm-\sn uag in\t'mpnpnon\(lnt mit\miª oª)\ ifuncnw SRA\ocrs. I } 7 suld\aly 0 (niª)\aB sulexe4. We\a cant gby or\t M.S.B rst. T thsft\mndl sanunnd\toft A sr. T\a t0,1 an2 at ll\ }l冨i t by or\t L.S.B. Bi4 l  in\p o1 an3 l \i p o0. T gby\ ^i}l冨arf t\| mr. Tmints\ t nnot att-\ wcia22528(c)\o#5800 (x). Aii\unmi  }n\ladi A th:\\ 70 ADD A,#58\\T soft gby\u¢ sܦ ii sr\H:\\ 80 LD H,A\\T by l nin\rot B sais\soft ot gh\by. T nnul st\afsfnof st ^at wР oB |ck\in A.\\ 90 LD A,B\ 100 AND #07\\W alad}l冨t\ei t4 an3 t\} softAND #07.\\\ 110 RRCA\ 120 RRCA\ 130 RRCA\\RRCA ڎt nnot\A s t ght.Roon\frf Sfni t\n ttwcl off\t wunanapar\o t otr. S0 ulw ^wun 7. T A g-\isiڎth¡\t ԫthes\in t7, 6, an5. Tis\ tetiثr. Adng\t m t addse\it l}l冨by\adnio A.\\ 140 ADD A,C\\Lastl ssܦ t w\by i L:\\ 150 LD L,A\\HL nint ry\addsot ubc of\-orX,Y. Tp ur\uinro o sce u\sw t addsi HL: ^ 160 LD (HL),attr\ 170 RET\\A} iis\ uaddsnmp\anspڗ. No tt\uinro l t\afcani inro on\t scen. Al i inrm-\ao l afcur\inron. T u¢ } \exn p ur\soe l t\att urorc-\usa. T t} \aceby:\\ 160 LD A,(HL)\\Tl r t ATTR e\i t A sr. ^ DispFi\ ------------\T Disp(i) oks\sghtlզ mpau\sul e i t \pg }u ot t\t,sce addsni}ll-\aզ ly. Iist\expibbanw t\16-rwct\raddss:\\ADDR= 0000000000000000\ dddllrrrlllccccc\\Eacsang.\T rstht(infm\f ght) l"d" \ut | mr. Tit\mwcint t\nnot sp\ ^wci16384 (c) o#4000\(x). St rsrtoff\t010.\\Nex tlnut\ m(0-23). No tis\i ccbcks, te t\ccbc rra t\ws.T wn f 0-7.T\ anta ld\"l" an"r" scªly. T\t 5 tl"c" a\t m ts. Calnt\sp addss\̢ i t rtat att-\ addss. So ot\ m}lo l \̢ .\\ 10 LD B,w\ 20 LD C,l ^Wsroft at\att u¢ tenng\t anm mri B\anC. Ai r ta\o t X anY ei.e. X\>= 0 AND X <= 31, Y >= 0 AND Y\<= 23.\\ 30 LD A,B\ 40 AND #F8\\B i˾e A aΦ. AND\#F8 skoft t the\ts. I|c t\addstr l e\tt ut w\mrs. T a eas\ a unwР ccr\saa-or ty\al s .T sot\ ml }l冨d\i t by. ^ 50 SET 6,A\\T | m} add\stighatSET 6,A oif\pADD A,#40.\\ 60 LD H,A\\Tmpt gby \i} sܦi t H\sr.\\ 70 LD A,B\ 80 AND #07\\We ca t w\by. Wbn|c t ol\oB anpi A as\Φ. T AND #07 skoff\t twc \alad}l冨i t gh\by. ^ 90 RRCA\ 100 RRCA\ 110 RRCA\\T in me\ii t ԫ3 ts, if\o at raddss\l  nt i t\up3 ts.Tiaceby\ڎnA th¡tΦ\}unwund.\\ 120 ADD A,C\ 130 LD L,A\\T m mit add\ant by sܦi L.Now\t HL sinins\t addst i\inro at -ors\X,Y. ^\ 8 by ccr\ ------------------------\\Aa p|bla u\e8 byoi inrt-\ ca cco8*8\ls.W tΦ e\ i mt 8 byon\t sce af }ll-\at rsi addss. We\} mt sigho binc-\nnt gby ot H\sr.Ti}u t w\t( raddss)\a t0, 1, an2 ot gh\by. Remt ts\r t ten\cccsa pnt\.BeΦ } mt 8 ts\oinro t sce \ ^\eۡw el i ry\w t} sܦwn\ofscen. I innung\զ t o ccr, wch\isly, eatr\u¢ }l冨 tt\addss. T}l冨 can\adds ule \cc˘cfr-\enccogp- st\ a ASCII ˘. O entr\t u¢ uli t\cc˘ anuld\ˡ t addss. Be}u of\s I }n thugt\su¢ i gail.\HoI incsr\u¢ sal t\u¢ܛt pna\8*8 gpc. ^\ PnMasr\ ------------\\Tsoftnth's\eo oOUTCLASS t\si pnu¢. Ts\u¢ einc tng\uinro o sce as\l efnt\urer¡ pnt. If\eut }n\linc t rspgm\i uft. T n-\sto pg wcut\spnu¢ ut\ROM ccinsaof\ur-gpcs. T p-\g iinn u t\ROM ccI' o\z ca mow gpcs. ^\W u t pnsr\u¢ l e cn\t | m in\ۡw el i RAM. At\աniiinn t ROM\t. T pg } ˤ th\256 fn8*8 gpcs. T\~ t wc} as\na2K ul sܦd\srnf t | mr\addss. T ˘ acst\2K ogpcn f 0-255.\T ROM onlu˘32\ 143, wcit Sctm\ASCII t. T nston\pg wclwl \ۡtnallscand\pnt s'*' ccin\t dd ot scen. Wow! ^ 10 ORG 60000\ 20 ENT 60000\ 30 BASE EQU 15360\ 40 STAR EQU 42\ 50 COL EQU 16\ 60 ROW EQU 10\\T ie t\nnot pg I' ud\linsaomrs. Ty\a alws:\\ -BASE:T addsot rst\cci r(inn\t ROM i t ).\\ -STAR:T ASCII ˘ t\s'*' syml. Tiw\ucc˘ ul.\\ -COL:T X -or w\n pnugpc. ^ -ROW:Yes, esit, t Y\-or w n\pnugpc.\\ 70 LD B,ROW\ 80 LD C,COL\\Lt m anes\in t BC sir.\\ 90 CALL DFADDR\ 100 PUSH HL\\T nt pg ixt.Li\90 }llt rsb-u¢\wc}l冨t spy\ addsansܦiin\HL. HL i t sc as\iiin rpd.\\ 110 LD HL,STAR ^I liin \rpdn'I? HL iad\tt ˘ i } u\dn'kw.\\ 120 LD DE,BASE\ 130 CALL CRADDR\\DE iatt BASE e\ant cci ~ is\}l冨bt CRADDR b-\u¢. Mo o tr.\\ 140 POP DE\ 150 CALL PRINT\ 160 RET\\T sp addsis\bugh|c oft sc in\DE. Li 150 }llt PRINT\u¢ wcpntt i\ ^on t scen. Aat\nt pgm'nrt\oo is it\RETurn|ck.\\ 170 ; SUB-ROUTINES\ 180 CRADDR ADD HL,HL\ 190 ADD HL,HL\ 200 ADD HL,HL\ 210 ADD HL,DE\\T ccaddsu¢\rko t pnp tch\cci8 byng, and\srtf t | mr. T\HL snint cr-\ac˘.Tilpeby\8.IetbadnHL th\itlth¡s, c¡\ubnt e. Sit\cc˘ 20 iuld\r : ^ 20+20=40\ 40+40=80\ 80+80=160\\T lnin160\(8*20). T | mitn\adtADD HL,DE.\\ 220 RET\ 230 DFADDR LD A,B\ 240 AND #F8\ 250 SET 6,A\ 260 LD H,A\ 270 LD A,B\ 280 AND #07\ 290 RRCA\ 300 RRCA\ 310 RRCA\ 320 ADD A,C\ 330 LD L,A\ 340 RET ^T sp addsi}l-\冨xt. Wnots\rer.\\ 350 PRINT LD B,8\ 360 PLOOP LD A,(HL)\ 370 LD (DE),A\ 380 INC D\ 390 INC HL\ 400 DJNZ PLOOP\ 410 RET\\T su¢ PRINT mpt\i t scen.Ti̢\bmp op. IncnnD\(t gby) alwts. How\trssd\rer.\\T sˤ ot spnt\u¢ int ngtof ^mx. U oogph-\icanotsl b-u¢s\eb ca anytng\un. SorrI\n't ansr st\nth's }u I' of\om!!\\ Un xnth...\\ Nick..^rssd\rer.\\T sˤ ot spnt\u¢ int ngtof ^mx. U oogp))2Kç:ç:ç:"49999":"1E3":"9989":"23608","R":*"M";;"CONTENTS"  "23637+256*23638-6609"::#17  @!. z[~( (#F## _UWU__]_VUUWU[~2}ꪪ/3R@?T?ڪC(L(mj뺿CP]HXꫯ뫯￾p_UU_WUUUU_ܢU_UUUW-^|DWUUuCsU]ZUX̀WUP_z]_rF`W @_]_UuUWU}W_UUW]UUuWUU]UUUU}{nꪪ*~_Q?@]O}w=U T ja@Qү?%@uU@QAGꫯ_몮ڪ޿U}UV o_U^UUUU_U UUUUUWUUUUWrUX"UUW&ʇ|T   UWEUP~UX^UT~w.w\ 3Cou__]_[]UuWmUoUUUuڪꪪUA   *-߿I T\b*U@{UUUU]R@> K\몄@XUUUT_Q@HЀDP" TUUQ_ٽ_]]TUP Q@UUP@͕UbxEUUUV_) T *@UUPn^UP'~D` p@@(* _p*UX*]?%*ܯ۪@<UP(/ 0UB(U; Uu3@^̈W0-[h 6@TEUUUPV9UU  DUUA|_KUUȀT  EUU@n_P@? xUTUUQ_ *UT&w_x@Ǫ5׾㎁5U͠@*_E"Wu(¯W˪@  ( E " c"ꪪ7 W]UT,,UR%V1P @:Ȁ@UUU@!PQQPUUQG/_WeUWPP@RUT._UR/QUU@" PUUQW4 ꪪƼ-Q??PLJ kB$}AE }]ꪀ  o ?ܯg.Pd`{ *R~{ (?"BGtg1UUUuW 7v 0? WwUQQA^Hk@UO? VD/UUUYǃ[$UUUUUUUUWUPU@UUUUUUUWUBUW`PUUUUUUUCUUWQUUUUUUUUUuUWTUUWWUUUUUUUUUWU*ꪨl`*"Oʪ}u d _O@  *ꪪGꪫ*@P8( (C`(* **ꪪ@@@UUUWUV@uUgUHÀU_ AUUe\k??R UUUuUUUUUTEuUU]UUUUUU EU`TUUUWUUUWQBUUE$WUUUUUUU_UUU UWUuUUUUUUU_U*(**?ʪCςWTuj  H *(ꮫ  PP T?8+_@UU`T{TT@)A? UUW`?{5UHW@QUUuUUUU_UUUUtT@ 4 UUU]UUU]UD\@U]U(UUWUUU}UTUUUUUUUUUUUU_UWUWQU}EEUuUUUUUUuUU*ϏO꫍G*ϋ@SWR*QJ "@ * :@ ` 8(P*ꪪUUU]TU?UUMXtUUDUUUUUW;-TP UUUUUUUWUUUUU] J tUwQUuPUUUUUUUUuUTUUUUWUUUUUWWUUpPUW UUUUUUUUUUU?URO *?*Cd*@A@3Pꪪz :@j  U (  @"ꪢ ꪪn"T hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhPhhhhhhhhhhhhhhhhhhhhhhhhhhhhh(PPPPPPPhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh((hhhhhhhhhhhhhPPhhhhhhhhh(((((((hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhjhhhhhhhhhhhhhhhhhhhhhhhhhh*hhhjhhhhhhhhhhohhhhhhhohhhhhhhhPPh(hhhhhhhhhhohhhoooooohhhhhhhhP(hhhhhhhhhhhhohhoooooooohhhhhhhPP88hhhhhhhhhhohhhooooohohhhhhhhPP8hhhhhhhhhhhoohhhoooooohhhhhhhPP8hhhhhhhoooho8nohhhhohhhhhhhhhh((((((((((((((..//////(((((((((((((((*((/////////////(((**(((*(0000000P***//////////////**(((*(pppprr******///////*******((((pppprrP*///B**((**pppprPpprhjjh(PPrpprBPrprrPPPPPPPrppppppppprPPPPPPrrrrpppppprrrrrrrrpppppprrrrPPrrrppppprrrrP &"M";;"run" &*"M";;"run"ʧ: '"23637+256*23638-0104"::SUPA-QUIT  !JW>2\!6>G^>?GV:\:E\ :F\ ! "B\>2D\v PPrrrppppprrrrP &"M";;"run" &*"M";;"run"ʧ: '"23637+256*23638-0104"::SUPA-QUIT  !JW>2\!6>G^>?GV@@#"9976":"9994":"9986":"9E3" E{I:I:ٰ"5":O:O: :" from A.E. Heard"'':"61003" :"This is an interesting variationon the 'WRECKED TANGLES' patterngenerator back in Issue No.1.Thebackground colour's changed eachtime you run it.SUPAQUIT is usedto exit instantly at any point.":"61196":"8955" " O:K$= "K$="R""9989":"*7":ڰ"*8":ܥ:I::#O;I,"4";" PRESS ANY KEYQUIT ":N=OIO:y=(*"F")+"d":x=(*">"):z=(*3)-4:r=yxz:r,r:0,""-2*r:""-2*r,0:0,-""+2*r:-""+2*r,0:٥*6:r:N "WK$="C"#O;I,"14";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "WK$="N"#O;I,"25";"NEXT":"23608","10":*"M";I;"CONTENTS" " "8905" "S#O;O,O ;"RUN PROGRAM CONTENTS NEXT ": #(O=ç:I=:"23658","8": &"23637+256*23638-0222"::x2SIGMA  !JHHk >;;!*Q\s#rOF(  *\K\ 88'0 :k\ ͈ ͈ ! ֥_ b>?K6\!;\ˆ &o))) y!(= :k\ ͈ ͈ ! >w$w$=  >w$w$= #C\"\*Q\6#6 &"M";;"wre" &*"M";;"wre"ʰ"8E3": &"WRECKED2"ʰ"8e3": '"23637+256*23638+5": '!U\N#FJX?????????????zł|S[kV8q8S '"23637+256*23638-0104"::SUPA-QUIT  !JW>2\!6>G^>?GV:\:E\ :F\ !E"B\>2D\v ' "64E3":"23637+256*23638-148":: AUTOCHARS PLUS !*v\%"6\!?~/wy [v\!P > ^#= 0R6-U^ kk6Y2D\v '  ˼˻˻˻˻˻ʻ̼˼̻˻˫˼ʇ˻˼ݪݫU˻̼̼̙̻e3W˻̻̼ܻ̻TTg˻˼ݫDe5w˼ݫʻ˻Dc3W̼ުʻsC"!7˺˚̬˺Ew5{xxwwhtyyޫgxCxxwVUvwewڼ޻ʪ˻suxEgvxvwVfggwxwwx̪˻szwVvvuUhwxxwweFʻ˻˻̼shhxwvggvwݥTEx̻̺ywvwwxwxwxwܩtC4h˺˹wgwvwxxwx̻˸fwT33GˬH˼˼˼̻̼wvVfgwwxwwfUeCC%FUfgݹx˻G˼̼̦wwxxwffwxxxxwuUeC345TfWܗwy˻7̼̻˼̼5vgvwgfgfwwyeUTES233DDUWTX˻˼ʼ̬̫tDvhxwvvffVevWffgu33DCC2#4DDDWtUWfe˻dFwvfT4DDUUUC3332"3334VwC44D3C334ECCwFfgwwwyR33""!!!!!!(D3333C33#CE3EfdEfgvwq1!!!YC3334C33#4D3EVTDEXwIA!!!93#33C3"333343433D[YA!!!!"!ic##2$433C33#2333#Dzw1!!"!!!!82"#"$FTB3#333#2"3Uzy2!!5Vfe1!!!9s22TTVf2#3"""#""FywDA!5VffA#!!":c#2#UT6f2#B"""""#Gxvwwh5#B6A!"""9B23DDDDD3v3"!###WyvgEUvx!"!"F3A'B!!"2#"IC"3$U34Dy2"""##47xFW64WxwwvfUUB!"!2"G#A'd3T2"33CV"2##343US2!"""GyUfFEFywwfVfUT432"22"V#A8FfdS"5Eee"3"##54VC2"""""#WzET3DTC##""#2""!""#!g43FeSW3A'vgU2#"#4fWB2""!"235fg4D4DETVCC4UVeD4s3C3C1!xgCQ,ɉxsC""$dVwS3""""233UDE4D445Ef335UVeD4!C331"xw4R-ɚsC2!"5TThB#"#"##TCE3C3DS5ecdGd28vVx31eVU2hw5r={ʖw3!:C5xC"#""2"#335233C4TwfXaBxxC2uFvA#vgg6r<29c4S"#2"#""#34UC"2"6vtgwzR8Uu{wWwqyf',ǩz2""zc43T12"1"3#WuB"6vtgQ)efwGw`xV'q<3!%T3#TB"#2"2%guC42"XtxxgWgB4#WeVAX',wU3yv34FfDKEDgfu#4"#IwwwVV3D3VeVA&h(,efS6v3DFfTueUwVeC131UCxgWgvvvedWb&z̪$TFəvUEdXjggTDDB!!22ESxiVhVffddVR&̫4V5zLjvC4dXVgCDDBS437˻VfeE43"*333333LʪgsDwzTxUVxydWyCc3S9FGf3D#"*""""""xDDwyjDwSVyTVz#CUyvffev$I%e2%{VETD4VsVSZUi3DCEDY#4Fg2C2##3g14F#D2wxww2U5zxwtDVvC3343DI"TGeVf4#C5SwfB32wwy1EUWTTTc4EU323333G#V'xugvdD2"FcTUgc3!'zx"Fe5334DDDT3333235W"FgWgwWu6gcE#D5fc!aVdVc33$DD4D33332362ihgUUt7eU#ETD!wxu3DUEC2#3C3DT3323ETZFiʸEdEEgevv48%2F1"1yuTwEUC3D3CDC2#DEcElFEv7Gg65e(uFRZ33$R3!xxvfx4DDfeUwf3CC4B3EVfUj5wt37t774$HS4U39332Q$2VeEWuV8wgfeEeffd24ET43gww%fS35dEgC46tEV4HS3Q42%xWvUFEV8vwVfUeffu3$ET3DVwWw%U#TgufSE2#b5Ewtgu2fCU35SC7heWfwwvvDFC%ET6UTDVW6g3XfuSE16a%5iu"#WfB(zw334FC3GywTgVyVvDER%ETEUUDUWxwUWdc3A4E233Iv3DCX1)sWq$UD45wuD4B#DSDVT34DEeFHdc31$C#C"xg3S3f1)sV'q%eTD6ge4E33DTEED3334ddVR"#5A4CT42UR*"wTDEC3"DSHs333X3C3Fdc#"1!31#2vS46ax7'thfUuEEDVT7tCC3Wc3C4vVv4C#c2"#B5CxS%6bxd8wxwxhfhcEEdeFhEevedevVe42#4c2#34D3hS$5bzdIwhxwwxegCEfUd5ifgwggv6r"1333C%3Cs$qhyvJɇwyehvfwDWvy˻˻˙w3##353D345S'$gT7wxwɋʹgvfgvwggwU3Fj̪̼wS##5gfB5FdD1""CeVGU˼ygVheeU446ywwC33$gTB$EDD22#TeVWyUʻxfUxwdf3463""6d3DCCR4EF3vVffwUvffeDDD6ehgefgtj˩SDDEgVfUVIFD3Egxt""6ugUwH|ʩ5dSTC3C349V""9w4WVfVxwwDVTUx%d3CC2A33:6"2)wEhfeVjxwvTTC5h252332C$x32JwVVVuXzgwweW1"h̻#26fv2"24""6SWgQwwxyDUEffVgfe#6̺25q'2!"229BweUSUvwgwTvxwwgwxv443y̺2#6b'3!"2"392fDE3FwgDwwxvixueE3E˻!!5hD2!"5gjECFvDfxuxxxu3zvhwvCE!3Eq%VWzyxcC3FUvU23#2"6235q%VXEgwwxvUVC"!"2Ww35Fa%fyiv5wvffwfveD3C13"""4Syhw3cEdXIvu!!5U4XVeC3333#CGTgwwwwfx237dxEdGwwUES3434TUUuc3EGjwuxc""!"I""""!!"#kFhwvCVHyUUC3UVCC43dEftfWkdSxx2"""xv1!#3"!4gwefcEHxeUC3FUDST5EgtdgkeUx2"#2"wv2#44C5vc4Wwf3C##6TeVfefejyxwfR"#"#5eD333DU5beWegC32#wvwfEwuExyyxD3DDUfeVfy4EUfCDVeE3$B$wwWTwyxwwxwVC4VUXeTVVCSFf52#S4wywvWvEwxhwwvVt5fUWvfTDVfHs6WgS#C#%vygfg6TS"3EEVxffVfUwVxtDEDFgfvx3tfg3"7T%ytD4DvW2#4Vd4#Uvh3#3DDDTgwFS344DUEWWvw#WtTf4XgwvB"5ET4"3EGtCxBFd4fXxwwwEWffv#FSwEVwxweB34Se33EWt3xC24d4whw$DfD1!6xgwywgEa23DC"3UUEeX1ffsUXwwwywwE543fV""FwywDFUd2#6CT24UTETw4xfS$UUDU3334EWefVu652Vy"2"&xWiTEDUd"#U3T#5TTDEUc5eC6wfwvU2FVeVVUw̅4$EFU#22Xwi4DVC3!#3#U3EeC4ETd!vVgwvfffDEU3DgwT2C23gevB"GDTfg43334C3#EUEUVh1!fDCFeeffTC4TC3UZ33Q2d34w2"3yTUEE522#33C"ETFff!fxfUT335UVwwvekR'1#24Dfc"(wUT4322"#333EdFh1#uvxwfBD""s316gD""wfD2###333EvUhu0#Vgxfwf4dS%d&t"1hC"2""433U4xwxwC!TTUTDDEzDb333"36fv323HvA"#5C4EExcUUEDTff3UEUD5UUz"4S"3""2%Uw32'R3ECCEVQTDEDSve33ETCDTUj3C#!#"eE0WST32%XuC5ECEyVB"eVg3egxwgTxzfS633#2#B"G53"35wd3s&SgdUehfwyWeegtjUR$34""3gE#A3gfCb1fTExyxVffgtZ333S$4$!xeB!3UhvBVdHwxv4j#!113QB#!45hC!3WvwwVfvT233"$z1C!C1#Cwr#""2"W#VywfC!efwvR#3C4z132#"!#$3hS"23"!#41EVvC%xwfxvFUVUz#2t243Bu'"2"1!34#""21"4gC'xvTGewxFUEVj#A32!"D#hR#C$!#33B!C!!#Vxq%eviwwCDDUS$43Di6TC32cB#ge#3%D"4"!!!4$1!2x!"$UfwfwufVeCS5iSFdDxYC6hdD2DB"452#C31"!5yDFvfxvUeewvVyR33ywwsCUeC3C2#CD#2#34FDC2"32ffvfUUDEGEyVViR#DxgrCUvUA4R#SU2"5WdD33"!31#fgweUDT7egUVyC"DgtS2Bxf2!5CC23FGCCEC4U3B333"#2UFxtXwvDeDC4DE"131"XfC#4D4W3#32"6C56fCx1!#16vC4DDUD4334TDY"1#!##gwc15E$GC"4324B45w3f13 &wycEUCDT4334CDY%TWgs$3SUDTVs%B##T"4fCfS4#!6cEVUDTXwy4632C3EGtU3C4UbUfeEVD"!6wwfxffEDEW"!"Wwe136xr(dwD324Diwt"!EEwgvgtDDTgy̼3!2Ww1"hGTuS43"5Xee!#1VFvgfeUTfx̼D2"idU433Ve3T23UUtTB!$EDFUUeff5!"!Zt4%wge3Vfb7x$2"U4jyw$"44̻ͼGWefg$2"U4jyw$"44̻ͼGWefg"17" "ANAGRAMMER","17","1" .."AUTOCHARS","01",O6,"AUTOCHARS PLUS","17",O6 "CAT-KIT","17","*" $"CHANGE","09","(","CHAOS","17",O8 #9R$+"typeliner)","16","%",R$+"m/d utilities)","17","%" |"CODESHIFTER","17","/" "EXOCAT","17","/" g."MINICHARS2/3","14",O6,"MINICHARS 4","17",O6 yO$+"m/code2)","13","!",O$+"m/code3)","14","!",O$+"m/code4)","15","!",O$+"m/code5)","16","!",O$+"m/code6)","17","!" ,"SCANDUMP","17","*","SCANPATTERN","06",T6 "SUPA-QUIT","17","/" 1"TIME BOMB","13","#","TIME FOR ACTION","17",I0 +"TOPCHARS","03","1","TOP LIST","17","/" ! ,"WRECKTANGLES","01",T6,"WRECKED 2","17",T6 16","!",O$+"m/code6)","17","!" ,"SCANDUMP","17","*","SCANPATTERN","06",T6 "SUPA-QUI ̼̻˼ʽˬʼ̫̻̻ʼ˫̬˻ɪ˺̜˻ʪʚʪ˪̫ۼʬʺ˼̪ʺʼʪʪ˻˼̪ʛ˪˪ʺ̻˻ʪʫʺ˪ʪʪʺʫ̬˼ʺ˫̼̻ʺʻ̻˪˺ʫʻ˺˻ʺˬʫ˺ʺɺ˪˺ʼˬ̺˫˻ʼʬ˻ʼˬʫˬ˫˫̺̫˺̻ͫܺ|ʻ̺ʽ̼̪ܻɻͼڪʪ˻̼ݫʚ٘y̪yʜʪ̪ʪͪʹʪ˻y˻ܭͻ̼˫˫ʪʬ̼˪ʪ̻ʫʺ̼ʪʪʪ̼̻˛v̼˫̻̻̼ʪ˫ʺy˺˺˻̼̺̻̪ʫǛjʻ˜˻ʺ˻ʺʻʺ̬ɬʪʻ5yq#x˺ʼ83yʫʫ̪ʺݬD5%dTEC|ʼ̺ʪ<̼ʪʳ&VfVfff=UF4wdECͺ{ʪˬ˫4TxFqwEvc?dUBEUEFeeC̫ɫʪuGfgTAUUT+WEVUFgtUE3̩̫ʪʬʼ̦3TTfUVuU5VRWucU5fbUeUdSy̺ʻʪ˺ʼ̫˫t5GvVeUUVeTc6FCfvgcUUUE1gw̫ʪɚ˪˼3UgVeUVeVfUUT3EVehXdUTUwvww˼ʺڻQ2D\ ' 64000:"23637+256*23638-148":: AUTOCHARS PLUS !*v\%"6\!?~/wy [v\!P > ^#= 0R6-U^ kk6Y2D\ ' 64000:"23637+256*23638-148":: AUTOCHARS PLUS !*v\%"6\!?2@2a<$ZZ$<Please dont touch this graphics store in line zero!!   10 P 2:2:2:2:7:1:=""5  K$=: 23658j\,0:on=8:off=0:files=off:saved=off:tab=29:attr=off:formatted=off:started=off:delay=2:paper=7:ink=off:flash=off:drive=1:col=6:startcol=col:row=off:n=1:x=1 d$="":m$="":s$="":23675{\,(23635S\)+5:23676|\,23636T\:e$=7:a$="":c$="":gtable=9 +23635S\+256*23636T\:3e3 oa(1):h$(i$y)=(i$-(32 *(i$>96`))):i()=input*(1+(6ƾ23624H\<8)) rrestart=40(:info=80P:start=90Z:input=100d:print=150:pcur=160:abort=200:curmov=300,:delete=400:CR=500:colour=600X:coloursub=690:graphics=700:update=800 :store=900:rstflags=950:dump=1e3:dumplp=1050:format=1100L:testend=1200:exit=2e3 Z4:7:off:off: _E16,0;u$;#1;0,0;t$:update:rstflags b c  input d4:i$=:i$=a$abort n%row,col;c$:code=i$:i$=""input o$code>143code<7input p$code>7code<12 curmov qcode=12 delete rcode=13 CR sScode=146:16,0;w$;#1;0,0;v$:colour tYcode=15off:16,0;y$;#1;0,0;x$:update:graphics xRd$=d$(n-1)+i$:i$=e$.05|L,25:.03{u\,33!:store:dump n=n+1:n8print store:startcol=col+1   print to screen ;started=on:code>31row,col;paper;ink;flash;i$ +col=col+1:col=32 CR+5 update+1 i()   abort Ȍ 3438n :#1;0,0;" Press ""y"" to confirm ABORT Any other key to continue.":off i$=h$():i$="Y""8E3" K4:16,0;u$;#1;0,0;t$:update:input # +  curmov ,startedinput 6row,col;paper;ink;off;" " @@col=col+(code=9 col<31)-(code=8col>0) JBrow=row+(code=10 row<15)-(code=11 row>0) T$startcol=col:update+1:i()    delete startedi()  n=n-1 \n>1d$=d$(n-1):row,col;paper;ink;flash;" ":col=col-(col>0):i() Jn=1:started=off:row,col;c$:.3,10 :.5,0 h#1;0,0;"SORRY - Limit of Delete functionPosition cursor, then overprint." started=off:started "475+(23624H\<8) -#1;0,0;t$:update:input 0#1;0,0;x$:update:graphics    CR row,col;" " startedstore row=row+(row<15) col=off:startcol=col update+1:i() O W colour change X!attr=pchanged+ichanged+fchanged ]z17,7;paper;1;" ";19,7;7;off;flash;" ";off;off;18,7;ink;"" bi$=h$():i$=""610b c =a$abort di$="R"store:paper=7:ink=off:flash=off:d$=17+paper+16+ink+18+flash:store:d$=" ":686: reset attr option g&i$=13 i$=14680 li$"P"640 q*paper=paper+1:paper=onpaper=off vpchanged=1:colour i$"I"660 "ink=ink+1:ink=onink=off ichanged=2:colour i$"F"colour flash=flash+(flash)-flash fchanged=4:colour \attr=offi$="":4:16,0;u$;#1;0,0;t$:update:input &store:(coloursub+attr):d$=p$+j$+f$ cstore:rstflags:i$="":4:16,0;u$;#1;0,0;t$:update:input   coloursub p$=17+paper: j$=16+ink: 691:692: f$=18+flash: 694:691: 694:692: 694:693:   graphics rG$=:code=G$:code=154:i$="":16,0;u$:#1;0,0;t$:update:input G$=a$abort  row,col;c$ &code=568i$=" ":input+5 Acode>480code<568i$=(code+80P):input+5 ?code>3code<12 i$=¾(code+gtable):input+5 code=12 delete  graphics   update display Vars  n17,tab;paper;1;" ";19,tab;7;off;flash;" ";off;off;18,tab;ink;"" !20,tab;" ";20,(tab+2-row);row;21,tab;" ";21,(tab+2-col);col;#1;1;0,tab;" ";drive;1;1,tab;" ";1,(tab+2-files);1;files z {   store $m$=m$+192+row+startcol+d$ Bfiles=files+1:startcol=col:n=1:started=off:d$=""    rstflags Apchanged=off:ichanged=off:fchanged=off:p$="":j$="":f$="":   dump to disc  s$=s$+m$(x) m$(x+1)=e$format ;m$(x+1)=192m$(x+1)=22:format   dumplp x=x+1:dump C K  format Lformatted:9 ,4;ۼ;"READYDRIVE ";DRIVE;" ";11 ,4;" PRESS'Y'CONFIRM";13 ,4;" ANY OTHER KEYABORT ":M=ç̼ç:װ".01","(":K$=:ïK$M M$formattedK$"Y"K$"y"restart Nformattedformatted=on:saves=files:s$(1)=22:m$(1)=s$(1)::" FORMATTING Drive ";drive;" "''" Format takes about 20 seconds after you accept the option. "''"Then follows a sequence of SAVESdependant on the length of titleand number of attribute changes."'''" This CAT will need ";files-1;" Saves. ":"m";drive;s$:testend V-savedsaves=files+2-saved:saved=off `saves=saves-1::0,(32 -saves);saves:.1}L,27:#1;" SAVING  - - Please Wait - - " j*"m";drive;s$a() t 3438n   testend m$(x+1)=e$:exit s$="" dumplp    exit Ђ#1;0,0;" Start afresh. Rework. Quit. or "'"Any other key to see your Cat !?":off i$=h$():i$="S" i$="Q""8E3" ?i$="R"saved=files:m$=m$(̱m$-1)::m$:start+5  :drive *exit +  strings Ix$=" drive: files: " y$=" SELECT CURRENT c/s+""9"" =Chars. Paper: Return to chars mode Ink : to change colour, Flash:  delete or sendto disc line :  STOP =Abort  colm.:  " {v$="                     " 0w$=" SELECT Paper c/s+s/s = Chars. Ink Flash Reset black on white (Flash 0) " ]t$=" drive: files: " D u$="  SELECT  CURRENT  c/s+s/s =Colours  Paper: c/s+""9"" =Graphics Ink :  ""EDIT"" =To Drive Flash:   STOP   =Abort  line :  ENTER =Carr ret colm.: "  @"9994":"23675","X":"23676","":"9986":O=ç:I=:"7":ڰ"7":ٰ"2":O::"9850":;I,"2";"Have a break.";,"8";"- Have a...";"19",*;"...from Chris Oliver!":"8955" ""5" " K$="R" "WK$="C"#O;I,"14";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "BK$="N"#O;I,"25";"NEXT":*"M";I;"cha" "K$="I""9E3":"8E3" " "8900" "l"23658","8":#O;O,O ;" RUN INFO CONTENTS NEXT ": #(1 ::" This programme enables you to personalise disc headings[CATs].On-screen prompts are given for the three input modes:-"'" } NORMAL character inputs."'" } GRAPHIC for the 16 low-res"'" graphics from the ROM."'" } COLOUR or Attr. changing." #2#'" The prog chops the message intodummy file names, each of which can be only 10 chars long, inc. screen position controls. Hence some limitations e.g. ""Delete."" Get round this by repositioning cursor & over-printing. Beware! it's expensive on disc space. Sometimes simplest to abort." #<{"__";I;°"8";°"8";"NB";O;". Further files saved to your personalised disc, will retain the last selected attributes." #F,#I;I,O;" Please type S-L-O-W-L-Y. " #P9I:O::"  ADDED NOTES BY B. CAVERS Use the cursor (arrow) keys tomove the cursor round the screento the position you want thentype in the text, graphics orcolour you want. Once you havestarted typing in anything thecursor keys become inoperativeuntil you press ENTER.This program was written for theOpus Discovery. It works partly on Microdrive but the colours donot always show in the final CATas the codes may be in separatefile names(the Opus apparentlyprints theas one string).Atthe time of writing it has notbeen tested on Disciple or +D." #Rt " IT WILL NOT WORK ON CASSETTE!";#O;O,O;" THIS PROGRAM DOES A  SO TAKE CARE!" #ZI:O: &zM "23637+256*23638-2581"::  @!. zX~( (#F##(?' & ?&% % ED??s8sp??<?>???98?s8|??9<<?8~|???99?q?q?9??9?>????8<???9????8s8??9|??| ^#= 0R6-U^ kk6Y";T+I,":";"pop.^";T+I,T;"boom factor = ";BOOM:"",O7:I,O:O2 X=SCALE250-SCALESCALE ,NEW=OLD*BOOM*(1-OLD) X,NEW*100d -SCALE,(OLD-NEW)*100d X+1,NEW*100d -SCALE,(OLD-NEW)*100d  OLD=NEW XX bOLD2X=SCALE240-SCALESCALE:NEW2=OLD2*BOOM*(1-OLD2):X,NEW2*100d:-SCALE,(OLD2-NEW2)*100d:OLD2=NEW2:X O7:O:O:#H;O4: ?"9E3":#:#H;O4;I;"The modern,scientific view of the world isthat it is governed by fixed principles which determine how events progress and,aswe learn those principles, we understand WHY events take place and thus, given sufficient information about a situation, predict HOW it may progress in the future." 1#H:#H;"A new avenue of inquiry is leading some scientists to question this. They are now discovering that many events may (some saymust) progress unpredictably because they are governed by simple mathematical rules that, incredibly, result in apparently random,or at least indeterminable,results." #H:#H;"We've only space to look at one such rule now but it does show how a simple equationwhich, on the face of it, applies to the situation we are going to look at, namely population fluctuations,and should producesimple, predictable changes - DOESN'T!":P ;:#H;"Any animal population should increase fromgeneration to generation up to a limit imposed by its environment, availablity offood, etc. If we leave aside all random fluctuations such as drought, disease etc.this increase can be expressed in the following equation:";#O2;H,O2;"NEW=OLD*BOOM*(1-OLD)";#H;I0,O;"...where NEW (the population of the new generation) is derived from OLD (the old population multiplied by BOOM (capacity ofthe little rascals to produce offspring) multiplied by 1 (representing the maximum possible population) minus the old." $#H:#H;"I should clarify that, while 1 represents the maximum population, OLD and NEW are represented as a fraction of the maximum, e.g.if the maximum was 100,000 then 50,000would be represented as 0.5":P 8:#H;O,O;"The equation can be summed up follows:";#O2;O2,O;"THE NEW POPULATION IS A PRODUCT OF THE OLD POPULATION TIMES AGROWTH FACTOR BUT LIMITED BY THEDIFFERENCE BETWEEN THE MAXIMUMAND THE OLD POPULATION." BW#H;H,O;"Such a simple equation has no random elements and clearly makes sense.Obviouslygrowth depends on a growth factor and a growing population would self-evidently bemore and more limited by the decreasing difference between the population and the maximum the environment could support. Youwould expect a graph drawn using such an equation to start at the level of the old population, increase at an angle (proport-ional to the growth factor)to a level justbelow the maximum and then level out. It ought then to stay level or, perhaps,move up and down slightly in a fixed rythm.":P LP:#H;"Let's try it. We'll begin with 10 golden eagles and a boom factor of 2. With un- limited space and food, each pair could produce during their lifetime an average 4surviving chicks. Each generation, every eagle would be replaced by two.In reality,however, the valleys they hunt in can onlysupport 100...":G:P:I0,".1",O2 `f:#H;O,O;"As we might have predicted, the populationgrew steadily and then levelled out but I must admit to being surprised that it did not get anywhere near the maximum. After some thought it became clear the eagles could not multiply quickly enough to comp-ensate for the increasing competition for the available resources from more and moreeagles. " j#H:#H;"This suggests that more prolific species would utilize available resources more efficiently.According to the calculations,animals with a growth rate of only 2 may use only 50% of the available resources. This doesn't mean that rapidly-reproducingspecies are more efficient HUNTERS but purely mathematically, must exploit the terrain more effectively. I've not been able to verify this with real data but I'll eat my hat if it ain't so! (Move overCrick and Watson.Nobel prize,here I come!)":P t:#H;"This is becoming more and more absorbing! I set out to explore unpredicability but find I'm predicting some,possibly unknown,natural phenomena. Is this a first for theSpectrum computer?":#H:#H;"Let's try elephants with a higher boom factor of 2.8.":G:P:I0,".1","2.8" g:#H;O,O;"That's closer to what I expected. Steady growth then a levelling off with regular fluctuations as it overswings and finally a steady state. If this level line of a constant 65 elephants seems unnatural,notewe are not including variables: climate, food, disease and assuming a FIXED growth rate. Now try antelope at 3.0...":G:P:I0,".1",O3 ;:I:#H;O,O;"With a boom factor of 3 you can see the regular fluctuations of the antelope population do not smooth out- at least, onthis time scale. What would happen if we extend this graph for more and more years?Keep pressing E to extend the graph... ";#O2;O6,O,,,,:G+I :#H;O,O;"Well,if you extended the graph for severalscreens you'll have seen it smooth out somewhat but still retaining slight, but regular, variations. Now we'll move to a more prolific species: rabbits at 3.8. Thevertical numbers represent thousands here and we'll start with 10,000 rabbits...":G:H,O9;" C H A O S ! ! ":N=II0:װ".2","(":N:P:I0,".1","3.8" bI:#H;O,O;"We have now passed the threshold of CHAOS!Notice how there are boom years and years when the population is devastated - as if by some catastrophe? - yet it's just the laws of mathematics in operation! If the equation is sound it MUST operate this wayin real animal populations, modified only by the variables mentioned...";#O2;H,O,,:G+I ؂:#H;O,O;"An amazing thing about 'chaos' is a tiny event can have a massive influence on the future.It's said the movement of a butter-fly's wing may influence the path of a tornado!This seems absurd when first heardbut look what happens if we add ONE rabbitto our 10,000! The thick line starts with 10,000, the 2nd,thinner line, with 10,001.":OLD2=".1001":G:G+I:I0,".1",O4 :#H;O,O;"Notice how the lines are indistinguishablefor decades but they diverge more and moreuntil one population is having a boom while another is nearly wiped out! I part-icularly found it intriguing when a line becomes fairly level for a time, once at around 75,000 for about 60 years, and thenbegan to swing again. If you had been bornin the middle of that era in that area,youwould probably take that level of rabbits as 'normal'. When they began declining theexperts would look for the 'cause'!" #H:#H;"Before finishing,if anyone wants the graphpaper for anything it's about 2K of code in line 9940(use GO SUB 9940). It takes on-screen colour, from line 8 (a blank line)to 21.For a different colour try PRINT AT 8,0; PAPER 6,,,,, etc. (14 commas) first. Only the figures at right are included.It has 10-pixel squares. I used dotted lines as full lines obscure some graph lines.":P W:#H;"Finally,if you want to experiment, the routine's at the top of the listing.You'llneed to set the variables: OLD (your startpopulation, BOOM(the boom factor)and SCALE(the horizontal scale-I used 10). OLD2 canbe set to show another graph line for com-parison but is inoperative if set at 0.Youcan INPUT these values here or BREAK in."  OO,O;"Start population?(fraction of 1)or q to quit [OLD] ";OLD:OLD=Q"8E3" #OLD>Iװ".2",O:װ".3",-T:"1290" @O,O;"Alternate start for comparison?(0 to omit)[OLD2] ";OLD2 $OLD2>Iװ".2",O:װ".3",-T:"1300" EO,O;"Growth factor? (some values maygo off screen!) [BOOM] ";BOOM (aO,O;"Horizontal scale of graph?(150) [SCALE] ";SCALE:SCALE>"2"װ".2",O:װ".3",-T:"1320" F"2":"1290" F#O;I,O;" P, ANY":O:K$=:K$="P""9700":"7900"  #H;I: #O;I,O;" PRESS ANY KEYTHE GRAPH":I:O:;:PK="23613+256*23614+2":"PK+256*(PK+1)":SCALE,OLD,BOOM:"2":: FROM O6:O2:I:#H;"23",O;O5;"E TO EXTEND THE GRAPH,P=PRINT,ANY OTHER TO CONTINUE";O4:O7:O:O:I:O:K$=:;:K$="E""2":"7930" K$="P""9700":"7930"  @"7":ڧ+:ç:ç:"5E4":"9977":"9994":"9986":"" J"9E3":#H;O4;O9,I;"I was fascinated by ANTENNA(BBC2:21.9.88) and EQUINOX(Channel 4:20.11.88). It seems even if you have limitless computer power and all the data you want,the new science of CHAOS shows that some events must yet remain unpredictable."; T!#H;"Just one example out of many seems to prove that large changes in size of animal populations can happen without, as had previously been supposed, any environmental changes whatsoever!This program shows how a plague of locusts may arise from a simple formula... - Brian ":"8955" "O5:K$=:"*704+22528","8" " K$="R" "WK$="C"#O;I,"14";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "BK$="N"#O;I,"25";"NEXT":*"M";I;"top" "K$="E"#:"9990" " "8905" "x#O;O,O ;" ERASE ALL BUT GRAPH PAPERRUN PROGRAM CONTENTS NEXT ": #("9E3":O,I,O2,O3,O4,O5,O6,O7,H,O9,I0,T,SET,ZX,G,P,OLD2,Q:"23658",H::ç,,I+I,,"4","5","6","7","8","9","10","20",O,O,"7920","7900",O,P &!SET;:"9769"+ZX:'':;: &"9785":#O;O,O;"KEMPSTON E IFACE 1 OPUS ZX USER'S OWN DISCIPLE QUIT" &O:K$=:K$="Q";: &!K$="K""9772":"9795":SET=I &"K$="I""BAUD RATE? ";BD:"B";BD & (K$="I"K$="O""9780":"9795":SET=I &"!K$="U""9782":"9795":SET=I &$!K$="D""9784":"9795":SET=I &&K$="Z"SET=I:ZX=I &( "9750" &)1N="55"̰"71"Ͱ"8":"55015",N:"55E3":N: &,:0 &. &4 ԧ:ӧ;"B": &6@:USER'S OWNINITIALIZATION HERE-ALTER9795NECESSARY &8 @"6",I: &9"23637+256*23638-0187"::K1@ 55000  !J>!yi7C~>*~ "~"|>!ti*| "|> *!xi= = > 9F,=~ $ >   >{= = ~# K 3 &C °"27";"@";°"27";"l";°"18": &H"23637+256*23638-2064"::graphpaper  H!. zX~( (#F##R^                              ?3R^ ր      R                   Z      >ZV^R      Rڀ      R                  Z>9R^R            Z      R                  ?>@            Z      R            RV                              `^`                        ̪      __`ڀ      R                  A &P#:"23637+256*23638-1322": :!J*S\+ U !8!"&\LH(( 7777:/Y >X2/񇇇W:+=21X *>2/!-8 W!.F!)>2)20@O >Y2/ >X2/:02) >2.>2,>*2-*D"J 2.>2,>32-*F"J >2.>2,>@2-*H"J > >2+=21>20>2* ':*(!+8>21>20>>2* [Jo&)))"2>2*K0:+=ͬ"24"5*5#:4[. *2~#"2o:4(G&=:B[5:4( :00|*5$"5:0!,8>2*:1!+8>21>!.20:1v !Z:\wZ>21|Xg:\w*@@@@@@PPPPPPP p`` @@``@X @ @@@@@@ @ @p p @  @@`А` ` p` @` ` ```0 @@@````p` @ @@ @ @` @@pp`𐐐pppp𐐐p px`𐐐𰰐```аpࠐ``` p``````  @`@@@@@@`@@ ` ` p pP@@@pppppp`p0P@@@@`p@@@@@ @@@@@@ 𐐐```pp``@@@@@ p````p @`@@@@`@@@@@@@@`  `HpȨp &"M";;"cha" &*"M";;"cha"ʰ"8E3": &"CHAOS"ʰ"8E3": '"23637+256*23638+5": '!U\N#FJX?????????????zł|S[kV8q8S 'y"23637+256*23638-0065"::deliner  !JX0X!n!&#n!&n!'#n!&"B\>2D\ ' ~64000:"23637+256*23638-71"::AUTOCHARS*v\!?~/wy *v\%"6\>jmw#wL>cw#w#>kw#>>w#>6w 'y"23637+256*23638-0065"::deliner  !JX0X!n!&#n!&n!'#n!&"B\>2D\ ' ~64000:"23637+256*23638-71"::AUTOCHARS*v\!?0;      %"9E3":"1550":"1560" #O;O,O;I;I;(32 -M$)/O2;M$," P R E S S A N Y K E Y ":N=OIO:.03{u\,I0:" ":ïN O5 E;:CC=O::S=O3:" SSTV PICTURE PRINTING --------------------- picture from drive/tape  Store inset picture Combine two pictures Erase picture store Brighten picture Add greyscale Create outline (line border) Display picture on screen Print picture picture to drive/tape picture from convtr. drive Display picture via convtr. Return to OUTLET Press [SPACE] until the bar reaches the required option then press [ENTER] to select.",,,:"",O:O,"":-"",O:O,-"":O4,O6:"",O:O,"27":-"",O:O,-"27" e"23658",O:G$=:G$=" "I;S,I,,:s=s+(s<"16")-(s-O3s="16"):O;O7;I;S,I," " 2G$°"13"T d"S*100" ,:"9600":DRCLS:I0,O8;" PLAY THE TAPE ":"" 6:DR#O;I,"11";" LOADING ":*"M";DR;N$ @?"1550":I,O;"Decompress? [Y/N] ";Y$:Y$="Y"Y$="y""9930" ^M$="Picture loaded": 0"54476":M$="Inset picture now stored": *"54539":M$="Finished combining": X-"54212":M$="Picture store cleared": *"54707":M$="Picture brightened":  '"54365":M$="Greyscale added": ("54621":M$="Picture outlined": O4:I:CLS:O8,O;" Pressing P while viewing the picture willthe part visible on screen to printer so initialize your printer interface below now if you think you may use that option or just press Q.":"9700"::O8,O;"Use arrows to scroll picture'P'..will the screen'M'..will return to menu------------------------Press any key to continue.":#O;O,O;O7;O;I,,,,:I:O:a$="54896":a$="p""9769" ;:O7:O:"9100":I0 L"9700":K$"Q"O,O;"Title of picture ?",t$:#O;I,O; "Printing picture...SPACE cancels":"53982":I0;I0;°"13";" ";T$;I0;I0;°"13";"(c) C. Grant DIXON":"9100":M$="Picture printed": $"9600":DRN$"32768","16384" EDR#O;I,O9;"Saving picture":*"M";DR;N$"32768","16384" ""1550":M$="Picture saved": W#O;I,I;"Loading picture..SPACE cancels":"54247":M$="Picture loaded": x%"9650":DRCLS:"12";"";DR:DR "9100": _#O;I,I;"Stored picture.. SPACE cancels":߰"191",O:"54413":"1580":"9100": 223,207:223,207 255,207:255,224 " , 191,16 6 ; C=I:: @O7:O7:O:O:O,O;"  1987 C.Grant Dixon This very fascinating  programcan link your Spectrum with an SSTV (slow-scan TV) convertor.The details are in the precedingtext file:SSTV INFO. Without the" J "convertor you can still load 3demo pictures from this issue:-'Ambleside','Self','Markethall'.These have been compressed forOUTLET so you must enter 'Y' in answer to the Decompress? query after loading. You can print thepictures or display them on thescreen. If used with a convertoryou must remove the REMs in line1550, 1560 and 1580 just leavingtheinstructions there.":"8955" " O:K$= "K$="R"C=I:I0 "jK$="C""65367":"9988":#O;I,"14";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "UK$="N""65367":"9988":#O;I,"25";"NEXT":*"M";I;"cat" " "8905" "`"23658",O8:#O;O,O ;"RUN PROGRAM CONTENTS NEXT ": #(:O,I,O2,O3,O4,O5,O6,O7,O8,O9,I0,T,C,CLS,BD:"23658",O8:ç,,"2",,"4","5","6","7","8","9","10","20",I,"1595","9600" #+M$="SCANDUMP-SSTV printing program": %A"32590":"9988":"9920":"9994":"9986":"9E3":"8E3" %"FILE NAME? ";N$ % "DRIVE No.? (0TAPE) ";DR: &"23658",O:#O;O,O;"KEMPSTON E I'F 1 BAUD=";BD;" OPUS USER DISCIPLE QUIT" &O:K$=:K$="q" &K$="k""9772":"9790": &#K$="b""BAUD RATE? ";BD:"9700" &K$="i""B";BD & #K$="i"K$="o""9780":"9790": &"K$="u""9782":"9790" &$K$="d""9784":"9790": &( "9754" &);"9785":N="55"̰"71"Ͱ"8":"32606",N:"32591":N: &,:0 &. &4 ԧ:ӧ;"B": &6/:INITIALIZE USER'S OWNINTERFACE HERE &8 @"6",: &9"23637+256*23638-0187"::K1@ 32591  !JOO>!7C>* "">!* "> ͡!= = > Ͱͽ,=~ $ >   >{= = ~# K 3 &>I°"27";"@";°"27";"l";O5::INITIALIZE PRINTER + LEFTMARGIN 5 &"23637+256*23638-1683"::SCRTV1+2  !Jɐ        A*@ s1!6@!">͸*͏T!5͸>{!!"*~*҅o~2~*҅o~!o:w#*>o"8*#" 0 "ͬ!~#zš> > !~#ï!~#ûs1!@6# x{s1!>ӿ4B{۟w#d* + +۟4p*۟@B *T>/s1!{w#ppm{s1!4Bڰ͹ ʘ{~ӿ#d*»s1!!@@~w###{s1!6@!@!@!58!!@>@wC@!w#N{s{!͍!͍!͘!͘{>w‘>w#œ s1@!!~o~w#z{*S~2O:/A 6w8$# y@8Gx08*҅o~*>o"@y?ox0gxox@g! ":\6* ,,}A0" --y" %y"(X $|0"Ͷ Opm !@@!WW! @@>. Y= zXW>i $= |g!WW>.= z?W>. %= |g*nGnz# y@8̓# ̓S~2O:/A 6w8ʴ$*.nG/n*zx08*>>z>x08  &Y"23637+256*23638-0033"::SSTV DCOMP  ! ~????~# x &"M";;"sca" &*"M";;"sca"ʰ"9500": &"SCANDUMP"ʰ"9500": '"23637+256*23638-0184"::UDGS  !JXX?????????????zł|S[kV 'Y"23637+256*23638-0058"::*v\:f\<0&K=\ 2B\ 2C\ 2D\"\6>+!s=\v!5J ' "64E3":"23637+256*23638-148":: AUTOCHARS PLUS !*v\%"6\!?~/wy [v\!P > ^#= 0R6-U^ kk6Yuh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >z@iʒ SSTVPRINTINGPROGRAMbyC.GrantDixon ---------------------  \\T xpg irlly\utinantrts\ n ut Sct an\SSTV s}n-nrr. I} ad\an d an and\ippetthmp\cs. ^W  t pgm, \l apao t sce wch\iirllexpry. Now\ac bcng\LOAD FROM DRIVE/TAPE. T the\ci tisa:\\\\ 1. Self.. ci my\ rksp\\\ 2. Amb.. T bd\ H o t bd\\\ 3. Martll.. i t\ nt oRoss-on-W\ ^I Disp ootr\dt-tpnr\[t ua pninrs\˪bOUTLET en\add- BC] } pnt 128\128 c bcng\t PRINT opo wcut\ESC,"*",5,n, ՘ wca\1:1 asco.Y } OUTLINE\t c anal BRIGHTEN\t c.Tua ald\gys} anrntly\cnt c. T|ck\ t o c ll\ af or\d.\\INSERT ca64 64 l\i wcii \sܦ. Tl i t\un iiorwt ot\ ^\mistcoff. Ung\t COMBINE nco }n\p tsli i t\ft-nrot in\i. A bc ip\t ghani emp-\ iton; it m-\c itry\panefciobid.\\SAVE l t c \d o, an} al\CATALOGUE t d, t\.\\LOADING c f t s}n-\nri̢ sal\pnriarwch\t Sct o inand\o trt. Ttis ^\u nt c |c \t s}n-nrspy\i t ua y. I } pply\ttpcܛtth\instco ֨`6.00\[ t addsat end\otx- BC]\\Lastlt it t\tnst c t\Sct scen. T c in\ri128 128 ls. On\t scen, c is\pnb4 4 tof\ts. Hen t sce } only\sp64 48 ls. Bung\t ua sclny}n\ժ t c acst\sce antexpԦ t\nnt. ^\Ica a INSET c\anCOMBINE it }n\scl u t frr\anoimpso of\wt ܎ c oks\, tugan-\ion. Y } rnt\rbun"P" mt\sce pnr. [I \adt sn~rOUTLET gh-\m˲n wcus\ESC,"k", n, npnt-t\wcisghtlsttcd\lly.- Disp ury\ exnbpng\ 9769 tt SAVE SCREEN$\u¢ ( a\RETURN at enot !)\nt ascas\t rc- BC] ^Well, t iis....I Ф u\ a enғb ¡ png\tt cs. I } ly\anouow ps,\Ȣ ceto sc\o ish. Lastly, }n\I gsu B/W ռr\tt uռr\spnt canew\t ռf sn !!\\\C.GnDIXON\Kyr'Css\Persw\ROSS-on-WYE\Herds HR9 6LD\Tel:- 0989-62715.^ng\tt c@d"9E3":#:"You'll probably rarely need thisroutine but I've found it usefulto add an exit to a program areawhich otherwise would need largenumbers of ""IF INKEY$..."" lines.To use it in your programs pressE at the title page totherest of BASIC leaving lines 9988and 9989. Enterand an INPUTwill ask you for the line numberand statement number in the lineyou want to exit to and which ofthe keys you want to detect. Youcan select ALL keys if you wish." "You can then DELETE line 9988 toleave just the SUPA-QUIT code inaat line 9989.SAVE this andMERGE it in your own programs asneeded. You just put 9989at the start of the program areafrom which you wish to exit. Thecode is then operating.":"5E3":: "The code is automatically turnedoff after any exit. The code canalso be switched off (say at theend of the program area)by usingRANDOMIZE 62958.The code is 87 bytes starting ataddress 62933 and also creates avector table (read INTERLUDE #15for detail) from 62464 to 62720." g"Pre-customising has been used tomake SUPAQUITsimple to operatebut if you DO want to vary it inoperation:- 62998/9,LINE(inthe usual double-byte order (seeOUTCLASS #10 if you're not sure)POKE 63004,STATEMENT. To exit onANY keypress enter62977,0:POKE,62978,192 or a selected keyuse62977,'(KEY)' thenPOKE 62978,200.":"5E3" h:"Finally, note that, because thisroutine enables your programs tojump to ANY statement in a BASICline, a jump can be made to say,a command AFTER aor a REM!However, in the case of REMs youmust remember that, when editingthe line, any numbers(not withina string) won't have the binary-encoded decimal values added andyou will get odd error messages!For example, if you had a line:- 500::4:and you exit to statement 3 thenyou will get 'nonsense in BASIC'or a similar message because the4 of4 will not interpretcorrectly.The solution is to use""4"" or a variable. - BRIAN":"5e3":"8005" I#O;O,O; " PANY":I:O:="P""9800":"5E3"  @"9994":"9986":"9E3" E:ڧ:I:O:: " Now and again you must bend the rules to overcome a difficulty!gabo wxttdasnlsines. If you need to alter some BASIC routine to exit to another area of the program it's usually not too difficult to enter an extra key detector in a command loop. Occasionally though, especially in a 'dynamic' series of lines, this would require many to detect a keypress at all the points in the routine.SUPA-QUIT is an interrupt-driven machine code routine that transfers the control to a chosen BASIC line.":"8955" " O:K$= " K$="I" "WK$="C"#O;I,"10";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "K$="E"#:"9990" " "8500" "y#O;O,O ;" ERASE ALL BUT SUPAQUIT GOSUB   INFO CONTENTS(LAST ITEM)": #(0"23658","8":"9e3":O,I,SET,ZX::ç,,O,O &HSET"9891"-ZX:: &z#O;O,O; "KEMPSTON E IFACE 1 OPUS ZX USER'S OWN DISCIPLE QUIT" &|O:K$=:K$="Q";: &~-K$="K";:"9883":"9895":SET=I:"9800" &"K$="I""BAUD RATE? ";BD:"B";BD &+K$="I"K$="O";:"9887":SET=I:"9800" &-K$="U";:"9888":"9895":SET=I:"9800" &-K$="D";:"9889":"9895":SET=I:"9800" &!K$="Z"SET=I:ZX="8":"9800" & "9852" &:0 & &ԧ:ӧ;"B":"9895":ԧ:ӧ;"T": &=:INITIALIZE I'FACE HERE, ALTER9895NECESSARY... &@"6",I:"9895":@"6",O: &"23637+256*23638-0129"::hurrydump  >!"[K[*6\y_y@W`(< =O# >2[ Hx > :[:[2[ >2[> :[2[ &9°"27";"@";°"27";"W";I;°"27";"l";°"4";°"27";"Q$": &"M";;"sup" &*"M";;"sup"ʰ"8E3": &"SUPAQUIT"ʰ"8e3": '"23637+256*23638+5": '!U\N#FJX?????????????zł|S[kV8q8S '"? ";L'"STATEMENT No.? ";S'"KEYPRESSCAUSE? (JUST PRESS ENTERANY KEY) ";K$:NX="23637+256*23638+120":NX,K$:NX+,""+("8"ïK$):NX+"22",(L/"256"):NX+"21",L-"256*(NX+22)":NX+"27",S: '"23637+256*23638-0104"::SUPA-QUIT  !JW>2\!6>G^>?GV:\>:E\ :F\ !2"B\>2D\v 'y"23637+256*23638-0065"::deliner  !JX0X!n!'#n!'n!'#n!'"B\>2D\ ' "64E3":"23637+256*23638-148":: AUTOCHARS PLUS !*v\%"6\!?~/wy [v\!P > ^#= 0R6-U^ kk6Y2D\ ' "64E3":"23637+256*23638-148":: AUTOCHARS PLUS !*v\%"6\!?~/wy [v\!P > ^#= 0R6-U^ kk6Y"9""8" :PSK=K$*".07":װ".1",O8:I6,O3," ";I7,O3," ":"(" ALA=LA+2:280 XBLB=LB+2:280 YSK495:A=LA:B=LB:G=(A,B): LA=A:LB=B: ,LL=L+I:O9,I2;O7;O;" ";I0,I2;" LEVEL ";L;" ";I1,I2;" " 6bװ".75",O:װ".25",O2:װ".5",O4:װ".5",O2:װ".5",O5:װ".5",O4:װ".25",O2:װ".25",-I:װ".5",O:"d" K=R:Q=Q+1:J=Q >Q=4C(J,1),C(J,2);3;0;"" =G=32 A,B;4;0;"";A+1,B;"": =G=480A,B;6;0;"";A+1,B;"": "22",I,I5,O3,O3,O3,O9,O3,21,O3,27,O5,O5,O5,25,O7,O7,O7,I5,O7,23,O9,O9,O9,21,I1,O7,I1,I5,I1,23,I3,O5,I3,25,I5,O3,I5,O9,I5,21,I5,27,I7,I5,I3,O3,O5,27,O5,O3,I3,27,"<",I,O5,"l" "28",I,O3,I,27,O3,O5,O3,25,O5,O7,O5,I5,O5,23,O7,O9,O7,I3,O7,I5,O7,I7,O7,21,O9,I,O9,O3,O9,27,O9,29,I1,O9,I1,I3,I1,I5,I1,I7,I1,21,I3,O7,I3,I5,I3,23,I5,O5,I5,25,I7,O3,I7,27,I,29,I7,29,I7,I,I,I,"<",I7,O5,"f" &"26",I,O7,I,I3,I,I7,I,"23",O3,I1,O3,I9,O5,O9,O5,"21",O7,O7,O7,I3,O7,I7,O7,"23",O9,I,O9,"29",I1,O7,I1,I3,I1,I7,I1,"23",I3,O9,I3,"21",I5,I1,I5,I9,I7,O7,I7,I3,I7,I7,I7,"23",I,I,I7,I,I7,"29",I,"29","2",I7,I5,"i" :"30",I,O3,I,I5,I,"27",O3,O5,O3,I5,O3,"25",O5,I,O5,O7,O5,I3,O5,I5,O5,I7,O5,"23",O5,"29",O7,O3,O7,"27",I1,O3,I1,"27",I3,I,I3,O7,I3,I3,I3,I5,I3,I7,I3,"23",I3,"29",I5,O5,I5,I5,I5,"25",I7,O3,I7,I5,I7,"27",O7,I,I1,"29",I1,I,O7,"29","<",I,"29","d" N="&",O3,O3,O3,O5,O3,O7,O3,O9,O3,I1,O3,I3,O3,I7,O3,I9,O3,"21",O3,"23",O3,"25",O3,"27",O5,O3,O5,"27",O7,O5,O7,I3,O7,I7,O7,"25",O9,O7,O9,"23",I1,O5,I1,I3,I1,I7,I1,"25",I3,O3,I3,"27",I5,O3,I5,O5,I5,O7,I5,O9,I5,I1,I5,I3,I5,I7,I5,I9,I5,"21",I5,"23",I5,"25",I5,"27",O9,O5,I3,"25",O9,"25",O5,O5,"-",I,I,"\" Y61500< c'LVS=LVS-I:615g:LVS619k dMO5,I0;"LOST A LIFE!";O8,(" "-D$)/O2;D$;I1,I1;"SCORE:";S:I:"":"d" i"618":I,I;"";O2,I;"";I9,I;"";T,I;"":F=O3I7O2:F,1;" ";F+1,1;" ":F: j O2:O7:O,O;X$;"";T+I,O;X$;#O;O,O;" Q=up A=down O=left P=right  LIVES: ";LVS;"":F=IT:F,31;"":F:O6:I: l7O5,I1;"GAME";O8,(" "-D$)/O2;D$;I1,I1;"SCORE:";S m.2~L,O:.2~L,O2:.2~L,O4:.2~L,O5:.2~L,O7:.2~L,O4:.45ffff,O:.2~L,O2:.2~L,O4:.45ffff,O2:.2~L,O4:.2~L,O2:.325&fff,O qSH(I1)"2":"656" v.I3,I1;"HIGH SCORE";I6,O9;"ENTER YOUR NAME" {N$(I0):">";N$ }F=O2I1:S>H(F)S27\!6 %"23637+256*23638-0177"::actionUDGS  !JXX0ggp p??<||<>>??wk?>|~qaq`pczV||Tu%%%%<~~<S[kV %^"23637+256*23638-0038"::sound1  !JHH! ͵# %y"23637+256*23638-0065"::sound2  !J<0<:H\& .U\RR}8=g= x &"M";;"tim" &*"M";;"tim"ʰ"8E3": &"TIME4ACT'N"ʰ"8e3": '"23637+256*23638-0185"::udgs  !JXX$$B(B(4HD(0 D$?????????????? '#:"23561","10":"23562",:::::"23637+256*23638-0135"::T+SK62193  !Jv>G^>?GV*I\"l\*[\ :\ (% >2\BDM[Y\R8C[\}> 2\> 2\ T]*a\++R8S[\}> 2\ ' "23606","`":"23607","" ' I"23637+256*23638-0785"::GRAPHIC  !J``66$lllll>X>|0f8l8vv0 000 0 0l88l~0<< 0`||8~f<0 0 ~~0 0b```b>lffflbhxhbbhxh`fff~fff~~ xflxlf```bf||ff|``|vff|lff:|fffff>|p0<666v8<f<`flxl8<lffff|~L2~pppv8DD8< f``f<>f:|fffff>|p@ c#:"9E3":"  T O P L I S T The TOPis 42 bytes at62674. It's stored in aatline 9950 so use9950 to move the into position and switch it on. You can switch it OFF with62694. Itis interrupt-driven so cannot bere-located without alteration.Ifyou want to use it with otherinterrupt-driven routines using MEGATRUDER  in Issue 15 then dothe9950 and then use:'name'62701,7. You canthen link it with other codesusing  MEGATRUDER . 62701 is theaddress.I've not tested thisto see if there are any problemsbut the code is so short andsweet it should be O.K." "7E3" y "I'm still assessing the code butI'm beginning to favour it more and more. It may seem odd atfirst. Like so many of thesethings it's a matter of taste.It's operatingnow so you canBREAK in and try cursoring downtheto get the feel of itif you wish.to re-enter theprogram and the code will beswitched OFF automatically when you exit to CONTENTS/NEXT ITEM." "As usual, theat 9950 can beextracted by pressing E at thetitle page tothe rest ofBASIC, thenandit inyour own programs. As it's anediting tool it can be removedfrom finished programs. - BRIAN":"7e3":"8E3" XN#O;O,O; " PANY":I:O:K$=:K$="P""9800":"7E3" : @"9994":缧:ç:٧+:ܼ:"6E4":"9E3" :"9950" :"" T" ZX BASIC has much that should be standard on all BASICs,e.g. syntax check on input; better string slicing than the awful mid$ and command tokens saving memory and speeding up entry!! One thing I don't like is when youa,EDIT a line and ENTER,often the line drops to the bottom of the screen or off-screen,slowly scrolling in at the bottom,obscuring the GO SUB you're examining! TOP LIST is not ideal but does keep the line at the top of the screen.":"8955" " O:K$= " K$="I" "bK$="C"#O;I,"11";"CONTENTS":"23608",O:"62694":*"M";I;"CONTENTS" "MK$="N"#O;I,"24";"NEXT":"62694":*"M";I;"tim" "K$="E"#:"9990" " "8905" "m#O;O,O ;"ERASE ALL BUT TOP INFO CONTENTS NEXT": #(0"23658","8":"9E3":O,I,SET,ZX::ç,,O,O &HSET"9891"-ZX:: &z#O;O,O; "KEMPSTON E IFACE 1 OPUS ZX USER'S OWN DISCIPLE QUIT" &|O:K$=:K$="Q" &~-K$="K";:"9883":"9895":SET=I:"9800" &"K$="I""BAUD RATE? ";BD:"B";BD &+K$="I"K$="O";:"9887":SET=I:"9800" &-K$="U";:"9888":"9895":SET=I:"9800" &-K$="D";:"9889":"9895":SET=I:"9800" &!K$="Z"SET=I:ZX="8":"9800" & "9852" &:0 & &ԧ:ӧ;"B":"9895":ԧ:ӧ;"T": &=:INITIALIZE I'FACE HERE, ALTER9895NECESSARY... &@"6",I:"9895":@"6",O: &"23637+256*23638-0129"::hurrydump  >!"[K[*6\y_y@W`(< =O# >2[ Hx > :[:[2[ >2[> :[2[ &9°"27";"@";°"27";"W";I;°"27";"l";°"4";°"27";"Q$": &s"23637+256*23638-0059"::TOP  !J*!6>G^>?GV*I\"l\ &"M";;"top" &*"M";;"top"ʰ"8E3": &"TOP LIST"ʰ"8e3": '"23637+256*23638+5": '!U\N#FJX?????????????zł|S[kV8q8S 'y"23637+256*23638-0065"::deliner  !JX0X!n!&#n!&n!'#n!&"B\>2D\ ' z"64E3":"23637+256*23638-71"::AUTOCHARS*v\!?~/wy *v\%"6\>jmw#wL>cw#w#>kw#>>w#>6w 8S 'y"23637+256*23638