' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` `FF`>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,&"_]` L/浍굺L  !"#$%&'()*+,-./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#0EB 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`   vLDcpq` [` ~  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 iõ`  \ 濭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 @F͠٠ˠ@跻~!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䵍䵐`"L ŵ8ŵH ~(`# d ֠Fz# Fu`r>XH00L1Lhȭ0`eL! ̻wfUD3DUfwwfUD3"p؍ؠĬĬŬÍˍРčѠˍРѠˍРōѠˍРÍѠˍٍҠРԍˠٍҠٍҠԠҠĸōؠРؠčĠ؍РٍѠԍ؍ŠčؠР؍ԠؠҠҠҠٍРčѠ%2Ǡʠàՠ٠РؠвٍРì؍Ѡؠ؍ؠŠвٍŠЍӍ ٍРŠ؍   `aaa a ` Paa ` aL`$a $ $  ɍɝəɎɌ $ L`$ $ aL`РŠٲҠԍРٲРŠٲҠԍРٲҠԍРٲ¹ñР²Բ٠вٍòРōѠβٲٍŠв˲РѠčōòРԲβٍРŠٲٍÍΠٍРŠٍٍРŠٍٍРŹŠٍҠԍРٍˠРŠıӲčñР²ıӲРѠԲŠزҠԍРز ĠīöЫčñōòӍ²٠РٍñРčѠ΍٠ٍŠЍРˠĸōӍԳ٠زٍРРöѠ؍زٍŠزԴРѠčĶЫРԳؠٍРҠԍРرԲРѠԳµīР̍ԠҠҠҠ%(ǠʠРƍѠ̍Р² ̠٠ٱٍĠРѠαرٍŠٱРԲαٍРŠرٍРŹŠر     `ɘ Ra`L` RaɗRaލaLa Pa Qa B`Laa B`L!a B`L$a`EQaL` ɥL.` Pa B`L`RaəARa`L `$ $ $ $ !!!` RaɘRa֍|`Lv` Pa B`L``ƍ|`Ra`΍a` ɭL` Pa Qa B`L`Ra Ra`L +뷩귩췩 񷩷 ` `:"BYE!":  ::"OPTIONS:":::"1) PRINT A HEXADECIMAL/DECIMAL":"CONVERSION CHART, OR"::"2) GO TO THE MAIN MENU, OR"::"3) QUIT."::"CHOICE: ";:G$:G$:V(G$):V1V3Č198:10V1ĺ(4)"RUN CHART"(V2ĺ(4)"RUN APT SCANNER" 2V3ĉ:  " MENU" :(4)"BLOAD SND":(1:D:X1D:A$:70:XC<120|FH(40(A$))2:H:L1(A$):(A$,L,1);:E(16336)PL:Zd5n "THE EDITOR"," ","PROGRAMMED BY","BOB IGO","------------"x16368,0}768(4)"RUN MENU"  ΍׍Ԯ΍ϨԨӨ٨ҨըϤΨäԺźԠӧԠŠĠӠٮǤĠӬ  ΍׍Ԯ΍ϨԨӨ٨ҨըϤΨäԺźԠħԠŠĠӠٮǤĠӬ  NICO"1>:23:"DONE.":"PRESS ANY KEY":G$::HH(H$)2H$"0"H$RDE0:HE$"0123456789ABCDEF":H1$(H$,1):MP16:860:H1$(H$,1):MP1:860:\P116fH2$(HE$,P,1):H1$H2$DEDE((P1)MP):D$(DE):pz"";X$:?"Q$"AND PRESS A KEY."Q$":GETG$:?"YLN410:L1X:LN"DATA";:NA$(L)","A(L):LNLN10:g:LN1010 L1X:E1A(L):LNLN10:LN"DATA"TR$(L,E)","SE$(L,E)","BY$(L,E)","FR$(L,E)","TU$(L,E)","OO(L)E:L "RUN"*(4)"CLOSE"4(4)"NOMO "NEW"3(NA$,4)"EDT."NA$(NA$,(NA$)4)H"LOADEDIT.MAIN"X"400DATA"X"120DIMA("X"),NA$("X"),OO("X"),T("X",30),S("X",30),BY("X",30),FR("X",30),TU("X",30),O$("L"),N("L"),C$("L")"""150TEXT:HOME:?"Q$"INSERT '"NA$"' AT DRIVE 1"Q$":"390?"Q$"YOU GOOFED!!"Q$":?:CALL-198:?"Q$"ERROR #"Q$"PEEK(222):END"]"SAVE EDIT.MAIN""HOME:?"Q$"EDIT.MAIN HAS BEEN ENTERED AND SAVED."Q$"DELETE EDIT"(4)"CLOSE":"TYPE 'EXEC EDIT' TO INSTALL":"THE BASIC PROGRAM.":G$::80"340IFC$(L)="Q$"ON "Q$"THENPOKEA+BY(L,N),TU(L,N)"hb"350IFC$(L)="Q$"OFF"Q$"THENPOKEA+BY(L,N),FR(L,N)"l"360IFOO(L)=2THENPOKEA+BY(L,N),VAL(C$(L))"v"370POKERW,W:CALLP:NEXT:NEXT""380VTAB23:?"Q$"DONE."Q$":?"Q$"PRESS ANY KEY"Q$":GETG$:?:RUN"GABC+3:?C$(C):NORMAL:VTABX+6:GOTO240"0"300?"Q$"DO "Q$";:INVERSE:?"Q$"NOT"Q$";:NORMAL:?"Q$" REMOVE THE DISK OR"Q$":?"Q$"YOUR COMPUTER COULD EXPLODE."Q$:"310FORL=1TOX"D"320FORN=1TON(L)"N"330POKERW,R:POKETR,T(L,N):POKESE,S(L,N):CALLP"1X"THEN300"D"270IFC$(C)="Q$"OFF"Q$"THENC$(C)="Q$"ON "Q$":GOTO291""280IFC$(C)="Q$"ON "Q$"THENC$(C)="Q$"OFF"Q$":GOTO291""290?"Q$"ENTER NEW "Q$"O$(C)"Q$":"Q$":INPUTC$(C):VTABC+3:?"Q$" "Q$":POKE34,X+6:HOME:POKE34,0:GOTO291"$&"291INVERSE:VT 1-"Q$"X"Q$" OR 'S' TO SAVE."t"230?:FORL=1TOX:VTABL+3:INVERSE:?C$(L);:NORMAL:HTAB5:?L"Q$") "Q$";O$(L):NEXT:?:?""240INPUT"Q$"CHOICE: "Q$";C$""250C=VAL(C$):IFNOT(C$="Q$"S"Q$"OR(C>0ANDC<=X))THENCALL-198:VTABX+6:GOTO240" "260IFC$="Q$"S"Q$J"180IFPEEK(A+BY(L,N))=FR(L,N)ANDOO(L)=1THENC$(L)="Q$"OFF"Q$":GOTO210""190IFPEEK(A+BY(L,N))=TU(L,N)ANDOO(L)=1THENC$(L)="Q$"ON "Q$":GOTO210""200C$(L)=STR$(PEEK(A+BY(L,N)))""210NEXT:NEXT""220HOME:?"Q$"OPTIONS:"Q$":HTAB5:?"Q$"PRESSME:TR=784:SE=789:RW=779:R=1:W=2:A=8192:P=768"V"130READX:FORL=1TOX:READO$(L),N(L)"e"140NEXT""160FORL=1TOX:FORN=1TON(L)""170READT(L,N):READS(L,N):READBY(L,N):READFR(L,N):READTU(L,N):READOO(L):POKERW,R:POKETR,T(L,N):POKESE,S(L,N):CALLP" A FORMATED DISK TO SAVE THIS":"EDITOR AND THEN PRESS A KEY.";:G$:W7(4)"MONICO"z@(4)"OPEN"NA$:(4)"WRITE"NA$JQ$(34)TNA$"EDIT"710^"NEW"h"90ONERRGOTO390"r"100IFPEEK(768)<>169THEN?CHR$(4)"Q$"BLOADRDWRT"Q$-|"110HOY$(L,E)D$:H$FR$(L,E):840:FR$(L,E)D$:H$TU$(L,E):840:TU$(L,E)D$l:".";:CL(16336):CL(16336):,:"WHAT WILL YOU CALL THIS EDITOR":NA$:1"AFFIX AN 'EDT.' PREFIX? ";:G$:G$:(G$"Y"G$"y")3102NA$"EDT."NA$3E6"INSERTS THIS ASPECT (1) ON OR OFF,":"OR (2) A NUMBER VALUE ?";:OO$:OO$:OO(L)(OO$):OO(L)1OO(L)2Č198:240r:13:1:"WORKING ON HEX CONVERSIONS";:L1X:E1A(L)DH$TR$(L,E):840:TR$(L,E)D$:H$SE$(L,E):840:SE$(L,E)D$:H$BY$(L,E):840:B")";:10:890:X$""FR$(L,E)FR$(L,E1):210= FR$(L,E)X$ "TO:(";TU$(L,E1)")";:8:890:X$""TU$(L,E)TU$(L,E1):230 TU$(L,E)X$ ::"WHAT WILL YOU CALL THIS ASPECT?":"(SUCH AS: TOGGLE UNLIMITED BULLETS)":"ANSWER: ";NA$(L)l:"I:11:890:X$""TR$(L,E)TR$(L,E1):1509 TR$(L,E)X$ "SECTOR:(";SE$(L,E1)")";:12:890:X$""SE$(L,E)SE$(L,E1):170 SE$(L,E)X$ "BYTE:(";BY$(L,E1)")";:10:890:X$""BY$(L,E)BY$(L,E1):190 BY$(L,E)X$- "FROM:(";FR$(L,E1)TS ARE NECESSARY FOR ASPECT #"L;:A(L):A(L)0Č198:120 }A(L)30ĺ:"YOU MAY ONLY HAVE 30 SECTOR EDITS":"PER ASPECT."::"PRESS A KEY.";:G$:::120) E1A(L):"PRESS RETURN ALONE FOR DEFAULT VALUES."::"EDIT #"E":"::"TRACK:(";TR$(L,E1)")";OR DISK AND PRESS A KEY.";:G$::(4)"RUNAPT SCANNER" `X20ĺ:"YOU MAY ONLY CHANGE 20 ASPECTS PER FILE."::"PRESS A KEY.";:G$:::90 dA(X),NA$(X),OO(X),TR$(X,30),SE$(X,30),BY$(X,30),FR$(X,30),TU$(X,30) nL1X:9 x4:"HOW MANY SECTOR-EDI:4:50 FNA$"EDIT":310t P:"ENTER ALL TRACK, SECTOR, BYTES, AND BYTECHANGES AS ONE OR TWO-BYTE HEX NUMBERS." Z8:"HOW MANY ASPECTS OF THE GAME WILL YOU BECHANGING? (0 RETURNS TO THE MAIN MENU)"::"ANSWER:";X$6 _X(X$):X0ĺ"INSERT THE EDIT e::A$"EDITOR CREATOR II":(40(A$))2:L1(A$):(A$,L,1);:X(16336):X(16336):2:1:L120:"- ";:X(16336)::34,3:(2"DO YOU NEED TO CREATE THE PROGRAM, EDIT.MAIN ?";:OO$:OO$:OO$"N"80 <OO$"Y"Č198        . "YOU GOOFED!!"::198:"ERROR #"(222):Z"YOUR COMPUTER COULD EXPLODE."* 6L1X8 @N1N(L)[ JRW,R:TR,T(L,N):SE,S(L,N):P TC$(L)"ON "ĹABY(L,N),TU(L,N) ^C$(L)"OFF"ĹABY(L,N),FR(L,N) hOO(L)2ĹABY(L,N),(C$(L)) rRW,W:P:: |23:"DONE.":"PRESS ANY KEY":G$::(C0CX))Č198:X6:240, C$"S"300N C$(C)"OFF"C$(C)"ON ":291p C$(C)"ON "C$(C)"OFF":291 ""ENTER NEW "O$(C)":":C$(C):C3:" ":34,X6::34,0:291 #:C3:C$(C)::X6:240 ,"DO ";::"NOT";::" REMOVE THE DISK OR":N)OO(L)1C$(L)"OFF":210N (ABY(L,N))TU(L,N)OO(L)1C$(L)"ON ":210h C$(L)((ABY(L,N)))p : :"OPTIONS:":5:"PRESS 1-"X" OR 'S' TO SAVE. :L1X:L3::C$(L);::5:L") ";O$(L)::: "CHOICE: ";C$ C(C$):(C$"S"0 Z390.d(768)169ĺ(4)"BLOADRDWRT"^n:TR784:SE789:RW779:R1:W2:A8192:P768xX:L1X:O$(L),N(L)~L1X:N1N(L)T(L,N):S(L,N):BY(L,N):FR(L,N):TU(L,N):OO(L):RW,R:TR,T(L,N):SE,S(L,N):P (ABY(L,N))FR(L,    JL T0L ^::"PRESS ANY KEY TO GO BACK TO THE MAIN":"MENU.";:G$:` h(4)"RUN MENU" OF THE EDITOR"0 "_________________________"6 E ,L02553d -L$(L):(L$)1L$"0"L$ .L2$(L1):(L2$)1L2$"0"L2$ /L3$(L2):(L3$)1L3$"0"L3$ 1L$"= $"HX$(L), 2L255340 6L2$"= $"HX$(L1), @L3$"= $"HX$(L2))(HX$,Z,1)! XX1:X2562008 Z:YY1:Y16Y1A 120 ::"ENTER PRINTER SLOT: ";:G$:G$:SL(G$):SL0SL7Č198:200 :"TURN ON PRINTER AND PRESS A KEY":"WHEN READY.";:G$:: SL "HEX/DEC CONVERSION TABLE":"COMPLIMENTSb] ::"PRINT A DECIMAL/HEXADECIMAL CONVERSION":"CHART? (Y OR N): ";:G$:G$:G$"Y"100tG$"N"Č198:10(4)"RUN MENU"cdHX$(255)e:13:15:"WORKING..."iHX$"0123456789ABCDEF"jY1:X0xZ116 HX$(X)(HX$,Y,1   Fz#??????? ҮɠҮɮӠĠ ԮΠҠҠɠ ԮĠ ԮӠԠҮàҮîӠ ޠ⮮ޭ Ϡ ՠҮà"ԠҠԠ ҮԠޭԠҠޠޠﮠޠ󠠠ޠޠ ԮӠĮӠԠĮ͠ӠҠ à͠٠ˠҠĠΠϠРȠҠӠ͠Ӡͮʠؠ嬠堨堨讠宠堤쬠ﬠﮍ䮠嬠嬠䮠򮍍謠堯㮠䬠ɠ뮩廠Ӡ٠宠ɠ򍍼ɠɠ婮ɬԠدàԠ     RECTORY !!!": |:10005 1:" 80N":0,63998:0X"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:     󠤰 䠤ù󠤲󮍍򬠤Ƹ堲ݮ򬠤󠤲宠宠嬠ݠ宠嬠䠤®ﬠ報ݮ ̭ݮ련ﮠéݭΠݭݠݭݮ𠴠©蠤쬠欠夰嬠嬠嬠ج٠䬠䮍򬠠嬠䮠򠤰 16368,0# (16384)1284105 16368,0:70C,T$B3":290 K179ī703 "BLOAD/MODIFY/BSAVE= ,370I 6D$(4)g @D$"PREFIX/THEXDER,D1,S5"z JD$"BLOAD ";N$ T4096,X ^D$"BSAVE ";N$ h70 rERROR ROUTINE |:" PLEASE INSERT THEXDER DISK" " IN DRIVE 1, SLOT 5: UNLOCKED" E OF FILE DO YOU HAVE?"/ :5)"(1) THEXDER"K 5)"(2) THEXDER.SYS16"g 5)"(3) PREVIOUS MENU"u 16368,0 K(16384):K128240 16368,0 K177N$"THEXDER,A$1000,L$1,B$522C,T$B3":290 K178N$"THEXDER.SYS16,A$1000,L$1,B$522 P:9:5)"(1) UNLIMITED ENERGY"> Z5)"(2) NORMAL ENERGY"S d:5)"(3) QUIT"a n16368,0| xK(16384):K128120 16368,0 K177X128:180 K178X240:180 K179ĉ: 120 TYPE OF THEXDER FILE :7:3)"WHICH TYP6 THEXDER ENERGY MODIFIER7BY: VINCENT ANDREWSOWRITTEN: 24 MAY 89U(2::A$"----------------------------------------":40 CHARS<A$;::9:"THEXDER ENERGY EDITOR":11:"BY VINCENT ANDREWS":A$:34,5:16:A$:35,15FMAIN MENU"    硍硍󮍍䮍宠堢à墠ԮΠ嬠Ʈﬠ嬠려򠤰Ŭ󠤱䠤Ŭ堨󩬠宠Ŭ䠲ﬠ묠殠嬠𠵠려򠤰Ŭ堤Šﬠ𠴠堨箍𠵬ԮΠ13:1:"WHICH DO YOU SELECT (I/G)?";:A$T xA$"I"ĺ:D$"BRUN TAIPAN INSTRUCTIONS"s A$"G"ĺ:D$"BRUN TAIPAN"| 110}  D$(4)*D$"BRUN AVALANCHE LOGO";I12000:IC(:\22:1:"T A I P A N"o<"-----------"F6:1:"TAIPAN, YOU MAY SELECT"P"FROM THE FOLLOWING"Z9:1:"THE (I)NSTRUCTIONS TO THE GAME, OR"d"THE (G)AME OF TAIPAN."( n (3648)0(3649)0ĺ"UNSUCCESSFUL---CHECK DISK":L F3648,255:3649,224^ P"SUCCESSFUL" Z"DO YOU WANT TO RUN IT AGAIN (Y/N)":A$:A$:A$"N"A$"Y"90 _A$"N"Ā d20   3200%I768796:S:I,S:Iu 169,3,160,8,32,217,3,96,1,96,1,0,0,0,25,3,0,16,0,0,1,0,0,96,1,0,1,239,216(::"PLEASE INSERT THE DISK WHICH SPACE IS TO BE ADDED TO":"PRESS RETURN TO UPDATE":A$2785,14:780,17:781,0:788,1:7684 < 4 ZJ2(J2)ĺ"\_/ ";:968 [I2(I2)ĺA$;:96P ^A$;:IXA2ĺ"|";Y `I:` nJg sKn x0 "DO YOU WANT TO RUN THIS AGAIN(Y/N)":Z$:Z$"N"Ā 1010:"PRESS ANY KEY TO CONTINUE":D$) H14 JK1P KK1Ċ0::12:"PLEASE LINE FEED YOUR PAPER TO THE TOP OF THE FORM"::"PRESS ANY KEY TO CONTINUE":D$:1 LA2āL138:" _";:L: MA1āL119:" _ ";:L: NJ156 PI1X UA29YOU WANT" ::( :"1 HEXAGONAL": (:"2 SQUARE"X 2"WHAT IS YOUR CHOICE":Ah 3A1A250 7"HOW MANY PAGES DO YOU WANT TO PRINT":P 8P155 <A2A$"|_":X38 FA1A$"/ \_":X19" G:"PLEASE MAKE SURE YOUR PRINTER IS ON":2&THE VARIABLE A IS THE GRID TYPELTHE VARIABLE P IS THE # OF PAGESlLINES 76-77 PRINT TOP LINEIN LINE 78 THE VALUE AFTER TO IS THE NUMBER OF LINES TO PRINTTHE VARIABLE X IS THE WIDTH TO PRINT ::"WHAT TYPE OF GRID DESIGN DO    00"Q$S 14:"INSERT DISK TO CAPTURE AND PRESS A KEY":13)" EXITS";:A$:A$i #A$(27)Č38144o (p2 ::255:D$(13)(4):Q$(34):D$"MON CIO"y:" RWTS WORM ";::" APPEARED IN COMPUTIST #61":23)"PG 35.1"D$"BLOAD RWTS WORM.OBJ,A$9500" :"DISK'S RWTS WILL RESIDE AT $1900 AND IS $800 IN LENGTH:"::Q$"BSAVE XXX.RWTS, A$1900, L$8 m Ɲ3LLJLKL`L,SVSmknnLϩٍٍŠűàͫàϫ؍ŠűӍ㍠𠤱𠦠􍪍糠ᠤ帠󍍪卪﫱屠ᠨDzÍdzdzÍР𠦠􍪍dzðŸӍ卪Šͫ٠ϫ٠űٍͩڍ͠ؠà󠨯ө٠čڠР卪DZDzčDzōРӍ٠ؠҠō卪ؠDZ٠DZƸ󿍠РѠ͍ؠƹ۫Šÿ٠Íàª͠ՠϠՠčǠԠҠŸ퍠Ҡ²ƠҠŹ䍠ҠŸ䍍͠ ύ􍪍öԮӍ򠠠ͮͮ򠠠     נР  棠Р  棍 נ鍍卪ŠӠڍЍ占⠤棍⠤⠤棍򍪠䮠󍪠ﮮÍӍӠɠ󍪍Р נōנ ƣР  ƣננӠҍРōŠҠӠ占  占נЍӠҍРōŠҠӠ ÍנЍĠԍ䠠ҠӍ Š덠נЍӠҍĠ忍РѠčРѠōȠƠ䬠ҠҠōҠōР΍ĠҠӠ占 䍠נЍ ѠԱ堤ﻠ àԱ䍠ЫҠӍ øנЍӠҍЫ棍ЫЫˍѠԍ̱à占ЫàЫЫàЫٍŠ̱卪ԠĠ򮮮РƠ퍍àՠ䰰Ǡİ栢좠卪ӠččÍàԍԠȍЫàЫԍЫÍÍЫЫ٠ϫÍ䍠䠽䍠렰򠶍ҠϠ򠤸Р٠ƠЍ͠져㍠čҸ̸àӠύӍϫӍϫϫӠ퍠ӬٍٍŠō٠ƍԱŬ٠占Ŭٍٍ̠ԱؠӠĭƍЬ؍؍ӠЬ؍؍̠ӍŠՠΠՠƵڠՠ򍍠ǠРԍؠŠ ڍŠӠڠ卍Ԡ٠Šì٠򠠠ԠՠĠՠĠՠˠՠàՠϠՠİҸՠð̸ՠðÍĠՠð͠ՠðӠՠưРՠƵԪĮӍ堠ͮͮ㭸䠠      p / Ơ [ 8  LE LLW L``鍍卪占⠤棍⠤⠤棍Ȕ Τ  LY ʚL ˚L ̢` Lإ8_i i?0,A LF @ ? XʩXX L` Lإ8_i i?0,A  G80',HhHh & YHJ ݌Hhh ݌$&HJ $&ꝍ݌Hhh ݌ 8`Hh`GG   KK L HhG09HhHhHh o- GL A AA# *G8``80',HhHh & YHJ ݌Hhh ݌$&HJ $&ꝍ݌Hhh ݌ 8`Hh`GG   KK L HhG09HhHhHh o- GL A AA# *G꽌ɪɵ'*&%&,E'зЮ꽌ɪФ`(L*'8*! | G')  G G) ` mI꽌ɪ򠚽ɭG)U F)UFEGG㽌)U F)UFEG ɪ`}L;Y;8LܽJ 0 뽐Lܽ LL@..  LLD- аLܽ 0:LD 1i;Y; L<  LL< :݌`8`&&   3,255,162,3,177,252,133,251,177,254,145,252,165,251,145,254,200,208,241,230,253,230,255,202,208,234,96E53,230,255,202,208,234,96(100256)'*** Data'swap $7000-72ff with $bd00-$bfffg'160,0,132,252,132,254,169,125,133,253,169,189,1S: x*** SAVE FILE TO PRODOSK:"+++ SAVING PART "PART" OF 4 TO "F$D$"BSAVE"F$",A"BU256",L"((BE)BU1)256",B"(PART1)(100256)'*** DATA'SWAP $7000-72FF WITH $BD00-$BFFFf'160,0,132,252,132,254,169,125,133,253,169,189,13*** READ FROM RKDOS DISKDSZ(BE)(BS):SZ0ĺ"BAD READ":(X(TRK)10(SEC):YXSZ:DT(Y10):DSY(DT10):CALCULATE ENDING TRACK, SECTOR2:"--- READING FROM TRACK "(TRK)", SECTOR "(SEC)<15)"TO TRACK "DT", SECTOR "DSFRKDOĀL*** SWAP IN RKDOS7QSWAPĺ:SRC$:1000HV0:0::768`A16:(8);::868:COVER UP PRODOS TRACE GLITCHES...j*** SWAP IN PRODOS768:A03:(54A),IOSAV(A)::RESTORE PRODOS I/O HOOKSSWAPĺ:DEST$:1000T11100:BS,BU:BE,BU49:TRK,30:SEC,0:1300X1200:PART4:1400:SAVE LAST PARTw:"TRANSFER COMPLETE"(7)}*** SUBROUTINESWAIT FOR KEYA15:QQ(16336)(16336):16368,0:16384,128:16368,0:(16384)27T OF THE FIRST 100 BLOCKS3&1200:SWAP IN PRODOSU0PART1:1400:SAVE FIRST PARTX1100:BS,BU:BE,BU99:TRK,10:SEC,0:1300b1200:PART2:1400:SAVE 2ND PARTl1100:BS,BU:BE,BU99:TRK,20:SEC,0:1300v1200:PART3:1400:SAVE 3RD PAR RKDOS-BASED DISK IS IN":"SLOT "(RKDOS3)16", DRIVE "(RKDOS4)", AND PRESS A KEY":1000 TMPSWAP:SWAP0:1100:SWAPTMP:SWAP IN RKDOS QUIETLY CMD,1:BS,BU2:BE,BU8:TRK,0:SEC,2:1300BS,BU10:BE,BU99:TRK,1:SEC,0:1300:READ THE RESN"A$"n"A$(3)ĺA$:& T"Y":360= ^D$"DELETE"F$:400` h"UNABLE TO DELETE OLD FILE":j 420 D$"CREATE"F$",TBIN":500 "UNABLE TO CREATE FILE": *** NEW FILE CREATED; READY TO GO 216,0:TURN ONERR OFF[ :"MAKE SURE YOURE #. :"USING MORE THAN ONE DRIVE? Y"(8);N A$:A$"N"A$"n"A$"Y"m A$:SWAP0:A$"Y"SWAP1 ,:SWAPĺDEST$:1000: 1"PATHNAME TO SAVE AS: ";F$:F$""Ā 6400 @D$"VERIFY"F$:"FILE EXISTS, OVERWRITE IT? Y"(8); JA$:A$" DISK IN SLOT 6?"(8);/ A$:A$(13)A$"6"A A$(27)ĺ:b A(A$):A1A7ĺ(7);:220 (8)A" ":RKDOS3,A16:SET SLOT # 18)"DRIVE 1?"(8); A$:A$(13)A$"1" A(A$):A1A2ĺ(7);:260 (8)A" ":RKDOS4,A:SET DRIVRKDOS976:RKDOS,76:RKDOS1,0:RKDOS2,189:$3D0: JMP $BD00 SRC$">>> INSERT SOURCE (RKDOS) DISK":DEST$">>> INSERT DESTINATION (PRODOS) DISK" BU24:$1800 - $7BFF (100 PAGES) *** GET INFO "RKCRACK BY M.M. MCFADDEN" ::"READ FROMg  RKXFERd::*nD$(4):(21)ExD$"BLOADRKDOS,A$7D00"^A768806:B:A,B:BS0:BE1:CMD3:TRK4:SEC5:LOCATIONS OF BUFFER START, BUFFER END, COMMAND, TRACK, SECTOR FOR RKDOSIOSAV(4):I03:IOSAV(I)(54I)::SAVE $36-$39>       RKEXECd::$nD$(4)Ix:"RUN CRACKED RKDOS PROGRAM":j"FILE TO RUN? ";F$:F$""ĀF$"CAT"ĺD$"CAT":130D$"BLOADRKLOAD.SYSTEM,A$2000,TSYS"FS8198:FS,(F$):A1(F$):FSA,((F$,A,1))::8192 S3,169,189,1ΠԠĢРؠˠ˩ˠé٠ؠںԠԠ٠Ӡ٠Ԡ͠ŠǠˬҍԠԠˠ˩ˠéԠ¨͠РΠӍ̠ҠϠŠ֨Ԡ͠ŠӠɯϠӍƠРΠԠԠԤ Π͠Ġ͠ӠˍڠˠũˠөƠڠȠΠĠΠ͠РΠӍƠРΠԠԠä ΣңŠ̠ҠϠԠҤԠ̠͠ҠРӠŠӮΠԍԠԠŢҤĠĠ͠Ӎ͠ԠҠٍҠϠѠˠˠԠŠԠŠƠˠŠӬպŠŬՠŠˬŠì  Ԡ ͠ŠĠԍ ŠӬպŠŬՠŠˬŠì  Ԡ ͠ŠԠƠŠԠӍ ͠РΠӍԠ ͠ŠԠԍ ŠӬպŠŬՠŠˬŠì  Ԡ ͠ŠĠԍ  РкР Рк͠РΠӠٍŠĬŠӬՠŠŬՠŠˬŠì ŠӬՠŠŬՠŠˬŠì ͠ĠŠҠŢР͠נŠĻ٠ϠύŠ͠ΠҠƍԠԠӭ΢ԠˠӠˠӠ٢ԠƠ΢ҠҠҤΠԠĠԠ٢ҠϠԠĤŢƤϠԠŢРҠϠԠĤŢƤ΢ϠԠРƠ٢ΠРԠƠРΠԠԤ ԠԠӺƤƠƤΠĠҠϠԠĤ٢ƤԠӬԿ٢Ҥ̠ƠҠΠԠҤϠԠҤŠӠ͠ԠŠԠԠſ٢ҤԠƠ΢ĠΠ٢ФƠҤΠԠĠ̠ƠҠΠԠҤϠԠҤŠӠ͠ԠԠԠ¨ҤԠƠҤΠˢԤөˢՠ͠Ơө͠ԠύԠͮͮ΢ԠԠԠҤԠƠҤΠҠĬĬˬҠҠӍ֨͠ҠɠϠ֨ɩˠɩԠ͠ŠӠŠӬŠӠŠӠ͠İРİäөļҍ㾍͠ҍԠ̠ŠĤҤԠҤԠĤӬİҠϠĠºŠºԠӠŠĠˠà͠ӠƠҠԬ          !!! ! ! ! ! Ŷ³ŵijƲŷƍø´ŲııƍƸķöōƱİű±ķųķƲƸčòč°ø°¹·Ƶƹðĸ°ƶŸƱƷƲ¹ĶŵčųƳųñųĴ¹ÍƸô͠͠РƠȠİƍԠӍ̠ӺΠ͠ŠŠϠӍԠԠԠƤԠĤŢƤՠ̢ˠũՠ¢ԠΠW015:(VA$,M,1)(HX$,W1,1)720*WLD1W(16(Q)):DDD1:QQ1:MXXX(D)^|HI$(VA$,2):LO$(VA$,2)D0:MX2:Q1:VA$HI$:700:HIXX:VA$LO$:D0:Q1:700:LOXX:HI0HI2556,17,18,19,1A,1B,1C,1D,1E,1F,20,21,22+K(VA$)2CH1VA$(VA$,2)k(VA$)4CH2VA$(VA$,4)(VA$)1CH1VA$"0"VA$(VA$)4CH2āX1(4(VA$)):VA$"0"VA$:HX$"0123456789ABCDEF":D0:MX2:Q1:CH2Q3:MX4#M1MX:N8448,255sXVT19SL0ĺ"PRESS A KEY TO CLEAR THIS AND":"START AGAIN AT THE TOP OF THE SCREEN.";:G$:::VT4bS:T:0l"PRESS A KEY TO RESTART THE PROGRAM.";:G$::30%v 00,01,02,03,04,05,06,07,08,09,0A,0B,0C,0D,0E,0F,10,11,12,13,14,15,1" E9 0"((8192(8450)4))\&BY185FR$"B9 "LO$" "HI$" E9 0"((8192(8450)4))~0BY206FR$"CE "LO$" "HI$:BY222FR$"DE "LO$" "HI$D"CHANGE THE BYTES, "FR$", ON THE ABOVE":"LOCATION TO";:L1NP:" EA";:L:".":VTVT2 BY165FR$"A5 "LO$" E9 0"((8192(8450)3))kBY181FR$"B5 "LO$" E9 0"((8192(8450)3))BY198FR$"C6 "LO$BY214FR$"D6 "LO$BY173FR$"AD "LO$" "HI$" E9 0"((8192(8450)4))BY189FR$"BD "LO$" "HI$)255ĹTR,(8448):SE,(8449):P:BY(8192(8450)):440B590hHI255(BY165BY181)NP4:490HI255(BY198BY214)NP2:490HI255(BY173BY189BY185)NP5:490HI255(BY206BY222)NP3:490198:"ODD ERROR.":4:"TRACK SECTOR BYTE ADDRESS"H"CH2Ģ3:"TRACK SECTOR BYTE"R,34,3d6VT4:24915,0q@TSTET}JS015TTR,T:SE,S^0h1:1:"TRACK $"T$(T),"SECTOR $"S$(S)rVT|PSL24576VT(37)19CH2(8448:"WHAT VALUE SHOULD I SEARCH FOR AFTER":"EACH OF THESE?"::"VALUE ($00-$FF): $";VA$:650e LOXX :"REMOVE THE EDITOR DISK AND INSERT THE":"DISK TO BE SCANNED AT DRIVE 1."::"PRESS A KEY.";:G$: 24912,LO::34,1 RW,R:SL"CH1Ģ3Y LOCATION.":"FOR WHAT ADDRESS WOULD YOU LIKE ME":"TO SEARCH?"::"VALUE ($0000-$BFFF): $";VA$:650 XX49151ĺ:"YOU CAN'T DECREMENT A ROM LOCATION."::"PRESS A KEY.";:G$:190 750 24913,HI:250[ :"I WILL SCAN FOR LDA, LDX, AND LDY."T$(T):::S015:S$(S):M "STARTING TRACK ($00-$22): $";VA$:650:STXXz "END TRACK ($00-$22): $";VA$:650:ETXX "SLOT FOR OUTPUT: ";:SL$:SL$:SL(SL$) CH1230e :"I WILL SCAN FOR UP TO FIVE FEASIBLE":"WAYS OF DECREASING A MEMOR"INSERT THE EDITOR DISK AND PRESS A KEY.";:G$::(4)"BLOAD SCANNER.II":120 nCH2(24578)97ĺ"INSERT THE EDITOR DISK AND PRESS A KEY.";:G$::(4)"BLOAD SCANNER.DEC" x:TR784:SE789:RW779:R1:W2:A8192:P768 T$(34),S$(15) T034::"::"3) CREATE AN EDITOR PROGRAM."::"4) QUIT."v F::"CHOICE: ";:CH$:CH$:CH(CH$):CH1CH4Č198:1:1:50 PCH3ĺ"INSERT THE EDITOR DISK AND PRESS A KEY.";:G$::(4)"RUN EDITOR CREATOR II" ZCH4ĉ::"BYE!":N dCH1(24578)141  --APT SCANNER--. --BY BOB IGO--B768,0:24578,0J:n((768)169ĺ(4)"BLOAD RDWRT"2"SCAN FOR:"::"1) ALL OCCURRENCES IN WHICH A":"CERTAIN NUMBER IS BEING STORED, OR"::"2) DECREMENTS TO A PARTICULAR LOCATION."2 <:"OR"" " " " " """""""