' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL]$$8HIL,նh, ,`, ,`, , ,:/8` RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֝uW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'Ӝu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wU H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  Lh@(LH9LHH/Hh/ H-З( ܸ(& ¸$8 H` *HVDP (ED Z $0x8x D- ܸDD#HIHHHHhHH݌hHhHh݌H6 h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠ   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ穎鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` `==`ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LL[dmx-#(#6 @=͠٠ˠ@跻~!Wo*9~~~~ɬƬ~UVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS @ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABR^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHn 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)nooõĵL LLЦ  #-µµ( zegehtpjigh q Ql` z8L`MaEK@>ˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ@ NL   L` -e L գsr ࣭ml ࣭srL -µLЦ գ ze)rs zrsLq ] Qlr L̦ գ8gh ࣥhgL գ8LʨM ࣥˤLµH hLħõµ µõL&E`( 80 0 DDLDLDL^ t^`,tP ȟpMt-^^`DH hWLԧ d@` Lꢩ  c ȢL LqLգcl mllm ꢥELȦAD@ C N cLuɠ% d: L ЌĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ =u`浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` # d ֠=z# 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `"i`8` m Ɲ3LLJLKL`L,SVSmknnL=z#????? ήŠԠӠή֠àŠӠ ŮʠŮӠ  įŠ!٠"Ӡ͠   ͠٠ˠήàήήŠήŠΠŠשήŠԠ68(ST6UVk,ȱk-`),-`G ::63000]Y140:"=";::qX;:5:A$(X):(" "X" ";:6:(A$(X),15):2X" ";:5:(NA$(X),8,15):<1:20:22:20:34,1:2:FP33,21:32,19:1:1:: U33,40:32,0:23:1::U Z85:23:"IS YOUR PROGRAM LISTED HERE? Y/";::"N";::" ";:A$:w dA$"Y"MAXN1:N105::2000 n23:958:34,1:35,21::35,24: 60:X0 N1105 ((NA$(N),8,1))652000 ((NA$(N),8,1))61N105:2000 ((NA$(N),8,1))942000! XX1: A$(X)(NA$(N),8,30)T T(X)((NA$(N),2,1))h X21İ30:2000 X21X61X101İ80 X41İ40:2000 $X41X81İ90 .X61İ30:2000 8X81İ40:2000 BX101İ30:2000 L40  MAXX 85:34,22 23:958T "SELECT A FILE BY NUMBER -->";A$:A(A$):AMAX2010_ A1Ĭ} :::T(A)66T$"BRUN " T(A)84T$"EXEC " T(A)65T(A)73T$"RUN " 23:T$A$(A) 23:D$T$A$(A)  NAME$(105),A$(105),T(105) "X138:B$B$"=":3 ,X10511:NAME$(X)B$:I 6NAME$(0)(B$,19)U @D$(4)} E12:12:"READING CATALOG ":12:29 Y63075 ^2054:D$"CATALOG" c216,0:D$"PR#0":D$"IN#0": h(NA$(0),1)" "Ģ12:868:"!!! ERROR - UNABLE TO READ DIRECTORY !!!": |:10005 1:" 80N":0,63998:0     SAZTEC CONTROLLER3TK3:LT31:CDWR:MB151A47426,24aST0:T1TK:490::190:210430:100:STST1:ST161030BF1060ST0:TKTK1:TKLT1030$230:TKT1:ST0:490.430:100:STST1:ST161070 8ST0:TKTK1:BF0TKLT1070 BTKLT10205 L:A$"ALL DONE":450:R 170,213,173,170,213,154 6DONDRA CONTROLLERDTK0:ST0:LT35:CDWR:47507,0:47517,0ST1TK:490v430:100:STST1:STDOS1030BF1060ST0:TKTK1:TKLT1030$490:TKT1:ST0.430:100:STST1:STDOS10708ST0:TKTK1:BF0TKLT1070 BTKLT10204 L47507,174:47517,164::"COPY DONE": KCON.MICROZINE #26:ST15:LS15:CDWR:FAST1:640OTK0:LT36:1050dTK1:LT35:1050y:"COPY DONE":USE "TK/2 =" IF D4 IS ON EVEN TRACKSUSE "TK/2 >" IF D4 IS ON ODD TRACKS (OUR CASE)47426,24:TK2(TK2)Ĺ47445,212 $490:610, .230:490:610:(TRK)LTıJ 8TK(TRK):ST(SCT):1050 9ONE ON ONE (NEW VERSION)9TK0:ST0:LT35:CDWRUT1TK:490:TK3Į:210x430:100:STST1:STDOS1030 TK2İ210BF1060ST0:TKTK1(TK2)4:TKLT1030$310:230:490:TKT1:ST0.430:100:STST1:STDOS1070& 8ST0:TKTK1(TK2)4:BF0TKLT10706 BTKLT1020R L::"DONE WITH COPY":c 213,187,207s 13 CHANGES 2,3,71,170 2,3,81,173 1,6,8,98 12,4,0,160 12,4,1,3 12,4,2,162 12,4,3,255 12,4,4,169 p12,4,5,9 z12,4,6,24 12,4,7,96) 12,4,8,48 12,4,9,300  SCIENCE TOOLKIT3ST15:LS15:CDWR:FAST1GTK0:LT1:1020bTK2:LT33:1020:1050z47426,24:490:61047426,56:490:610:(TRK)LTıTK(TRK):ST(SCT):1020:"COPY DONE":/#SCIENCE TOOLKIT MODULE DISKSKTK0:LT35:ST15:LS15:CDWR:FAST147426,24:490:610:T1TK:TK(TRK)1::310:TKT147426,56:490:610:(TRK)LT1050TK(TRK):ST(SCT):1020:"COPY DONE":4 CHANGES12,9,56,24 12,9,57,96 12,9,148,24. 12,9,149,96[ ULTIMA V CONTROLLER4TK0:ST0:LT35:CDWRJ47507,0:47517,0^UB0:T1TK:490mUB11060TK3Č6400:UB1$430:100:STST1:STDOS1060.BF10908ST0:TKTK1:TKLT1040BUB0:490:TKT1:ST0LUB11120 V6417:UB1* `430:100:STST1:STDOS1120L jST0:TKTK1:BF0TKLT1100\ tTKLT1030 ~47507,174:47517,164::"COPY DONE": '::(4);"BLOAD ULTIMA 5.SC,A$1900" H  SET UP VARIABLES#H$(40)iF$(1)"D5":F$(2)"AA":F$(3)"96":F$(4)"D5":F$(5)"AA":F$(6)"AD"(B$(1)"D5 AA 96":B$(2)"D5 AA 96":B$(3)"D5 AA 96":B$(4)"D5 AA AD":B$(5)"D5 AA AD":B$(6)"D5 AA AD"2X1 <J$(1)"D5":J$(3)"96":J$(6)"AD"% FJ$(1)J$(1)"D5":(J$(1))8070J PJ$(3)J$(3)"96":(J$(3))8080o ZJ$(6)J$(6)"AD":(J$(6))8090 dJ$(2)J$(2)"AA":(J$(2))80100 nJ$(4)J$(1):J$(5)J$(2) x47426,24 BLOAD DOUBLE.OBJ AND CREATE SIX TABLES (4)"BLOAD DOUBLE.OBJ" 32768/ X3301433054:X,213:K X3305533095:X,170:g X3309633136:X,150: X3313733177:X,213: X3317833218:X,170: X3321933259:X,173: X1 936 SET UP INPUT SCREEN MASK 1:14::" DOUBLE DOS ":0 3:09:"WRITTEN BY EDWARD TEACH"Y 5:6:"00- 0A- 14- 1E-" 6:6:"01- 0B- 15- 1F-" "7:6:"02- 0C- 16- 20-" ,8:6:"03- 0D- 17- 21-" 69:6:"04- 0E- 18- 22-"' @10:6:"05- 0F- 19- 23-"Q J11:6:"06- 10- 1A- 24-"{ T12:6:"07- 11- 1B- 25-" ^13:6:"08- 12- 1C- 26-" h14:6:"09- 13- 1D- 27-" r16:15:B$(X) |18:15:"TABLE->"X U5:I09 R1= Q110:U:I:(J$(X),R,2):UU1:RR2:U U5:II8:I35410 20:5:"DO YOU WANT TO CHANGE THE ";::F$(X):  " Y/N ";:A$ A$"N"XX1:X6X1 A$"Y"510 A$(23)780 370 SCREEN EDITOR!H9:V5:C1:F(X)1/H:V:A$lA$(21)((H09)(H17)(H25)(H33))HH1:CC1:670A$(21)((H10)(H18)(H26)(H34))HH1:CC19&A$(21)HH8:H34H9:CC800A$(21)670:A$(08)((H10)(H18)(H26)(H34))HH1:CC1:670RDA$(08)((H09)(H17)(H25)(H33))HH1:CC19xNA$(08)HH8:H09H33:CC79XA$(08)670bA$(11)((H10)(H18)(H26)(H34))HH1:CC1lA$(11)VV1:CC2:V5V14:CC20vA$(11)6707A$(10)((H10)(H18)(H26)(H34))HH1:CC1bA$(10)VV1:CC2:V14V5:CC20tA$(10)670A$(08)A$(21)A$(10)A$(11)730A$(27)430H:V:A$C1J$(X)A$(J$(X),(J$(X))1):720J$(X)(J$(X),(C1))A$(J$(X),(C1)) 760)520<XX1:X6X1E430QBH:NV_HB:VN:s X1:R1:Z33014F(X)950 P140*H$(P)(J$(X),R,2)4RR2>HCONVERT DEC TO HEXRR1\E140fS$(H$(E),1):T$(H$(E),1)&pS$"A"S$"F"H(S$)55:9002zH(S$)WT$"A"T$"F"M(T$)55:920cM(T$)qNUH16MZ(E1),NUZZ41:R123:5:" INSTALLING TABLE "XXX1:X7790A:"DRIVE ONE WILL NOW READ PROTECTED DOS":"DRIVE TWO WILL NOW READ DOS 3.3":"RUN SUPER IOB 1.5 FROM DRIVE TWO"GX$(6)J$(6)"AD":(J$(6))8090 dJ$(2)J$(2)"AA":(J$(2))80100 nJ$(4)J$(1):J$(5)J$(2) x47426,24 BLOAD DOUBLE.OBJ AND CREATE SIX TABLES (4)"BLOAD     `D\LU5)0Ս縍񸍵LLe&D0`xHq緽ÁL`*SAVEDOUBLE.SH9000.EQ$9000H9001.EQ$9001H9002.EQ$9002HB8E7.EQ$B8E7H80AB.EQ$80AB$HB8F1.EQ$B8F1.H80B5.EQ$80B58H80C0.EQ$80C0BHB8FC.EQ$B8FCLH0478.EQ$0478VH80F6.EQ$80F6`H811F.EQ$811FjH8148.EQ$8148tH8171.EQ$8171~HB7E7.EQ$B7E7H819A.EQ$819AH81C3.EQ$81C3.OR$8000.TFDOUBLE.OBJ0INIT.PATCH LDA#$18STA$B989STA$B992STA$B99C LDA#$60STA$B98A STA$B993STA$B99D (LDX#$002.1LDA$B944,X<STAH809A,XFINX PCPX#$5C ZBNE.1d nLDX#$00x.2LDAPATCH,XSTA$B944,XINX CPX#$30 BNE.2RTSPATCHSTYSAVEY+1STASAVEA+1STXSAVEX+1 LDA$35 AND#$80 BMI.1 LDA#$D5STAHB8E7STAH80AB LDA#$AA"STAHB8F1,STAH80B5 6LDA#$96@STAH80C0 JLDA#$ADTSTAHB8FC^JMPH808Ch.1JMPH8065r|H8065LDXH0478LDAH80F6,XSTAH80ABLDAH811F,XSTAH80B5LDAH8148,XSTAH80C0LDAH8171,XSTAHB7E7LDAH819A,XSTAHB8F1LDAH81C3,XSTAHB8FCH808CLDYH9000LDAH9001LDXH9002JMPH809A&CLC0RTS:H809A.HS00SA$B8FCNORMALDOST^LDY$9000RESTOREYhLDA$9001RESTOREArLDX$9002RESTOREX|JMP$809AJMPTONEWREAD CLC!RTS$     HMƨԍAS]@%q&WZ`SREASWRITLeL]Ljfjrs j``` b  B = SECTOR NUMBER(0-15)F C=MEMORY LOCATION($2000-$2F00)c(4)"BRUN SREAD/SWRITE"~(A$"READING TRACK #35"2B$"WRITING TRACK #17"<"INSERT ORIGINAL DISK AND PRESS ANY KEY":16384,128:A$F21(A$)2:A$ P(4)"MON C,I,O" ZB015 dC2163B162* nDC1K x(4)"SREAD T35, S";B;",A";C[ D:D,17:B "INSERT COPY IN DISK DRIVE AND PRESS ANY KEY":16384,128:B$ 21(B$)2:B$ B015 C2163B162 DC1 (4)"SWRITE T17,S";B;",A";C 3 "NEED ANOTHER COPY? (Y/N)":C$:C$"Y"ī60a "COPY DONE, COPY NEW DOS TO COPY DISK":!! !