' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL]$$8HIL,նh, ,`, ,`, , ,:/8` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` `==`>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   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()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!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 AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx-#(#6 @=͠٠ˠ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` # d ֠=z# =u`"i`8` m Ɲ3LLJLKL`L,SVSmknnL=z#?????     įŠ!٠"Ӡ͠ ήŠԠӠή֠àŠӠ ŮʠŮӠ͠٠ˠήàήήŠήŠΠŠשήŠԠRECTORY !!!": |:10005 1:" 80N":0,63998:0"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 DI85: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) ((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 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 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:     TKLT1070 BTKLT10205 L:A$"ALL DONE":450:R 170,213,173,170,213,154SAZTEC CONTROLLER3TK3:LT31:CDWR:MB151A47426,24aST0:T1TK:490::190:210430:100:STST1:ST161030BF1060ST0:TKTK1:TKLT1030$230:TKT1:ST0:490.430:100:STST1:ST161070 8ST0:TKTK1:BF0 KLT10204 L47507,174:47517,164::"COPY DONE":6DONDRA CONTROLLERDTK0:ST0:LT35:CDWR:47507,0:47517,0ST1TK:490v430:100:STST1:STDOS1030BF1060ST0:TKTK1:TKLT1030$490:TKT1:ST0.430:100:STST1:STDOS10708ST0:TKTK1:BF0TKLT1070 BT $490:610, .230:490:610:(TRK)LTıJ 8TK(TRK):ST(SCT):1050KCON.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  z12,4,6,24 12,4,7,96) 12,4,8,48 12,4,9,300ST0: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 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& 8  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":12,9,57,96 12,9,148,24. 12,9,149,96[/#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  17:UB1* `430:100:STST1:STDOS1120L jST0:TKTK1:BF0TKLT1100\ tTKLT1030 ~47507,174:47517,164::"COPY DONE": '::(4);"BLOAD ULTIMA 5.SC,A$1900"ULTIMA V CONTROLLER4TK0:ST0:LT35:CDWRJ47507,0:47517,0^UB0:T1TK:490mUB11060TK3Č6400:UB1$430:100:STST1:STDOS1060.BF10908ST0:TKTK1:TKLT1040BUB0:490:TKT1:ST0LUB11120 V64 VE 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)&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":"DRIC1))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),17A$(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),((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)670EEN 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)5: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 SCR@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 ULE 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-"' BLE.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::" DOUB% 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 DOUH  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"     `D\LU5)0Ս縍񸍵LLe&D0`xHq緽ÁL`$9000RESTOREYhLDA$9001RESTOREArLDX$9002RESTOREX|JMP$809AJMPTONEWREAD CLC!RTS$STAH80B5LDAH8148,XSTAH80C0LDAH8171,XSTAHB7E7LDAH819A,XSTAHB8F1LDAH81C3,XSTAHB8FCH808CLDYH9000LDAH9001LDXH9002JMPH809A&CLC0RTS:H809A.HS00SA$B8FCNORMALDOST^LDY#$80 BMI.1 LDA#$D5STAHB8E7STAH80AB LDA#$AA"STAHB8F1,STAH80B5 6LDA#$96@STAH80C0 JLDA#$ADTSTAHB8FC^JMPH808Ch.1JMPH8065r|H8065LDXH0478LDAH80F6,XSTAH80ABLDAH811F,XD (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 AND148.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$B99*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$811FjH8     HMƨԍAS]@%q&WZ`SREASWRITLeL]Ljfjrs j``` 3 "NEED ANOTHER COPY? (Y/N)":C$:C$"Y"ī60a "COPY DONE, COPY NEW DOS TO COPY DISK": 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 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"!! !