(@$`~w#~w~/W#~вw@N 'N @@@@N 'N @@@@N 'N @@@@N ' OUTLET  CONTENTS !.bas /<drivechat=Deditorial EkinterludePlletters1 lookaheadxmeg outboard @outclass output #pro $@run A]tra ^_DIGIFIX u`bINDEX ,ceVIDFIX hf|adventure}cra \dec decplace W+lcc7 ,\out ]sho lcc8 `JIG! lookout OUTLET & "9930" N=" "̯"4"ͧ*:.02{# =,N:N:"(":X$:"9986":"23658",O8:I:I:٧+:O:O,O;"THESPCRUD R I V E MAGAZINE 1988ISSUECHEZRONNo.015S/WARENOV88"   "EDITORIAL....A LOOK AHEAD...MOUTLETTERS...B ADVENTURE!...NPRO-SPACER...C DECPLACINFO..OOUTBOARD.....D DECPLACER....PTRAKTRAP!....E OUT-TAKE 05..QLOOKOUT!.....F SHOPNLISTER..ROUTPUT.......G CRALDONCREEK.SINTERLUDE....H JIG!BLOX.....TMEGATRUDER...I INDEX..UOUTCLASS.....J run..........VDRIVECHAT....K RESET(0).WBASPEEK......L Eds:R&B.CAVERS__" "editorial","letters1 ","pro","outboard ","tra","lookout ","output ","interlude","meg","outclass ","drivechat","bas","lookahead","adventure","decplace ","dec","out","sho","cra","JIG!BLOX","OUTDEX","run","0",ç,,"8","23608",ç,"3E3","23728","65368" ("WELCOME FROM OUTLET!!"," 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");" " iK$="T"װ".05",*:װ".1","20":M$="PUT ISSUE 4 OR THE DEMO SAMPLER IN DRIVE 1, LOAD JIG!BLOX THEN LOAD THE FRESH PICTURE FROM THIS ISSUE.":"4E3" kK$="U"װ".05",*:װ".1","20":M$=" LOAD YOUR MOST UP-TO-DATE COPY OF 'OUTDEX' (ISSUE 12) THEN LOAD THE NEW DATA FROM THIS ISSUE. ":"4E3" xfװ".05",*:װ".1","20":X$=" ONE MOMENT PLEASE...":"65491",O:G:NIF,K$-"@":NIF=HO XC$(K$-"@",*)"""23606",O:"23607","<":"9988":G-I:G:*"M";I;C$(K$-"@") ,*"M";I;C$(K$-"@") %OB=(K$="D"):"9986":OBO:O:٧+ 8O::C$(K$-"@")="output "ڰ"5":I:"34591","" 6C$(K$-"@")="adventure"O:ٰ"4":I:"34591","" PG=I 8OB;:"23692",O:"21",O'""+(" O U T B O A R D Nov., 1988 "ƺ((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,"31";" " 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" l)I;I;"BAUD RATE? ";BR:K$="S":"1800" g#O;I,O;(M$="L");"   ":X$=" "+M$(̧*)+"":"9995":"9997":"65490",I:"65491",O:G:X$=M$("11")+". PRESS ANY KEY OR A TO ABORT... "+M$(̧*):"65491","4":G:J$=:"9988":"34567":G:װ".02","2":"9997":"65490",I:"65491",O:X$=" ":G:"4500":J$="A"  "120" W#O;I,O;O;"           ": &S"9930":"9988":"34567":G:"9994":"65203",O:"65201","&":"65202","" &NIF="ER""9994":"9915" &þNIFžNIF>H* &(K$=(NIF+"@"):"23658","8":"300" &"23560",O:M=OI:A$="123456":N=I̧+:R=(*A$)+I:"9920"+A$(R):Y$:J=OM:U$,D$:J:I+(+M);("5"M);(IM);*+Y$(I),"9"+Y$("2");U$;I;ٰ"5"+("2"M);"11"+Y$(I),"9"+Y$("2");D$:A$=A$(R-I)+A$(R+I):þ"23560"N:"2":M:"9915" &"23676","": &"11","A","","","" &"03","N","","","" &"06","Y","","","" &"41","K","","","" &"33","E","","","" &"35","Y","","","" &KH="23":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 '"23637+256*23638+5": '!U\N#FJX*v\"\6>+s=\vB<xDBBDx~@|@@~~@|@@@>BB<DHpHDB@@@@@~BfZBBBBbRJFBjmw#wL>cw#w#>kw#>>w#>6w ' "23637+256*23638+5": '!U\N#FJX>2\͛#N#F4>>>>#>>>~:\ x *K\>Xn #^#V#v #~(~( :\ x !O > + BBBBB< mw#wL>cw#w#>kw#>>w#>6w ' "23637+256*23638+5": '!U\N#FJX>2\ @ "8970" d'"7":ڰ"7":I:O::"8960":'" 1.LOAD A BASIC PROGRAM WITH A HEADER (NORMAL OR FALSE) 2.LOAD A BASIC PROGRAM WITHOUT A HEADER 3.RE-EXAMINE A PROGRAM ALREADY LOADED 4.QUITDOUBT,LOAD AS HEADERLESS AGAINMEANINGLESS!";#O;I,"5";"SELECT 1, 2, 34" O:K$= ,K$="4""8E3" K$<"1"K$>"3""200" R:K$<"3"#O;I,"8";" PLAY THE TAPE ":"9989":K$="1""9989" \<"2 = Screen Print. 3 = Hard Copy ";S:S<"2"S>"7771" ]S="9800" ^R"ADDRESSBEGINJUSTPRESS ENTERBEGIN START";P$: P="40001":P$""P=P$ aC=P b.LN="(P+1)+256*P":LL="(P+2)+256*(P+3)" c[LN>"4"#S''"TOTAL BYTES USED = ";P-C:#O;I,"8";" PRESS A KEY ":O: d#S;"4"-LN;LN; fF=P+"4"P++LL gF="13""7786" hF="14"F=F+"5":"7786" i #S;(""ƾF<" ")+(¾FƾFȯ" "); joF:#S;°"13";"";LN;" ";P;'#O;"EXAMINE, QUIT OTHER":O:K$=:;:K$="E""7789" k K$="Q" lP=P+LL+"4":"7778" mq:"7790":F=PP+LL+"3":F;" ";F;"10";(¾FƾF>31):F:"7790":#ç;,ç;"Press a key to ":ç:: n-#O;O,O;"LINE ";LN;" ";P;" = ";LL: @A"7":ڰ"7":ټ:ç:"39E3":"9994":"9986":"8960":"8970" J'" BASPEEK  loads a BASIC programfrom cassette as code into high memory so it can be examined. Itcan load unmergeable programs,programs with a normal header, afalse header or without a headerat all. It CANNOT load filessaved at high baud rates, i.e. the so-called hyper-loaders." T "The loaded BASIC can be LISTedor every byte examined for falseor hidden code to help in thetransfer of programs to drive.Read Chris Oliver's article inDRIVECHAT on this topic.I've putsome info at the end also.-Brian":"8955" " O:K$= "K$="R""d" "WK$="C"#O;I,"14";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "WK$="N"#O;I,"25";"NEXT":"23608","13":*"M";I;"CONTENTS" " "8905" "b"23658","8":#O;O,O ;"RUN PROGRAM CONTENTS NEXT ": #0"": # O=ç:I=:SET=O: &HSET &z#O;O,O;"KEMPSTON E IFACE 1 OPUS ZX LPRINT III DISCIPLE QUIT" &|O:K$=:K$="Q" &~K$="K""9881": &"K$="I""BAUD RATE? ";BD:"B";BD &K$="I"K$="O""9887": &K$="L""9888": &K$="D""9889": &K$="Z"SET=I: & "9852" &"9883":"9891": &:0 & &:1 & & ԧ:ӧ;"b"::"9891":ԧ:ӧ;"t": &B°"27";°"27";°"27";"@";°"27";°"27";°"27";"l";°"27";°"8": &@"6",I:"9891": &&SET=I:°"27";"@";°"27";"l";°"8": &"M";;"bas" &*"M";;"bas"ʰ"8E3": '"23637+256*23638+5": '!U\N#FJX?????????????zł|S[kV8q8S 'F"23637+256*23638-0014"::loader  !@7>V ' {"39200":"23637+256*23638-71"::AUTOCHARS*v\!?~/wy *v\%"6\>jmw#wL>cw#w#>kw#>>w#>6w ?? m*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >zՊrώladrivechatdrivechatdrivechatdrivechadrivechatdrivechatdri--chatdrivechatecha___________drivectdr-----------hatdec-------------ivectdatdr--e \\PnpoMonTa S/\ D. Par2 bChOr\--------------------------------\\Conin֨o lnin\}st ft tt m\oa~pnpu th\d.... ^\I snth'isoOUTLET\ pĘ aar\wcl l wrof\anpg e al\trst. I t ool~ys\w ªlsy\ansraupng\s, tcnanghng\annadoբy, t\pڨcosės\in Baa(Mer-\pod, our!) anis\fl un؟ t\stts. Tco\s cc , w, st\Baadni l\pڨcon, ai ˘d\awcifnt\tt orms! ^Firs in Bapg:-\MERGE rk,n'sir\iiesn't. T mpsy\I koanan-r\ipĘbt ROM ang\u¢, wcaltugt y-\s}nnu¢ ibd,\fencck if\t BREAK m iing\psd.I sts,\al e iLOAD""\ant CapanS ys\at enot ad. Ig֦\aners an u\ rpt pg, t\topc— it's\sb ai ty\tutn \efct. Alrªly, զ\ps}tul \w uow a(˘ of\ur o t of:- ^ SCF ;f"LOAD"\ LD A,255 ;f"PROGRAM"\ LD IX,23755 ;pSTART\ LD DE,3000 ;pLENGTH\ CALL 1366 ;}l LD_BYTES\ RET\\Cn t sraddsif\sranula\զ ac匨 pngttn\t 3K es‡d,f t ar\ar. Wint sits\ow ar, ac u˘\any-ps!It'adčb \pnt sn al\and (e.g. w\in o w r).\\Nex n ۡ s\ inrow pڰn\t tBapgm. ^Reժ anirnch\ats, urs, s\fendan(t}uon) ؟s\ t sys ab23552 \23733. T Bani a\stight-rr'Ran̻ USR\mr' n'tst\cftpڨcost, \cautt inb\byot m tt\minrptiaۡ-\tnel. (Cp24 ot\Sct Maa expinw\mra sܦd). He'a\tt owI an: Run\irsbGOTO 10 t GOTO 40\ 10 LET a=32768\ 20 PRINT "= ";a\ 30 LIST 10: STOP\ 40 CLS: POKE(16+PEEK 23635+ 256\ *PEEK 23636),192:GOTO 10\ REM (sroBa+ 16) ^T ؟ed 128\ agtt se\o"a" e insct\aca by}llby\inrn in t pg\ a insncas:-\\ 11 FOR n=VAL "23755" TO VAL\"24000": PRINT n;" ";PEEK n;" ";\CHR$ PEEK AND (PEEK n> VAL\"31"): NEXT n: STOP\ REM Don'ot 'STOP'!\\[OtrBASPEEK ln- BC]\\Paen ii lw\t pthugun t te\anaddst ˘ is\rd. Lt ˘ \taddss. Ne sfy\ngth. ^Don'sxnth'thll-\ininsllnwcll\a t e rs!\\ - Chs\\[S al BASPEEK wclws\DRIVECHAT i tisebng\ e BASIC sngin\il. - Ban].^\anaddst ˘ is\rd. Lt ˘ \taddss. Ne sfy\ngth. ^Don'm*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >znNjnisk. - Ron & Brian ************* 3 ****************      \Tnt uncatr\ro oOUTLET-o }st at\`2.75! No tro n't\ f dawР t\pgm} tnsrd\ngly. Ikan th\Sctm/Cast t-uu\ghl t t ows! ^OUTLET pgmuall an\ERASE a 9980,SAVE(d)at\9982 anw, SAVE() a9983\(ۡ¡8980, 8982 an8983).\\A ly-ocngi SEAL\RESCUE(#10)! Corcth: BREAK\t u EDIT -m\1515 1525, t ol\ 1515 (sty 1515 and\ENTER) t -SAVE t pgm\unRUN 9982.\\At g-i REMSTORE. If\t ˘ s sܦ s\anat enty'l \ig֦d. Ttt\ipb sada\by oane(!) \t enot ˘. ^Joh Lubst2 errtt\cpin VIDLIST pgm\(#12)afienOUTLET\- o ˪i OUTLETTERS\snt} rct\tbunBREAK anMERGEing\i VIDFIX f tis(Cart.\B oeno).\\DNOT -SAVE VIDLIST o t\OPUS DISK ro oOUTLET 12.\T' o o t s r\e ext bys! Sa it\o s sk.\\ - Ro & Ban.^T\- o ˪i OUTLETTERS\snt} rct\tbunBREAK anMERGEing\i VI&m*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >zeډ8eؕ>R`+Bg['/*y@ is like LOOPC with the addresses reversed(Put AUTO-LINE NUMBERING ON again first with I10 !!)...  \ Z80 INTERRUPTS bBa Cars\ ------------------------------\\T xpg "MEGATRUDER" by\AntnPo ipg t\nranib u¢\ "inrpt-dn" u\n'HAVE ki i w\inrptncon. Sll, it\em ooprt\expi tr tЧ\osghtlզ adnin\c ˘ t rnt\OUTCLASSes. I}nlw\tarc w,ˡ |c it\i nths! ^W t Sct istcd\o iinslnna\c ˘ pgm- to\ouow ot ROM ong\sys u¢s.Mannddof\tundoinstcona\mpcnd.Er50th\ont Z80 pڗsr\inrptt pgm;mps\t rninstcon;bs\rtinrptan}lla\bu¢ Φ ning.T\a t inrpsys is\biit bu¢\nt 50toa\nil inrpitlf\an in a endsop!Mo\o tr. T inrpons\a tt, tsrt\bu¢,t i pg es\aad,engltubak. ^SI' aeu¢s\tt adcª"srt" and\"ib". Noal u¢a\ullnr ing\inrpt-dn. A u¢ tt\}l冨t oPI \500 pemp,\iocl50 ¡a\nd. Anytnincnng\BEEPial ott u if\aoanoch\nd. MuCAN inrpt-\d onlbunna\nfgno֨ ery\50tontnt\n on|ckgund\. Empou¢tt\ARE ib d by\inrpta y, ccks, fe\r(ai Metr) and\ennent ath\SKIPPER (Is9). ^T empa pgmng\uºe- nnw a\pgmni BASIC ny\c ˘ pgmu\inrpt t u¢s\"at ¡", rrly\mra tis\t t sˤ ots\arc (ant t sˤ\omexen i fnkly!)\\T Z80 3 inrp՘s.In\InrpMo 0 t mor\add-o rd  p a\ng instco by o t\~ s(uallRST)wct\Z80 t ctlpڗss. T\Sct eexpits\}taltugI pا\tadd-o rd ul(Ds\an kw?). ^InrpMo 1 alymp\adds56 (0038H)i t ROM. On\t Sctm, t u¢wch\sra56 at yard\anup~ t sys cck.Ts\it r on՘.\\Mo 2, i Mo 0 i tt\t moext rd\tby o t ~ t\ it'a instco t\t by oa adds(t\gby ii t I Res-\DOUBLE-BYTE i OUTCLASS 10).\W a inrpocrt Z80\}llbu¢- ctly\at addssat\addsrbt 2 byAT\t iaddss! TINDIRECT\addsnikw acr\addsng. ^PerpI } cftth\a emp: It i on\t ~ (t by) and\250 i t I Res(t gh\by) t 0 + 250 256 = 64000\aniPOKE 99 in 64000\an250 in 64001 t 99 + 250\256 = 64099 c¡ t\ii inrpt mr\ulo a64000, nt\caddsi64099 an}ll\wbu¢  t\a64099.\\Let'nrt asmbr\na (In' an\asmbt'o i Ise\12).\\Firsoall, t' a\c ˘ u¢ a65000. ^Awadds} p t\cr? Ca u 64700? Well,\t gby o64700 i252 \ } l252 i t I\Reswl \o t ~ rnt w\by? T Sct itlts\255 o t ~ mr\tMAY alit is\anytnpgin t ed\ncr. Fot աn'll\t'tnatc\'l 255 o t ~ s.\Tl t by ot\addsoc a\ addstw\by o255.T as 64700\i64767 t'exnt\ttat caddss\an65000 at addsor\hyt} u¢. ^He't asmb stch\ InrpMo 2 anct\inrpt u¢:\\\ LD A,252 ;gby o64767\ LD I,A ;i t I Reg'r\ IM 2 ;InrpMo 2\\\No t}n'at I\Resctlte\st rsin\t A Resr.\\Easisn'it? T aʪ } \aannenaddsin\pc— l p|blg\io t enonnof\t aca c ˘ u¢\n inrpt-dn. ^Now, Φ nnt aʪ \srsPOKE 64767 t232\(t by o65000)anPOKE\64768 t253 (t gby of\65000) t s ۡ\adstnt bu¢.\\No tansruin\bu¢ l Ť any\rneta i tЧ\srs. Remr, er50th\ond, ghi t dd\opgm, erytnis\"fڮn" w t bu¢ is\}lanianse\e cnw t\pg it ill\p|blcsh. Let' u\t A, DE anHL sronly.\At srou¢ \sulu:- ^\ PUSH AF\ PUSH DE\ PUSH HL\\ant at en u:-\\ POP HL\ POP DE\ POP AF\\Y } PUSH t sro in\anorsPOP t off\ai i t ecREVERSE orr\and, our, sinc\anotsru\i uow u¢s.\\O ottniesnal.Y\mI io 2 t\inrpen ܇}lly ^\brtinrpts?Well\iesn'RE-ENABLE t AFTER\t bu¢ is\s-eb t urlf\afcinrpt. T ts\adt instco EI\(eb inrpts) at end\ouu¢.\\Don'tbnand/or\ebnntt rst\ia stc InrpMo\2 wci n "ebs" or\iauu¢. T EI\instco anitop DI\(b inrpts) srand\sALL inrptocrnin\w՘ t miin\at ¡.IM 2 onlRE-DIRECTS\t inrptelw. ^T aʪ it | \a inrpt-d u¢\rn gsp\tΦ pڗeng.\\T xin nis\wteanint\ot sys cc up~ng\w uinrpt-dn\u¢ i"ebd". Remr,\tIM 2  rt\r inrppڗ ay\f t ROM u¢ tes\ts.Y et sysm\"cck" u¢ (wcmply\up~t sys ab\FRAMES a23672 4) unss\a unuow u¢s\ at yarll\alsrinlet\yars} (mr, t\ ^yard-anu¢ it\srofw u b-\u¢ i}l- uu¢\FULLY REPLACES t }l t\y-anu¢ i t ROM.\T ll ܎ ck-\uot yard. So, iu\n' uow ys} b-\u¢ t ui u¢\t o i }l t y-\aru¢ i t ROM fm\t uow u¢- ually\at sroat end. If\iat srst\adDI instco afias\t ROM }l ENABLES inrpts\o mpon. In't,\atinrpulocas\uinrpu¢'nng\(iint 50th\ond)pna endss\r op. Nasty! ^Y }l t yarancck\u¢ tt instcon:-\\ RST 56\\\Al t Φinl r on\uSct t add\rd ot ntta\o t ~ s. Mosadd-\onn't. Inr 1, Os\Dis˪ry, Mul€ anny\զ NOT afct ~ s.\I tn t SWIFTDISK eiI\mrctly.I anent,\iimnt\p}uonany tu\kuu¢ l r on\otc(oe o ur\ow iۡ ext\rd). ^Remr, t pb itt\ۡ add-o rd ta\fno t ~ s\wcirll255 o t\Sctm. Tit by\ot caddss. I r\emp,tant inrpt\gho anyw ten\64512 64767 t addss\ou¢. T ansi\l ALL otЧ addsth\t addsou¢. Ts\i}lcb. I\l al ts th:-\\ 232,253,232,253,232,253\\(t angby ot\addsou¢) }n\ttl onlr if\t o t ~ iodd ^otrŧ t gby l \ at anė r.\I emp tul\253 + 232 256 = 59645 insad\o232 + 253 256 = 65000.\\Wl tbalytng\bu¢ aa addss\w t ganbya\t ,emp 65021 wch\i253 + 253 256 = 65021. So\t cb l :-\\ 253,253,253,253,253,253 etc.\\anwt inrpt\pڗsoki tb it\l nt ganby\oadds65021. Y } rk\otib addst\}nu te 16384 and ^32767 o t Sct aies\nntng t scen\spy.I t o Sctm\ROM t ia af 14430\ 15615 wciud. Ts\s iltt e\255 antof uaa\cb ina255 +\255 256 = 65535. Tesn't\ co bu¢\t iseugom\JR (mª) ˘\wct lnby\aadds0 (mt wp-\aunefct) }u mp\ ataddss.Unrly\t 128K cu t\ai t ROM f 14430 \15616 an isul nr\ ue i 48K ՘ oit\l csh. ^It a solng\cb tbys? Yes,\io i OUTCLASS 12 t\itunLDIR, e.g.:-\\LD HL,(64512) ;srocr\ b\LD DE,(64513) ;xaddsin\ cb\LD BC,256 ;byunr\LD (HL),253 ;tganw\ by oaddss\ obu¢.\LDIR ;llt aa\ f 64512 \ 64769 t253\\No tt b i257\addsi ngt256 as\caddsldt rsof\2-by  t rst\o "sllor" in 64769. ^INEW t mill\r InrpMo 1 t\i ժRAMTOP w\u˘ } |c IM\2 b}lnt ˘ ain. If\n "stcoff" ur\u¢ tuNEW } u\t lnu¢ wcu\} }l t USR\}ll:-\\LD A,63;|c t "rl"\LD I,A ;i t I Resr\IM 1 ;|c InrpMo 1\RET\\T} aanaddst\i pc— al t ts\o˘ } pܛtr\ r o bc o˘ wch\mial uo t x: ^64512 64768 ; VECTOR TABLE\\64994 LD HL,64512 ;l cr\ LD DE,64513 ;TABLE th\ LD BC,256 ;tg&\ LD (HL),253 ; by of\ LDIR ;adds65021\ LD A,252 ;Pugby\ LD I,A ;oTABLE i I\ IM 2 Reg'& rn\ RET ;o Int.Mo 2\\65014 LD A,63 ;rl\ LD I,A ;i I &\ IM 1 ;cMo 1\ RET\\65021 PUSH (al srud)\ YOUR ROUTINE TO GO HERE!\ POP (al srud)\ RST 56 ;ys} & en-\ RET ;ab int'upts ^Insaotnuu¢\w sw ulCALL it\f to anadur\u¢ at enwcis\p|bltpgmnand\e lw.\\Iubi rtaftt\spsN aMEGATRUDER\anaduu¢ tt! It\tut cb etc. \onle it\addsouu¢. I}n\al }l lp u¢by\}lnt o a¡ ery\50tond. Ch?\\ - Ban.^pgmnand\e lw.\\Iubi rtaftt\spsN aMEGATRUDER\anaduu¢ tt! It\tut cb etc. \onle it\addsouu¢. I}n\al }l lp u¢by\}lnt o a¡ ery\50tond. Ch?\\ J0*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *J< S>>*̞B< ![#R0~ 8~> > >z tB?{>:Ț<t&t%k׫ . ................................\\Nomr, 1988 Pa Reply\\ Ho w us...02 -\\ Kel McW.........03 06\\ AndHumphy......10 14\\ Fn Harp.........15 16\\ Joh Niclls........20 22\\ PKing..........25 31 ^ 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(Dis #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: Kel McW, Mery\\DRon,\\MaI i pt +3\ prd? I appa\t a ch} pbmt\lt a inrunt-\ab? I nrst\pgmI ninsng.\Hor, I fles\tEXPENSHEET, SKETCH ant\inpgm. T pb ems\ i t REM c ˘.\Wli sb ժ t\˘ +3 t er\ nrt?\\Filly, I p +3\owrw  t on\ t lng: ^1. nrnARTIST II oART\STUDIO (i} ̢ ung\Mul€ oinin 48K ՘\}n' opnt\ct).\\2. Gnin 48K BASIC tut\er˘in\tit'sb afm\s ar t f t\pg in 48K BASIC.\\3. Lispg pnr\wcincemdur\˘s, etc.\\4. Heli ˪ns wn\t datc 1, c0;\snaddsr apars.\\Filly,I pb eng ^temdntl/\u˘s, inl}u I\n'cwt ˘s\gh anw I, y, \o ny, I n'kwt\ p ith.\\ - Kel Mcw\ ^TKel McW f Ban\\Regtbly, a ub \ cpr t +3 as\itRo I kanytng\aut c. Tus,YOU a\t exrt! We'l rinlb-\sanpta nin\botar } only\esanro pbms.For\emp, EXPENSHEET uHANDY-\WIDE pni 51 mns\thugsta 8. W \kwd owtt +3 us\cn ~ i t as\t 48K Sctm. SKETCH ich\r pg I tn I \t gh-sce mp\˘ in t pnfr.\Ts,I e iuo t +3\i 128K ՘ bsys abs ^ ule ժ- t\w? Witut +3 c\itl } tnt\ess. Anoi ps\ises, ¡ anns\a llsttcnit\imsb u i any\pc} exen ot 128K\cs. W  tt\t sn~r48K c r\t ¡ ing. Bee , 'd\Ԫ ab p +3\ro oOUTLET!\\AARTIST II, iisb\ nrt 48K BASIC in\128K BASIC bۡ sans?If\, isul s tn\alt synot s\tLOAD, SAVE, ERASE, CAT etc.\at a carlspd. ^I ct,t BASIC i srit\ul -tyllin\128K BASIC i la ur. But\tn, aI' id, I n'kw\wI' lnauw it\ˡ t +3 oanotr\128K c madė isn't\rtch!\\T' srt- eng\emdu˘- ist\ed} anen. Iu\ alc u\ghtrp}nt \m،ly, e.g. -m\20 a 21, ent old\ 20 ant } ˪r\t o -mn21\|c 20 i wnand\} al o ai e\wt uolly ^i ˘ bs.\\Gelly, a t\ft,iˡ t srof\bc oue\ei nif,emp,it's\BRIGHT ge PAPER }n\-ent ˘s. Alys\ aneso rktt\up. I } n'kw\ t u˘s,ty\a alws:\\EXT.MODE t 0-7=PAPER 0-7\ " " " CAPS 0-7=INK 0-7\ " " " 8=BRIGHT 0\ " " " 9=BRIGHT 1\ " " " CAPS 8=FLASH 0\ " " " " 9=FLASH 1\\ - Ban ^Fm: AndHumphy, Sury\\FirsI l ic tnk\ Ro & Ba ise7,\8 & 9. I on bughs x\tld40 scantught\I ull it.NoI \ ato!\\I a allpaOUTLET is\rntmpnr(DMP2000)\anDisp aotrŧ I\uldn'tti}u\I a o otЧ tces!\\I eanausrs\oo antughis\t op tcdtt\c rrp\ar t ot~f Outt\tt Oonlrt\ ^au178K. T Disp sll\600K fo t s I\as is od.\\So op a nsxt\anզ uºeI age\twۡo ii Ise\9, Outtr2, w id:\"Kpplnmp nds".\\I's no t\auTV infen[pblin\sn t SHOUTBURST aut\on, incnmp-\us, i No.7 i } u\ nnwt\ tmr- BC].\\Aftcnl I\ۡ¡cry!(b-b). Afa\B L l n'anou ^e t ur mui t\anc ۡtno a\ ci t tr-in-\w'! Oaftcng\Gum|l RalloCann|l Run\I "sn" an— w\sI d! I e ing\ndb r in t\lnso oina\"kghr" OVER t tfc\ghts! (oitinOTT a\t)! No no w I \tconlm. I an\afRam t " tt\gng"io esn't\un|d. II r\e l i m tn\anytnr t I en\asco ul rb. Did\an unrsnt I t\tt??? ^Anlly......\\...Kut sn~r\ant |n onlof\uºe x"fn\sff" "mp nds" o.\\ AndHumphy,\ Ps Mbx:919999300 or\ G֡ aHo ilx. ^TAndHumphf Ban\\T Osn~rd ionly\178K rrd\} adsasll-\rd } uth\t Disp inr.\\T inot SHOUTBURST s\c±nt asmpo tt\on afctMORAL\CHARACTER. No tt, altugh\eollժd,uow Ռl\nconPREVENTED fm\REALLY atcnutr-in-\w, gnan odng\anզ ~nuslt u\rllght! Mci itt\iHAD atcan tn\tulalad i ur\ccBEFORE t lm!\ - Ban ^Fm: Fn Harp, Bghn\\DRon,\\I n'kiBa ted\Oro oIs13 t\I ˡ acst pbms-\\T rsiDIGIDUMP - wcit\esn't!Al w try\ pniart.\\T otit inup-~ -\w tr a~\t rt:"RAM rpt"\\Tic±sm, ly\dnatno t sght\"cp" otrŧ atr\exlnise, ngons\ th.\ - Fnk ^TFn Harf Ban\\Tnks,Fnk. I  a Os\pn}b an} st\u¢pڤrlast!\\I ul OUTDEX wng\altugI teal opont\I acpw}u I\ۡtno atr\pgm. T pb itt\HANDYWIDE u¢ wcspys\t ~ i 51 mno scen\bun#8 pnng. I o t\sta i c ˘ anit\rk tInr 1 and\t Disp ۡ an\o t Os, altugirks\rctly,i rpt\s it pg sps. It\uldn' pb oitlf ^ۡ¡s, it u\t d, ics|dly.I am\obslcant ght\cn ~ tt O\rPRINT #8 mHANDYWIDE\u¢ anI' g if\an kw ts\rctly.\\Hor, i u} I sct\tt aʪ pb it\}unt csh.I tn iy\mpl ai, i.e. a\|s t HANDYWIDE ult\ALL erssas\" rpt"!\\T lnsul t\" rpt" s:- Ad\ 240, afIF K$ ="S",\ :GO SUB 9977: ^t ad 280 Φ t\RETURN,\ CLEAR # : LET SET=0 :\\No t pg antr\at up-~. Ia\ai, r t s \upnt. Iiads\O.K.t u t ti t\pg -SAVE OUTDEX. (t\NOT o t o OUTLET sk)\\T DIGIDUMP pb edۡ\pn˘. LDIGIDUMP\anBREAK in. EnMERGE * etc.\"DIGIFIX"tTHIS pnise\15(}rB mdru\suldn'e ts)i t\d. EnRUN t ct\QUIT ant cRUN PROGRAM\Φ -trnatll ^ i t ˘. Ial is\l } ERASE an-SAVE\t pg tRUN 9980. I\mn to s\s rsΦ alnur\OUTLET s at o on\t s err.\ - Ban ^Fm: Joh Niclls, Birngm\\DRo anBan,\\Ca ˡ utu¢\t} inr،in\TASWORD II wcl an\܇SAVE s erX\o? IalltX as\ur-ntlab and\tsl it u¢ }n\ inr،in anpgm\wciinwtn.\\Bt y, I rimpsd\tuWINDOWINDER pgm.It\allnsc. Anur\impno oii WATER-\FALL gnt. I am\rntltrn s˪w\ntlt seot\sclls. ^Iipgm ttt\ o a tt ll\بna ot mb Sctm\Φ e ad.\\Congono t gh\sn~r aceand\initOUTLET.\\ - Joh Niclls ^TJoh Nicllf Ban\\TnkJoh al c\PAUL HILEY t WINDOWINDER\˲ng.P alyˡuth\o ansnsff\ant'զ ˡ! I st\tn ut szzt!\\Acallt WATERFALL r\exemow excons!\Tt't oexnng\tmr, I tnk.I n\tsiot\r} rot rll\ang sclnn-it\e bct. T I\tughI' o զ nw\sclnnllt\isgangw!\Y' ghaut Sctm- ^I e I' rdlsctct\r - esallw I e\s-of-t-aru\DRILLER - 3-na ng\rlt riart\ or|c ok!\\Now, t -SAVE f TASWORD.\Isul ab ung\inrpt(Is15) it\ pb p t\˘ unsil i t\HELP . Il al զ\t MY }eiit\sfss YOU\ SAVE rlltt \stighin a -SAVE. To\airpnt scen, w\auBORDER tsrt\fsanepfsnunl\ t xopgm?\I'l io msof ^pڞcts. Sndoia.\\W tynto TasrII\I sa alghtcsand\dp|c in BASIC ta\irDEF FN ers! T\cestns, w I\-ent x t\wР ot sscen of\xr is\5 Φ. Tis, I d\eancnt rng\o ny, nal my\enϢ! I tught\TASWORD II acctlo t\xi ri}n't! It\sr o fr. I, it\gh ab ղed\ a UNDO ncon! I\tughI'e tefct\Φ tughI'id\i- I' rin. - Ban ^F PKing\\DRo anBan,\\Hel! En I s˪d\OutI e an\w;t a eugh\~yi t ek.\\I o rr cisof\Outannt a\pg mylf.\\T arcs/pgms/uºes\etc. i Outa of ul\analyinsng. I\rrl t atsp\bcise, it's\զ ctling\ofansso o Ř\n obcts. ^I tn esoni/n-\ ul oia. Not\onlulial acc-\ulrt Ȣ t\ul t arcn\ s˪զ autir\lSct entasts.\Putniapg o a\ isoOutiod\ia, aipnnt lts\ nin.\\Iul insn kw\wdansysma\owd;notop ad\cpy; wroop\aOutetc. I' \e as caut\Outitl}u Outt\ara uallޱus\auwt ann't ^(Aasiemty\f ant tr!).\\T inioia.Pern-\allI ulpt in\ incnthlotrŧ it\l ab cn of\s f o ise.\\O t bcoPor\s, I enpnw\an؟a ۡ¡s\u (ionl s ar-\inmit). Hos\a զ t aal˪d\elw, I e tll\onl uab s tt\ul usll\˪bcts.\\O fnbct is ^sl ir i t JACKSOFT\ASSEMBLER w utt\+D/DISCiPLE. Anoi #12\t pg csitry\ SAVE afiI/O\oon. Unrly, o t\+D/DISCiPLE w  \taladest(eg. afr\up~npgm) GDOS askif\n orw t \and, w t imp,\JACKSOFT css.\\Nr i̢ u, \s at\asmbr.Tnklly,  t\seot +D tia\gainnen.\\\Al t pc— opng ^JACKSOFT ta * it\ mnaGDOS u*\(an?)ald}rd.Conent-\ly, una ass }ut\m ˡ nas\ wc an.\\O t bcot\+D/DISCiPLE, t TRI-LOADER in\Outrkl pĘt\isys o t sk.\\Fongpninsl g\wc}ut tt nd\in ofur wn\u t uafng\t in o ot bnk\opono t s of\ccts. Buisn'ia\oia?It'ndy's\tughoiΦ! ^Tn ants\tanpnca\nr sȢ.\\ Yrs\\ PKing. ^To: PKinf Ban\\Tnks, Pp. TFongph\s cpi w I\ղet sp inc\d aniopons. I\agt ol npis\sfng. I enpgms\enntۡ iª\pnon.\\T u ot * pi JACK-\SOFT } cn ۡtng\el asci t instr-\uconanI' alady\ktt.Witt otpbm\I mnal 9050\bnt GO TO USR etc.\anpnitRUN. Ts\-enrJACKSOFT f t\srant sng'inct.\ - Ban.^* pi JACK-\SOFT } cn ۡtng\el asci t instr-\uconanI' alady\ktt.Witt otpbm\I mnal 9050\bnt GO TO USR etc.\anpnitRUN. m*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >zc  \Nexnth'Chstise\an' ۡ aۈ pgms\ it ghfur.\T'l rfb nt\car; anadds\uChst}rst;\Par3 oChOr's: "\ d tnsr" i DRIVECHAT\anNic Les'OUTCLASS. An\anro i CARNIVAL; a\SHOUTBURST o Ęoana OUT-\TAKE! Al o s an}rtd\B imp -tnsof\BASIC o˘ d;fcl ^; ndu¢ sw\byi raASCII,ub-\byostighes;gat\}n~pnANY ar;\l-tc s;ghsp\r; nu¢ ng\l-ypsco (SHIFT\KEY, SHIFT+ENTER,etc) and, r\THAT'S THE TICKET n- t o\anonly, t o XMAS FUN!\\ S tn!\\ - Ro & Ban.^byostighes;gat\}n~pnANY ar;\l-tc s;ghsp\r; nu¢ ng\l-ypsco (SHIFT\KEYr?rd"8960":'"50 times a second the MEGATRUDERcode interrupts whatever programis running- whether machine codeor BASIC - and calls one of yourmachine code subroutines.It doesthis in sequence so if you have three routines in memory it willcall 1, continue with themain program for one 50th of asecond, call 2,continue foranother 50th, call 3 andeventually start again at 1. If you had 5 routines, every one ofthem would be operated 10 times a second." n"However, MEGATRUDER can be used with just one of your routinessimply to save you the bother ofworking out vector tables and soon.":"7E3" x"There is a useful routine whichshows free memory at top rightof the screen. This will displayconstantly while you are editinga program. In addition there is aroutine which hasjust been added to demonstratethe way MEGATRUDER can handlemany different routines at once.I've also added SKIPPER fromIssue 9.This routine enables theBASIC line editor cursor to skipquickly up and down the line youare editing using the up anddown arrow keys. Unfortunately,having to timeshare with thefree memory androutines makes it very jerky assome keypresses are treated asnormal up/down cursors! Still itdoes show how MEGATRUDER works.":"7E3" ["You can turn these routines ONeither now or at the front titlepage with SYMBOL SHIFT + 'G' andthey will continue to run evenif you BREAK into this programand LIST it. Turn the routinesoff with SYMBOL SHIFT + 'A'These keypresses only work whilethis program is running ofcourse. In BASIC, Use:-64994 to turn ON,65014 to turn OFF." "To use MEGATRUDER in your ownprograms press E at the titlepage to erase all BASIC but two REMs holding code and a BASICroutine to POKE in the addressesof your routines. this andMERGE it into your program.":"7E3" "The MEGATRUDER code is in theREM at line 9979.Use9979to move the 113 bytes to address64994.The FREE MEMORY and BORDERFLASH code are 122 bytes and aremoved to 64000 with9978.Once in position you initialize by poking 65033 with the number of routines and list the addressof each routine instartingat line 9911. You will see theBASIC routine starting at line9900 does all that for you soyou just need to alter it. Assaid before,64994switches ON MEGATRUDER and this is included in line 9905.Note:a vector table (see INTERLUDE inthis issue for explanation) iscreated between 64512 and 64768 so don't put other code there!":"7E3" _"The addresses of the routinesare poked into a table startingat address 65086 in the usualtwo-byte form. The routine atline 9905 does this. It's alsowise to switch off MEGATRUDERwith65014 before making any adjustments and the routine at 9900 does this too!Finally,remember, interrupts aredisabled temporarily by thesystem during aor any LOADoroperation BUT, oncerunning, interrupt routines willcontinue AFTER youanother program so either switch themoff first or take care your nextprogram doesn't use the samememory addresses or the Spectrumwill crash!(RE-SET to clear)":"7E3"  "8E3" X3#O;I,O;" PANY":I:O:K$= ]K$="P""9800":"7E3" bK$="""9900":"7E3" lK$="""8990":"7E3" v: ?I"8960":"5E4":"8994":"8986":"9978":"9979":"9992":"62200" @"8960":'"MultipleZ80Interrupt-DrivenRoutinesLinker-fromAnthonyPoli" Bj"This program is a pre-preparedinterrupt-driven LINKER that youcan use to convert any suitablemachine code routine of your ownto be driven by interrupts. Read INTERLUDE  in this issue if youknow nothing of Z80 interrupts.Not only does this program makeit simpler to run your routinesas interrupt routines but it canhandle many at once if suitable." "` "8955" " O:K$= "K$="""9900" "K$="""8990" " K$="I" "`K$="C""8990":#O;I,"11";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "`K$="N""8990":#O;I,"24";"NEXT":"23608","10":*"M";I;"CONTENTS" "K$="E""8990":"8925":D="50001"̰"50024":E:D,E:D:"65367":#:"50001":"!",O,O,"","n","25","","!","","&","#","","n","25","","","","R","","25","","","25","" " "8900" "z#O;O,O ;"ERASE ALL BUT MEGATRUDER GOSUB INFO CONTENTS NEXT": #="23658","8":O=ç:I=:SET=O:ZX=O:O:O:ٰ"7":I:: #"M";;"meg" #*"M";;"meg"ʰ"7999": #"23637+256*23638+5": #!U\N#FJX?????????????zł|S[kV8q8S #"65014":O:"23624","7": #"{"63232":"23637+256*23638-71"::AUTOCHARS*v\!?~/wy *v\%"6\>jmw#wL>cw#w#>kw#>>w#>6w &HSET;:"9891"-ZX:: &z#O;O,O;"KEMPSTON E IFACE 1 OPUS ZX LPRINT III DISCIPLE QUIT" &|O:K$=:K$="Q" &~K$="K""9881":SET=I &"K$="I""BAUD RATE? ";BD:"B";BD &K$="I"K$="O""9887":SET=I &K$="L""9888":SET=I &K$="D""9889":SET=I &K$="Z"SET=I:ZX="6" & "9800" &B"9883":°"27";"@";°"27";"W";I;°"27";"l";°"4";°"27";"Q$": &:0 & &:1 & &\ԧ:԰"4":ӧ;"t":Ӱ"4";"b":#"4";°"27";"@";27;"W";I;°"27";"l";°"4";°"27";"Q$": &°"27";°"27";°"27";"@";°"27";°"27";°"27";"W";°"27";I;°"27";°"27";°"27";"l";°"27";°"4";°"27";°"27";°"27";"Q";°"27";"$": &K@"6",I:°"27";"@";°"27";"W";I;°"27";"l";°"4";°"27";"Q$":@"6",O: &"23637+256*23638-0129"::hurrydump  >!"[K[*6\y_y@W`(< =O# >2[ Hx > :[:[2[ >2[> :[2[ &<"65014":"65033",3: No. of routines &"9911":N="65086"̰"65086"+"65033"*"2"-"2"Ͱ"2":A:N+1,(A/256):N,A-(256*(A/256)):N:"64994"::TABLE OF ROUTINE ADDRESSES &62207:SKIPPER &64000:MEMORY FREE &64115s:BORDERFLASH &"23637+256*23638-0142"::MEMFREE+  !J}f!B#@Sc33333ɯ <8B=0M!c4*cZK6\&o))) w$@[e\!RrDM:H\<2H\ &"23637+256*23638-0130"::megatruder  !Jq!6>G^>?GV:=ɯ2=!>(#= nf"3:=<2=sRRRRRRRR '"23637+256*23638-0129"::skipr62193  !Jp>G^>?GV*[\ :\ (% >2\BDM[Y\R8C[\}> 2\> 2\ T]*a\++R8S[\}> 2\ ɯ2=!>(#= nf"3:=<2=sRRRRRRRR '"23637+256*23638-0129"::skipr62193  !Jm*v\")J!J~#N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *F< S>>*̞B< ![#R0~ 8~> > >µ *PoRM3{3{{{{3{{3,'{4{CoCoCIG)]v>Mantnk er w\pe mti an\reOUTLET. Illsand, of\ur, t s st,\pn wnretI l i ur. -\AndCpm.^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 ^ALPHACOM PRINTER. Gnontثpply. O antllotr r. `15 or\W.H.Y... An el una\(Sincir)Sct 128/D'ktڼcpninr/Ss\GP100pnmon? T\scen- mf tt-uisrb. Pa  kif\u' lt pbm. JOHN\LUBY, 38 WinrelGarns,\DUNS, Bercks.^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)^(01)888-8894 :4m*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >z*$nD6J=/[{FGgҺ are going to start looking at logical operation. You will find it easier to calculate logic in _ \\\ Mac Co Par4\ BN.Les\ -------------------\\\ Lasntt s  \pg wcul a\ t ut ot\sce tuantil\olnit. Let'w\o wt pg suld\ en... ^ 10 ORG 60000\ 20 ENT 60000\ 30 LD A,21\ 40 RST 16\ 50 LD A,1\ 60 RST 16\ T rstn e\  stco t XOR\ttb.Tul en\̢ i BatOVER 1 oin\c ˘ iiaʪ.\Li10 an20 a JACKSOFT\asmbcªwcll\t m sܦ t ˘\a60000 anal t ˘\a60000. Li 30 adA th\t ˘ OVER. Li 40 nds\t ˘ t scen. Li 50\t adA t1 r XOR\o an 60 ndt t\scen. NoXOR ii oon\ } srt i u¢.. ^ 70 LD BC,0\ 80 START PUSH BC\ 90 CALL 8933\ 100 POP BC\ 110 PUSH BC\ 120 CALL 8933\ 130 POP BC\ 140 INC BC\ 150 LD A,B\ 160 CP 175\ 170 RET Z\ 180 JR START\\Li 70 tt X anY -ords\ (at t fof\t scen). We }l t\u¢ pt intŗ\ } o pand\t ot e Φ \} }l t ROM u¢ st\ BC ail rpd. ^ S 80 sBC o t\sck. Li 90 }llt ROM\u¢ pt. Li 100 ps\BC |c oft sck. No\110  si|c o t\sc a a unt pt\u¢ n¡. Li 120\et pt. Li 130 ps\BC |c oft sck. Al tt\ifi ժ t pt\anno it. Li 140\incntBC t xpt\on. Li 150 adB in\A m } ̢. Li\160 mA t175 wcis\t Y -ord. It non\itt fit.\Li 170 rn |ot\JACKSOFT asmbit \fit. Li 180 op|ck\ t START a 80. ^ Tpg l ժ t\ acst ut scen\}u a incnnBC\awР. I st\incnt B sr, wch\it Y -ord, t t l\ul stighuwcis\w n pn. Tis\}u a alladn256\ BC.\\ 140 INC B\\\ T pg aisndll\ al s˪ it\ns t\ ժ, stadt\:\\ 105 HALT ^ Tmnl ian\inrpt. Don' rr aut\wa inrpit[e\INTERLUDE anMEGATRUDER i ts\ise!!! - BC]. Al e\kitt HALT mnd\l iau50tof\nΦ nint\pgm.\\\\ TMonth\ ----------\ Wa in ժ o \uunt\scen. No, tuit\rur. O ot ys\ocnnruis\thugitrt. A riwt\ncto romr ^sys atr.T sem-\p otit yar\t CPU. Be}u t yard\nds t CPU iis\kw aa inrt.A tt\rul w t CPU nds\t s ca t ULA\cp. Conii t ULA cp\irtt m254.\Tit rurt.\At pڗsia tt\c ˘ instco iOUT.\It rm:\\ OUT (rmr),~\\ T rmi254 a\a antt rr\uant ~ it\u nwci0 7\saiii Bac. Hor ^ }n~ i t rm\omrstighin rt\ u t A sr:\\ LD A,u0-7\ OUT (254),A\\ Tr t r w \u t pgm:\\ 10 LD A,7\ 20 OUT (254),A\ 30 RET\\ T rmii bcts\}u iiinui t\r oa addss. Mac Co\} ctefctth\t rt |uld\}u ot sefn\te tm. ^ 10 ORG 60000\ 20 ENT 60000\ 30 START LD A,2\ 40 OUT (254),A\ 50 CALL PAUSE\ 60 LD A,4\ 70 OUT (254),A\ 80 CALL PAUSE\ 90 LD A,254\ 100 IN A,(254)\ 110 AND 4\ 120 RET Z\ 130 JR START\ 140 PAUSE LD B,13\ 150 LOOP DJNZ LOOP\ 160 RET\\ Ty i t aʪ pgm\unt JACKSOFT asmbr.T\pg l spl\uraunt rr, t\ ^sul gur, ght\ge an~rgen. To\es} f t pg u t\'X' y.No tnng\btusct sn't\fnsogen\angy, ul ghas\ll. Y t urs\}u t Sct inng\acgseues\a tcin tnntt\ge anfsno and\of gy. T oturs\a t al }u I\}n't »ngh\ so all-our.\Busl unt aʪ\pg ۡ pttoefcts\} cad. Trant\A si 30 an60\toturs. Foemp\ ^iat tand\lnk, on and\lw. Iat th\ge ann t\n, on, anghbe.\\ Y } sauntall\ghuri fnt\orrs. No o at\pg rks. Iit\w w t pg u\n' eon|ck\ [opnii\pn- BC].\\ Li10 an20 a JACKSOFT\cªs, sulkwt\t bw. Li 30 ads\i t rsur. Li 40\ndtu t rr\rt. Li 50 iCALL a ^bu¢.Y  ˡ\acsCALL mnΦ. It\i t |mnGOSUB.\CALL e t bu¢ and\RET at enot but-\i l |c t\i u¢, wci t}\i 60. T PAUSE bu¢\tuoo13 cycs. We\a rn 150\ 170. Tit sp\t rucnno\ickl iulfcr. T\mo¡t ocycs\ulnwu u\nd. 13 e u as\tit mtll\et rsll. Trotr\mrant fn.\Li 170 tu|c t\i u¢ a 60. Lis ^60 80 a saof\30 50 arf a\fnuinad\in t A sr. Li90 \120 a cc it 'X' y\e psd. Wl \oyarinxnth.\Li 130 mp|c t START\ot u¢ it 'X' y\sn'e psd.\\\ I a in t\nthls Φ I ժ on.\T spg stct\rute t ff-\enurrdly. As\tnth'pb I nu\ w pg wcll\osl al t uranby\n»nospall ^ot at ¡ aund\t rr. Tsal \sll. In}n'\tadNOP instcon\t t »nop. NOP\sndNOPeo anll\ tn t pgm.\Hor, il sw t\pg b4 cc cycwch\it ¡ a a\instcon.Y l e u\a in o osl t\ghurΦ n-\t pg ansa\int.\\\ T r254 } զ\t cn t ruas\tonlut0 - 2.\Bi3 ntlt MIC ct ^\an4 ntlt Ld-\sar.\\\Bit5 7 a ur\anytng.\\Wa insi Bi4 wch\it Ldsar.I} tr\ OFF(t saiphy}lly\in) oON(t saiphyc-\allt) . Tr t sar\o at rt16 as\tit mot\4; 1 t ثo16 i otr\rds.Turnt sao and\ofesn'unrinst-\ina sl e, it\} stt. ^ SnFX\ --------\\ Snirs \o t Sct 48 tst\nt-s sysm. T\dn titt\unir n't\excanlts. Li in\|c,uni ng\t und a\a a stighay.\Sll, undf c ˘\} sotantut\bak}u ot seat\wcin al it\st. Beipg n-\e ng ֨, OK iis\nt t BEEP mnt\isn'ertt tnin\c ˘ ng? ^ 500 SOUND DI\ 510 LD A,16\ 520 OUT (254),A\ 530 LD B,D\ 540 ON DJNZ ON\ 550 LD A,0\ 560 OUT (254),A\ 570 LD B,D\ 580 OFF DJNZ OFF\ 590 DEC C\ 600 JR NZ,SOUND\ 610 EI\ 620 RET\\ T rstnll\— it 500 nins\mn p|blt\e Φ. DI sndDis-\ab Inrptwc l \inoi t a.\T a ri swch\inrpt pڗsaaut ^50 ¡nd. T inrr-\uponl ba t und\in ts, unn50 Hz"m"\wc n'n t\mpstn il t\pڗs ig֦ tm.\\ Li 510 adA t16 wch\l r t saon. Li\520 nd16 t r254 and\pt sar. Li530\an540 tuocyc\nnu t lin\t D sr.Re|c t\PAUSE b-u¢ o t rr\pg ios.\T u it }u t\xinstco l l t\pڗs l t sar\|c in.Be}u ectڼcrk\st t oolsar ^bt ¡ t sasrts\ t, s l ˡ\n|c in. T ncs-\ otul t sar\ulssll. Li 550 and\560 llt sa|c i as\I sexpid. Li570\an580 uatu \ t sat cn \|c in. Li 590 cnts\C, C l t un t\mo¡t u¢ is\ i o ,i otrdt\ngtot ֨. Li 600\cck iC i t.\Iiisn't m|c \SOUND. On t unngtis\mp } eb t\inrpts. Li 610 ets\utEI. Li 620 ia\RET instco a a ing\ u t u¢ tn ^atr. No sr\u¢ } p֨.\\ 10 ORG 60000\ 20 ENT 60000\ 30 LD C,255\ 40 LD D,100\ 50 CALL SOUND\ 60 RET\\ T pg aʪ sul\ tt su¢ in\ra}o SOUND. Lis\10 an20 a cªs. Li\30 adC t255. Tit\ngtot ֨.Li 40 ads\D t100, Tit tcof\t ֨. Li 50 }llt\SOUND u¢, ob-u¢ as\iis. Anll 60\RETurnu t JACKSOFT\asmbr. Simp isn'it? ^No su¢ \} al rtotng\inw t s}. Tis\kw as. W ot\spg tt lng\s:\\ 30 LD D,1\ 40 SLIDE LD C,5\ 50 CALL SOUND\ 60 INC D\ 70 LD A,255\ 80 CP D\ 90 JR NZ,SLIDE\ 100 RET\\ Li30 an40 ut\tcanngtot ֨.\Li 50 }llt unb-\u¢. Li 60 incntD \t tcl ԫat\ ^on/ofol nr. Li\70 adA t255, te\it mtD. ID is\al 255 t t u¢ ll\end. Otrŧ il |ck\u SLIDE ann\ԫt tch.\\ T pgm st\caa al gh n-\st t u otrts\}u ot ot\˘ ta  rin\tcanngths. I}n\ca nangor\ԫtcf |}n\al if c ˘.\T i e w r\ow u¢ ta }n\u t ROM e |c\es. ^ Ro Bps\ ---------\ T irdlanytn\expi aal t r is\̢ bt ROM. T }on\w t ROM eu¢ is\sܦia949 (Del). On\ennt u¢ st\at HL itt\fenc(t tch). T}n\n f 0-65535 w 0 is\extlgan65535 is\extlw.Midd C rkt\ aun1640. Al Φ\ent u¢ st\at DE itt\ngtot ֨.Iis,Ыr\r w c ˘\}u t ngtis\nna t fencas\itOUT rund ^r. Foi HL\ula ulegh\i DE uit.\Hoigii HL\t uleԫr\i DE t Φ t\ ngto֨. Iok\ansto pgms\l iial \tt ¡ opten\bnt sar. May u\ulw pg wch\ul t rc»non\anfencound.\\ Tsau˪rtt\rtw.Nexnt ll\ onainrtbus-\int yaraa emp.\T l u¢r\l-ypss, ntl\anpr-cb ntls. ^ Tsoftnt\a in sronat\Ե} oon. Y l nd\ie }l冨 Եin\ t iul in\l. Strot\ur sl u l.\\I aro-\ oaiiofn\r t tr\aon. Simply,ifr-\enunnsys t n-\no | 10, w u\Ƙ u | 16,\tis, t a 16 ng\ttt t r 0\ 9 ng ts. Fots\ sb ca\6 զ ts. Teias\mp asb u t\ ^trA F, w tn\ A pnnt mr\10 ai | n,B pnng\11 ai | an on\ghu F pnn15 as\i | n.\\ Swhu unng\sysm? T ans tiin\t mra sܦi a\mr. Tiw ry,\o| 2 ˡin. Leto a\cԧaby i\up.\ Nibb& Bys\ ---------------\ A by i uo8 ts\cowcnثr.\Foemp 0 (t \t ght) ثo1,\1(in t ft) s ^ثo2. T ines\t2 nثo4,\3 tثo8. Ts\neal t acst\by. Y l —tt\t ثrub a \ang. Fortn \t rsys  t\|al. Bac m-\al. T ie expin\ l nnt o st\rs4 toby. T \ 4 tܛtia\bb. Wit n of\mr } i o\bb? Wel t'r it.\\(1 ! 1)+(1 ! 2)+(1 ! 4)+(1 ! 8)\= 1 + 2 + 4 + 8\= 15\ [!=upghar - BC] ^ So, incn } \16 fneli a\bb. Tspn \t n oo 0-F.\Tan onlet x\tby at bbs\ by wai l\ ul u ܎ of\thto by.\\\ Whet Ե}l\oonei x?. It\ul ie}u\ } spt t ts\i lanr i bbas\l abys. Y l wt\I a w in rng\t tf t Եc\ints... ^\ Loc\ -----\\ Firs skt\pnpauԵc. T\a |}lluԵ"s"\ e kaut, T a\AND, OR, NOT, anXOR. Firs\l srtAND. Y ll\nti c ˘ \ զ ثoery\tt st by as\wР. T ԵAND rkt\t tot intt\ܛtr. Wl srofth\suno oby. We\} t ss, 1 o0. If\ t into1'and\0' } p a tof\1 o0 bunttb. ^ T AND TtTab\ -------------------\\ INPUT 1 INPUT 2 OUTPUT\ 0 0 0\ 0 1 0\ 1 0 0\ 1 1 1\\AND rko t iIn1\AND In2 a 1 t t\tea o, otrŧ t\t t 0. Wu ts\ul mpgm\l lxntaI'\ os w.BeΦ xt\nttrt ru¢\s anal o or\ran unng\sysms. I anoks\oanytno Եt ad ^t ail tngs\e unrsnxnth,\u' isng!\\ S tn,\\ Nick....^lxntaI'\ os w.BeΦ xt\nttrt ru¢\s anal o or\ran unng\sysms. I anoks\oanytno Եt ad ^t ail tngs\e unrsnxnth,\u'  :*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >zՉ#ɎL\ \THE DOT MATRIX PRINTER - Par2\ bDr. Mi H\--------------------------------\W e t Sct a\sa tpnna\pot sce on pnr\r. T COPY it\o owili t\spfsܦ.Iet\r bnnt ccr\˘ t pntr\bnnt aca bys\nut crs. f t\f pnw i t\i ՘. ^Tul mp pڗss\it byaf t\ful nct,\a en, t pnr\ivy ntr\t bys. Ts, i nr\t 8 X 8 tong\cci t rspnt\o o t scen, t p\ ota bt\by i t rs}o in\t fr. Tiaaddss\4000(16384 c).T x}-\on, 4001h, ldt by\t xcr.T nw\(by) ot rscr. iin\4100h, ant tri 4200.\T rsby n t\pned uof\t rtot byld\i 4000h,4100h,4200h, ...4700h.\( t rsvy ot bck. ^Ho} tnsr t vys\ot bc in bys? It's\acebt lntt\m/u¢ srntub\sHL lnt fr\addsot rsby ot\rnccr(40000,0)\ 1 PRCH PUSH HL\ 2 XOR A\ 3 LD C,8\ 4 PR2 LD B,8\ 5 PUSH HL\ 6 PR3 RLC (HL)\ 7 RLA\ 8 INC H\ 9 DJNZ PR3\ 10 RST 10h\ 11 POP HL\ 12 DEC C\ 13 JR NZ,PR2\ 14 POP HL\ 15 RET ^Tu¢ mp2 sd\op8 5 an12\ 3. Eacintlbt\unro8 i B & C.\T c} oona\tЧ i 5 & 6. RLC & RLA\a by ڎo oonin\t Z80 i.\\\RLC\---\T A sarslds\, ot rmr:-\\ A 0 0 0 0 0 0 0 0\\T 8*8 cr.bc } p-\nbt lnw in\t ֎o ab, it \. & t .:- ^ (HL) 11 12 13 14 15 16 17 18\ 21 22 23 24 25 26 27 28\ 31 32 33 34 35 36 37 38\ 41 42 43 44 45 46 47 48\ 51 52 53 54 55 56 57 58\ 61 62 63 64 65 66 67 68\ 71 72 73 74 75 76 77 78\ 81 82 83 84 85 86 87 88\Eaco l lt t\'0' o'1'. T (HL) in-\}t by rntllin\t addsHL. INC H l ժ\t (HL) w o i t\bck. T lot instr-\uco RLC (HL) i ժ all\t ei t by ld\i HL 1 p fw ng\t 7ttin t ng\}rrsanin t\0 oHL, aw:-\(HL) 12 13 14 15 16 17 18 11\ C 11 ^RLA\---\\ ...ڎ}rrin A Reg.\\ A 0 0 0 0 0 0 0 11\\NoINC H anHL l ld:-\\ (HL) 21 22 23 24 25 26 27 28\\ RLC HL anRLA l A:-\\ A 0 0 0 0 0 0 11 21\\ Af8 atA l ld:-\\ A 11 21 31 41 51 61 71 81\\ t rsvy ot cr.\bck. ^RST 10ndt pnr\ant |c t xvy.\\Ttt u¢ t ll\COPY cr.bc ectlas\spo t scen. Iis\t irlst u\t u¢ COPY t wР\scen. T i wctis\̢ aniisb \pntu 7 sce COPY's\ pnacsa A4 set\l sci t xt\rt.\\ - Mi H\.^\\Ttt u¢ t ll\COPY cr.bc ectlas\spo t scen. Iis\t irlst u\t u¢ COPY t wР\scen. T }@}*"9E3":"23658",O8:O:O:O7:I::"63738":" SIGMASOFT'S",,#Z;O,"x";"PROPORTIONAL CHARACTER SET":O3,I2;" MENU ";Z,O5;" 1: INSTRUCTIONS ";I1,O5;" 2: ";I3,O5;" 3: DELETE ALL BASIC ";I4,O5;" BUT PRO-SPACER";I6,O5;" 4: QUIT ":"29" #0.02{# =,(*20)-10  ="1""(" ="2""4E3":"29" ="3"#::D="5E4"̰"50023":E:D,E:D:"65367":#:"5E4":"!",O,O,"","n","25","","!","","&","#","","n","25","","","","R","","25","","","25","" ="4""8E3" O5 ;#O;I,O;"*** PRESS YOUR REQUIRED KEY ****": (p"500":#Z'"Welcome to Sigmasofts proportional character setroutine for the 48k Spectrum.This routine is extremely easy to use. All you need dois type normal BASICstatements with a shortsuffix.For example:":Z,Z;"#9;""SIGMASOFT"""'"PRINTS THIS >>> ";#Z;I0,"";I;"SIGMASOFT"'O'"You can still use normal size lettering simply by not typing the suffix." d#Z'"You can also usewith the suffix but you willhave to experiment with the x co-ordinate becausethe 'SPACE' character is only 2 pixels wide.The proportional character set can also be used byLIST #9,#9,#9 and.":"1E3" i"500":#Z;O2,O;"The machine code's at address 63738 and is 1799 byteslong. It is NOT relocatable. At loading it is stored in aREM at line 9977. To use it in your own programs youcan either use option 2 tothe code and re-load it into your program with """"etc. or useoption 3 to delete all BASIC except for thewhich you can thenandinto your program." U#Z'"Whether loading the code or using thealways use":I1,O;"63737";#Z;I1,"Z";" or less at the start of a program.If you are using theyou must then initialize with...":I3,O;"GO SUB 9977.";#Z;I3,"d";"If loading the code separatelyuse":I4,O2;"#:63738";#Z;I5,O;"after loading. Thereafter you can use#9 asdescribed earlier."; #Z''"Note that you can use control codes and colour codes,including embedded codes,the same as normalandyou can also include Sinclair tokens in the text tosave memory.";:"1E3": ):" INSTRUCTIONS": /#O;I,O;"*** PRESS ANY KEY**":I:O: R"DRIVE No.? (0=TAPE, JUST ENTERABORT. NAME IS 'pscode') ";D$:ñD$ D$<"0"D$>"8""4E3" #ðD$"pscode""63738","1799": (*"M";D$;"pscode""63738","1799": @F"4":ڧ+:ç:ܼ:"62192":"9E3":"9977":"8994" :"" :O,O:"",O:O,"":-"",O:O,-"":"",O:O,"":-"",O:O,-"" O~O8,I;" ":f=ZI9:f,1;"  ":f:T,O2;" ":I1,"l":"",O:O,-"Y":-"",O:O,"Y":I0,O4;"PROPORTIONAL";I1,O4;"CHARACTERSET";I2,Z;"By";I3,O5;"SIGMA-SOFT";I5,O3;"Program  1988";I6,O5;"K.MADDOCKS";I7,O5;"SIGMASOFT";#Z;O6;I0,X;"PRO-SPACER provides";I1,X;"text spaced out in a";I2,X;"way proportional to";I3,X;"the true width of the";I4,X;"various characters-";I5,X;"NOT a fixed 8 pixels";I6,X;"giving more on each";I7,X;"line but without loss";I8,X;"of legibility.";I9,"";"- Brian":"8955" " O:K$= " K$="I" "]K$="C"#O;I,"13";"CONTENTS":"23608",O:#:;:*"M";I;"CONTENTS" "\K$="N"#O;I,"24";"NEXT":"23608","4":#:;:*"M";I;"CONTENTS" " "8905" "a"23658","8":#O;O,O ;"INFO/DEMO CONTENTS NEXT": #"M";;"pro" #*"M";;"pro"ʰ"8E3": #"{"62968":"23637+256*23638-71"::AUTOCHARS*v\!?~/wy *v\%"6\>jmw#wL>cw#w#>kw#>>w#>6w #("9E3":O,I,O2,O3,O4,O5,O6,O7,O8,Z,I0,I1,I2,I3,I4,I5,I6,I7,I8,I9,T,X::ç,,"2",,"4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19","20","" &W#:::::"23637+256*23638-1816"::PRO-SPACER  !J *S\+U#! [O\R#"(\'X(( 1_:W:) {ҫ8O8>#_!:):;\O:*(30{ ʊ ~6Ҋ %>2>6#w>2ɯ2{sڌ >2ҫ @&o)))^:\8{=)= yW:(7= *>_???@g{8''===o>~@$= 9>W:(:= z٦wz 6w#{٦w{ 6w+#%# !{wدw#~8w>w*Q\͈ "Q\֥A 8> ''0H(z> 'Ɛ2)O0!! F({F!\w2)2 ` > ~M ͭ![:???o>~@> o= !ͭ{wدw>2ɾwЯ2[zS_S@@@@@PP(|((|(xPx(x HH HH(*D: @ @@@@ @ @(|(| @|@ @@8LTTd8 ` p0H x0HH0(|x@pH00HH0x @@0H0HH00HH0 @  @ @ ||@  @0H 8LTL@80HHxHHpHpHHp0H@@H0`PHHP`p@`@@pp@`@@@0H@XH0HHxHHHp p0P HP`PHH@@@@@pDlTDDDHhhXXH0HHHH0pHHp@@0HHHP(pHHpPH0H H0p HHHHH0DD((DDDTT(D((DD(x @x`@@@@`@@ ` `8T pp x08H8@@pHHp0H@H08HH80Hp@80@`@@@8HH8p@@pHHH ` p ` @@@P`PH` phTTTTpHHHH0HHH0pHHp@@8HH8Ph@@@0@0p@`@@@0HHHH8DDD(DDDT(D((DHHH8px0@x @ PPPPPP@  @(P$ZRZMSW P P P 8 MO6O\GWq !v>>BB<DHpHDB@@@@@~BfZBBBBbRJFB PH.?wH?k{H?@ |h~%G@<@H?@ @ @ H?h@8 H?p9p @0Hh8Hpp>H<PH N ?H?p`?H?@r@@@H?@@0 @`H?p@? *H?/88?1@H8|!88 H0{:<~_0H^H?ހH?@N8} ؀@"H?! CH?0A JH?OAHN?ÁǃH@w|| >3?H?=8'z|?H?@ހoϿH?@!=@~ @DH? |H? H?OAH qOHB@KH? @{_H?@ @ |@H? H?Ͽ@ H?3qpxH!ÀqHCwH? 2z}H?a@8H?@C< @H?`x H??H?ppxpp8x< H#࿈ H~oH?@M?H?@'H?@< @H?@~'a c@8H?>> H?N7?d`O# H;!  "O BH?*G $ D@$@H7 $ @A@""BH/| #DG?A'H>耀D! $#d"bH>A0B/ @H?  H?~DB8 H?$/ $|@ Ĉ H=JM ĄAHI$ *@c 8$"H?!@ =`$$A@ THH?Q"" $""8Bi,$H-sFT< (!) BbH>G ~#& @H? - H?#}@Hp&.0! @ ? "H?B!q "( ҄``$H?@@H!t`@4$"H?"BI 1I$$C@ D@H?$"(!" 8$E2`?"H/F8 "AD(BH?Zb`<X@ H?4O<G H?N'KHN" "bH?iHH"PB 9$H?BP@`2E@ a D(H?&@I< "I@ %0DH;"% Y0]B%K"H$H?R @I@X )hH;~#@@H?q~/SH'`  H?r?HHL H!HI)BHL,A  & HH?1@D1G@  @E)H= A@% `@ !A)@H; "~80cBSGxo AH$H;ND8 qJP! @bH;@ =AH?J/'`!4H?v@ $TIH0H? A{ BB H @  H>i @$$p )H>$#C $@."(H? `! Na AH;D̋`R`@$ "H?>1=H?oaJ/@< |` H?4~ 0A  tH>{H"@qȀ @  H?hIRo H!2H H@$A$! ;I$"JzH.L Ȅ0 _ÿF B!) H?%(x8H}? !CH;@p   H@@@@ H 8 8@ @H  w@pPH @ H@<  H@  pHD FA'x?1rp B $H; %PH@ @ H  @H  o@H H@ @@ H@  8H @p#HT2"(H B e~r&"H=\ ~P` H@b  H@@  @?H  n@DH@/ w@@ H@ / H HTbEA 2(@$D2B$PH7@ ` H@ x H@@ @@H  x@/CH@  @ H@ @ H   H(`Ȣ(HE" $QZH7 @ H@ @@H@@ @@8H P@ @H@ ? @ H@< ? 0H@40 H!$D $rHE" a$hDH? V@@ H @ s@H@  >@@qH 7~@ @H `> H@ 1H@ H2a  #""C>$ `$DH? n@@ H >@x  @H @H@  @ @H !o Hp@H@ H2@ " @H?@@@0 H  @ @H8 _?@` H@  @ H@~ H@@ H@? Hooooooooooooooooooooooooooooo=}}ooooooooooooooooooooooooooooo=}}{{{{{{{{{{{{}}}{}{{{{{{{}{}}}=}x{{{zzxx{{{{{{}x{{{{{{{{{{{{{}=}xGxxzzzxxxxxxxxxxxxxxxxxxxxxxx=}xh0zzzxxxxx8hhhh8hh`hhhhphhhhh=}x00xxxxxxyxhhh888h```hh``hhhhh=}x80xxxzxxyxEEEEEEEDDEEEDDEEEEE=}x80xxxzxxx8EEEEEEED00FDDEEEEEE=}x80xxxzxxx8EEEEEAEF088DDAEAEAE=}x808xxzx08MMMMMMMMMtDDLMMMMMMM=}yME88000HEMMMMMMMMMgg`LMMMMMMM=}yMMEEhhhEMMMMMMMMMMgg|MMMMMMMM=}yMMMMMMMMMMMMMMMMM ggLMMMMMMMM=}yMMMMMMMMMMMMMMMMOOgaLMMMMMMMM=}yMMMMMMMMMMMMMMJqooooOMMMMMMMM=}yMMMMMMMMMMMMMMzzOooOMMMMMMMMM=}y}}}}}}}xx}}}xxxxxGox}}}}}}}}}=}}''''''''''''' ''4wg''''''''''=}g'''''''''''''' "ttggggggggggg=}gggggggggggg`bbz"fgggggggggggg=}gggggggggggg`bbggggggggggggggg=}gggggggggggg`ggggggggggggggggg=}gggggggggggggggggggggggggggggg=}g &"M";;"run" &*"M";;"run"ʧ '"23637+256*23638-0184"::#15 UDGS  !JXX HB"$0a`"  YX@X@!Z@"!Y~`$$"%  0 GA!D@"",H@!B@  0" 0 88<@<B<BBBBB< ;;"run"ʧ '"23637+256*23638-0184"::#15 UDGS @2_"23607","":H$(+,"21"):S(+)::O,I,B$,P$,L$,R$,U$,D$:N=Ḭ"5":H$(N),S(N):N:ç,,"",°"17"+°"8"+"",°"17"+°"8"+"",°"17"+°"8"+"",°"17"+°"8"+"",°"17"+°"8"+"","Brian","3213",°"18"+"The Masked Marvel","1553",°"10"+"Fred Who?","999",°"7"+"My dog","428",°"16"+"Next door's dog","!" K&"23658","8":BOARD=I:S=O:BONUS=I dBOARD:BOARD:ٰ"9":O::BOARD;"XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX";I,31;"X":O,O:Y=I192:BOARD;BOARD;"X                              "+("X"Y>1):BOARD;BOARD;"X                              X":Y:BOARD;"XX";O;O;"XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX":Y="10":X="16":ڰ"8":I N=14*BOARD:*18+2,*27+2;8;"";*18+2,*27+2;"";*18+2,*27+2;"";*18+2,*27+2;"":N DRY=*18+2:RX=*27+2:RY=YRX=X470 #RY,RX;8;"" VY,X;P$;#O;I,O;" BOARD: ";BOARD;"";12 ;" SCORE: ";S;"", ="Z"1E3 ="X"2E3 ="K"3E3 ="M"4E3 &'#0;1;1,22;S N[(Y,X-1)" "(Y,X+1)" "(Y-1,X)" "(Y+1,X)" "700 X500 \(Y,X-1)ɯ"F"ƫ(Y,X+1)ɯ"F"ƫ(Y-1,X)ɯ"F"ƫ(Y+1,X)ɯ"F"5E3 BONUS#O;I,O;" B O N U S S C O R E: "::BS=O::J="20"̯"("*+"25"Ͱ".1":.01z# =,J:BS=BS+1:#0;1,25;"";BS:J:S=S+BS:BONUS=O:"490" .02{# =,"2":500  (Y,X-1)="F"6E3p (Y,X-1)" "500 1X=X-1:Y,X;L$:.005y# =,X:S=S+1 ="K"3E3 ="M"4E3 1E3  (Y,X+1)="F"6E3p (Y,X+1)" "500 1Y,X;R$:X=X+1:.005y# =,X:S=S+1 ="K"3E3 ="M"4E3 2E3 (Y-1,X)="F"6E3p (Y-1,X)" "500 <Y,X;U$:Y=Y-1:Y,X;P$:.005y# =,Y:S=S+1 ="Z"1E3 ="X"2E3 3E3  (Y+1,X)="F"6E3p (Y+1,X)" "500 :Y,X;D$:Y=Y+1:Y,X;P$:.005y# =,Y:S=S+1 ="Z"1E3 ="X"2E3 4E3  "5E3" J=O-"8"-I:N=64-2:#O;8-J;N;I,O;" T R A K - T R A P P E D ! !":.1}L,N*J:ïN:J P#O;I,O;" F I N A L S C O R E : ";S,:I:"2E3":"7E3" pBONUS=I:BOARD=BOARD+1:BOARD<6O:::"10","8";" B O A R D ";BOARD;" ":J="20"̯"<":.003xD,J:J:"d" S>"1E3""7E3" O:ڧ:I:O::" " 5N="-20"̯"("Ͱ"5":.1}L,N: N:"" ]װ".8",O:I,"-20":#O;I,O;" ...Your score was pathetic!":B$="NEVERTHELESS...":I:"500" XS>S(I)"2":ڰ"2":O::N=O̰"7":M=70-1:5,0;N;M; "":.07}\(,N*M::.03{u\,N:M:N b$I:ڧ+:I:I::S>S("5")"7900" lI:"8960":O:"H I G H S C O R E T A B L E";"5",O:N=Ḭ"5":S$=S(N):''" ";N;". ";H$(N,2̯H$(N));".............................."(28-H$(N)-S$);S(N):N x^"23658","8":#O;I,O;" ANY KEYMORE -  Q  QUIT ":I:O:="Q""8E3" "K" u"8","2";B$''" YOU QUALIFYENTRY THE  TRAKTRAP  HIGH SCORE TABLE!":"23658",O:"PLEASEYOUR NAME "''I$ N=Ḭ"5":S20I$=I$(20) :S(N)=S:H$(N)=(I$+I)+I$+" ":: @W"5":ڰ"5":ټ:ç:"63231":O=ç:I=:"9986":"9995":"23606",O:"23607","" J"8960" :"Move a  counter round 5 boards! Z=LEFT, X=RIGHT, K=UP, M=DOWNExit to the next board through after squeeeezing as many pointsas you can from each board - onepoint for each square you cover.Don'tgettrappedbyyourtrackOh yes,There's also get a secretbonus score if you can find how!" ""8955":O:K$= " K$="R" "WK$="C"#O;I,"14";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "UK$="N"#O;I,"25";"NEXT":"23608",+:*"M";I;"CONTENTS" " "8905" "b"23658","8":#O;O,O ;"RUN PROGRAM CONTENTS NEXT ": # " ": &"M";;"tra" &*"M";;"tra"ʰ"8E3": '"23637+256*23638+5": '!U\N#FJX<~~<<~~<~~~~~~8p<<~~IIII?<<<<I**I8DA<~~888 0`||x|p||0x0>~|N>ff>``|~ff~|<~f`f~<>~ff~>60||00>~f>F|``|~ffff8888888nn~<``f~|~ff000000<||~~ffff<~~ff~<|~ff~|`|x|l````>vx<n<~~ffff~~>||88~f||ff~>~~8p0p00  t\|ƚ| >0x0>~|N>ff>``|~ff~|<~f`f~<>~f&)NN="55"ENDͰ"8":"45015",N:"45038","8"-("2"N="71"):"45000":N: &4Cԧ:ӧ;"B":27;"@";27;"N";2;°"27";"l";°"8": &9"23637+256*23638-0187"::K1@ 45000  !Jȯȯ>!iY7Cn>*n "n"l>!dY*l "l> !hY= = > )6,=p~ $ >p   >{= = ~# K 3 ;°"8": &9"23637+256*23638-0187"::K1@ 45000  !Jȯȯ>!iY7Cnoo"15" R"ADVENTURE!","15","#" {"BASPEEK","15","/" 0"CRALDON CREEK","15",I0,"CRASH COURSE","12",I0 K"DECPLACER","15",O8 <D$+"OPD+tape>drive)","14"," ",D$+"tape>drive2)","15"," " c("INTERLUDE(INTERRUPTS INFO)","15","!" n J$,"15",I0 /1"MEGA-MESSAGE","04",".","MEGATRUDER","15","/" IO$+"m/code2)","13","!",O$+"m/code3)","14","!",O$+"m/code4)","15","!" R"OUTDEX","12","1","OUTPUT (Printers1)","14","!","OUTPUT (Printers2)","15","!" &"OUT-TAKE 05.(Pattern fill)","15",O8 *"PROCSIM","02",O8,"PRO-SPACER","15","/" F"SHOPNLISTER","15","1" "TRAKTRAP!","15",I0 "!",O$+"m/code4)","15","!" R"OUTDEX","12","1","OUTPUT (Printers1)","14","!","OUTPUT (Printers2)","15","!" &"OUT-TAKE 05.(Patte&&Lpos=tp*fl+i-fl:cap=i:# Vfq$=a(tp)+" hour"+"s"a(tp)>i:i:o,o;" TAPE No. ";tp,q$d$(pos,i)g$d$(pos,le)"#";o:i/x,xx [En=ifl:n*ii,ii;o,,:n*ii,o;i;n;o;o;" ";i;d$(pos+n-i,le):n `xix,o;" PRESS SYMBOL/SHIFT+A=menu Q=last rec E=next recF=file rec D=dup line G=goto rec";#o;o,o;"I=tape len S=search U=clearW=orig rec" t l=ii:c=ii ~"<" ֎frm:#s;" "(tb);xx;inv;u$(tb+ile);xx;(inv);u$(le+i):t$=d$(d(n)):pp=pp+i:ppplpp=o:t$="":#s'''' p line G=goto rec";#o;o,o;"I=tape len S=search U=clearW=orig rec" t l=ii:c=ii ~"<" ֎frm:#s;" "(tb);xx;inv;u$(tb+ile);xx;(inv);u$(le+i):t$=db*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >zu H?͓LEě or a crime thriller. Humour is used so frequently in adventures because authors must feel that the limitation of their work  \T Benrs' GØ Solng\TexAdnanintcon\ THE LEGEND OF CRALDON'S CREEK\A Perۈ V bBa Cars\--------------------------------\Ah! Adn! Exnt!Mac!\Ron! Atsp! Wit\i ܎llabri a\allo֪l. Ws\tt esn, t sof\oco ily, ier,\}pi madns. ^Yra I mt wly-\ernrlomd\xadninrd\ a"incª ".\Soiallem\ u tt. For\t srt, adna a\eopbm ld.\of t pbma \unslfstnong\ t e esectlt\roph ee wn\a kt y.\\"THAT'S THE TICKET" (Ise5-9)\a atmpi fnt\con.Arf t in\Eۘ 2 (wcs I\tnk)t pbms\tuldn' lant\empo enynwch ^iwenrinnft\ial aut. Mia adn\ul ۡtn TICKET\cզ mpaninr-\acª. Iul ab \unrsnanaۈb int\o nnnsn if\iuldn't. Ie\u- iul tdy\oc thlr. Huuis\u fentli adns\}u trse tt\t o otirk\anit'unl n\sly.\\M"ial" adn ulal\ "-acon" dyo.\Iulislr\a inul acon\ino aantnk. ^Mosotaco ul r\atsp ansly\rimrn t pt. For\emp, w expnan\a|n̢bڟn-w t,\crcllulc i t\sn; ulag\|rnۡw;ighn\ i t op uld\flora- al adn t\n o"acª con" tr\t snbn scen.\Hor, ۡ otinnl\actMAY i atlr\arnloimrn.\Y st crch\wЧ llar- t in\ t srofott\int t pt! Mang\SOME otinn xt\g}nuleu\ge errd! ^Is sb can\adn agpnand\exnat rsr\co iul ennd\bt incª ent. Y\ulexpԦ anenrld\osninsi wch\sry  np\sobr iiu\p i ri p\ari ¡ oy\infen iisu\n'e SOLVE anytng\sly. Afall,ery\o iWHODUNNIT.\\THE LEGEND OF CRALDONS CREEK in\tisisrt, mp\adn tt'silۡwt\bt o oinand\itacpnonlo p\ ^ph l ۡ ot\zzapslscd.\Fota I' in\inc ۡ ot rdin\t ln}r- aa\aai ۡ }s,\}u I n'tn |nng\uaainsbc ll\ic i fnkly.I \ t l o w\i isl }n'l it.\\First, ۡ pnps\lnanadns...\\Aly p. T a\fntdo mp\i ֨ w r\t rs}o i }l\trtanobctpnt\i ԫ} trs.Mo an ^adn}o anaand\d te t t. Do\t}on t\ۡtn ts:-\\\ FIELD ------- BARN ----- PATH\  !\ !\ !\ !\ !\ PIGSTY ---- FARMYARD\  tcr\ g\ !\ !\ !\ !\ FARMHOUSE\ rr ^I u n an|cktc w\¡at sro\ I } |c t\I }. Manadna\ s} t aʪ\all. I ۡ,inNORTH\f t PIGSTY a an\inra }o ten\t PIGSTY ant FIELD ou\enuat BARN i wch\} drtsrng\rtf t PIGSTY rn-\inrtas t BARN.\\ALWAYS e EVERY obcu\nd. Mosadnacpt\r EXAMINE TRACTOR or.\ALWAYS at xscng\t }o }llces\anal o cԧlaany\gpcs. "Fe" obcta\ ^uallsw unt }on\scpo ant }n\rllEXAMINE, TAKE, GET or\DROP. I t sadnu\sulal ab e\anytnel pnesally\isci t }on\scpo oapani any\gpcs. Muc զ ofn,\Ыr,tisb and\ ۡ llaons\:\\ YOU ARE STANDING BESIDE A WELL\ YOU CAN SEE A BUCKET AND A ROPE\\ EXAMINE THE BUCKET\ - THE BUCKET IS EMPTY\\ EXAMINE THE WELL\ - THERE IS NO WELL HERE ^I s} enLIST\oINVENTORY cc wt\obcta }rrnanit\ioi tat\sre Φ c any\obctua ۡ-\tno tuang\it.\\OPEN anors, CLIMB antes.\GIVE obct anccrs\i t wacon\t is. TALK t it\ alws. Sa"HELLO" iu\} tn otnel ait\pޟ sn.\\KNOCK o ancors. EAT\anoanDRINK anids.\T iۢu'll\kunstry... ^W u' Ϣ ۡ in a\ u SAVE opo it\io Φ trnanytng\ubt dnng.\\He iۡ ot }ry\CRALDONS CREEK incnt\aayI noo\owcI n'tn an\ulesi lo ars\unsu'ESrt.\\Mosrd} abba\t rs3 o4 trs.\\LOOK - att gpcand\t }o scpo iu\rw a.\\N, S, E, W, U, D } ur\GO NORTH SOUTH etc., UP anDOWN ^GO TAKE GET TIE CUT GIVE\FLY ACROSS CHASE MAKE WINGS\SWING SWORD AT SCORE QUIT\SAVE LOAD\\W mp ssrd'n\Par2 (wcl p|bly\ i t Jaarise).I sll\a t ssrat¡\anywˡrs, I exct.\\No tt SAVE GAME a\i }st onlant is\ ef t ottn\ t mr. Aast\I  c to \it'stcª Mul€\SAVE MAZE MACHINE!\\Gck!\ - Ban.^arise).I sll\a t ssrat¡\anywˡrs, I exct.\\No tt SAVE GAME a\i }st onlant is\ ef t ottn\ t mr. A "5":ڰ"5":ç:"28078":"9997":"9994":"2","2";ܼ;ۼ;ڰ"7";ç;"LOADING";"2","23";"LOADING":*"m";;"lcc7":*"M";;"lcc8":"20465" &"M";;"cra" &*"M";;"cra"ʧ: ' {"39936":"23637+256*23638-71"::AUTOCHARS*v\!?~/wy *v\%"6\>jmw#wL>cw#w#>kw#>>w#>6w ' "23637+256*23638-0624"::  X!! z[F~##66- ------------------,--------------------------------------------------"-----------------------------------------------%------ ------- ----- ------- -------& --V @V 2`:O,I,O2,O3,O4,O5,O6,O7,O8,O9,I0,I1:ç,,"2","3","4","5","6","7","8","9","10","11" dV1=:A=-:Q=-:O5:O5::O6;"ENTER ANY NUMBERTRYDEFEAT THE ROUTINE WHICH ROUNDS EVERYTHINGTWO DECIMAL PLACESAND PRINTS IT ALL TIDILY....";O5,O;O4;O;"Enter Q to quit or A to analyse.";O7;O2;O7,O3;"NORMAL";O7,"24";"TIDY"'' V:V=Q"8E3" V=AV=V1:"5E3" V1E8> űV13 F=ç̧:.01z# =,F:#O;I,O;I;" SORRY, No. TOO LARGEKEEP TIDY - PLEASE TRY AGAIN. ":F:"":"250" V1=V:"500":"250" V$=((V*100d+.500001)/100d):L=V$-V$:V$=V$+(".00"L)+("0"L=2V>.09}8Q):7;" ";V;30-V$;V$;" ": :'I1;O2;O7;"ANALYSIS"'':O6:V;I1;I;"1st Value of V" -V=V*100d:V;I1;I;"Multiplied by 100" *V=V+.500001:V;I1;I;"Rounded Up" (V=V:V;I1;I;"Take the Integer Part" -V=V/100d:V;I1;I;"And divide by 100" %V$=V:V$;I1;I;"=1st VALUE of V$" L1=V$:L1;I1;I;"=V$" *L2=V$:L2;I1;I;"=V$ Integer Part" -DP=L1-L2:DP;I1;I;"=Decimal Postn. in V$" 6DP=OV$=V$+".00":V$;I1;I;"(Add "".00"" if DP=0)" ?DP=O2V>.09}8QV$=V$+"0":V$;I1;I;"(Add ""0"" if DP=2)"  V$;I1;I;"=FINAL VALUE of V$"  D#O;I,O5;O4;O;"Press ENTER when ready":O:ɰ"13""5130"  @"9994":O=ç:I=:"5":ڰ"5":I:O::" - Ron Cavers" Ji"This is a demonstration of howto line up the decimal place incolumns of figures in BASICprograms.Read 'DECPLACINFO'which precedesDECPLACER in this issue for moreinformation.The single line at 500 whichactually does all the work canbe used in your programs if you press E tothe rest of theBASIC thenit andit into your own programs.":"8955" " O:K$= " K$="R" "WK$="C"#O;I,"15";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "BK$="N"#O;I,"26";"NEXT":*"M";I;"out" "K$="E"A=O:B="499":"8925":D="23296"̰"23319":E:D,E:D:"23296":"!",A-256*(A/256),(A/256),"","n","25","","!",B-256*(B/256),(B/256),"#","","n","25","","","","R","","25","","","25","" "K$="E"A="501":B="9999":D="23296"̰"23305":E:D,E:D:"7":ڰ"7":ç:"65367":"23296":"!",A-256*(A/256),(A/256),"","n","25","","!",B-256*(B/256),(B/256) " "8905" ""23658","8":#O;O,O ;"ERASE ALL BUT DECPLACER GOSUB RUN PROGRAM CONTENTS NEXT": &"M";;"dec" &*"M";;"dec"ʰ"8E3": ' z"64E3":"23637+256*23638-71"::AUTOCHARS*v\!?~/wy *v\%"6\>jmw#wL>cw#w#>kw#>>w#>6w BUT DECPLACER GOSUB RUN PROGRAM CONTENTS NEXT": &"M";;"dec" &*"M";;"dec"ʰ"8E3": ' z"64E3":"23637+256*2363 m*v\")J!J~͗"2\k #N#F+#~8N 8A{8O808#88 ւ>uh>oN>i4>e>a #~a> ^(\(> *n< S>>*̞B< ![#R0~ 8~> > >z>z \\ Linut inin\ mnos- Ro Cars\ ------------------------------\\Folnesf a\ao  ul\pi }safr\mp}lons, I d\ sct u¢s\wcI'uot ars\annn t wР tng\w in o- u¢\wcult ly\panyw i pgm. ^T  i DECPLACER, t\nsto pg lng\tarc, iNo. 500 wch\} manud\anyw - t n \V i t PRINT snsuld\rs ationly\ m i t .\Al tit ein\r u i t lts\ou}lo in t\ab V an}l t u¢.\Foemp,\\LET V=(WAGES*1.333/36)*10 : GO\SUB 500\\Hor, t al uan\exnro ot u¢\(a5010 5120) sin\i irks.Bcng ^t 'aly' opon, cs\ot nro ipn\t sce tt pڗss\} զ llԫd.\\T rs5 sl \t lo}lo 2\ ps. Tiaced\bnt int\p t ght(*100),adng\.5 tanytno.5 or\ol unu(t\.00001 iinc alr\t eoratht-\ia}rebt ROM).\Tant inronlof\t latincps\ofanunn ps,\t IJnb100 l \ut 2 pid\}s- alst. ^T tub ats is\tantina t\sw - an et it\li pn²ly.\T litΦ ˾ed\in V$ rton\\Bnt ngtots\stnanbtcnf it\t ngtot inrt,\ } esbst o of\t p.T } only\ thsb ansrs: DP=0\i wc} t' l\inan a anta\wР m'.00' iad\t enot stng;DP=2 sws\t in nd\o f t ghan'0'\iadd. DP=3 ant l\inii t rcon\an aco ied. ^Tio sghaևlwch\ }bt\u¢. W pnnmrs\>= .1 an< 1, t Sct ROM\addan0, et\ tmrsltn\.1, n t a}o in\t u¢ adtin0\iDP=2 onlit oV\igat .09 - otrŧ\t u¢ ulpn.01 as\.010, emp.\\Pnn t Sct scen\irlls´ef t\f ual t\ pwc \}lli t t-\ oV$ e sft\pnnf t ght. We\tΦ esbsght-\nr bt u oTAB ^(I u30 t} \cn anmf 32\w t ngtot\gsm pnd)\ant ngtocstnis\btcf tr \nt rcpnon.\(No I al pnt\bn sat enoV$\lpno - ժ\t in ur\Nos. gh t sce ed.)\\ - Ron\\\ PRESS N TO LOAD DECPLACER.^gsm pnd)\ant ngtocstnis\btcf tr \nt rcpQmPEN INK PAP X Y LAST PIC /!ScFwxm:Scn(n:Ocw#:H\w#\(n~2Oc#~2H\#\!5n0$o8@P!!888@P!!888@P!!888@P!!88!n*TcVcwR 8êpE!p~< STc#(###~(*Tc#"TcSTc#~#fo 0>ͪp!Xõ>:\6W> ͪp2\̓p=#̓prp:Oc((:H\zo]p:\zozo]p:H\zozozoG8!XXw]px!8T6Wg.Ww>̓pׯ>> >rp͟o >̓prpO> Gͽo>y̓p(Orp]p >  rpO̓pG:Oc((>>>( !> O > +| >xy>>2;p2Oc/j:Oc> >2k\>ׯׯ>==:Oc!\ ++>!:Oc!\ ++>>> 83:\= -:Oc=:\(  DG>x ׯnlnn n n n +o oppooooo7pCp]pep:Oc*\ *\>"o>eo:\>Ep+oq !;\ˮnIr(:\ T> 8> 0 !q0$o~7[z\*x\!\G~w!q2^c:\2\f2\>!qðq  T2bc:bc!bc6/O&Ir-cz( (>_| }088>>0WS}\(*Q\>"Q\![r~(# C# >*c!zr~d(c# >2v= >c*c"^ex"^!"!˾!6Օ!!?Օs~w͓!^͖|~#?((#!N͖|*'r*7R+V+^"7*7㤧R s#r#"7!"7!srÒ2Örssr|! #srrsrrRsrrss*srr|g}osrr|g}osrr|g}os*DM)) ))) #"r}Yl&sr|*(:2~(##~?((#"r|(E!>0#_W t~w t~w t~!(#s t~! #sr| }(!Rt45Rt~5Rtr}Rtn&sRtr! #sͳsXsqsr|!(#s~sr|(!!gl͏!>l:[ >2[!![66 6 >2t\ZSr|(M*#u8###^O=!^lr|(M*-u8^O=!^l!lOs͸t^#V~ [r+srM*#u0:烙2r8ux^![~ #͸t͸tG~xw#G~xwr: : ʹrr8u:2: +s*%?N#Fx( ʹr*/Yr78IvrDM*%?##0~(####u*7^#V>2civIw8uiv6c!9l!l͍söur| !2N#F+x y :co&u>,2##< :fv!lOs͸t^#V+K| 8urx:Ou(wOuB(8u> { OsrM*#u0^:賈!ꤾ0 26#6r8u8u*&͒8u~As8uv>2c͸t#~! #s͸t^#V*R͸t^#Vz(͸t^#VrRcK!cD#~K( x!Our͸ts#rOu8u͸t^#Vz(([r+s8ux0c8u:㤧_2_>2r"`v:::o&s:x͸t#~+w^#Vxr|(M*#u8~o&sK*%?##0r|(~ !s(####^#Vs!l͏!>l!;*"x*"x!l!"tt!"t*x"*x"!6lOu8u!l:@28u$cc'cN: 2v::_r|(}! #sr|(}*夼(r|(":2"4s*ð~# !"?o&)U!^#V͟y:`(W~#_"s*#~#^##N#Fo&)q#p*1^x#  ~#N#~Gy~Oa8_(####K ~:㤧!Oy2㤧(7:䤧*!y2䤧(7*}*y!G~(#pz(z;zô*~K(##"+,.;!_A(T((~K#~(F#~_N #~_D #~K $#~_H #~_E #~_N #~K ѯ">!+"^#V#z ?z {~(##~#(:2*)Kz8 gy:`*+gy:*|*头 8u!6Ͱy>2>23c"*5">0c>24sͮr`vK*%?##0:G~ȸ#(##^#Vx<:*#"(*" :大(2!"":( ͸w!["6܅0:2:[([Szdz :2:㤧(2ͤ{:< :2:< :2*M"5?|!c"rr!w"r>0c>2A>0c'c?{*'gy:  |!ly{ {: (8u$cc!ޖl:O~#( Ix̬|:I:I!^^6 !͖|*-|~#^o&q^N#O!^͖| ͽ|!͖|!"͖|*#~|#^N#o&q~#^o&q ^N#F#`iq&^O!^͖| ~:![͖|###!<͖|!O\}!B͖|*\}!H͖|*!\}}!Pl$ccב!}Aʇ}C1HrL%M|N{}O }RʲVo}͏|>P2! "~ #( 4-#D~:0ً+Kzyߋ~(#O! Fx( (7}y}~ # ~-7) #5-7xD~ߋ~(#O! Fx(7}yKB( (B(+˱+~ }~+))& > ~*( (+ > >)y*w#"*+~""bSC~?( ((##+KB~͙~ ZO! ~ Xi&~*R S O! ~ > >(i&~i&~fo˼ʕ+~կ2b~#!TlN {!u~*( ( c#!_l!jlþ+~(? +~ ^##͓=!^l!nl$cc'c!͖|*+r!͖|*)^#V#z!Roͤr!om"^> 2^^q!^͖|r#!ėl$cc'cDʬR !l͏͕![w2t\6 6w 6 w66w!րZS]*3RT]=S 23778\ 1]!\s=\!8@!]>7V T"^!:.Å!C.2E7>cÂ>*cl*c"5~x*>Bc(6r~( >c~c#x>c[q[> cqy >c~+w## + &~ >c#~+w# ÂGz8>c>cxc~p#G p# |~(#|$cc'c:9\_!͵ [:H\!l>cc :j\2j\ Ï ͎ ͧ y >c+ > ~ >c# > ͤ Ê  þ~{y!"*|t~>(<c n&[q> >2[![l!l!ɂ#|!l!l!ۂ#}!l!Ϙl$cc'c !Օ$cc'c>0c`v͍sÜt*s:*#"[70:>*c!l*c!l*ɯ*cc* >*c* |(!l*cß* :6!l![l>*cߕ!l*###~( :6> c!l$c!#{''cw*K3B|DM!Flx0!Tl x0![l!`l`i͒!l$cc'c!l*3K7B 8*5܊!l$cc'cR8w#!l>xY(Ú!El!'^|*#"q^*=[; r2!"/|&8*=\s\!qs=\|{\"=\!lcɯ2z:_~#M!O~((####O> >*!^"C![2^*Cw#"C*Cs#r#͛G!"!w[!wx![![w!܅"!c"r*&*!lc!w"r* |'}+ɧ .,-!?: . , - ! ? ~K(%`` @~`@(##~K(`` ~K( `` ˮ#~byG+#̀x29*1~#( O  # :9G+#ͻ4(6"3~K(҆#byG~#+#N#~#GʵxG*1x(^# #x@ ~@@~   ~~~#(x8!O ~Px8!O ~A(PK7B(>8 [3K7 *3RDM*3K7 R*3R#DMx FNB0pq++!)0~#c>0B8< 0(2:cf ɯ2:'vvdv v}0c( (08:0DM)) )O 7! ^:?YD^:@YLK=B0 *=B}2@*;R0 [;R}2?:?_*;*= rو*= H*; r y :?_*;*= rو*=BH*; r y :?_*;R*= rو*=BH*;Br y :?_*;R*= rو*= H*;Br y ![6͓![ً?0|7!ilr2 2(|(v+:\<^#V#z 7{ z^#V#>+2R2S2T?>#2R>2S2T~ 7#^#xȯ2Ex !b !bKBDM*B!bKBDM^#&){2^K^Ö^҇K7B*5)G&yx8#>0c!5l![6͓:[ * #ͳ![ًz  !RlS K *-u0"5!"7: !^w#w#w#6+++"5S7BK^!^[O!ql* ͒!l![͛ ![^!^~8(##x(!ly2^:^ ي ô*( ~(~a8G( #y(  7R}~ 6-D~""`!^O*.>0B8< 0(2:f ɯ2:'UUdU U}0~µ_#OK!_#(|" !^[͓![͛?![^->!l~( (c#!jl~#? (#>0c!l![6͓![~ >#" ً8z !lS K * x( "5^~(#(~#? C7!њl* ͒!lͻ !^RDMي *'*+" >0c!l![6͓7![~ >#" ً8z !ilS K *)^#V#z(B(2 #" ++"5!"^"7* "^"^[5ي* "5" ð*)^#V#z~#( #+++"5!"7يQ! s#r#>2A2K!OP6!!["6 #![6͠0!l!ߚl͏*3R![6u t s r2t\ZS [! [ ~ > +ɯq!b~~#t![6͏![~ 7ً8z  !Rl7n&[qv#OGs!l!">*c[ͨͽz :6![l!6l###~ Ͳ((- (v(X(6D!"7!;l![͗07:[ʟ͕uً8z  !?l2^͐u:^2^Aي!Dl_>0c!Il!OP>0c!_l*P>0c!ul*!Pt>0c!l*M[q![͓![ً8 z(SM!il![͓![ً?!il>0c!" !Ûl[  ͳ!ߛl͒M*#u++"5#N+C7^!^[O!l![͛:[ ي^![{=2^!l*^[q"^!l:^o&[q![Ϳ!x( * BY7?'cͬ|Њي"5!"7!ߛl* }2^͒!l![6͛:[![^{=2^!l2["^!l }2^K^ي>0c!" ! l2[:[ >#" DM*%?++++"5S7BK`!&l* ͒!l*`"^*`"^!"^"^!`~#(##[O![͛i![~ يi^"^!`[~(o&͖> #N#F#`iq> ޯ!.l![͛i![~(#~8z  !Glz !^l͹~(&*C"ͅ*^###"^~{Dž҅!l[*7|(*^q![͓i![ً8S^BK*/ׄ8K^!lيi++"5!"7!&l* "^͒!l![6͛![i~i~i^"^!.l2[5>0c!l:!"7"5ي$cc_N'c!l$cc_N#^#V#`q>,~#(o&͖N#F#i`q> ^O!^͖|!`͖| P!͖|!Ϟ͖|!͖|ͬ|M> b~#c x 1 x "x͞y͞>,$=x͞T]6$|  High priority conditions Which adventure data file do you want to load?... Memory full ... nothing Enter name of game position... PRINTER MENU       MessagesObjectsNo. Wt. Start DescriptionVerbsNounsAdverbs ERROR: not found Press a key ...Low priority conditionsLocal conditions 2D1isc or 2T1ape... 2 D1ata file or 2R1unnable adventure... What name do you want to give this adventure ?... MEM LOW     OUT OF  MEM 1 Number 1..9999 please...BRK Mkr 01234567890123456789  Ctr +0 +1 +2 +3 +4 +5 +6 Press D for diagnostics or BRK to break...Press a key ...Which picture number ?...You are VERYvery short of memory Free memory now bytes PRESS A KEY ...  You have run out of memory. This last edit was IGNORED. Please press a key ... OUT OF MEMORY  Number 1..9999 please ...Which message number ?... Please give a number 1..255 Message number is... Message too long! I don't understandWhich line number ?... Line number What do you want to call this data file ?...  DEL ENTER-edit C/S 1-restore  * EDIT VERBS * * EDIT NOUNS * * EDIT ADVERBS *The room in which you will start the adventure is...Which object number ?... Object # Starts in room #  p`0p X`Ph @0``0`00`H0x0H @x00 0`pp0p000xp0`p0p0p0xppp0``ppppxp @0``0`00`x008dll`< pppxxx0000x<pppphxppx00000pp ؈pp؈x0000`x````x`0 xx0x000`0pxxppxxpxpxx0p000x8pp00000xppxxxp````h0xp p؈x0`8```80000000hxxK to end,other key to continue TAPE ERROR... Press a key.   1986 INCENTIVE SOFTWARE LTD. Design by Sean Ellis Programmed by Brendan Kelly.DISTAPOP00AND OR *NOT XOR HOLDGET DROPSWAPTO *OBJ SET RESESET?RES?CSETCTR DECRINCREQU?DESCLOOKMESSPRINRAND< **> **= **SAVELOADHEREAVAICARR+ **- **TURNAT *BRINFINDIN *OP28OP29OKAYWAITQUITEXITROOMNOUNVERBADVEGOTONO1 NO2 VBNOLISTPICTTEXTCONNWEIGWITHSTRELF *IF *END "Stack empty  Stack full Marker*Counter*Room*Object*Message*3STOPPED1 Illegal value fyssXss$vVuuwu(t/t6tDtwttothttu`v,uAsstttxxawowQwfsqs~xw'x|wfyfyxxyysCy$y)yxxxxvrrVx;x;sXyOusfy|TTTTTTTT|DD88 .,-!?:յb22br Aa Mv>$-+X-[a]!^D$;Mn+P2$^+ i  R   EF-H.G!`(~D52R <64/#$; Q@QB=cA 98* *>!'7d*e+,3 0P?1:`) "&%C~^ V pUr !yIpt"|ko{dvl.xTuoa(%YcNdi/9gF_^L3LS[RoW/z--o's-wXǒ)hne&m ]$f}GbZ2M`j2 q\/PNQOIK J rUSkH KHHZHIGIPHHY 2Vg2+?KHePHI/KHKI ]g2+?KHePHI/KHKI& bS SqKHePHI/KHKINd AnpPHI/KHKI*- pPHI/KHKIHHIYIP pPHI/KHKI$aSkH KHHZHIGIPHHYPJ $SqKHePHI/KHKIHH$MS"v >c==T2++? rHHHHHmKHHHIuPZ%HHHHSHHaKXPbKIjXcKHdKeKfKIHXXHgKhKHijJHHHYHIk[lKHXPWHHPArH KHHZHIGIPHHYPJHHHZHHXHHHHKHIGQ7HYHH`IHH QZȥHKHHSHI RHHHP%JHHHZKZHHI[HHHHYHJHH[KSH\KjPWXHH[HHHIHJHHH]K^P&9%'J`IZHHJHHPJHHKHHH^XHHHdIIIIP'BaUKVKHHJHQJHXH I`KWHHHJHH^PYHHJHHP?=2LHHIHISH[bJHI[QH]IWHIKHHH[IHHI@LOT?ZIHuHZHHHJHHKHH]QJHHHHHIJHH\IPIHHHMH}P]IIJHH@Md@IKHKKIHPЙHK[HHHH^QH[HKKH[HtPIKHIHHH^IKHKJH*JHKKJHHAY(LHHIH'LSH[IHHJHHKJHHP@;MAHHHHKSHHHc^IHIIJHHPIKHJHHPWAA3@NIHJHHH[IYHHHHHHK[JHHPNM[AHHH[YHKQ KHHIHKKHH IHKIHHKYHH[HJHHPZK[gMYcT*FJ_oS+J,-T.F_/0[AN\JJHH\I|XHKIJHHMKNKSХKHHIYIHHHJHHPn KIHKYH IJHHKHIHHP`HHHKHHK-IHHKeIJHHHPEIHHHHIHHKIHHHH,Z'bJ S؈ꈺLjcSK>=JdK<HHHJ_Q  Ӓ@xHHJHHJHHHH@IJHH'IIJJI P(IHX%IHJHP,yJHHKHHH H#XHJHHHHAIHHHP- S؈ +  SHR S HC D TB KHHIKHIGIIQYHHIHK:YHHKKSHKHHJHSJHKHHHHHI*YIHMIYPIHKHPIHHH`XHHH IJHHHHISY#b$A ƈ% RJ&ԈJ'J6[HHHHLKPH@`,3'%HHH^XHHPHHHHHP8HHHHXKYKHHHeXHIIHHQWHHSHJHHP3i24HHHH^XHKHKHHH`HJHHXHHaISHHIYPJHHHKHHIJHHHXHHHHHHHWHYIJHH[I@2??3HHHISH[YHIIJHHPH HHJHH^XHIHJHHP4353*YXKHIJHHPH HHHHKKSHHPH HHHKHSHHXHKXHHXHI[HJHH`P+ȧH KHIIIHSq 4 rHHHHSHHKXHHIPH`HIHHKHHQ5CB4HKI[HHHIHHHIIHQKSHHKKKHHKSHHPBQO5KKHHVY[HSKHH JK`cc``a`cKHHIQJHHHPQOE\BIHKKHHHXQIYKK>IHKS?IHHKJHHPKHWs\5[OhȕHH[HJHHH&HHHHJHH[VYXK\QT>]O~OHMIHHHHXIHHHIYIPH IHIJH!HHHHe@]GTjHZIHH,JZHHIH!KJHHHHeXHHHIKHKHSeHKHJHHPr5$ ZIHZXHHHII[HHHKHIHISHHKXPj4]HJJHeHЗdIIKHHH[HKHHKHQwhjJKHePHI/KHKIXKHHKKHHIIS[HK HHHpHKHHISHK!\SfdgHKHHLHHoKL\JHHLJHWKLHWPHHH*YL\ L+JKH TИH`H LHPH&HKHH LH_pu3gYHHHHH LHHHHHISH[IHHHWHQvlHHHLIYI[HJHHPlgvIIJHHXHIH Qg,lJHHHHHHKHH$T% HKHIJHH&T+$>=====-2+?&$0//>==32Z$ >-?+$>==='2+?$ 0/> +?@$0>'2+?@$ 0>(-?0F/>d+?,$~>,-? 0 / >  +?3$> &0/ >=#2 2!=32+?0"/!/>+?0!/"/>+?0!/>+?0"/>+?c0"/"/>+?c0!/>+?c0"/>+? 0/>+ 0>+?0/  > +0/>+'0/>+?0-/>1+?0>+? 01>+?01>+?0/>+?0 >`2+?0>&2+ 0 />+? 0$/> +% 0/ > +? 0/ >+?00>+?0>&2+?0 >`2+ 0/>+? 0d/>M+? 0d//>@+?0>+01/>+?01/ >01/ >e== 2+ 0%/> +2 0&/'/> +? 0&/'/> +? 0&/> +? 0/> +41(/>+?(/>+@0&/'/> +? 0&/'/> +?(01> +?0>+?0>-?0>- 0$/>+?.0$/> +? 0./>9+? 0.0//>:+? 02/><+?.0/>+? 0/6>+?0/> % + 0/>K+? 0$/>L+?0>+?01/ >e===2+[ 0&/'/>F+? 0$/>+? 0$/>+?0 >+?0 >2+?0>Z2,0>2+?#>2-Z01/>+?0 >g2+?0/ 1/ >-?0/>-?0/ > %  =[2+30>i+? 09/>+? 09/>.+u0 >-g0>f2+?0 >u2+?0>-?0 > l! +?0>u-0>'2+?0>'2 = 2 =&2 =42 =g2 =t2 =.2+0>v-0>v--0>='2+?0> ========'2+0 >`2+?0>&2+O0/ > +?~0/>+?~0// >c==T2+q0 / >+?01/ >e==2+?01/ >e==r2+?j0w>w2+?0w >+?w0 / w> w ln==v2+?f0>-?0/ > ==u2+?0 >+?L02/ >====-?r01/ >e==2+?0>+?3 0>+?-<0//>+?3 03>3+?3 03>q+?303 >3+?303 >+?0> ;6+? 0/ >+?0>*?0>+?0/ > #-?0>'2+? 0>-,? 0"/>$+?#0"/>%=&,-?0>+?0/ > '+?0+/ >+ +?0/ > +?0/ ">8 " -?0/" >[+?0/ >1 +?0/>,+? 0/>>+?0/ > +? 0/>?+?0/ > +?0F/>_+?0G/>_+? 0/>++?0>p+?0/>=o+?0>,*?P0>8*?Q0>7*?!0>"x#y+?0)/>X+?0>+?30>+?3 00>+?202/>+?55>+?0N/>- +?0N/ >Q+?0N/ >N +?0N/ >N +?0/ >}-?01/>]-? 0/ >R+? 0 / >\+?0 /  >  +?0 />+? 0/ >a+? 0/>h+?3 0>+?30>+?0 /  >  +?0 / >+?`0o/>+?d0>^+?e0>k+?0+/ >+ +?0+/>+?~0/>+?0/ >-?0/>+?0/>=A-?0^/>+? 0/>,+?0/ >+?0/ > + 0/ >+?0 /  >    % +?0 / > +00>+? 0/ > +? 0/> +? 0/> +? 8 ֱ^ )JΉ JŠÊS eJؖ6^Ē KLor.JRvwZ x /JIK yҘ !ʈ"0S󉖈1$UÈfK#$JShy&#%2 rz  LʈO  (K ʈfL) {+rShItLjɐ4J$sȖJ*ItLjɐ$%K 퉙ψcTވU*҈5T|} ˈJHHH ~̈L7© 8!̈ ~$ ȩ_%J'-JS9K߈.S∖ ˈ/ɘЈӐ&{+Sh"̈ L0L1K123 J" 'K4 Ș5א(w]T*+KU6i8,KdU- d789K:;i'l<=.$g>ɉ?Ё NJȒ/K30 eKl1.șňBSC숦4DE7ʘψÉSj8R) DQDJÈJː)9$xgSFGHz:Ih; UK< xJK LJԐ=K3>K ĉMÈ?JNnKShT\͈ՈO m PQR,ڈIOSp ʼnƑ_&SSKLJJTSKKUшWfL$ LjVKWXJYfSшWM vz@ KL Z[`\<Ɛd]SKJLJn R(Voȉa70XieJ̈刟KLR ҈ g0Jh#jŢ#ʈ?{Lo H@IHHpZHIqJJH7IiJHcTrJKHsJHHHHHKHHHtJnIHMPHHHP|VΈJT$Juv w]܈4J_fΈ|xFKJՐH܈ĈJO zJyU],UA@ {q ːӐPdBˆUQ KR KiN d|ˆ\K}]*~2LňˆvŘVM(J6)?*\6+ڈ,S-. ͋呖܈< =K`\aV] VabK"g$KňN݈SaOJah._JRgi  ψ̈L1J ψscTP戡a hK y׀xȄo8\ވ] VՈӈ(܈"KJmsfK0gK݈SaOLSaψ(%)Aa KшZ tڈ{ljSӈ ܈  ."KVʉ VՈ܈JՈm6^   LJ*j$cTbLjɐkKmS̉J+JXKCNKK:;'cS"KLjʈ?2ӐVJN`P ݈ VJ\S׈"Ӑ n ψ&҈SS V}6UÈ9Kݘ9 ˈو~ VTUˈJ؈LjɐЈ"̈刟KLLU38KÈKSKJKΐ*Ȯ^$EXt\S,Ɋʚ˒u>҈S̊\S,͊VΊˆϒBЊ뉟uv(ۊ[܊S݊sފSߊK;d! S؈&HH>ISHHaHHPJHJHHKHZPQYIRȖHH$IH;I'IIHHIJHQIKHCIJJHIHXCIJHHHJJSHHJHJmIPȕJHHHKHHRHIIHHJHHHI"HHHJJJk&H\HHHHHSIJ!Hk&HHJHJJIHYHJHHJIJHHZHHHIlHPIJHH$IHVLHJIHJHJPW HIHHHHJZHHHHJSQ :IJJHH!HHISHJHP I"Q䘙/> ƈ Si∗ QDJ ˈJ ƈԘw/y҈iJD^KSQdމS U~ĉUn IKl ,bΘ(JS)012JF_To߈34Ԉ_-K5[T6_7Ո\ňB:8bb иoKJ9]SS:;J5<=>?}5T@AB.HFIՈTJK ]TG]UPQm׉q L‰։ˑ׉^J _`̈J؉J pnоSkopNqrÑjstىX߈ujWv؉J-wJxډňJyz{J|SXZ}~ۉpى܉ݙTNk.݉JKOۉSkSJ!Sqqو˜ň󈳈ʼnƉJEeT ȈJX∛[ېМ̉R6РX+ېУKc و苠቗6 aSljk@З ЂJ܈f Ո!"#q gg go oeq eqQy Qy9t 9t1t 1t| |t Hh h x x GD gg go ot tt gg 7? ?W? W?< << T`S `ST TOooON|F{D[DXA IM mVb^ lVn^ nVu^M  ņv=xxpprrr5t5t5uuuE=EuE}EEEE}5]]-]m]mUu]pXpYoYVUP ppp ppߘנ / /' '? ?7 7? ?W WO Og gW Wg gW WO O? ?G G7 opp w@oH w@H w@wH 7H/P 7H7P 7H?P @H @H @'H X` `X X'` HP HP @H @H @H wXo` wXw` wX`G777?ߘwpwxp HP PP @X X@ XZ ZV VZ ZV VX OS KRJRRRZ_J'JBZZJJBRRRRRRRRRRRRRRRRRRRRR?/GOߚwopoxoGGGWWWWWWWWWp  ppph$  # #/ /C 3C CG GP PX Xg gw w w  nj njnj ϑ ϑ֔ ֔ݐ ݐݐ ݐ zt tp pk kh he ea aV VO O_G _G?7 ?770 0@ @H HX ?O OY Y` `q qn ny y ~ ~s s~ ~q qu uf Fg6k 6k&l &ln Vvfx fxty QJ B: }:m7 WYՉU]%%XXxxج6v\t< LvbV:F*11AQV&nnNJnGhKT @? ?= =9 94 40 D0ZH ZH|V |VW W^ ^` `c cf fh Oh7m 7mp pq qp p8s 8sPu Puhx hxu uv vx xv vy yw wx wwz z ~ ~{ {x {~ ~  zW W/ / ~ Xh h H`xxxx@x h0WǘǐÓÓ H0#S #Ss s           T0d5 d5m: m:u8 u8z: z:5 50 0X Xx x Oug ug] ] ]W WT TP PO OI ID D? ?6 6, ,+ +' '$ $" "      QQ y y yy wɇ ɇ ɏ ɏ џ џɯ)q79YQIA91 _0"0*020:0B0B0B0J000HXx҈bz00@p)14CS X@X XX pp@ p@X@ @@ @Ȁ @ X` `p py y ƃ ƃƃ ƃȁ ȁ pX p iXi pii ii ii ywq yq qwq wvv vm mwu tl ll lt rr rg gq yq qq yt vv vl lv cFcN cFfF fFgF gFgR gRcR cRcN cRcj gjgR gjer ercj cR_R _QbQ hQkQ kRhR _P_P _P_N `N`P kPkM jMjQ _N_M _M`M dMfM fIdI eSei - -" "= =% %E E] ]U Ue eWÄ]}tnpvvqqptt{t FF FQ QQ QG Rl lR lt lt lR QQ QQ RR RN NQ NMM PP QM MP MM II EE cEgE7WO77GO 'NV 'N$V 'N)V A>;F B>@F A>GF GV=^ GVI^ HVM^ > F >F >A AI AI AI QY QY QY 9A 9A :B RZ RZ RZ"zrڂRb}mmrumtqy^^^^^^^^^^^^^^qniiIIYn~vttp8@H@`XPH@nNORTSOUTWESEASGEDROTAK INVENTORLOOHELWHUWHAGNKILBEGIBREAOPEGIVLOAENTEHITHROFIGHPULMAKCASDOWJUMYEWHERSCORCLEAWASSLEESPEASWINSWIFLINVTALCUDRINEACLOSSHUQUIUNTICOMMIFUCPISTEXPICPORPICTUREZZZCLIMCATCCHASWEATIDOOTINOTREAGAINSBOLTACROSBOLEXAMINOGNOMBOTTLAXPATRIVEHILLTRACOFWIZARSTAFARCHWAMWALHANDSWORKNIGHLISHACSTONMANURSCREEDLLIQUIWATEFEATHERFOOSIGSCROLPORTIOBIRWINGBUSHEPOSDUSGRASFLOWERRE FOOTPRINTDEPERSOFINGERENTRANCSTUMARCWACLIFPOTPANCASTLKITCHEBEDROOEATINCOIELPPPUDDLPOOPONMAWOMASUICIDBOBRUSHEPALMHUTHYOANIIYOUARAOTHAWHICINTAHAVHERTHERDBUBDON'FROSOMVERBVALLESMALGROUNLEADLARGFOGAMHSEHAACANOTHINSSPELYOURSELTHIWILWITBACUPOEXITALONMUSSHORENTRDEAI'ALSABOUCAN'MORDUSTBECAUSTIMAWASAYPLAITURNCRALDONONTTHROUGBANNOOUTAKEONLNEXBEFORISN'POSSIBLAFRAIENTRPARWELWACREEQUESREALLALREADLONTURHUG DIRECTIO SOUTHWARDSEDARLEAWHILSLASHICOMEJUSSPECIA ADVENTURSHOULTHEBEWARTHINGOEVITHRUSTCAREFUWAWITHIMUCANSTRANGLEGENGOLDEDISTANCOLDONBEGINQUITLIGHTRUFURTHELIGHOPENINALON CONTINUEWINDMASBOOBAGREAYELLOCRALDOSMELLSEEM'TH ADVENTUREWRONFINOCREEKSTRAIGHMAAPPLDEEREADKRO WESTWARDWANWON'OKAGOINWRIT POSSESIOWISHIFEESURPARDOGAHOWEVEFAIRL COMPLETECODFORAGAICOMHEAGOEMOSFEELINOTHEBRIN NORTHWARDGREEBLACSORRDOEMAYBHIGSLIMELEAVINBLOCKETINGLINSUDDENL SUCCESFULLALMIGHTENGRAVEWEREMEMBESIDLEADINFOLLOTREECAVFORESHOUSFOVISIBLAREHCOMINBRIGHTURNINSTONECLEARLKNOWOULPASSWOR 'CRALDONBOLTEWORDUNDETAKETHIC'BEWARSPLAPIENDTHEANYHOASIMPLREVEASIGNPOSGOLDITOWARD UNDERSTAN POISONOUSECONDSPOMALTHOUGGLAS TRANSPARENTASTEOHGHASTLHURRIT'WRITTESTAGLUCMULTWHEHARTHRECASTYTOLTWTALK99SLIP MAGICALLMAKEWAITE IMPLANTE'WIZARLONGEPLAFORMASIMPL INSTRUCTION VERB/NOUFORWARVALUGASE APPLICABLSCENERMOUTWAVEHAIPRICKLPOWEBEINSUCKEUNSEEEYEBEEMOVEMENPARSEJOURNEYSUCMONSTER'YOUFORGELOOKINVALLEYLITTL SURROUNDINSPREANICFALLEOPENEQUICKLMEAHOLWORPRESKEGOOGETROTTEDRAWELSMADNESMEANDER ATMOSPHERSOUTHERAMONGSWINLIEDESERTEEASTER SOMETHINCARRUNABLDIVBANKBEHINMASSIVBEAS REMINISANPOINSKFORMBIGGECOLROALANGATSLOWLPLATEACOMMANHILSAYINANOTHEDOESN'SEEUSFOOEXIBLOCKINPREVENTCLEAEVEATTEMPPLEASSOLVCANNOREVEALOCURRENMASTESUGGESHEAFA CONCERNESOOOUTSIDBARELFORCHEAVILLEFTHOUG IMPORTANCSLOPLOCKEMOV FORGOTTE DISAPPEARDROPPEDIGIANMANAGLYINLIKTAKINWARNINKILLEHTNODEASHARTHES200FFATAINJURVIOLENCSACHEEK'USOBJECTYEELPPALAMCARRYINBUDGADLANCATTLFLASHEMATTEJOURNEVICINITEYESIGH PERFECTL ACCEPTABLSCORETOO CONTAININ SURPRISINGLUNSCREWEASILODOU WHATSOEVE EXCELLENNEEDEAWFUSMELDIRTSORTMUCHADN'TOUCHEHUMABEINGTHESTILBIONI55YARD'REDTOR FOLLOWIN ABCDEFGHIJKL NOPQRSTUVWXY INTERESTINIDE LEDGENDARROUGTELTOTALL UNNESESSARPIC HORENDOUBAN MIRACUOUSLAISTICKHON(POOOHNOWHERWELCOM LEGENDARGIVELOVI'LSAIMATICHANCEENOUGROUNIMBO CAUTIOSLSCENERAREN'TRUL SATISFIESLEEPFEECRYINGAVDISHATTENOTHI FOOLISHLSCREWORDINARDOIN NECESSITIEOVEACTUALLBOASYOUHAVINAPPEA "THANKYOI'VAXEROCSUPPORFIRMLSLIMSLIDEPROUOWNESTINKINBRAVLOUDLCROY PROCLAIMTHANKYO "MAGICALLAITELL CONFRONTELAZ DISGRUNTLECASEADVERACCEPTERARLPUZZLETRIAERROUSEFUHEVPIECPLASTIMINUTFROSWEARINSMAS POISOUNOLE (CURIOUSCHOKEKROYCONTAINREACTHITCHOKCOLAPSBITBEGINGSERIOUAFFECMINUTEFAL CONSIDERABLSIZWRITINCOVEINDICAT DISAPPEABECOMCHARGESORFOCRLOUWORT DESCRIBINWANTVICINETSCOO SENTIMENTALUNGEINTTWICWITHOU12 DEMONSTRATIO ASTOUNDIN MOUNTAINROADISTANSUDDEHUNDREODSTEEDGPLATERESSTOROBVIOU SENSCEBLPLAYINETSUITECOMMANDACCEP SENTENCEFOUPLOFOLLOWTERRIBL NEIGHBOURINVILLAGCALLECOMPLETFACEMANHAZZARDTRAPWHHUNGRPLOTTINTO COMPLETINMIGHTHOPJOFIRSPREPARBREAKINSTANREALISKARATKICCAUSEDAMAGTHACRACMADSTRONIROSTANDINMOUTHFUBURNINTASTFINGETRE WINDSWEPTOUGHE PREVENTE JOURNEYINABRUBEAGL SUSPECTESCOPVASLEAVEPLENT COUNTRYSIDEXPLOR CURRENTL DIRECTIONRESULSTARCLOSEFIRLIFABOVSWIPFAD TERRIFIEPROVE ADVANTAGDECLARELIFSHALGAINEAISTANDWAITINAS QUESTIONWEAKEESEALEBLUFDECIVEATRUSPELLHIMSEL BYYYYEEESEEIN THREATININADVANCEATTACKPIERCINGUTERISTEWARSTARHEARTLHAN"WELPORTION CONTINUIN"HERFOGGWILBEASTHELPLINSMASHEPIECEVERSIO PROGRAMME 1987/198SWEPDALECONTINUSTARTINLOCATIOMOUNTAISOUNCHURNINMAJESTIOBJECLIS POSSESIONWIDCRYSTASRESTEFROTHFOACHURNRAPIDLFLOWNSOUTWARBEYONENGULFEHMMBIASWELSTICKEIT'LREMOVCLOTHETOUCFACBRAVELREACAVAISINSADDLBOTTOQUIETLCREEPUT EVERYWHER STRUGGLE ENDLESSLESCAP EVENTUALLSITTIN AVAILABL RESOURCEPUFLIGHOVASHAPRINTINSWORD'POWER CAREFULLEAC MEANDERIN OCCASIONAGRACETRODDE DEPRESSIOOPENPASSGAWOODLANDENSJUMPINFLAPPINARMSHEERISINFLYINACCROSOPPOSITSAFELNORTHERFACEIN (CONFUSINNEVE GEOGRAPH TURBULENCORNETALITCLEARINUNKNOW MYSTERIELAZILHOOOWECHOEEERILDEPTHTRUDGONWARDMURKBASHEATHEWHISTLE PENINSUL PROYRUDEJAGGEROCK FORMIDABLFODEEPENDARBLEALONESOMLOOKLAIISOLATECOUNTRRAILASHETHUNDERUMBLE LIGHTNINEERIWOODE OVERGROWCOUTYAR COURTYARCROFPUSROTTEOACREAK OBJECTIVELPLACROOSHROUDECOBWEBCEILINALLOWINELEMENTUNEASAURROPLEDGSEEINSID EASTERNLGLEAMWINDOVOICEHEARGROTTWEARINPINCLOA SPECTACLEENQUIRECOULLAUGHTONMELEAV"FODEPARTFEYOUSEL DISAPEARIN MYSTERIOUQUIEPATHWASTURDPEDLAPASBLOCKBOLVOIC"THIMIN TRESPASSEPAPATHASATTACHOFOOLISDECISIOROBUSUSINBARDISPOSELENGTBRACELE"THAMEROAR VIOLENTL"AHTHANKFELLONOWCHHEKILWINKPASSINWAYSID OTHERWISNOTEHOARFALLONC UNAVOIDABLHURTLETUNNEPASSAGEFINDINǿ@@>BB<DHpHDB@@@@@~BfZBBBBbRJFB>BB<00 *7E3X:INITIALIZE SWITCH OFF FAILSAFE GET AUTOCHARS GET UDGS PROGRAM DISPLAY TITLE PAGE (GET KEYPRESS 2DO CHOICE <*REPEAT PROGRAM  KEYPRESS KEY,O  KEY LOOP 5(6,O)="O"  GET HEADER L+þKEY REPEAT KEY LOOP  K$=¾KEY  CHOICES 4K$="C" USE EXIT 1 !K$="N" USE EXIT 2 !K$="E" DELETE BASIC `K$="I"SHOW INFO K$="D"SHOW DEMO (  DEMO GET FILL VARIABLES GET PATTERN SELECTION GET SHAPE USE FILL ROUTINE REMOVE SHAPE GET PROMPT GET KEYPRESS   ' FILL ROUTINE &V = +1 0 USE VERTICAL ROUTINE :V = -1 D USE VERTICAL ROUTINE N  & VERTICAL ROUTINE H = +1 "USE HORIZONTAL ROUTINE H = -1 "USE HORIZONTAL ROUTINE Y = Y + V X = X START 3é(X,Y) REPEAT VERTICAL ROUTINE Y = Y START - V  * HORIZONTAL ROUTINE USE PLOT ROUTINE X = X + H 4é(X,Y) REPEAT HORIZONTAL ROUTINE X = X START - H  H  PLOT ROUTINE RGET PATTERN POSITION \3 (PATTERN X,PATTERN Y) X,Y f $ PATTERN POSITION ,PATTERN X = X-(X/WIDTH)*WIDTH ,PATTERN Y = Y-(Y/HEIGHT)*HEIGHT  # FILL VARIABLES DOT = 1 8X START = 122z BY START = 100d LX = X START VY = Y START ` R =  j tSHAPE y#I:DELETES OUTLINE ON 2ND PASS ~1R.33 ( GET SAIL SHAPE 9R>.33(R.66 ( GET I SHAPE -R>.66 ( GET WOTSIT O  SAIL SHAPE 100d,28:20,142:4,0:68D,-141,1:-92\,0:120x,171:4,0: I SHAPE 74J,502:100d,0:0,10 :-502,0:0,90Z:502,0:0,4:-100d,0:0,-6:43+,-3:2,-80P:-43+,-14: WOTSIT @79O,502:3,30:-30,3:2,3:35#,8:-2,15:-40(,0:0,4:42*,3:30,30:8,0:0,-502:502,-3:0,-8:-45-,0:3,-36$:-557,0: # PATTERN SELECTION GET PATTERN DISPLAY +GET PROMPT:GET KEYPRESS 8K$<"1"K$>"8" REPEAT PATTERN SELECTION I$=P$(K$) HEIGHT=H(K$) WIDTH=W(K$) -K$="8" GET USERS PATTERN  '22-HEIGHT/8,0;I$   $ USERS PATTERN  O,O; $"ENTER INITIALS UDGS...";I$ 7ñI$űI$>10  REPEAT USERS PATTERN HEIGHT=8 WIDTH=I$*8  #$ PATTERN DISPLAY % &+"  FILL-PATTERN OPTIONS " (M=3 +N=I8 -0M, 0;P$(N); M,10 ;N .M=M+H(N)/8+1 2N 7 <PROMPT n!#O;I,10 ;"PRESS A KEY" x INFO P=I5 6 hJ$(P):INFO PAGE GET PROMPT 0GET KEYPRESS:K$="" P  # TITLE PAGE (6,O)="W" "7:7:O: O: GET HEADER T$:INTRODUCTION GET FIRST PROMPT  |HEADER : O,O ;"_" ; O,O ;"_"  pEXIT 1 CHECK DRIVE 8i#O;I,"15"; "CONTENTS": "23608",O: *"M";I;"CONTENTS" EXIT 2 CHECK DRIVE dQ#O;I,"26"; "NEXT": *"M";I;"sho" & DELETE BASIC ,A=O:B="9994":"6700":D="23296"̰"23319":E:D,E:D:"65367":#:"23296":"!",A-256*(A/256),(A/256),"","n","25","","!",B-256*(B/256),(B/256),"#","","n","25","","","","R","","25","","","25","" X" INITIALIZATION B7100:O,I,KEY,GET FIRST PROMPT,GET HEADER,SWITCH OFF FAILSAFE,GET AUTOCHARS,GET UDGS,DISPLAY TITLE PAGE,GET KEYPRESS,REPEAT KEY LOOP,DO CHOICE,REPEAT PROGRAM,SHOW INFO,SHOW DEMO,USE EXIT 1,USE EXIT 2,GET FILL VARIABLES,GET SHAPE,REMOVE SHAPE,GET SAIL SHAPE,GET I SHAPE,GET WOTSIT,GET PATTERN SELECTION,PATTERN SELECTION,USE FILL ROUTINE,GET PROMPT,USE VERTICAL ROUTINE,USE HORIZONTAL ROUTINE,REPEAT VERTICAL ROUTINE,USE PLOT ROUTINE,REPEAT HORIZONTAL ROUTINE,GET PATTERN POSITION,CHECK DRIVE,GET PATTERN DISPLAY,REPEAT PATTERN SELECTION,GET USERS PATTERN,DELETE BASIC 0,1,23560\,8955",5500|,8940",9994 ',9986',5E3,1E3,1030,2E3,20,4E3,3E3 ,6E3p,6300,3600,3700t,3700t,3735,3770,3785,3800,3100 ,3100 ,3900<,3200 ,3300 ,3200 ,3400H ,3300 ,3500 ,8950",3875#,3800,3850 ,6600 P$(8,15) H(8):W(8) N=I8 P$(N),H(N),W(N) N 4""+13 +"",16,16,""+13 +"",16,16,""+13 +" "+13 +"",24,24,"",8,8,"",8,8,"",8,8,"",8,8,"INITIALS",8,16 >T$ R"OUT-TAKES are routines without auseful application - discoveriesor semi-developed ideas that maybe intriguing but do not have anobvious practical purpose(yet!).Wanting to explore the structuremethods demonstrated in PROCSIM(Issue 2) I looked round for asuitable application. I decidedto investigate a simple pattern-fill routine. I could not havepicked a worse subject! The moreone breaks down a program intomodules, the slower it becomes! - Brian" \J$(5,704) aP=I5 f J$(P) kP  " INFORMATION ----------- Two main areas of this program may interest you- the structuredmethod of writing the routines and the actual routine that can fill a shape with any pattern ofany size.If you LIST the programthere are some new commands thatare really disguised GO TO's andGO SUB's. Each routine has been broken down,again and again,intosmaller, simpler routines.Colourand spacing are used so that no single routine spreads over morethan one screen making reading easier.However,it isn't meant tobe the definitive approach but an exploratory and experimental search for a better programming environment."  "The pseudo-commands mask the GO TO's and GO SUB's with a series of CHR$ 8's that back-space overthem. If you use the ERASE ALL option an example of each type is left at line 9995 onward. Youcan use these in your programs by editing them out, cursoring along (the cursor disappears fora while and sometime there's a ghost cursor at the end of the line but ignore this) and deletethe words at the end and put in your own command. You could try:USE THIS, GET THAT, FETCH THOSE,DO WHAT for GO SUB's for exampleand JUMP or REPEAT for GO TO's. There's also a plain header you can use as a REM (it IS a REM!) and at 9999 there's a line you can use to experiment with your own ideas in the following way."  "Create your own line thus:- 100 GO SUB XXXXXXX GET LOST thenedit out line 9999 and put it BEFORE the above (at 99 in the example. Enter GO TO 99 and you will see the position in memory of the following line so you canthen POKE the X's with CHR$ 8 byfor example FOR N=NX+6 TO NX+12:POKE N,8: NEXT N You then need to set up your GETLOST routine and define GET LOSTas a variable with LET GET LOST=5000 or whatever. The first lineof this program INITIALIZE is a direct GO SUB 7000 as,of course,no variables yet exist. If you LLIST this program to a printer all the GO SUB's will be visible(not a ZX printer though I don'tthink)."  "The actual fill routine is quitesimple. As I'm writing this I'vejust received Paul Hiley's superDYNAFILL routine (Issue 14) and I feel a bit sick. His is the fastest fill routine in the westand mine is the slowest!Mine hasone advantage though. It can uselarger patterns - not just 8*8. The routine is crude- it startsin the middle of the shape and PLOTs to the right until POINT detects a pixel which denotes the side of the shape. It jumps back to the centre and does the same to the left. It then moves up a line and repeats. It keeps moving up until the top of the shape is found then it goes backto centre and starts moving downto the bottom."  "The algorithm is limited as it can't reach corners so a repeat may be needed. The explanation does a solid fill. How does thisroutine do a pattern-fill?If youLIST 3400 you'll see the PLOT & PATTERN POSITION routine. Beforea point's plotted'PLOT'checks ifthere's a point in the pattern by using 'PATTERN POSITION'.Thisdivides the horizontal screen position by the pattern width then takes the REMAINDER as the position in the pattern,e.g. fora pattern 16 pixels wide, if youdivide by 16 you can only have aremainder of 0 to 15 which givesyou the position in the pattern which is printed at bottom left. The vertical coordinate is foundthe same way." L ":MDRIVE ONLY " "23658","8":#O;O,O ;"ERASE ALL BUT PSEUDO-COMMANDS INFO DEMO CONTENTS NEXT": &"M";;"out" &*"M";;"out"ʧ: '"23637+256*23638+5": '!U\N#FJX?????????????zł|S[kV8q8S ' ~64000:"23637+256*23638-71"::AUTOCHARS*v\!?~/wy *v\%"6\>jmw#wL>cw#w#>kw#>>w#>6w ' USE ABC ' REPEAT LOOP ' ABCUSE XYZ '# HEADING ONLY(REM) 'NX="23637+256*23638":N=NXNX+44444:"+";N-NX;6;N;10 ;N+256*(N+1);16;N*256+(N+1);22;(¾NƾN32 ):N: REPEAT LOOP ' ABCUSE 7@72:O,I,O2,O3,O4,O5,O6,O7,O8,O9,I0,I1,I2,I3,I4,I5,I6,I7,I8,I9,T,A,PAGE,ITEM,CAP,MNU,SET,ZX::O5,I0;"PLEASE WAIT"''''''" (WE RECOMMEND YOU USE THE OPTIONRE-SAVE THE WHOLE PROGRAMYOU USE  SHOPNLISTER  FREQUENTLY AS THIS INITIALIZATION WAIT ISBY-PASSED)":N$(I0,I6):L$(I0,"(",I5):C(I0):N=IO8:C(N)="$":N:C(O9)=I:C(I0)=I:N=II0:N$(N):N:P=IO9:J=I̯"#":I;8,15;10 -P:P<9 L$(P,J) dL$(P,J,15)="0":J:P 3"9994":CAP,O:FLAG=O:O6:O6:O9::O5;O3;" SHOPNLISTER MAIN MENU "'':O4;"1) COMPILE/AMEND SHOPPING"'I4;""''O4;"2) VIEW COMPILED"''O4;"3) VIEW LIBRARY"''O4;"4) AMEND LIBRARY"''O4;"5)SHOPPING"''O4;"6)CURRENT"''O4;"7)A PREVIOUS"''O4;"8)CURRENT"''O4;"9)OUTLET":"23560",O nT+I,O4;I;O2;"PLEASE ENTER YOUR CHOICE":T:T+I,O4;O2;"PLEASE ENTER YOUR CHOICE":"2":C$=¾23560\ *C$="1"PAGE=I:ITEM=I:X=I:Y=O:"1E3" C$="2""5E3" C$="3"FLAG=I:"1E3" C$="4""6E3" C$="5""5500" C$="6""7E3" C$="7""7500" C$="8""7230" C$="9""8E3"  "640" &CAP,O:P=I:ITEM=I:X=I:Y=O:PAGE=I m:XX=I:YY=I:װ".01",T:O2;"H=help";O,T+O5;"page ";P:O,O8;O2;N$(P):J=I̯"(":XX=21XX=I:YY=I7 .EXX,YY;L$(P,J,14);" ":FLAG=1FLAG=21100L 89L$(P,J,15)>"0"XX,YY;1;L$(P,J,14) B/L$(P,J,15)>"1"XX,YY;1;L$(P,J) LXX=XX+1 Q="Z"3010 R="A"2010 VJ `C$=:FLAG=I"1210"  X,Y;I;">" C$="a""1510" C$="z""2510" C$=" ""3500" C$="d""4E3" C$="A""2010" C$="Z""3010"  C$="m"MNU C$="h""4500"  "1120" C$="a"X=1Y )C$="a"X=1Y=161560  X,Y;" "  X=X-1:ITEM=ITEM-1  (X,Y;" ":X=T:Y=O:ITEM=T:"1160" P=11020 #P=10 0,31;" " /P=P-1:PAGE=PAGE-1:1020 )C$="z"X=20Y=02560 *C$="z"X=20Y=162590 X,Y;" " .X,Y;" ":X=X+1:ITEM=ITEM+1: ?X,Y;" ":X=1:Y=16:ITEM=21:1160 <X,Y;" ":X=1:Y=0:ITEM=1:1160 P=10 "1020" P=9 FLAG"1020" /P=P+1:PAGE=PAGE+1:1020 FLAG=2"6440" FLAGP=10 L$(PAGE,ITEM,1)=" " N=L$(PAGE,ITEM,15) N="9" %L$(PAGE,ITEM,15)=(N+1) KL$(PAGE,ITEM,15)="1"X,Y+1;1;L$(PAGE,ITEM,14) AL$(PAGE,ITEM,15)>"1"X,Y+1;1;L$(PAGE,ITEM)  A=A+1 .1}L,10 ï $ "3610" FLAG=2 N=L$(PAGE,ITEM,15)  Nǯ"0" %L$(PAGE,ITEM,15)=(N-1) FL$(PAGE,ITEM,15)="0"X,Y+1;L$(PAGE,ITEM,14);" " XL$(PAGE,ITEM,15)="1"X,Y+1;1;L$(PAGE,ITEM,14);0;" " AL$(PAGE,ITEM,15)>"1"X,Y+1;1;L$(PAGE,ITEM)  A=A-1 .1}L,10 ï  "4100" Q:''I1;O2;I;"HELP PAGE":''" CAPS SHIFT+Z = FORWARD PAGE CAPS SHIFT+A = BACK PAGE KEY M =MAIN MENU SPACE KEY = SELECT ITEM KEY D = DELETE ITEM KEY H = HELP PAGE KEY Z = CURSOR DOWN KEY A = CURSOR UP";#O;O,O2;O2;I;"PRESS ~P~HELP PAGE";#O;I,I;"ANY OTHER KEY":O:="p""9800":SET"9891"-ZX: * "1020"  :AMNU P=IO9:23692\,0:8;1;n$(P)'':J=1̯"(":L$(P,J,15)>"0"8;L$(P,J,15);" ";L$(P,J,14) J:"9100":P:MNU | AMNU :"9800":;:O3,I;"DO YOU WANT THEPRINTED ":O6,O6;"1)";O2;" STANDARD":''O6;"2)";O2;" CONDENSED":''O6;"3)";O2;"MAIN MENU":I7,O4;I;"PLEASE ENTER YOUR CHOICE" C$= C$="1""5630" C$="2""5720"  C$="3"MNU  "5580" }"5850":P=IO9:''" ";I$;N$(P)'':J=I̯"(":L$(P,J,15)>"0"" ";L$(P,J,15);" ";L$(P,J,14) DJ:P:''''''''''''':MNU Xu"5850":P=IO9:'''" ";N$(P):J=I̯"(":L$(P,J,15)>"0";I$;L$(P,J,15);:L$(P,J,14);" "; J:P:''''''''''':MNU ':I0,I0;" PRINTING ": p:FLAG=O2:'O9;"DO YOU WISH"''O4;"1)";O2;" ADD ITEMSLIBRARY":''O4;"2)";O2;" CHANGE AN ITEM":O7;O2;"THE LIBRARY":''I2;""''O4;"3)";O2;"MAIN MENU"'''''O4;I;"PLEASE ENTER YOUR CHOICE" C$= C$="1""6140" C$="2""1E3"  C$="3"MNU  "6090" :FLAG=O:'I0;O2;"FIRST YOU MUST"'I0;"DECIDE WHICH"'I0;"CATEGORY YOUR"'I0;"ITEM COMES UNDER"'':N=IO9:8;N;") ";N$(N):N:O7;N;") ";N$(N)''O4;I;"PLEASEYOUR CHOICE":I5;""'O6;I;"0":I0;I;"PREVIOUS MENU" I5;K$:ñK$"6300" 'N=I̱K$:K$(N)<"0"K$(N)>"9""6300"  N:K=K$ :K  K"6E3" K>I0"6300" H:P=K:O,O8;O2;N$(P):XX=I:YY=I:J=I̯"(":XX=21XX=I:YY=I7 XX,YY;L$(P,J,14) XX=XX+1:J:ITEM=C(P) (=CAP,O8:O,O2;I;" (MAX.14 CHARS)";I,O2;A$ 2A$="""6E3" <A$>I4"6440" FFLAG=O2"6590" PITEM=")""6500" Z:L$(P,ITEM)=A$:L$(P,ITEM,I5)="0":C(P)=C(P)+I:"6350" d:O8,I3;I;O2;"WARNING":I0,O8;"THIS PAGE IS FULL"'O9;"YOU MUST CHOOSE"''O8;"ANOTHER CATEGORY"''O8;"CHANGE AN ITEM"'I0;"VIA OPTION 2":"9100":"6140" QL$(PAGE,ITEM)=A$:L$(P,ITEM,I5)="0":X,Y+I;L$(PAGE,ITEM,I4):CAP,O:"1120" X AMNU l:X=O4:X-O2;"1)";O2;"COMPLETE PROGRAM":X;"USE THIS OPTIONYOU"'X;"HAVE MADE ANY ALTERATIONS"'X;"THE LIBRARY. IT WILL"'X;"ALLOW YOUA"'X;"VERSION OF THE PROGRAM"'X;"CONTAINING THELIBRARY.";X;"IT WILL ALSO INCLUDE THE"'X;"CURRENT COMPILED SHOPPING"'X;"YOU WILL NEED"'X;"WAITINITIALIZATION"'X;"AFTER LOADING."''O2;"2)";O2;"SHOPPING":X;"USE THIS OPTION ONLY"'X;"YOU HAVE MADE ANY"'X;"ALTERATIONSTHE LIBRARY."''X-O2;"3)";O2;"MAIN MENU":T,X;I;"PLEASE ENTER YOUR CHOICE" C$= C$="1""7175" C$="2""7145"  C$="3"MNU  "7120" >:I4;"":"DATE (e.g. 8.6.54) ";A$:ñA$űA$>O8"7145"  "9200" NDNA$L$():A$+" 2"C():''''I;"REWIND TAPE":""L$():""C():װ".1",I0 ZDN*"M";DN;A$L$():*"M";DN;A$+" 2"C():*"M";DN;A$L$():*"M";DN;A$+" 2"C():װ".1",I0 MNU  :I4;"":"FILE NAMEPROGRAM(MAXIMUM: 10 CHARACTERS)ANY PREVIOUS FILE OF THIS NAMEWILL BE ERASEDDISKMDRIVE";F$:ñF$űF$>I0"7177"  $"9200":DNF$MNU:"":װ".1",I0 5DN"M";DN;F$:*"M";DN;F$MNU:*"M";DN;F$:װ".1",I0 9MNU > AMNU CL:I0,O6;"PRESS 'y'CONFIRM"'O5;"PRESS THE SPACE KEY"'O5;"MAIN MENU" WC$= \C$="y""7280":MNU a C$=" "MNU f "7255" z\:I0,I0;I;"PLEASE WAIT":P=IO9:J=I̯"(":L$(P,J,15)="0":J:P:A=O:װ".1",I0: V:''''''O2;" THE DATE OF THE SHOPPINGTHYOU WISHLOAD. YOU MUST ENTER THE DATE EXACTLY AS SAVED.18 DRIVE 18 JUST ENTERABORT."  I0;A$  ñA$MNU 7:A$=IA$"1"A$"8"I4;"";A$:ϰA$:I:O:"7500" A$>O8"7600"  :"9200" DN""L$():""C() *DN*"M";DN;A$L$():*"M";DN;A$+" 2"C() \A=O:T,I0;I;"PLEASE WAIT":P=IO9:J=I̯"(":L$(P,J,15)>"0"A=A+L$(P,J,15)  J:P:P=O:װ".1",I0:MNU @q"9994":"9986":O=ç:I=:+:ڧ+:I:O:: " 1987 P. TEAGUE" J"Create your weekly shopping listfrom a big library of items thenprint it. Page 9 of the libraryis empty so you can add items toit but 1 to 8 can be changed aswell. Page 10 holds a record ofyour freezer contents (referenceonly - note well!). The quantityof an item in your shopping listis increased by repeat selectione.g., select POTATOES 5 times ifyou want 5lb of spuds! There areplenty of prompts throughout soyou'll soon find your way round.":"8955" " O:K$= " K$="R" "WK$="C"#O;I,"14";"CONTENTS":"23608",O:*"M";I;"CONTENTS" "BK$="N"#O;I,"25";"NEXT":*"M";I;"cra" " "8905" "b"23658","8":#O;O,O ;"RUN PROGRAM CONTENTS NEXT ": #&ç,,"2",,"4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19","20",O,O,O,"23658","500",O,O #'" DAIRY/BAKERY ","FRESH MEAT&FISH","FRESH FRUIT&VEG","KITCHEN/BATHROOM","TINNED PRODUCTS"," BOTTLE/JAR "," PACKET/BOX ","FROZEN PRODUCTS"," MISCELLANEOUS ","FREEZER CONTENTS" #("MILK,PAS'RISED","MILK,SEMI SKMD","MILK,SKIMMED","CHEDDAR,ENG","CHEDDAR,IRISH","CHEDDAR,F'HSE","STILTON","DOUBLE GLOSTER","EDAM","LARD","MARGARINE,ECHO","MARG'INE,KRONA","MARG'INE,STORK","BUTTER,ANCHOR","BUTTER ST.IVEL" #)"FLORA","DELIGHT","ST.IVEL GOLD","GOLDEN CHURN","YOGURTS,REAL","YOGURTS,SHAPE","YOGURTS,SKI","1/2.doz,EGGS","1.doz,EGGS","GRANARY LOAF","WH'MEAL LOAF","WHITE LOAF","SLICED LOAF","BROWN ROLLS","BROWN BAPS","WHITE ROLLS","WHITE BAPS","FRENCH STICK","ENERGEN ROLLS","RYVITA" #*O"CHICKEN,WHOLE","CHICKEN,PORT'N","PORK,SHOULDER","PORK,LEG","PORK,FILLET","PORK,STEAK","PORK,CHOPS","1/2.lb,HAM","1.lb,HAM","GAMMON JOINT","1/2.lb,BACON","1.lb,BACON","LAMB,SHOULDER","LAMB,LEG","LAMB,FILLET","LAMB,BREAST","LAMB,CHOPS","BEEF,LEG","BEEF,BRISKET","BEEF,S'SIDE","BEEF,TOPSIDE","FILLET STEAK","RUMP STEAK","SIRLOIN STEAK" #+"BEEF,MINCED","VEAL ESCALOPES","RABBIT","VENISON","DUCK","COD,FILLET","HADDOCK,FILLET","PLAICE,FILLET","MACKEREL","SALMON","TROUT" #,<"APPLES","PEARS","BANANAS","ORANGES","SATSUMAS","GRAPES,WHITE","GRAPES,BLACK","PLUMS","PEACHES","CHERRIES","MELON,HONEYDEW","MELON,WATER","LETTUCE","1/2.CUCUMBER","CUCUMBER","TOMATOES","ONIONS","SPRING ONIONS","PARSNIPS","CARROTS","POTATOES","CABBAGE","PEPPERS,GREEN","PEPPERS,RED","PEPPERS,YELLOW","BRUSS SPROUTS" #-k"CAULIFLOWER","TURNIPS","SWEDE","LEEKS","RUNNER BEANS","RADISHES","FRENCH BEANS","MUSHROOMS","AUBERGINES" #."FAIRY LIQUID","SUNLIGHT LEMON","BOLD 3","ARIEL","DAZ","DOMESTOS","HARPIC","AJAX LIQUID","AJAX CREAM","JIF","KITCHEN ROLL","TOILET ROLL","SHAMPOO","HAIR COND'ER" #/"HAIRSPRAY","DEODERANT","LUX SOAP","CAMAY SOAP","TOOTHPASTE","TALCUM POWDER","COTTON WOOL","COTTON BUDS","BOX OF TISSUES","TAMPAX REGULAR","TAMPAX SUPER","TAMPAX SUPER+","DR.WHITES","CAREFREE PADS","LIBRA SLIMS" #0L"AIR FRESHENER","BIN LINERS","J-CLOTHS","FREEZER BAGS","CLING FILM","FOIL" #1"PROCESSED PEAS","GARDEN PEAS","BAKED BEANS","CARROTS,SLICED","CARROTS,WHOLE","NEW POTATOES","SWEET CORN","SPAGHETTI","CHICKEN,SOUP","VEGETABLE,SOUP","MUSHROOM,SOUP","OXTAIL,SOUP","TOMATO,SOUP","BEEF,SOUP" #2"COOK IN SAUCE","POTATO SALAD","VEG SALAD","HAM","PORK ROLL","LUNCHEON MEAT","CHICKEN","TUNA FISH","SALMON","CRAB","SARDINES","SPRATS","PEACHES","PEARS","FRUIT COCKTAIL","FRUIT SALAD","IDEAL MILK","CARNATION MILK","TIP-TOP","PIE FILLING","TOAST TOPPERS" #3"COFFEE","LEMON TEA","HOT CHOCOLATE","BOURNVITA","OVALTINE","HORLICKS","SALAD CREAM","TOMATO SAUCE","BROWN SAUCE","CHUTNEY","PICCALILLI","PIC'D ONIONS","PIC'D BEETROOT","PIC'D CABBAGE" #4"BOT WHITE WINE","BOT RED WINE","WHISKY","GIN","VODKA","MARTINI","SHERRY","PORT","LEMONADE","COCA COLA","ORANGE CORDIAL","LIME CORDIAL","B'CURR CORDIAL","ORANGE SQUASH","BEER","BEER SHANDY","COOKING OIL","VINEGAR","MARMITE","MARMALADE","HONEY" #5"SAVOURY RICE","SPAGHETTI","TABLE SALT","GRAVY GRANULES","CORN FLAKES","SUGAR PUFFS","RICE CRISPIES","PORRIDGE OATS","ALPEN","ALL BRAN","BRAN FLAKES","PKT.TEA","PKT.TEA BAGS","PKT.SUGAR" #6"WH'MEAL FLOUR","PLAIN FLOUR","SELF R'N FLOUR","BLACK PEPPER","WHITE PEPPER","CREAM BISCUITS","DIGESTIVE BISC","PARSLEY","BAY LEAVES","OREGANO","MIXED HERBS","BOUQUET GARNI" #7"CHEESECAKE MIX","CAKE MIX","CASTER SUGAR","DEMERARA SUGAR","ICING SUGAR","PAXO STUFFING","ANGEL DELIGHT","SAUCE MIXES","CORNFLOUR" #8"GARDEN PEAS","MINTED PEAS","SLICED CARROTS","WHOLE CARROTS","GREEN BEANS","SL'D MUSHROOMS","WH'E MUSHROOMS","CAULIFLOWER","SPROUTS","MIXED VEG","OVEN CHIPS" #9"COD BR'D CRUMB","COD,BATTERED","COD,FILLET","HADDOCK,BREAD","HADDOCK,BATTER","HADDOCK,FILLET","PLAICE,BREADED","PLAICE,BATTER","PLAICE,FILLET","FISH FINGERS","FISH CAKES" #:"BEEF BURGERS","STK HSE GRILL","CHIC&MUSH PIE","CHIC&VEG PIE","STK&KIDNEY PIE","BEEF&ONION PIE","CORNISH PASTIE","MENU MASTERS","CREAM","ICE CREAM","ARTIC ROLL","SPONGE CAKE","GATEAUX" #&#O;I,O3;I;"PRESS ANY KEY":O:: #"DRIVE No.? (0TAPE) ";DN: &HI$="":SET &z#O;O,O;"KEMPSTON E IFACE 1 OPUS ZX LPRINT III DISCIPLE QUIT" &|O:K$=:K$="q" &~K$="k""9881":SET=I: &"K$="i""BAUD RATE? ";BD:"B";BD &!K$="i"K$="o""9887":SET=I: &K$="l""9888":SET=I: &K$="d""9889":SET=I: &"K$="z"SET=I:ZX=O6:I$=T+I: & "9852" &4"9883":°"27";"@";°"27";"l";°"8";°"27";"Q(": &:0 & &:1 & &@ԧ:ӧ;"b":°"27";"@";;°"27";"l";°"8";°"27";"Q(":ԧ:ӧ;"t": &f°"27";°"27";°"27";"@";°"27";°"27";°"27";"l";°"27";°"8";°"27";°"27";°"27";"Q";°"27";"(": &=@"6",I:°"27";"@";°"27";"l";°"8";°"27";"Q(":@"6",O: &"23637+256*23638-0129"::hurrydump  >!"[K[*6\y_y@W`(< =O# >2[ Hx > :[:[2[ >2[> :[2[ &"M";;"sho" &*"M";;"sho"ʰ"8E3": '"23637+256*23638+5": '!U\N#FJX?????????????zł|S[kV8q8S ' z"64e3":"23637+256*23638-71"::AUTOCHARS*v\!?~/wy *v\%"6\>jmw#wL>cw#w#>kw#>>w#>6w ?????????@"8DDDDDDDDDDD((??  <~~<KdF2d~>Ͱ"D[?c*AcMBKDeS}\Ód*?c\gW";S=[AcjgW>Ep>͡p]g@o8fKf#gͨd2cc>j͕f:j\2j\Wqo2j\}!e( 4(5####~#foYe5CeGf5i6i7i8"i'i,i1i6i;i[iWbiZhi%pi'}i&li(iI#jP+jV3jB;jTCjDjEkF kA kS'kMkRkL.kgKAc>&''999o~fwɯ< !X>8 w#@@ fôd!X"?c"Ac> 2m2Lc>j>2H\5o:Lc2mxf2m~f2m!mf gÕf:\:\>>xɯ͞q>j!ff:AcO͇f:Bc0O͇f>>>:cc!fo0$~>j TDEFASMRL??????IPVB >j~ unͪp#>>>KFc͡gh>j!jf8k"FcPh(;##### ^~2Ic>ál.8&"\"\!\ˆ˖!p"?c"AcÞq*3 8B*1oh++s#r#6#w#w#w#w[Fc͕h*Jc^R[3!gfWq>un͸gkYou have run out of memory...Picture buffer full...>͡l*1++^*JcRDM! DMohut*Fcut:Icw#####*/nf|NFR( <*1 "1*3 "3##BDMPh T]*3R##*1B"1*3B"3>2d2k2Kf]g@o7l]g>!2d>>2k2Kf>͞qiʹd*Ac}y(?8o|008g"Ac͛d:Hc*Jcpi!cRDM*Jc!Ic5:Hc2Ic:Icálál:Hcҡlál:Hcҡl>álͅl>jf![6͊8 !Ic5+5Kf[~0 0wy8 ~(ªi~q#Gy= [x7mKfjp#6>j![f*\"\jKf!Hc:[2cc:Icj![[JcSJc!KjÏi!`jÏi!wjÏi!jÏi!jÏiWhich ink?(0..9) Which paper?(0..9) Flash?(0,1 or 8) Bright?(0,1 or 8) Which border?(0..7) Which picture number ?...!cBT]KJcBDM!c!RcVwͅl>2[ͨk^k!>ͅl"Ccͨktc!>!>!d>L ͅl"i2e!ik"e>2ex2[*Ac"?cͼk>2LcKf*Ac"[62LcKf>2e!;i"e>2e͞qi!d"iͰk*?c"[*Ac"["?cjèd>͞qÛd:_c<2_cèk:_c=2_cèk>2_cèk!d>R5k!e>E5k>]gͅl>j!jf>unl>j*FcR(Ph !Ic5+5>2[S[jͼkKf͞q####~#*Hc*Jc2Icͷl"Jc"Hc>2cc>2l^#V#:NcPh7l2Nc>2l͞q!Ic4(+45!gfWq>un2cc]g@o!Ic8~^2Hc<2Nc!Nc5(2cc!im0$o~#folSJcͨdKfkog"?cog"Acdc!d"l!e"l!nc!dc!ic!d!d*\"\W 2H\!ZW:Oc=(!XzT]wl7mmmmmmalm$mllllll)m)m)m)m  1]!@]8c5(2cc!im0$o~#folSJcͨdKfkog"?cog"Acdc!d"l!e"l!nc!dc!ic!d!d*\"\W 2H\!ZW:Oc=(!XzT]wl7mmmmmmalm$mllllll)m)m)m)m  1]!@]Z Z1K$="F"K$="G":"360" &9951&:9998':NX: &I"23637+256*23638-6929"::jig #15  !J@@BpA_")0BUET?jbU`>l~DU]B}Wl@q0< >9 @A\7B@q_Ϊ>U }BHW'@_<x=êl"G*@p~Ϫ(U|`wCU<xg(1`2) ŀ`  $ X1 ! 0s> fU ?k}y|Un? Wx@|ǥU{5J  #ŀ  <@ yCx ! 16?` U'zk%U>0@/~@wǀp~çWqI  # 'ŀ` 8 ! ( 4` ya} ! !h?1l ';` U?'jog"'<x?U?Y @ 1p?pu ?0X`x#@Uꪪ ~@ bU9b>1cÂ-A62r R {|u?8 OxUJꪪ`{x@ z_/?n@ F(?U??V^*aWzǪ`@Uuj>=+fUUW?uuU_,  UW]sUU_UWV?~U>g`u~RU]U~UUU}7Հ`zxUV*_Us@5U~`UcVj.PWx_?_U5_U͂UWUU"U`?uRU]W[UUuU@ Wj8@1@_`PUUTjCW]U5_Uw7UwU}_U_?U_ uwV_]U_W@7 !p[U U||A # U}ՠ: PXU ꪀU j &ꪯA ]U} UW 5WU ! #U}UЀ 8UUU` ! -U׀ } ']WUx# ]U}!_U \U@ᾯ '[U ꫯ|? 'Ujՠ * \U U* #꺿?A ?}Uuf Uo uUW !Ϗ #}_У 0U_U] # U\ #]_p' UU~#_ U ?]UW |? !WU* U UW* ꮯV@ @UUJ W uWuuW ! ]_ 0U_UW / ~u]p } 'U_KP' ju]U]#uU u'W_U*9?_U?jU_W@UݸU_]U?]y?pW_UwU]aU]? *?UU_uUꪯ|s_WW?0?UjW^^`絛UU_uUl`W^U_?WU_\ǀUu r*/UUwU_UU@B ڪꪪ* uWꪫ^/,44ꪾ  /U{|fwuUWW@@< =wUUu@?UUUuUU|uU]]@U$F~??RuUU뮫/￶= /x1U]_wAaq}u}Wՠ@?> U}U}@`>c UUUuUU\UUWW@uU"@ @۫ XUU'~x 9uW#7ڦ0}U]W@ c 7uU}u_tC`c6UUUuUU^XUUuWU@uU # 4z, )Rﮪ ! ' KD7UW ? } 4Ǫ' ' #  WX>1 0}U_U@= `UCuUu}ҀF `cUUUuUUWhVUUUW@ UU '  ?ꪪ ! ! ?uU몺 g F wﻪ ' #z }}]\s =}_Uu@| oUAuU]U}:L`cUUU]UUUWUUUW@U / u ! # =uW/ ! ! ` u ? #  ?UUrCU]v@ >c?UUUUUUUUUUUU@_ b V?'nmUW*;Fd* ꪪ& fvUUUW_<@xDR?wUU}A|0}UUU}UU{`U]@|UUUUUUUUUUUUUT~@PPPPPPPPPPPPPPPPPPPPPPrrPPPPPPPPPPPPPPPPPPPPPPPPPPPPPrppppPPPPP8<=:PPPPPPPPPPPPPPPPPPp~~~pppPPP==<uh>oN>i4>e>a #~a> ^(\(> *< S>>*̞B< ![#R0~ 8~> > >za)ORT which is faster than existing routines. In CRASH, it was discouraging to see SPECTRUM PROGRAMMER reviewed  \\AChstappacs,Sctm\ft sl ̻t\rto43% - alst\ub t C64.Bmn,t\ST onl4%.\\\Fot rs¡, W.H. Sth\l sc t Sct ts\Chst- st ft.\(Sad, n erydi t\untrSctm...). ^T Nao Cn Cil\rei}lncns\i t Da Pڨco Acn\iipnrs th-\linro bsng\"nª" a i phy}l\nbt mr\. Onlt m is\acsb unt Act.\\T Copyght, Deg anPant\Bil sulˡ ng\Nomr. O oiti ms\i ft cy.\\A r~b (on only) mct\s enrpco xar\bT Yu Cor،o t\l l pښsols\onl}u oaroill\pnosks. ^Tnth, PERSONAL COMPUTER\WORLD a o ct\wcuauo\insaoexn pТ\ m} ten\mmmentasts. On\p.208 irnalthm\}lPIGEON SORT wcis\st esnu¢s.\\I CRASH, isun\SPECTRUM PROGRAMMER ed\a' nne˾es\oOUTLET CRASH  en\ig֦d. SPECTRUM PROGRAMMER is\ino OUTLET (ng 48K\pgm, }st only, sTEN\artpg!)Wan\mpi i proOUTLET?\W Ia Cull, TecNic,\CRASH, PO Bo10, LUDLOW, Shp-\s SY8 1DB ^SINCLAIR USER in o \ncpn Sctm\anal t int/trts\(t ti˪i ts\nth'OUTCLASS bNic Les).\\YOUR SINCLAIR ewt 10\ysckant Sincir\PC m(a SINCLAIR USER\anCRASH). T a sngs\nnpgm; o\nxand\styano nrm/˘\in BASIC DATA snt(\TK50 ei OUTLET Is11).\\\STOP PRESS. NeeklTV es\}l"ELECTRIC AVENUE" bFd\HarsrtMon~24.10.88,\11.25pm, o BBC1 on"mrin\۱ety". Ma rtok..^sngs\nnpgm;