' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈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-(q Ϡ@跻~!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@BLE THE BUFFER'&N30:21:::KY(CS)<&XSTART AT CURSORQ&b58,KY:59,(BF)`&lA10:A221x&vSTART AT LAST BYTE&X1A2:(59)(BF):A11:(1152)160ĺ:2090&A1ĺ::2090&BI&& KEY? = EXIT&210:KY1552130'L%::6)"PRINT USING 80 COLUMNS (Y/";::"N";::"):";:50:N$"Y"LI1R%h%CALL FOR CATALOGy%&1002:1850%030::(4)"CATALOG,D"(DR)",S"(SL)16::FR:35,24:24:7:"PRESS ANY KEY TO CONTINUE ";:210:730%:216,0:240&DDISASSEMSECTOR#$CM,WR:420:CM,RD:TT:V$CLEAR SCREEN, RECONNECT DOS AND EXIT TO BASICt$::103,1:104,8:1002:$FIND PRINTER SLOT$30:12:" WHICH SLOT IS YOUR PRINTER USING? 1-7 ";:320:KY15ı$KY7İ120:1760$KYı%PRKY:LI20#TKY2516603#^A1KY:320:KY15KYA1:1660^#hA2KY:N$;:390:KY0KY255ČTT:1590}#rCALCULATE NEW CURSOR POSN#|CS,KY:MV:TT:#CHANGE SLOT NO.#22:4:320:KY15ČTT:#KY1KY71680#SL,KY16:TT:$WRITE A TRACK/025516LI:NM,X:HX:5:"-";D"A116LI:2091,(A1XA):HP:i"A116LI:2091,(A1XA):AP:q":|""0:80",*** JUMP CURSOR ***"622:32(HF):320:KY15ČTT:"@A1KY:N$;:320:KY15KYA1:1660#JA2KY:N$;:390:(HF)166> TO EXIT";$!ED:23:1:958:80;!TURN SOUND ON/OFFU!G$;:G$(7)G$"":c!G$(7):!*** PRINT HARDCOPY ***!PRİ1760!30!A1(BF)2561!PR:!"TRACK: ";:NM,TK:HX:" SECTOR: ";:NM,SE:HX:" VOLUME: "(VO)"X"OFF";:A0 (NOFI,A4 2RESTORE SCREEN, EXITC <X1500:L F730k P++EDIT++ MODE ENTRY POINTw ZFI0ı d24:2::"++EDIT++";:NC,0:1410 nEDIT MODE ENTRY POINT x24:2::">>EDIT<<";:NC,1 :12:"MODE";: !" PRESS ";F(CGX)F1!TS(TR):SS(SC):TKTS:SESS7 XC:KY(225)192NKY5KY211380b KY0KY26750*KY100,1870,1830,100,1400,840,1450,100,100,100,100,100,100,100,1590,1480,100,420,1680,100,100,100,1720,1740,100,100:7504G$;:750 >*** DEFINE F710PRINT 40 "="'S/X140:"=";::IPRINT SCREEN PROMPTSQTTmREAD OR WRITE A SECTORuIOPRINT BUFFER TO SCREENMV:COMMAND PARSER216,0:TT:35,24:23:1:958:(EF)0İ240SAVE CURRENT TRACK/SECTORK FOR VALID SECTOR#8XA2KY:390:KY0KY15ĺG$;:520UbSAVE OLD SCT#, POKE NEWplSSSE:SEKY:SC,SE:TTvIF WRITE THEN LAST CHANCE(CM)WRĢ24:2:"PRESS RETURN TO ->";::"WRITE";::"<-, ESC TO EXIT"G$;::16368,0:210:KY14180SAVE OLD TRK#, POKE NEW5TSTK:TKKY:TR,TK:TTKGET SECTOR VALUEx22:21((HF))2:320:KY15KYSE:620CHECK FOR HEX I/O(HF)620&SAVE KEY0KY1620:GET ANOTHER KEYDA1KY:N$;:320:KY15KYA1:620NCHECİ堲壠îĮŮҍ̍؍ԮήŬ؍İİİ報ҍ٠ōűٍٍ̠РԍԮήōҮҍ֍ҠԮĮōà֍֍Р忍Š֍ҠĮŮ̍؍٠Ԯì؍Ҭٍ؍ٍ٠à̹̠印٠̫򮍰Ӎ򍰹Ԯή͍̍ӰȍčҠԠ荰ؠ፰Ҡˠ宍ҠӠ퍰ҠӠҠʠ򮍰ҠӠ󍰸٠΍ҠԠԠҾ̍ōҠōРč٠čҠӍàŠԠҠǍӍ印Ӡō򍰷ЍҍЍҫӍ򍰷Ϡ";:::Q+22:"INSERT DISK -- PRESS ANY KEY TO CONTINUE";:210:22:958:730RF(1)192:F(2)128:F(3)128:F(4)64:F(5)64:F(6)0:F(7)0:F(8)64O*G$(7)*8:"D I S K E D I T V E R S I O N 4 . 0":" COPYRIGHT 1981 (C) HARDCORE COMPUTIST":*5:X132:"-";:::6:"A DISK EDITING UTILITY PROGRAM"+5:X132:"-2103)NC2099)FI(FL)9)NO(2106)(2107)256})IO2111:MV2114:HX2117:ED2120:BI2123:FR2126:TT2129:XC2135)HP2141:AP2144)F$(1)"INV1":F$(2)"INV2":F$(3)"FLS1":F$(4)"FLS2":F$(5)"CTRL":F$(6)"NOR1":F$(7)"NOR2":F$(8)"L/C "C*S RETURN TO CONTINUE";:2105(4LAST CHANCE TO PRINTF(>KY2082050_(HEXIT BINARY ROUTINEt(R:35,24:0:730(\DEFINE VARIABLES(fRD1:WR2:LI2(pSL2071:DR2072:VO2084:TR2074:SC2075:CM2082)zNM2091:FL2101:EF2094:HF2095:CS2100:BF KEY? = 20 LINES&'KY1411900A' KEY? = 1 LINEX'KY160A21:1920x'KY213İ140:1550:1:1890'KY2081970'PRINT SCREEN'140:LKY' PRİ1760':KYL:PR:1890' PRINT EXIT MESSAGE(*"END OF BUFFER PRESРŠҩٍРÍŠōӍРŠ؍ĠưÍàÍÍĠƍڠÍӍ򍲰ҰōҠÍҍҍҍҍҍٍԩٍԭؠҠԍ؍Šؠ͍ͫҠԍ΍ҠԍӠԠӠƠӠŠìٍԠѠ̍àԍà͍ŠàͫŠ٠ŠōؠԱűٍӍîŮӍ͍ͫ٠ø¸ؠ֍ؠŠōŲٍűٍàűűٍٍ٠ŠàҮҍؠҮҍҠàԍԍڠؠǍҠűٍРààР°Рààűٍàű°РààűٍàűĠƍؠҮҍؠ̍ŠҍҍҍҍؠҮҍؠ̍ŠРààРŠؠǍҠҠҍ٠ŲٍàŲؠǍҠԮĮō֍ҠĮŮҍԍؠҮҍҬ؍ؠ̍ҍӍԮҮ΍ӠıōӠ¶ƹӠ¶óİƷԮ׮ōҠĮԮōĮԮōؠ؍ԮҮά؍Р̍ԠѠРؠ֍ҮΠűÍàŲԮήū؍űŲӍ̠壍ӠӠƍԮخҮÍؠؠخҮîǍŠӠñòưԱӠ̍ӠҍӠԍӠӍӠ֍ԮŮԬ؍űٍٍ؍٠ԠӍԮŮԍӠō͍°űٍٍԱٍűٍٍ٠ԠؠԮŮǍٍٍ٠Ԡ̍ҠԮخҮ̍Աٍűٍٍ٠ԠԮخҮ̍Աٍűٍٍ٠ԠōҠԮخҮ̍Աٍű٠ԠˍҠԮخҮ̍Աٍűٍٍ٠ԠҍҠűٍٍ٠Ԡō°űٍٍԱٍűٍٍٍ٠Ԡԍҍҍҍҍ°űٍٍԱٍ󍲵԰ˍˍԍҍԠҠĮŮҍ٠Աٍűٍǵ̶Ƕ̷Ƿ̸Ǹ̹ǹﱵԮà̰ǰ̱DZ̲Dz̳dz̴Ǵ̵̸Ӡ̹ӠҠӠ΍ԠӠҠӠҠ͠ӍǹӠ̰Ӡ̱Ӡ̲Ӡ̳Ӡðððð̴Ӡ̵Ӡ̶Ӡ̷ӠDZӠDzӠðŰdzӠñűǴӠðŰǵӠðŰǶӠǷӠðŰǸӠҩٍРÍѠŠРѠР፲ǰӠԭӠ´ԭӠµԭӠ¶ԭӠ·ԭӠ¸Ӡàî˭ӠŠî˭Ӡ±ԭӠ²ԭӠ³ưԭӠ ˍԭӠĠ͍έӠԭӠԭĮĮŬ؍Ӡ䍳ĮĮōӠùɍЭӠʍؠč؍؍؍ĮĮŬ؍ڠРÍŠ؍ĮĮū؍ҍԍŲؠ̮΍Ѡ؍ؠ̮΍ٍ̠ҠԮήҠٍРԍԮɮԍڠŠ󍳵ŠˍˍĠàРŠàà̍РӱԮخԍŠԮŮǍҠӍؠǍŠŲӍΠҠĮԮō̍Íà̍ÍàӠРÍԠàà̍ӱҠԮĮōҠԮ׮Šà̍РӱԠҠĮԮōà̍РӱРҠĮԮōؠˍؠˍԠЍؠؠˍڠРӍҠԠōԠҠĮԮōîԠàҍؠҍؠԍԠЍؠؠҍîˠàˍ؍ؠҍîˠàˍ̠Ѝؠˍ؍ؠˍРҠύРԮήԭԠëÍà°͍РԮήîԠàҍ̠Ѝؠԍ؍ؠخҮîǍРԍԮ֠ؠؠōŠ؍ؠōРԍҠԮĮōƍԍРɠԠōРӠؠŮ̮ӍҠÍؠ̍Ҭ؍̍̍̍̍ÍҬ؍ҠĮԮōà̍ԍ؍ؠǍРҠ؍РӠàԍŠؠ̍Ҭ؍РҠɠԍؠԮŮǍڠؠԠōРōӠҠ֍ؠƍؠؠήƍؠ͍ؠؠǠԠƍԮŮǍҠԮŮǍӍˠҠؠԬ؍ڠ͍ҠԮήҠԮ׮ōҠӍҠٍРōŠǍӍԠؠƍؠԍ؍ؠǠԠ΍ؠ͍ؠήƍؠōà̍Ҭ؍ҫ؍؍ؠ̍Šà̍РԮήؠؠР̮čŠؠ̍ҫ؍Ҭ؍؍ŠРԮήР̮ŠŠРԍР̮эŠРЍР̮ڍŠР΍ؠԍŠӍԍ却РōР΍ŠРԍР̮ՍŠРԍР̮ǍРōР̮΍Šԍ̍РōР̮̍ŠɍŠԍōРōР̮ƍŠԍՍԮخҮíӠ°ӭӠԍ֠ؠԮŮǍҠؠԮР̮ӠôčԮ֭ӠøȍԮخԭӠà̍îԭӠŠ΍îԭӠĵԭӠ¹ԭӠàî˭ӠŠî˭ӠñԮɮԭРŠàӍӍРѠűٍٍРŠàӍűٍٍؠ°РԠ؍íԮ̍ؠؠӍؠ°РԠ؍àٍٍĠƍ°Рààűٍٍ٠ȍӍűٍٍҍҍҍҍ°РààűؠخҮîǍŠԮ̍ؠӍԮخōűٍٍ؍ŠӍԮخÍōԮخҮ̍ӠҠĮŮҍ٠̍ҠԮخҮ̍ؠӍڠō ҠԮ׮ō؍٠ٍɠ؍ڠàڠӍÍëؠؠǍӍԮҮٍؠ̍Ҭ؍ҠԮҮٍؠؠǍҠԮҮٍ٠ؠؠǍ٠ٍ̠ӍōĠƍӍ却Ӡؠ̍Ҭ؍ҠԮҮٍōؠР°àР÷ӠƢРàРñàààԍؠ̍Ҭ؍ҠĮԮōà̍ҠԮĮōРȠРñàРӠ򠽠ۢà󍴷РðӠàԍÍҠ֍ؠؠǍŠРؠǍРؠԍؠҠſŠMENU":8 :"M";::" 'RETURN' GET'S A NEW CATALOG":j :"C";::" CTRL 'C' GET A NORMAL CATALOG": :"X";::" CTRL 'X' EXIT MENU": " ANY LETTER A-Z GO'S TO MINI-MENU": 20:7:"PRESS ANY KEY TO CONTINUE";:B$::230 :6:"PRESS ANY KEY TO CONTINUE";:B$:55M SUBROUTINE TO GET KEYPRESS l " ";::"Y/N";::B$::: PRINT INSTRUCTIONS  ::2:16:"COMMANDS"::HE$: "> RIGHT ARROW MOVE FORWARD THRU MENU": "< LEFT ARROW MOVE BACKWARD THRU 3503<:7:"PRESS ANY KEY TO CONTINUE";:B$:560TF216,0:D$"PR#0":D$"IN#0":P:12:3:G$"!!! - UNABLE TO READ DIRECTORY !!!":216,0:Z:12:(L$,3)",A$"Ė10:G$"ERR IN LOAD ADDRESS":1340*dG$"STRANGE ERR. I WILL RE-READ THE CATALOG":230 EXIT MINI-MENU? JB$"X"B$(27)B$(13)B$(24)230` EXEC TEXT FILE vB2B$"E"560C$"EXEC":L$"":B$"":830:: ERR ROUTINES L1ĺD$"LOCK"A$(:G$" ERR IN NEW NAME. PLEASE TRY AGAIN"21B$B$"L"B$"U"560:B$"U"B$"UNLOCK":T$" "WB$"L"B$"LOCK":T$"*"::11:(40(B$)6)2:B$"ING ALL"Y1105(NA$(Y),8,2)"=="23013:10:(NA$(Y),8,30)D$B$(NA$(Y),8,30)NA$(Y)T$(NA$(Y),37)ҠԍРԍӠРӠԠōزҠ؍ԠōРԍ썶ŠؠخҮîǍѠذ؍ؠōҍҍҍٍĬٍÍàōРԍĠӠððذҠԍŠӠ¢ÍԠōРƍŠōҍҍ̍Ġ䮍Ҡԍ؍àԍŠ؍؍Š؍ؠҮҍӍ٠ҍٍԩٍĠưÍàÍР̮Ԡ卵ɠ썵РŠ󍵸̠àŬٍҠԍҠԍ٠٠ԍҬ؍ÍҍҍҍҍàҍҠԍРҠԍ٠ҍѠٍҍؠ٠ҠҮƍҠԍҬ؍Ҡز؍ٍŠҬ؍؍̍ؠ̮΍Ҡō؍ҠˍҫҠزҫҠزҠҮƍҠҮƍ°űٍٍӍӠؠؠ͍ؠؠӍ؍   HH`0S,,hdehUhVhhHHU hehHehUU HHk`UiȱUiuкe& & &eeHHqUȥqUeFdO݅܆`ycbbȱbƫ8UȱV0UȥUU +뺠ЧUV욥VHUHthhЁ HHf ㈱ۺQi e 纼 +뺊i  e HH`iiiHH`(bcbebbePE1b]  0bhHj=i<<=kbޙץ,,stHʈcbhH ʈpoophMm X RQtPsh`                      10003R:5:5:"YOUR FINAL SKILL LEVEL WAS "SK%YR7:5:"YOUR FINAL SCORE WAS "PT%NR13:5:"DO YOU WISH TO TRY AGAIN? (Y/N)":AN$:AN$"Y"GO%1:10000XRAN$"N"ĉ::bR21070:".";:13290G3VG%:HG%2:" - ";:13290:VG%1:HG%:" ";:13290h3VG%:HG%2:" ";:13290x3E1100:E3HG%19:400:3E110:BU(NO):E: NAG%AG%1*NVI%:1:868:VI%1:1:8684NVI%SK%AG%:HI%3:IT%1>N13000zN2:A1N%:IN$(1)IN$(1)"]"I$(91)" "`2IN$(0)IN$(0)"/ "(220)" ":IN$(2)IN$(2)"< > "i2A:3:220:13290:IV%:IH%:".";:13290::2203VG%:HG%2:"=:#:=";:13290:VG%1:HG%:"'";:13290 3VG%:HG%2:"- * -";:13290:VG%1:HG%2::B1(ER$):B5:((ER$),B,1);:Z(NO):B\:/(7);:ST,0:5:(SP$,(ER$)1)::12020D/5:1:868:7:868:9:868:/13000:VINVADER%:HINVADER%:INVADER$(1)/400d2100022SK%6SK%SK%12A02:IN$(A)" ":A)2N%SK%KILL LEVEL?";:7:9:"1....2....3....4....5";:9:14:"< PICK ONE >";M.A5n.KE%(16384):KE%12712050.KE%177KE%181ī12080/SK%KE%176:12100/7:A54::A;:ZZ(NO)(NO):C115:C::A54:A;/AA1:A5A1&/12020.0/;:33:"RIGHT->";E>+1:2:"SPACE = SHOOT!";:26:"ESC = NEW GAME";c\+32,1:33,38:34,3:35,16sf+3:1:958p+3:1::(SP$,38);+:A1214:A:4:BU$;:13:BU$;:22:BU$;:31:BU$;:A:+400+210+GO%0E.5:7:"WHAT IS YOUR SROM 1 TO 5",*A140:SPACE$SPACE$" ":AB*A09:PO$(A):A_*:A324:A:1:SP$;:Au+19:24:"SCORE:" +19:2:"TANK":"VALUE":4:"IS":3:"-=>";+22:14:"SOFTKEY TEXT INVADERS 2.0";*+4+24:2:"<-LEFT";:15:"RETURN = STOP"# ###### "/,) "** **** ******* ** **"Q6) "******* **** ****** "r@)"## ## #### ## ## ### "J)"##### ## ## ## ## "T)" ### ## ## ### ## ## ### "^)" ### ## ## #### ## ##"h)GO%11000 0*ERR$"CHOOSE A NUMBER FͫԠԠ§󍱹àϫàӠԠŠҠƠӠϠōŠŮŠƠԠŬŠҠōӠĬӍĠŠԠŠŠĠŠӍԠŠĠōϩ٠ĠŠԠŠԠӍ٠ŠȠōŠŮŠϠРǠΠԍàƱ٠͠ĠŠ٠ԠϠҠԍ٠ύŮŠͩ٠ԠōĠŠԍϩ٠ԠŠŠŠŠĠŠӍͩ٠HG%19:VG%17:DI%1:AG%1='BU$(220)(239)(220)(239)Z'IVRAY%0:IHRAY%0:UFO%1d'TH%2'ZA$(0)"*":ZA$(1)":":ZA$(2)" ")" ### ## #### #### ## ### ")" ## ## ## ## ## ")"#### ## ### ## #####" ")"#### ## ##:IN$(1):VI%1:HI%:IN$(FR%1);:~ FR%FR%:1500:1000H HI%HI%1s HI%2ĢVI%:1:868:IT%RI%:VI%VI%1} 2410'255::::t'NO16336:ST16368:KEY16384~'HI%3:VI%5:IT%1:I$"9"'RI%1:LE%2:TR%2:FR%1'PO%9:TT%2'(NO):@PT%BP%SK%PO%PT%EJ19:30::" ";:30:PTS%;::^ u(IN$(1))520000IT%LE%2500` HI%HI%1:HI%37(IN$(1))IT%LEFT%:VI%:1:868:SK%3VI%VI%1j VI%:1:868:VI%1:1:868!t VI%:HI%RA%1)" "(IN$(AA),RA%3):AA*650<VI%1421000QRH0100VI%10m100: 500: AU%İ508RHB2000A016VI%:FR%01520ZZ(NO)(NO)::ZZ(NO)(NO)::ZZE%10:930#SS%ĭTE%PO%TE%1aTE%TE%1:QI%IV%1:TE$(TE%):QH%RA%HI%:TE%1TE$" "nSS%960IV%VI%2:IH%RA%HI%:700:VI%:IH%::TE$;:SS%0IN$(1)(IN$(1),RA%)TE$(IN$(1),RA%2)!TE$" "āAA02:IN$(AA)(IN$(AA),:"%";:1530<\IV%1:IH%::" ";:IV%:IH%:" ";:1530:FpIH%0LzR%(1)N%:RA%R%43:(IN$(1))5ĢVI%:1:868:VI%1:868:RA%(IN$(1))ıRA%0RA%RA%TE$(IN$(1),RA%1,1)TE%(TE$):TE$" "900 TE%9TE%T%2:"-=#=-";:IV%1:IH%1:"/I";(220);:ZZ(NO)|4IV%1:IH%1:" ";:IV%:IH%2:" ";:IV%1:IH%1:" ";:BO>A110:ZZ(NO):TV%:TH%:"#";:B15:B:TH%:" ";:AHTV%0:TH%0:IV%0:IH%0: RT16:IV%1:IH%::" ";:IV%:IH%HI%HI%4:(IN$(1))4670 HIV%:IH%:"+";:IV%1:IH%:" ";:eIV%1:IH%:" ";:T1216299,0::IV%:IH%:"^";:1530:16300,0 :IH%:(223);:1530T:IH%0: BO110:ZZ(NO)2*IV%1:IH%1:(220);"I";"/";:IV%:IHX%2:630:!qBP%0:1600:640>vZA$(A);:X(NO)(NO):STH%0:TV%0:970Y(IN$(1),(IN$(1))2,1)" "āAA02:IN$(AA)(IN$(AA),(IN$(AA))4):AA:(IN$(1))4ī660(IN$(1),4,1)" "āAA02:IN$(AA)" "(IN$(AA),(IN$(AA))5):AA::X%1:630:VI%1:X%1:630:X%:630:= ]BP%0:1600:640 bA02:VI%:X%1:630:X%2:630:X%:630:VI%1:X%2:630:X%:630:X%1:630: gBP%10:1600:640 lA02:VI%1:X%1:630:VI%:X%1:630:X%2:630:X%3:630:VI%1:X%3:630:,A: IH%09005 IV%IV%1:X%IH%1:Y%IV%:10F XK%160700W XK%161800o XK%92XK%111850 &IV%17750 ::13200:PO%PO%1:PO%021000 DVG%2:IH%:IH%0:" "; N400:( XA02:VI%1:X%1:630:VI%:X%1:630:X%:630HG%36HG%36:TT%LE%:6 VG%:1:868:VG%1:868\ VG%:HG%1:"=";::PO%;::"=";t VG%1:HG%:"I";: ,HG%HG%1:HG%3HG%3:TT%RI%: ^210 B%1:A1923:AA15 A:AA5 PI$(PO$(PO%),B%,1)  PI$;::B%B%1:AA17:BU(NO):A:TH%:".";:TV%0:@ dKE%(KE):KE%127ĹST,0W nDI%FS%0KE%160q xKE%155GO%1:10000 KE%160AU%1:40 KE%141TT%3 KE%149TT%RI%:DI%0:200 KE%136TT%LE%:DI%0:300 TT%200,300,350 HG%HG%1: <XK%127āA15:30:1530:35:1530:30:1530:A:TV%TV%1:30:TV%0:Z AXK%171800l FTV%VI%1ıv HSS%1 KXK%221İ600:RA%X%HI%:910 PXK%219İ620:RA%X%HI%2:910 U610:RA%X%HI%1:910# ZTV%:TH%:" ";:TV%1:TH%:"$";:A  10000& XX%X%1:YY%2(Y%1)IXK%XX%,YY%)16XX%,YY%1):_TV%:TH%:" ";:u#TV%:TH%:"!";:(TV%0İ90:TH%:" ";-TH%HG%:TV%VG%2:35:2TV%1ı430:TV%TV%1:35:TV%5ī907X%TH%1:Y%TV%1:10:XK%160ıI                q,$` L( L5 LD 8 XL XLR XQHPH RPhPhQ8 XL.0'L+ LfLLLLL ꥪLYԨé @}_'pOOO5oo'pLb^ sl j 7l sl k l -j :l M 0j N i 0j P` L L ,-` Leh8PhHQH`hbihciHHb\ȱb]`ߚl hhHHHH`L⥠`ʆ  hdheHdHHHH08  X Xhdhe + eHdHHHeHdH` ȱPʘHH`% 0 L0`,wyywxzzx,Hyw wȄffȪ yw fh0`h&Hwyxzwy wy h Lh` ` ` ` 憅` ` ᥠQ J h 8e`LԩLcغh8uhHvH` L L L~ 憅 L ʊ8$!  W$Li)$` LY L   hPhQP 8ePQiHHš`hh Pix8 Z Z ,խwqq膸 J즸 , :hhlP,q`h8uhv] :  ڢ hgʆbcb KLf/q ߠ :۩q` S0 L,Hh*Mȱڦhwx%ȱH! 5Bw0У8 ewwx𴰺 抦5?wtsʆwx8dedЕБt Z Z ,խvqq ", ȹ,ȹ ,W,qewwIy:eCBЍw U  yUUwyVxz`Зԥwyxz`ywzx`GH o8 UpVUVƠ UVUʆoph3]eУk ЮU 4Г U 5,wЅƩѤ wUU⥁œ唐=ooppȆbcĂbUVdf08ophLД8= 7MLdlkȄmn;op:E UUȥViлh8HH`Ї{y SՠUEowyywxzzxwȄ w \`fH,Hops8otpf,kiUliVU$f&łmUŁfbUȥcUUŭUVŮMvłGUŁ>UV2ЅUŕȱU喰!0UUdUV0*UiUViVUmVnɊȢwU0ХyyU  .QP$  e LWHhL:5~    eȱeLaL LRwwxȆwxwHw Jhw`w5U,w`,hbhcbwȱbxcȘHH`bbȱbeep`0CBe]Q=b`LicbbbE0`Ġ``MMLeڢD ! SL3LH h%LddЉ`?0 HH chh ޥ Yަ`н  eE pM䡥堰>Ffee0  &ߢEX$ƫv` ꥪLYDcbbwyȱbxz`ݥܦL+3UV UwȱUx`wUȥxU`Ncbbȱb`cbbȥb`cbbȱb8塅堅PEnc((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:  L j pl L V j L V >B Fl k \L=V Fl A?o l N N )k L sl j L V l j L V j L V )k pl L l j L V j L V sl j L V >B ~m k \L=V Fl A?o l N N )k pl L sl j L V )k L sl j L V l j L V l j L V )k pl L l j L V ML;Z zk pl wk $j pl j zk k O k Ol 1MLzW k |l 1MLX k tn 1M i k m 1M:o MLY zk m &MLW w f sl %l +l Cl 1ML1h l j L $j L Fl !jLT FT F S` Fl A?o l N N )k pl L sl j L V )k L sl j L V j L V j pl L V )k pl D EO sl j L l D EO j L sl l LL&S= F$S F w .l kO sL?S= F=S F sl j L l LL[SI FYS F` sl l l l 5MLS l l l hk`LR sl j n A?o >n N N sl AHo 'm N N i L j l L .l n j M sl AJ n w n F s j pl j >BHo >B?o` $j Cl 1F Fl k` Hj TO j n &ML$R 5k NO Fl aL j Cl 5Mo o MLAR Rl j j bn 1MLXR sl QjLb^ j Ol 1MLoR sl k KP j m 1MLR l hk j n 1MLR l hk Fl kLR j Wm 1MLR j hk Fl kLdS kk LRdSS l pl l l &MLR l l j hk` j L sl L l \ >B?o sl k k P Fl k` k m 1MLX )k pl k $M` sl >k k n 1MLUQ T i j kLZ k Yn 1ML{Q U i j N l D kLZ #U i j N sl D kLZ k L B?o     >&)>ȥ')̻>JJJ >`+*xS&x'8*3Ixix&& 8 l {' o {& {x)*++`FG8`0($ p,&" (0 8@ HPX !"#$`h%&px')*+,-./12345679:;<` aI꽌ɪ򠚽ɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɵ'*&%&,E'зЮ꽌ɪФ`2JJJ'J&J>Ƚ3JJJJ&'J&&3>ȽfJJJJ&'J&&f>ȥ2>&JJJȱ>'JJJ3ȱ>*JJJfȱ>J&*J&'J&&ȱ>J&*J&'J̻&*)')3*)f>)JJJ`80|'x&Hh & 󸩪 󸩭 󸘠Y'&Yxꪽ' 󸩪 󸽎`Hh     l L sl L w n Em J F m A?o m N N i L m L o F m L o F ,n L o F n L o F >B?o s S R Fl Qj 'm L Nm LLcWHAT IS YOUR SKILL LEVEL? Fc F Nm L um LLc1....2....3....4....5 Fc F um L m LLc < PICK ONE > Fc F l i TEXT INVADERS 2.0 Fa F s Gn L l LL/b<-LEFT F(b F m LLNb RETURN = STOP F@b F l LLgbRIGHT-> F_b F sl L l LLbSPACE = SHOOT! F~b F Pn LLbESC = NEW GAME Fb F dl KO sl aL l KO Em aL l KO l aL l KO m aL l L sl L n D EO ` n BI F` H n >B?o Fl A?o um N N i n K |D >B?o w l A?o Gn N N i L sl L n F >B?o n L Gn LL{aSCORE: Fta F n L l LLaTANK Fa F LaVALUE Fa F m LLaIS Fa F l LLa-=> Fa F ,n L m LLbSOFTKEY`** **** ******* ** **`L:`******* **** ****** =`LZ`## ## #### ## ## ### ]`Lz`##### ## ## ## ## }`L` ### ## ## ### ## ## ### `L` ### ## ## #### ## ## TjL:aL`CHOOSE A NUMBER FROM 1 TO 5 F` .o sl A?o im N NL m I n H n }n I n H n m I n H o Fl wk Fl !j sl j l 9j Fl nLL_* FJ_ |D sl nL__: F]_ |D l nLr_ Fp_ |DL_ ### ## #### #### ## ### _L_ ## ## ## ## ## _L_#### ## ### ## #####_L_#### ## ### ###### _Ll o F ij D fj }\LM\ sl i i i l 5MLM^ )k L sl L l D EO l \k )k pl &kL] R S kLa^ P` n .N s X m D {N k m D {N 2k [l D {N Ej l i 'm &k sl \kL^9 F^ o sl l l j l Sk sl D fj um +l l hk n l m j sl k sl k }n I n uj n L n L wL] F] F n L xj kO s` sl o F $m 5MLg _k j 1ML^ i pl i sl o F 0m i 5ML] j \k )k L sl L l D EO j l 5ML] )k pl &k )k L sl L l D EO )k pl L sl L l D EO )k L i L sl o F )k pl L i L ij pN j oL \ j o sl k I F \ H n j o k l 7J n H |D >BHoLLV )k m 1ML1h Fl Ao `m N )k m N P^ >BoL/] Fl A?o )k m N N P^ ij Cl &ML\ \L\ \ >B` k TO i k TO i {N j` k TO i k TO i {N j` k TO {N j` k j (l rjL [ m i jLZ AkL'[ j "l 3ML'[ sl j sl j j zk pl k j I $o k i k j ml 5MLf[L^[ F\[ $o AkL[ )k l wk k i !j zW )k L $j L w "o F s Fl >k sl o sl o k I "o H n sl o k l 7J n H |DL[ "o BI F[ MLJ\ Fl AHo l N L $j L sL Z F Z F zk L $j LL$Z F"Z F \ >B Fl !j` l j k k m l k sl o F $m 5MLZ )k L sl L l D EO )k pl L l D EO` sl o F k 5M` k Cl 5MLZ k D k sl o k pl M sl AJ $o "o F jLZ "o BI FZ ML;Z j rm &M FX F zk pl L sl j LLY FY F >Bo sl A?o ~m N N k TO {N j k L BZo B?o Fl k Fl 9j Fl wk Fl !j` sl Ao Bo Fl !j` sl Ao ~m N N k TO {N j sl tk L sl j L }n I FLZXI FXX FLgX/ FeX F zk L l j LLX-=#=- FX F zk pl L sl j LLX/I FX F }n I F k TO {N j sl tk L sl j LLX FX F zk L l j LLX V MLyW Fl AHo l N N j oL%W j o n j o F N 'm D n J F#W H |D >BHo i m i sl o F l &MLV` zk L $j LLW+ FW F sl tk L $j LLW FW F` sl tk L $j LLW FW F sl Ao l N N w zk L $j LLW^ FW F \l j L V >B Fl k \L=V i n F k TO i k TO i {N j` Fl 9j Fl kL[LQV sl o n sl o F N l D n M sl AJ FOV MLV Fl AHo l N N j o j o n j o F N m D n I |D >BHo sl o F l &MLLVLV sl o m M sl AJ F\ ``'`حJJJJLԩLLhhߚHH`Hh`(ERR255ij0 (ERR0A$"INITIALIZATION ERROR"P(ERR1A$"WRITE PROTECTED"v(ERR2A$"VOLUME MISMATCH ERROR"((ERR4A$"DRIVE ERROR"2(ERR8A$"READ ERROR"<(20:450:(7):0DATA FOR MARKS (A$)''32:B$"2":10180:D2(A$):6'GET A KEY^'A$:(A$"1"A$B$)A$(13)10180'A$(13)A$(((40)(41)256(36))128)'A$;:'DISK ERROR'ERR(222):ERR15ERR254Ĺ216,0:822'ERR254ĺ"TYPE AGAIN PLEASE:":: t':::D2(D21)1:A$"DUPLICATE":10140k~'A$"FORMAT BACK UP FIRST? N"(8)::12:450:A$:A$"Y"İ380':A$"INSERT DISKS IN PROPER DRIVES.":470::1000'GET SLOT AND DRIVE#'450:::10)"SLOT=>"S28)"DRIVE=>"D2;'16:B$"7":10180:S2NUE":450:16384,128:A$;B':(4)"BLOAD IOB.OBJ0,A$300"jL'TKSTVLCDDVSO:RD1:WR2:INIT4:10220V'IO768:SLT779:DRV780:VOL781:TRK782:SCT783:BUF787:CMD790:OVL792`':DOS16:MB151j'8::A$"ORIGINAL":S26:D21:10140:S1S2:D1D2) NO DOS ON COPY":*'CONFIGURATION TIMEX'(6400)162ĺ(4)"BLOAD RWTS.13,A$1900"u$'(768)(769)50710060.':A$"* SUPER IOB *":450:::A$"CREATED BY RAY DARRAH":4508'10:A$"INSERT SUPER IOB DISK":450::::A$"PRESS ANY KEY TO CONTI130:CDWR:DOS13+T1TK:490:360:550P430:100:STST2:STDOS21030]BF1060zST0:TKTK1:TKLT1030$490:TKT1:ST0:360.430:100:STST1:STDOS10708ST0:TKTK1:BF0TKLT1070BTKLT1020L:"EVERYTHING O.K.TING"450::809ONERR IGNORE UNREADABLE SECTORSd&822:ERR(222):ERR15ERR254Ĺ216,00(ERR255ERR254)CDRD10230:ERR15ĦD(7);:BUF,(BUF)1:(BUF)MBBF1NCASTLE WOLFENSTEIN CONTROLLERTK3:ST0:LT35:MB13:A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$:OTOGGLE READ/WRITECD(CD1)1:CDRDA$"INSERT SOURCE DISK.":SOS1:DVD1:510A$"INSERT TARGET DISK.":SOS2:DVD2D1D2S1S2İ470:1:1:39);::A$"READING":CDWRA$"WRIERT BLANK DISK IN SLOT "(S2)", DRIVE "(D2):470a80::A$"FORMATING"::450::IO:VL0:|PRINT TRACK & SECTOR#3:10:"TRACK=>"TK2)"SECTOR=>"ST2):CENTER MESSAGE21(A$)2:A$;:PRINT MESSAGE AND WAIT8:11:450:7378,170:47389,173:C ^SWAP RWTS AT $1900 WITH THE ONE AT $B800f h253,25:255,184:224,8:832:w rFORMAT DISK |A$"VOLUME NUMBER FOR COPY =>254"::450:32:"";VL$:VL(VL$):VL$""VL254 VL255VL03804CMD,INIT:SOS2:DVD2:A$"INS ALTERED ADDRESS MARKSH "A1,A2,A3:47478,A1:47488,A2:47499,A3:` ,ALTERED DATA MARKS 6A1,A2,A3:47368,A1:47378,A2:47389,A3: @NORMALIZER J47530,208:47531,183:47438,208:47439,19:47478,213 T47488,170:47499,181:47368,213:47356,A3: NORMALIZERS 47405,208:47406,19:47497,208:47498,183:47445,213 47455,170:47466,150:47335,213:47345,170:47356,173: 13 SECTOR RWTS ALTERATIONS IGNORE CHECKSUM & END MARKS 47530,24:47531,96:47438,24:47439,96:0 + 16 SECTOR RWTS ALTERATIONS L IGNORE CHECKSUM & END MARKSz 47405,24:47406,96:47497,24:47498,96: ALTERED ADDRESS MARKS A1,A2,A3:47445,A1:47455,A2:47466,A3: ALTERED DATA MARKS A1,A2,A3:47335,A1:47345,A2:4:VOL,VL:SLT,SO16:% ZR/W SECTORi dBF0:TRK,TK:SCT,ST:CMD,CD:IO:BUF,(BUF)1:(BUF)MBBF1o n xMOVE S PHASES 49289SO16DV,0:49289SO16,0:APH(PH4)4:1144,128A:811,128SA:813,SO16:810:49288SO16,0:PHPHS:PH0PH  *************************?** SUPER IOB **^** BY RAY DARRAH **}(*************************2SET HIMEM BELOW BUFFER AND SET LOMEM ABOVE THE BLOADED RWTS<8448:9983:10010FINITIAL IOB SETUP PBUF,39:DRV,DV     z#1,PPPXԠƠȧō    ҠӠҠ®Ԡ Ӯ͠®͠ Ӯ  ԠԠ!Ҡ ŠŠ"Ҡ®ĠҠ®Π ԠӠĠ ԠӠà1 ԠŠŠvנ àؠΠ خʠ Ϡ®ʰՠXԠƠȧō]ԭƠ Π ήӠԠ ԮӠԠ%RECTORY !!!": |:10005 1:" 80N":0,63998:0N"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) pLD8p LD8p LD8 !Cp 8p$LD8p&LDiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLEiLE8oLD8 !Co 8oLD8oLD8 !Co 8EiWLEiYLqOi^LEi`LEibLEidLEifLEihLEijLEilLEinLEipLEirLEitLEivLEixLEizLEi|LEi~LEiLEiLEiLEiLEiLEiLEEoLEoLEoLEoLEoLEi.LEi0LEi2LEi4LEi6LEi8LEi:LqOi?LEiALEiCLEiELEiGLqOiLLEiNLqOiSLEiUL oLEoLEoLEoLEoLqOoLEoLqOoLEoLEoLEoLEoLEoLEoLEoLEoLEoLEoLqOoLEoLqOoLE oFLEoHLqOoMLEoOLEoQLEoSLqOoXLEoZLqOo_LEoaLEocLEoeLEogLEoiLEokLEomLqOorLqOo|LEo~LEoLEi sl QjLb^L iN n BI F i ML(i XLpKLhLpK@ !" #$d d%&( o??[\o6LEo8LEo:LqOo?LqOoDLEO )k pl L sl L l D EO j k &k l i sl \k eLM\ X 'm L 'm LL_hYOUR FINAL SKILL LEVEL WAS FCh F j kO Nm L 'm LLhYOUR FINAL SCORE WAS Fh F xj kO m L 'm LLhDO YOU WISH TO TRY AGAIN? (Y/N) Fh F H nLhY n BI Fh ML l l LLg- * - Fg F g sl j L l LL-g. F+g F g j L l l LLPg - FJg F g sl j L l LLog Fmg F g j L l l LLg Fg F g sl Ao m N N >Bo n l S` sl Ao m N N k TO {N k >Bo` k pl k )k L sl L l D sl o Fe H o H n kn I n H Fe H |D Fl oL7f/ L l o Fmf H |D >B?o` w S g zk L $j LLf. Ff F g s S j L l l LLf=:#:= Ff F g sl j L l LLf' Ff F g j Lk >BZo Nm I F 5k NO Fl aL 'm L ,o F pl n J F sLc 'm L sl L l D EO Nm L l D EO um L l D EO e )k L i L sl o F SLM\LpK j 9m 5MLe j pl j Fl A?o l N N i oLe Fe |D >B?o j l j sl A?o k N N sl oLe]Le[l D QO j n 5ML>d j n 5M i j #n &M:o MLd m j jL8e Nm L i l l L w i nO k TO i k TO i {N j sl Awo 5n N N >Bwo s i l l L i nO i l i l &MLd l iLc l L w sl AZo ,o F N N ]j l L ,o ]j M sl AJ F k TO {N JX1%X2%CCI AA541:AA:X1%,YUFO%(Z)X2%,YUFO%(Z)::1000:5400^ COL%(XUFO%(Z))0~ 0:200:XUFO%(Z)Q%:3:200T COL%(Q%)Z: SATELLITE SHOOTS  TX%PN%74 COL%(PN%)0TY%HEIGHT%(PN%)2:400:0:820: TY%YUFO%(COL%(PNN%38PN%380:12LPN%PO%Ē0:8PO%7,5D3:8PN%7,5PPO%PN%Vxj MOVE ZYPHYRS zZ(1)101YUFO%(Z)1ı4Q%(1)371COL%(Q%)0ī600X1%XUFO%(Z)7:X2%Q%7` (1)10LEVEL%İ1000:SF%1:600 C5 ( EL%:0:0$7:6ZX%7,ZH%1:320?9:6ZX%71,ZH%:320X5:7:6ZX%7,ZH%1ADD10LEVEL%:9020:ZH%ZH%2:ZH%EARTHĂ:ZH%EARTH4ZH%EARTH4:CCCC1:CC9İ6000ADD20LEVEL%:9020: MOVE SATELLITE PN%(1)51:PD1000LEVEL%:9020:)Q END OF GAME cRA$" END OF GAME !":B115:AA1B:10:13:(A$,B)\16303,0:310:16304,0:AA:AB13:5300fB::1:10:"ANOTHER GAME? ";pA$:A$"Y"Ĭz: BUILDING LOSES A LEVEL L1LEVHT%(PN%)EARTHāAA12:A26:3A:R0202:RR112:112RRR:6PN%73,EARTH::N(BUZZ)::::3503 WHOLE BLDG. GONE 4AAHEIGHT%(PN%)EARTH2:PN%71,AAPN%77,AA:PN%72,AA1PN%78,AA1:N(BUZZ):>HEIGHT%(PN%)EARTH:350HADUX%,ZH%:320::5200:300:ZH%5ī700+ C  SATELLITE FALLS M 0:1_ 0:8PN%7,5{ 32:A0HEIGHT%(PN%)2 AA12 8PN%77,A:6,A:7,6:768:N(BUZZ) ::GUN%GUN%1:5000:GUN%0850  GROUND EXPLOSION 0j*HEIG)73:UY%YUFO%(Z):ZX%XUFO%(Z):ZH%HEIGHT%(ZX%):SF%0SF%0:660r bAA34:AA:UX%,UY%UX%,ZH%::1000:5100:{ l900 HEIGHT%(ZX%)ZH%: UX%PN%73:UY%7:ZX%PN%:ZH%HEIGHT%(ZX%):620 3:16:ZH%0:PN%ZX%ZH%5% AA34:AA:UX%,UY%$):(LEVEL$,A,1);:::5300:.  DRAW RAY 9 16:3j 3:A8TY%TY%10:6TX%,A:6,A:7,3:768: 0:A8TY%TY%10:6TX%,A:  % LEVEL COUNTER &U%U%1:U%9U%0:LEVEL%LEVEL%1:15000 0 W ZYPHYR SHOOTS B XUX%XUFO%(Z:205 + BUZZ! + ,S13:N(BUZZ)::E 6S110:N(BUZZ)::] @N(BUZZ)(BUZZ):q ] DISPLAY GUNS ^3:GUN$"<"(GUN%)"> "::21:A1(GUN$):(GUN$,A,1);::: g DISPLAY LEVEL  h21:35:LEVEL$"("(LEVEL%)")"::A1(LEVEL100  DRAW ZYPHYRS C 0:X%XUFO%(Z)7:Y%YUFO%(Z):Y%0ıW 1:6X%3,Y%2k 5:6X%1,Y%1{ 1:5X%,Y% 11:6X%2,Y%1 13:6X%3,Y%2 7:6X%,Y%3 1:5X%,Y%4  X%XUFO%(COL%(PN%))7:Y%YUFO%(COL%(PN%)):0 ** START OF PROGRAM **):: ZYPHYR WARS COPYRIGHT 1982 SOFTKEY PUBLISHING P.O.BOX 44549 TACOMA, WA 98444  HEIGHT%(40),XUFO%(10),YUFO%(10),COL%(40):10000c MAIN GAME SEQUENCER d1000n2000x(B1)127İ3000                  L`  g h "HɲjE *E E j hh $8$ J  A  Ƀɛꍖ Ђ ``  XʽibicL` 1 1< = UbȑbE<)B8$ J A & ɃHɠɛ Ubȑb ZYPHYR WARS! <";::24:3:"COPYRIGHT 1982 BY SOFTKEY PUBLISHING";|335,1936 CALCULATE BLDGS 6,0'H+44,44,53,54,46,36,36,45,46,54,0/R+-1=\+START768Kf+MEMSTARTYp+QUANTITYoz+QUANTITY011200+MEM,QUANTITY+MEMMEM1+11120+232,15:233,3. SET UP GAME .13000.14000.14100.15000/350:/10`'1:0j'AGAIN012000St'166,7,164,6,173,48,192,136,208,253,202,208,245,96,0h* SHAPE TABLE *9,0,20,0,24,0,29,0,33,0,37,0,41,0,43,0,45,0,0,0+77,45,45,0 +45,9,45,5,0+45,77,45,0 +45,109,41,0 *+77,77,5,04+5,0>+326303,0:N(BUZZ)!Z#(SC$,A,1);/n#16304,0Vx#:" "::PTS100000İ8000:850f#:FUFO%0:~' INIT VARIABLES 'EARTH152:LEVEL%1:GUN%5:PTS0:CC0'BUZZ16336:KEY16384:KBOARD16368:B116286$'HC1.'Z1V'G$(7)(7) BIG BOMB A150'(1)51AX(1)280:Y(1)190Q140,90X,Yd6,A:7,3:768kAq'# (#:FUFO%12#ADDLEVEL%100:TY%81:PN%:ADD<#PTSPTSADD:SC$(PTS):21:17:F#A1(SC$)P#FUFO%Ĺ1::%A1303:6,A:7,2:768::;o CRATER COUNTER LpCC0:I138gzHEIGHT%(I)EARTH6090sCCCC1CC5İ8000:850:@B110:YUFO%(B)18050J1:XUFO%(B)74,YUFO%(B)140,90:5400rB:50:A064:A:6140,90:A %)):400:0:260@ YUFO%(COL%(PN%))0:COL%(PN%)0:9000:550:\ SOUND OF DESTRUCTION A110:6,(1)501:7,250:768::A10020020:6,A:7,2:768:N(BUZZ):1000::PA20025010:6,A:7,4:768::AA251110:6,A:7,5:768ѠԠŠҠΠ؍ԮӠѠƹԠŠӍؠѠƹԠŠҠĠحǠΠ؍ԮخӠѠƹԠؠӍΠѠƵĠΠĠөˠѠɍԠѠĸŠԠŠ΍͠ѠԠŠҠԠϠ؍ԮҠѠŠԠҠѠԠ̬ȠѠĹԠ̬ȠΠؠĠȠŠǠӠčӠΠŠҍԠѠĠԠҠΪ˭Π٠ ӮĠԠ٠Ж32:B$"2":10180:D2(A$):+'GET A KEYS'A$:(A$"1"A$B$)A$(13)10180'A$(13)A$(((40)(41)256(36))128)'A$;:'DISK ERROR'ERR(222):ERR15ERR254Ĺ216,0:822'ERR254ĺ"TYPE AGAIN PLEASE:"::(ERR255ij(D21)1:A$"DUPLICATE":10140`~'A$"FORMAT BACK UP FIRST? N"(8)::12:450:A$:A$"Y"İ380':A$"INSERT DISKS IN PROPER DRIVES.":470::1000'GET SLOT AND DRIVE#'450:::10)"SLOT=>"S28)"DRIVE=>"D2;'16:B$"7":10180:S2(A$)'16384,128:A$0B':(4)"BLOAD IOB.OBJ0,A$300"_L'TKSTVLCDDVSO:RD1:WR2:INIT4:10220V'IO768:SLT779:DRV780:VOL781:TRK782:SCT783:BUF787:CMD790:OVL792`':DOS16:MB151j'8::A$"ORIGINAL":S26:D21:10140:S1S2:D1D2t':::D2:360:'CONFIGURATION TIMEM'(6400)162ĺ(4)"BLOAD RWTS.13,A$1900"j$'(768)(769)50710060.':A$"* SUPER IOB *":450:::A$"CREATED BY RAY DARRAH":4508'10:A$"INSERT SUPER IOB DISK":450::::A$"PRESS ANY KEY TO CONTINUE":450:130:CDWR:DOS13360.T1TK:490:280O430:100:STST:STDOS1030\BF1060yST0:TKTK1:TKLT1030$490:TKT1:ST0:320.430:100:STST1:STDOS10708ST0:TKTK1:BF0TKLT1070BTKLT1020L:"EVERYTHING O.K."TING"450::809ONERR IGNORE UNREADABLE SECTORSd&822:ERR(222):ERR15ERR254Ĺ216,00(ERR255ERR254)CDRD10230:ERR15ĦD(7);:BUF,(BUF)1:(BUF)MBBF1NCASTLE WOLFENSTEIN CONTROLLERTK0:ST0:LT35:MB13:A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$:OTOGGLE READ/WRITECD(CD1)1:CDRDA$"INSERT SOURCE DISK.":SOS1:DVD1:510A$"INSERT TARGET DISK.":SOS2:DVD2D1D2S1S2İ470:1:1:39);::A$"READING":CDWRA$"WRIERT BLANK DISK IN SLOT "(S2)", DRIVE "(D2):470a80::A$"FORMATING"::450::IO:VL0:|PRINT TRACK & SECTOR#3:10:"TRACK=>"TK2)"SECTOR=>"ST2):CENTER MESSAGE21(A$)2:A$;:PRINT MESSAGE AND WAIT8:11:450:7378,170:47389,173:C ^SWAP RWTS AT $1900 WITH THE ONE AT $B800f h253,25:255,184:224,8:832:w rFORMAT DISK |A$"VOLUME NUMBER FOR COPY =>254"::450:32:"";VL$:VL(VL$):VL$""VL254 VL255VL03804CMD,INIT:SOS2:DVD2:A$"INS ALTERED ADDRESS MARKSH "A1,A2,A3:47478,A1:47488,A2:47499,A3:` ,ALTERED DATA MARKS 6A1,A2,A3:47368,A1:47378,A2:47389,A3: @NORMALIZER J47530,208:47531,183:47438,208:47439,19:47478,213 T47488,170:47499,181:47368,213:47356,A3: NORMALIZERS 47405,208:47406,19:47497,208:47498,183:47445,213 47455,170:47466,150:47335,213:47345,170:47356,173: 13 SECTOR RWTS ALTERATIONS IGNORE CHECKSUM & END MARKS 47530,24:47531,96:47438,24:47439,96:0 + 16 SECTOR RWTS ALTERATIONS L IGNORE CHECKSUM & END MARKSz 47405,24:47406,96:47497,24:47498,96: ALTERED ADDRESS MARKS A1,A2,A3:47445,A1:47455,A2:47466,A3: ALTERED DATA MARKS A1,A2,A3:47335,A1:47345,A2:4ŠΠŠ͠Ѡ Š͠Ӡ ĠéҠѠҠҠҠƠӠčŠѠŠΠŠΠӍ٠ϠԬנōȠѠĠԠƠ٠ϠԬȠō̠ѠŠĠƠ٠ϠԬנōȠѠƠĠƠ٠ϠԬȠōӠɠՠҠŠӍ ѠҠΠٍŠѠŠҠҠ͍̠ѠàԠƠϤŠŠˍӠΠɯϠŠðҠѠðҠĠōĠѠðĠĠō ` eHihi `S #  /` LY  i    SLI L_ 7 Bɿ%1&:")H hE #LLY 1Ю ƌLL LL    S Z !LL  !&&&&8&&򅑥` L.  `    `  XC` f`u X  `  `  0 L) U0 L) T(`mi ` eLhLhiLsL`J) )i `JA8J@ JHUALbTh@`C?IQu !(3D]0d8d0 8 00 0 ` 򱜅ȱ󱜅80L@LLLLOL8880 LX|L*yXH yI8yJ UTLHJ UhTLhP8y0J UTLHJ UhT@ ` )L ) @H Jh UTL'Oаd HH` BLHH B  BL[hhLX|eeȌX L*LLآyH h*myH JUTrn. -? for HelpType entry or use commands Press Space Bar to continue Do you really want to do this/Type number, or use arrows, then press Return 5 WARNING. Desktop is full. Action not completed. |LX X|LX0 :M0  0L`Y8 Hqhe` `   S  `O < ` ͒`@Place the AppleWorks PROGRAM disk in Drive 1 and press Retu 4ݣ*ݣ LYMXNY # LJ(*249 $ 8捭 m8 5 -ƚ 3 ) 1 [!ȱ8埍im i   g3;SSSSSSEccccccccccc/H   Sh` ީ)ͧLL",9 !gL9LLL@LeLmLLLL*LL1L<LPL[LfLLLLL2LLL$L/LOLXLrLLLL LEL,LSLLLLLLLXLL LL L L L L L L  05EEEEENNJNNNSN5==@    % (ERR0A$"INITIALIZATION ERROR"E(ERR1A$"WRITE PROTECTED"k(ERR2A$"VOLUME MISMATCH ERROR"((ERR4A$"DRIVE ERROR"2(ERR8A$"READ ERROR"<(20:450:(7):0DATA FOR MARKS : 213,170,181ō؍ˬ؍à̮ٮҫūÍ̮ٮҍӍ͠ӠōҍԠҠΠĠŠŠŠԍ؍؍ˬ؍ÍàЭԭ̮ٮҫԠ̮٠РҠō̠̮ٮҠѠƸΠϠРϠΠ̮٠ӠčҠŠΠŠƠ΍ΠҠ̮ٮ֭ŠǠŠ٠Ӎ̮àѠ̮٠ѠàѠŠѠŠӍ/  0 a /Zͬ U $N J * $5 1  $S" > `L~% 1L$ %5%%% $ %%% % %) %  e X $! X M! Xt! L$ `YaYEX`$ X#Q$`$ \#) X$ \#)eL@$` CJ  0EF>/ADjjJJJJ  0?@)  0BC e X ! X !  !  > 1  Φ   5Х  > /  0 2321&'67 éO & ' !( k# ( Q'  %L0:` $ ȳ#### ʹ#H #hL#  a 0`Y0$ XQ#$tartedIntegrated Software*By Rupert Lissner and Apple Computer, Inc.*Copyright Apple Computer 1983 V1.1 USA is too long a pathname.    !Q)ɂ )?L")00 E&'112)p00K`$APPLEWORKS REQUIRES AN 80-COLUMN //E(Your copy of the AppleWorks PROGRAM disk&must be in Drive 1. The write-protectnotch must be uncovered.$Type today's date or press Return: The date must be 1983 or later,and in this form: 3/20/84DiskGetting S``  ` 4 5  X  PLH D `     .    m)m )m iH ʈ h ` ii  ` <O   `  ȱќ ќ` `#N0x"#)a0b `    ii   P8J Li   ` *QO`&)a0b }`diLH  hɯL))J+;Le= EPP O E EPP E  QR <Le L wIwLe` <` <`  @ @`) ``a{)` a{)ߑ` ќ D L`$ 80Na GH   )`LQR }L JUNMx M $KwM $,Ml $"M)@`)l $ M $HNMhTL 0ƛƝ`  )`   - S   1`$%L=zʠ$ Xs) Dq)_Z 76)e*iL 6H/"#ȱ   ĜL%=C 7Ɂ@ CmOO8 ` X`X` & )Т <O= - `l l `Fejf` ȱnnffee` ƟĞL`  eeL_  !L  !L0-:)H Xh)eH h L 1H h    e < ^` -->  < O O  L    ΠĿĠŠӠϮϠŠϠԠӍÍàҠƠӠϠԍà؍ҠԮخӍԠҠΠŠŠčũٍٍũٍ٠Ҡ٭ǠĠԠϠǍѠ͠ӠϠӠȍĸˠ̠ŠԠӠŬȍƠԠōō̠ŠԠӠӠǠ͍͍ȍͫԠҠ͠ԠĠҠϠ؍Բ٠٫Рṷ̆РҠԍԠӠԠōҍ٠ԠӠ͠Ԡҍ٠ŠҠōҠ͠ŠɠϠؠĠԠΠ̠Ҡԍ͠ԠŠ͠ōؠͫҠ؍àҠҠҠҠƠӍŠ͠ƠԠϠΠŠҠԠŠōp2 I08`/ $ Ǯ(  @ LE(   /٦  @ (  e X X l" * Y ̦ /󈌦 Ĺ(( (((` /SEG.00 ( (L( (`}[ <*_ X,@' X N) X " X" XA"- ` | | | | |TMq` L' '梥W C'D C'Ŝ;7(Xp Ln'2)JJJJ`p0'RY & L& /&&& $ & &  ">:" A$w  :`报 # #!:C;Ŋ ;L&;:报 #8 #L&$#: #:Ld&`Y  <*_ X2' X=2'A$"Y"B1XWW33:WT34$RCMND47092:ERR470932\VOL47083?fBU47088LpDB16384cz::"FILE NAME:";r:" ";FI$WT,5:6:ERR,0:B0:"DO YOU WANT ";:WL,12::FI$;::" (Y/N) ";:A$WL,0A$(27)ġ:140A$(13)ĺ:A$ (7)"WARNING, DOS ERROR")E(ERR)RE16ĺ"WRITE PROTECTED (REMOVE TAB)qE64ĺ"DRIVE ERROR (I/O)" E10E40ĺ"UNUSUAL ERROR, CODE = ";E *FT46582:SL46583:DR465844TR47084:SE47085>NS46574:TB46537 HWL32:HANGE PERCENT CHANCE TO ";A$+A$""680FB(A$):B0B100680[DB77,255B100aFI$"TO FIX A BAD FILE":920:B710X110256:DBX,0::X76106:DBX,0::12:16:"WRITTING"CMND,2:VOL,0:768:(ERR)16140((DB75)255100);"%"80:"ENTER PERCENT WANTED ";A$G:A$""600bDB(A$):B0B100600wNDB75,255B100}XbFI$"TO CHANGE PERCENT CHANCE OF BEING RECOGNIZED":920:lB680v:"CURRENT CHANCE IS ";((DB77)2.55)"%":"CCURRENTLY IN ROOM ";(DB64)B :"ENTER ROOM NUMBER (1-60) ";A$ B(A$):B1B60ĺ:"MAINTAINING OLD ROOM":X1500::510 DB64,B  FI$"TO CHANGE PERCENT CHANCE OF ACHIEVING A HIT":920 B600 :"CURRENT CHANCE IS ";&TENANT":"5) CAPTAIN"I "6) COLONEL":"7) GENERAL":"8) FIELD MARSHAL"h :"WHICH ONE (1-8) ";:A$z WL,0:A(A$) A1A8ĺ::"MAINTAINING OLD RANK":X1500::450 DB109,(2A1)16  FI$"TO CHANGE ROOMS":920:B510 :"NS":920:BĹDB108,1* J(DB111)0350W TFI$"TO BE RESURECTED":920:BĹDB111,0] ^ hFI$"TO CHANGE YOUR RANK":920:B450 r:"CURRENT RANK IS ";(((DB109)161)2) |:WL,5::"1) PRIVATE":"2) CORPORAL" "3) SERGEANT":"4) LIEU3)) CMND,1:BU,0:BU1,64:VOL,0:768< (ERR)15740j FI$"MAXIMUM GRENADES":920:BĹDB72,255 "FI$"MAXIMUM BULLETS":920:BĹDB71,255 ,FI$"A UNIFORM":920:BĹDB73,1 6FI$"A BULLET PROOF VEST":920:BĹDB74,1 @FI$"THE WAR PLA0:"WHICH ONE (1-4) "(7);:A$F A$(27)ė:"PROGRAM TERMINATED":] A$"1"A$"4"140 FI$"CASTLE":A$"2"A$"4"FI$"BACKUP" A$"2"FI$"^"FI$ 170 D$"VERIFY"FI$:216,0:810 B1(TB)(TB1)256 TR,(B112):SE,(B11 d:::16380)n32,227,3,76,217,3BxX05:Y:768X,Y:TD$(13)(4):2:5:"A.P.T. FOR CASTLE WOLFENSTEIN":7:5:"1) CHANGE CASTLE":5:"2) CHANGE BACKUP":5:"3) CHANGE ^CASTLE":5:"4) CHANGE ^BACKUP" 216,0:13:1     ĠǠȠ٠čҠѠҠҠҠƠӍ͠Ѡ ͠Ӡ ÍҠѠƵĠРҍҠŠΠŠƠԍѠƹԠĠؠǠӠϠŠҠĩԮخӠѠƹǠѠǠƠԠ͍ Ѡ̠ΠƠҍҠѠðҠĠōĠѠðǠӠčԠѠIJԠ̠ŠƠؠĠǍԠѠĸŠԠŠ΍ԠѠĠԠǠΠɍؠŪԠ٠ ӮĠԠ٠̤ԠĤǢ΍ŠŠŠҠؠϠĠŠجԠҠؠϠĠŠجԠԠĤά̤ԠĤخʢŠԠĤΫ͢ ԠԠŠ͠ˢ ԠӠΠΠ٢ԠŠ  ŠԠǢ̠ŠŠŠŠŠŠˍűűű׍ĤԺŠ  ԠԠˠȠΠ͢ ԠӠΠΠ٠ԍĤĠ΢Š  ԠŠˠȠΠ    ͫҠ؍ŠҠԠԠ͍ҍӍϠ̬ȍàĸˠƠ٠ҠΠ̬Ƞ̬ȠϠōà؍ҠԮخӍԠ̠͍Ҡԍ͍ؠȠŠōҠΠȠ͠ōҠ͍̍Ҡ͍ͫҠͫҍͫҠԠ̬ȠĠŠũٍ٠͠ҠӠ̬ȠĠȍӠӠōҠԍ̩٠ԠŠōŠӠōҠōŠοѠԲӡРàŠŠοŠ͠ϬϠРŠŠήŠŠή٠٫ЍũٍٍԠҍҍ٠ĠԠӍ̠٠ԠҠ٠ϠŠčҠҠҍР̮àРͿѠŠӡРŠԠC NO.(HF)KYA116A2:1KYA110A2:FGET TRACK VALUEo22:14(HF):320:KY15KYTK:480(HF)KY2480KY3480A1KY:N$;:320:KY15KYA1:480A2KY:390CHECK FOR VALID TRACK#KY0KY34ĺG$;:420F,0:35,24:MV:80-PROCESS HEX/DEC INPUTPKYKY176:KY0KY22KY128:v"KY9KYKY7:KY10KY15KY128|,6GET HEX OR DEC ONLY@50JKY141ıT280^KY128İ120:320h(HF)KY9İ120:320r|CALCULATE HEX/DEY(1025):280:A1KY:KY(1026):280:A2KY:KYA116A2:TGET KEY WITHOUT PROMPTqKY(16384):KY12821016368,0:HANDLE AN ERRORA1(EF):30:12:12:A116ĺ"UNABLE TO WRITE":260"DISK DRIVE ERROR"G$G$;:X11000::EO CMD PARSERd10621:7508nMAKE NOISE AND RETURNExG$G$;:\FIND BINARY STARTq(1024)164190FOR DECIMAL NUMBERA1(1024)176:A2(1025)176:A21İ400:A1KY:A2(1026)176:A21İ400:KYA1:FOR HEX NUMBER8K + L/+ $L 2 ::2150:750ICLEAR TEXT WINDOWX35,21::w(GET CHARACTER WITH PROMPT216368,0<N$:KY(N$)128:KY155ıFRESET ALL DEFAULTSPTR,TS:SC,SS:CM,RD:TKTS:SESS:TT:MV ZCLEAR STACK, GOT$`mhdddmH(Ȣh mHm(h (`#mr X J   b b  b   *H L hJJ l JJJJJ)eɀ0ɠ lКʆ`­++JJJJJm+L@@ jLɠ3/ kLkLBi ۰ mimi4 4 Lɰǰ ɺ)`4 H  oh o܍o`4 <0` 4 m(`+H/*m(hHJJJJ ɺi(h) ɺi(Ȅ LSɎ iLSɌ i LSɍL ɕL ɈLɑLɚL8j`Ʉ4 L) Ɂ4  44L) k`jk50 5 )  ɛ05knn`nJɠ jkL Tj 4 L4  4 4L) 4L) 48 i4 k2` 4i ii4L)nL ,-r ʎr ) 轕 轖HH` 7  Xħ P ՙ ?n8ɉ @iLSɆ i  r ( r ($ r (4 r (#5 (ȹr (%nc ((`   / /ʎ/L L 8鰍5L) pʎqʎ L) pqߢA@@@; C K S  [ c  k  s # { + 3 ,- r (JJJJ (ȹr ( (ȹr (4 0: 9L ɺi((h)4 0: 9L8 ɺi((llБo(%&((((`ȹ  $ `ƠӠ+JJJJJ)e)` `L @ :+ $  J S:;`5 % %%% '(L ((((PPPP _ (i&` )'`ʽ 4L %` '4AN[hu % l H4o &&hoDHJJJJR#2067:10:Ls`' ` LL) LL~L Lk L L L]L LLL ```# HIHȱHgh` #.`             Ӡ󍰷ӠҠ٠̫̍٠ٍ̩ԍٍٍ̩ԠԠӠԠӠƍǠӠԠӠӠӠԮŮǠӠǠӠԠӠˠӠ̮ΠӠ԰ԱРŠÍРҰÍРԠЍРԠЍРԠčӠč̠ӍРϠύРԮήРōРԠčР٠ɍРîŮӠҍРԠԍРӠӠȍ̠ӠӍ͠Ӡ̍ӠҠƍӠԠύӠà占ŠӠ͍ˠӠԍԠӠӍǠӠƍخҮîǠӠƍήƠӠԍǠӠƍӠŮ̮ԠӠ֮ԍŠӠ֮ōԠӠŠōӠӠӯˍӠĸŠԍà󍰴ˠӠˠҠӠҠԍҍӠĠӠčŠӠҠōŠӠŠ̰ӠРӍԯԠˍĠӠԠӠԠŠӠŠ̠ӠѮōѠōŠѠµҮɠѠùҮʠѠҮˠѠҮ͠ѠčԠŠƠà͍ԠӠóӠ³²̮ȠѠ̮ɠѠ̮̠ѠÍΠѠč̮ΠѠō̮ѠѠ̮ՠѠ̮ڠѠŠѠŠѠҠѠĠѠƹŠѠõҮƠѠöؠѠԠѠčҠӍ̮ԠѠ̮Ѡ̮ Ѡ̮ĠѠ̮ƠѠԠѠŹӠѠĹ Ѡų٠ѠðŠѠðàѠ³ƲԠѠIJӠѠƸàӠѠƸijˠѠƹʠѠ֠ѠŲѠűѠ̠Ѡ̠ѠҠѠàѠŰ͠ѠűҮҠѠŴҠѠŷŸƍԠɠΠԠٍԠĠҠҠƠύРѠ͠ѠȠ                                           ٠ƠԠ͠ǮԠӠϠŠ͍ԲҍҠ͠Š͍̍Ҡ͍ͫҠͫҍͫԳҠԠàˮԠӠϠŠŠԠРĠƠſѠˠӠϠԠ͠ĠˠҠĠƠ͍٠ƠŠͿѠԳӍР²ΠҠ͍ŠԲ LD# H8`?E Vk *f???0x E Hh D#-EEE8` D x D - x8`- 0ݩ ?ʥD E Hh`   LDcpq` [` ~ hh@(LH9LHH/Hh/ H -З( (& $8 H` *HVDP (ED Z $0x8x D- DHIHHHHhHH݌hHhHh݌H6 h    `HJ>݌h Hh݌`葠葠ȔЖȔЖ<=>?`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  ԠԠōвؠΠԿàԳӬϠРĠƠŠˍؠΠŠӠԠϬϠΧԠŠŠŠŠàԲРĠƠԠǠƠԠ͍ԫ͠ŠӠŠҠ͍ǫԫͫؠԠҠϠύ٠Ҡ͠ǍРҠŠРҠԍŠҠŠԠٱϠ̩ٱ ӠŠԍٱƠӠ̠čҍǠǠΠҠčԠàԠРĠРҍҍЍҫЍҫӍ͠Ӡō̠ٱР̠٠ӠčҠҠĠōРӠԠ̠ÿѠĠӬϠР͍Р ӠԠÿŠРϬϠŠٍҠ؍ҠԍàҠŠȠӍŠРϬϠōӬϠԠӍҠĠԠҍҠԍٱĠԠӍƠӠϠԠӠԱDZٍҠԠԠǠΠɍ٠ŠȠԿ̠ԱϮϠԠԠҍ͠Ԡ͠ōؠͫԍԠȠŠˍҠԠԠ̠ŠàŠŠҠƠӠϠԍà؍ҠԮخӍ٠ҠԠӍ؍ŠвŠ٠ǠҠōˠԠȠŠƠŠ٠ŠԠٍԠנŠƠŠؠԠРҠŠ44"X22:40:60172,32,218,253,96rDS1%774:S2%805:DR%769:TR%789:MV%830:CT%856:B$(8):G$(7):IO%768:NM%890:HX%889:DR1N40:8:10:"COPYRIGHT 1981 (C)"::10:"ALL RIGHTS RESERVED"::10:"HARDCORE COMPUTING"::10:"P.O. BOX 44549"::10:"TACOMA, WA 98445,230,31,165,31,201,64,144,2370189,136,192,169,1,133,37,32,34,252,169,0,133,36,133,30,169,13,133,31,162,1,32,74,249,166,30,189,0,32,32,218,253,162,1,32,74,249,230,30,240,7,198,31,208,235,76,75,3,32,156,252,230,37,32,34,252,169,22: 133,34,96,169,TK%TK%1:TK%71TK%0#480)EX768894:X%:X,X%:X&162,97,189,137,192,162,96,189,137,192,160,5,169,255,32,168,252,136,16,248,169,0,32,160,185,189,142,192,169,0,133,30,169,32,133,31,162,96,160,0,189,140,192,16,251,145,30,230,30,208,23)60) A$;:A$:C$C$A$:A$(13)460M A$;:A$:C$C$A$:A$(13)460j A$"."C$C$"5":".5"; KY(C$):KY0KY35420 TK%KY2 CT%,32:23:30::">>>READ<<<"G$;::" ";:TR%,TK%:70:IO%:60 TK%TK%1:TK%0TK%71 480N%:MV%:c 23:30::G$"NEW SLOT?";:2::"SLOT";::7:" "(8);:A$:KY%(A$):KY%1KY%7390 S1%,KY%16:S2%,KY%16:240 ::33,33:1002: C$"":23:30::"SET TRACK";:19::G$"TRACK";::" "(8)(8)(8)(8);:A$:C$C$A$:A$(1"": G$""G$(7):: "23:30::G$">PRINTER<";:A ,1X 6BUFFER%(CT%)256k @:"TRACK "TK% JX025513:Y012:NM%,(BUFFER%XY):HX%:" ";:Y: T(16384)155360 ^X h0:16368,0: rIN%IN%1:IN%63IN%63 |CT%,IY%136İ250 KY%149İ370/ KY%204İ490A KY%206İ510J 100 23:30::G$"SET DRIVE";:10::"DRIVE";::16:" "(8);:A$:DR(A$):DR1DR2230 DR%,(S1%)DR:50 IN%IN%1:IN%32IN%32 CT%,IN%:MV%: G$:G$(7)G$%);:25:" "B$B$B$B$(TR%)2% P. Z540{ dIN%(CT%):21:32:"PAGE "IN%31:60:23:30:868::">COMMAND<"::20 nKY%210İ480 xKY%211İ390 KY%216İ410 KY%212İ420 KY%199İ270 KY%196İ230 KY%208İ290 K # ::0:0:16384:1144,90:90AKY%(16384):KY%12820Q16368,0:g(X140:"-";::260:781,0:1144,90:TR%,0:IO%:781,255:TR%,TK%:IO%:<23:2::"SLOT";:10:"DRIVE";:19:"TRACK";: F23:7:(S1%)16;:16:(DR%)(S1     :VOL,VL:SLT,SO16:% ZR/W SECTORi dBF0:TRK,TK:SCT,ST:CMD,CD:IO:BUF,(BUF)1:(BUF)MBBF1o n xMOVE S PHASES 49289SO16DV,0:49289SO16,0:APH(PH4)4:1144,128A:811,128SA:813,SO16:810:49288SO16,0:PHPHS:PH0PH  *************************?** SUPER IOB **^** BY RAY DARRAH **}(*************************2SET HIMEM BELOW BUFFER AND SET LOMEM ABOVE THE BLOADED RWTS<8448:9983:10010FINITIAL IOB SETUP PBUF,39:DRV,DV,1504 桥*WnL" AppleWorks  e X X l" * Y ̦ /󈌦 Ĺ(( (((` /SEG.00 ( (L( (`}[:"SAVE THIS VERSION AS ";A$0 N(A$)0NA$A$6 XJ b(37):22:NA$P lp vD$;"BSAVE"NA$",A$300,L$D0" 768::NA$" IS READY" : ERASE PROGRAM IN MEMORYF$"YES"  30:OF$$ 310B OF34:(OF$,1)"Y"OF21` LN14:(LN$,1)"N"LN27 &RM255:(RM$,1)"Y"RM00 0825,OF:832,LN:846,RM ::20:"DO YOU WISH TO SAVE THIS VERSION TO THE DISK? ";:A$ ?A$"N"640 DA$"Y"ė::126:30:"Y/N";:A$# hA$(13)380C rRM$"NO ":A$"Y"RM$"YES"I |V 30:RM$\ s 8:30:"Y/N";:A$ A$(13)440 LN$"NO ":A$"Y"LN$"YES"  30:LN$  10:30:"Y/N";:A$ A$(13)500 OF$"NO ":A$"Y"O10)"USE LINE NUMBERS" 5 10)"USE OFFSETS"; M :6:30:RM$] "8:30:LN$n ,10:30:OF$t 6 @RM$"NO "LN$"YES"OF$"NO "Ģ2:7:"NON-":340 J2:7:4): T20:"IS THIS CONFIGURATION CORRECT? ";:A$:A$"Y"530 ^NA$"CHECKSOFT" n) x(37):10:NA$/ A D$"BLOAD"NA$c LN$"YES":OF$"NO ":RM$"NO "| (825)21OF$"YES" (832)27LN$"NO " (846)0RM$"YES" :10)"NORMAL CONFIGURATION IS" 6 10)"USE REMARKS"   * START CHECKSOFT, * WRITTEN BYB * ROBB CANFIELDZ D$(4): CTRL "D"b:h(:15:"CHECKSOFT"2<11:"ENTER VERSION OF CHECKSOFT TO USE."F"DEFAULT VERSION IS 'CHECKSOFT'"PZ7:" > ";NA$ d(NA$)1  ԫӠԠȠōԠƠӠŠ͠ԍӍԠӍŠŠӠĠӍDZӠΠҠ٠ӍӍĠҠԠŠȠ͍ӠΠϠԍӠĠ͠Π͍ԠàԫĠŠϠŠŠΠԍŠԠӠŠ٠ҍàҠǍвҠԠԠԠōŠвƠϠϠӠĠԮؠӠӠŠĠϿѠĠƠϠčؠˠҠԠϠĩ̠вӠϠԠӠ͠ϠŠӍРԠȠΠٱϠӍٱٱŠȠ͍РؠˠҠč٠38Y3Y2H(Y2)`L"CHANGING "A$" ";::"TO";::" "B$:D$"UNLOCK"A$:D$"RENAME"A$","B$uVL1ĺD$"LOCK"B$[NA$(X26A)(NA$(X26A),7)B$`230j UNLOCK/LOCK ALL FILES B$"A"1280:"LOCK/UNLOCK ALL FILES ";::"L/U";::NAME FILE B$"C"1160'1310IL1ĺG$"THIS FILE IS LOCKED"Og"RENAME "A$;:3000m~B$"Y"560$."CHANGE "A$" ";::"TO";::" ";:B$3(B$)30ė:12:13208B$""560B:12DY40(A$)(B$)12 FYB1C$"LOAD":820810/ DELETE FILE @B$"D"990bL1ĺG$"THIS FILE IS LOCKED"|:"DELETE "A$;:3000B$"Y"560::12Y40(A$)9Y2Y2(Y2)"DELETING "A$:D$"UNLOCK"A$:D$"DELETE"A$  RE$:B$T$HE$"Y"560#M1370/R::12RTY40(A$)(C$)(L$)(B$)5_VY2Y2jX(Y2)\C$"NING "A$B$L$fL$""L$",A"L$pD$C$A$L$z230 LOAD/BLOAD SELECTED FILE B$"L"940B$"":L$"":C$"BLOAD"2940 RUN/BRUN FILE .B$"R"900HL$"":B$"":C$"BRUN"_ B0C$"RUN":830% IF FILE IS BINARY GET OPTIONAL LOAD ADDRESS *:"WHERE TO "C$;:" (DEC $HEX ) > ";L$:4L$""B$" AT ">C$" "A$B$L$;:E$B$:3000:T$E$:E$B),37):230 UNLOCK FILE ]B$"U"L1760: UNLOCK FILE ONLY IF FILE IS NOW LOCKEDu"UNLOCK "A$;:3000B$"Y"560:12:Y40(A$)11:Y2Y2Y2:"UNLOCKING "A$:D$"UNLOCK"A$NA$(X26A)" "(NA$(X26A),37):230B CHOICE > ";:B$::' LOCK FILE eB$"K"L0710: LOCK FILE ONLY IF IT IS UNLOCKED NOW{"LOCK "A$;:3000B$"Y"560:12Y40(A$)(B$)8:Y2Y2(Y2)"LOCKING "A$:D$"LOCK"A$ NA$(X26A)"*"(NA$(X26A$"R) BRUN"/I(A$,2,1)"T"B2:B$"E) EXEC"FNL$:B$:B2ĺB1$qS"D) DELETE":"C) CHANGE PROGRAM NAME"X"A) LOCK/UNLOCK ALL"b"X) EXIT TO CATALOG"g1370lB$"":Y3781:(A$,Y,1)" "ĂvA$(A$,8,Y7)"ENTER YOUR)64H+ INITALIZE DEFAULTS FOR THE MINI-MENU AND PRINT OUT CHOICES d0::2:16:"MINI-MENU"57:3:A$NA$(X26A):A$:L0:B0:L$"K) LOCK":B$"L) LOAD":B1$"R) RUN"?(A$,1)"*"L1:L$"U) UNLOCK" D(A$,2,1)"B"B1:B$"L) BLOAD":B1A$(8)MA0XX1:270: A$(21)MA0XX1:270M A$(24)1300j A$""3010: IS IT ESC{ A$(13)55 A$(3)ĉ::D$"CATALOG":B$:::8:"HIT ANY KEY TO CONTINUE ";:B$:230 A$(Y64)470 A$"A"A$"Z"470&A(A$" "A$ 21:A$ :  CHECK FOR LEGAL SELECTION C Y26o  PRINT PAGE # AND GET FILE SELECTION 34,20:35,24 22:30:"PAGE "X1" OF "MA1; 24:10::"PRESS 'ESC' FOR HELP";: 21:1:"SELECT ONE (PRESS A KEY ) ";:A$: @Y113' BA$(NA$(26XY),8,17)E E(A$,2,1)"="YY1:440[ JA$(64Y)" "A$c ^A$i hp r5 w PRINT FILENAMES ON RIGHT SIDE OF SCREEN |Y113 ~A$(NA$(26XY13),8,17) (A$,2,1)"="MAX:YY12:440 A$(65Y12)X1:216,0:D$"PR#0":D$"IN#0":( X0[ PRINT OUT FILENAMES ALSO SOFT ENTRY POINT a | 1:10:(NA$(0),3,15) 3:HE$:19:HE$ X0XMA X(MA)X0 "34,4:35,18 ,5:1: 6 ; PRINT FILENAMES ON LEFT SIDE OF SCREEN (7)/ 4 HARD ENTRY POINT (RE-READ CATALOG) 7 7:_ <12:12:"READING CATALOG ":12:29 CALL MACHINE SUBROUTINE AND GET A CATALOG 1350 2054:D$"CATALOG" GET MAXIMUME PAGE X13:(NA$(X261),2,1)"="210 MA48(ST6UVk,ȱk-`8逍,-`@:` INITALIZE STRING STORAGE n NA$(104)X140:HE$HE$"=":XX10411:NA$(X)(HE$,38): ST%(984)!X205820735:X,ST%:(NA$(0)(HE$,19) 2D$(4):G$(7)          ":10180:S2(A$)2'32:B$"2":10180:D2(A$):A'GET A KEYi'A$:(A$"1"A$B$)A$(13)10180'A$(13)A$(((40)(41)256(36))128)'A$;:'DISK ERROR'ERR(222):ERR15ERR254Ĺ216,0:822'ERR254ĺ"TYPE AGAIN PLEASS2:D1D24t':::D2(D21)1:A$"DUPLICATE":10140v~'A$"FORMAT BACK UP FIRST? N"(8)::12:450:A$:A$"Y"İ380':A$"INSERT DISKS IN PROPER DRIVES.":470::1000'GET SLOT AND DRIVE#'450:::10)"SLOT=>"S28)"DRIVE=>"D2;'16:B$"7EY TO CONTINUE":450:16384,128:A$FB':(4)"BLOAD IOB.OBJ0,A$300"uL'TKSTVLCDDVSO:RD1:WR2:INIT4:10220V'IO768:SLT779:DRV780:VOL781:TRK782:SCT783:BUF787:CMD790:OVL792`':DOS16:MB151j'8::A$"ORIGINAL":S26:D21:10140:S1TKLT1065BTKLT1020EL:"EVERYTHING O.K. NO DOS ON COPY":]'CONFIGURATION TIMEc'$'(768)(769)50710060.':A$"* SUPER IOB *":450:::A$"CREATED BY RAY DARRAH":450$8'10:A$"INSERT SUPER IOB DISK":450::::A$"PRESS ANY KMB130:CDWR:DOS16(T1TK:490:550>160:TK2Į:180MTK7TK8p430:100:STST1:STDOS1030}BF1055ST0:TKTK1:TKLT1025220$490:TKT1:ST0)TK7TK8.430:100:STST1:STDOS1065 8ST0:TKTK1:BF0ITING"450::80:ONERR IGNORE UNREADABLE SECTORSe&822:ERR(222):ERR15ERR254Ĺ216,00(ERR255ERR254)CDRD10230:ERR15ĦD(7);:BUF,(BUF)1:(BUF)MBBF1N SAUNDERS CHEM DISK CONTROLLERTK0:ST0:LT35:13:A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$:PTOGGLE READ/WRITECD(CD1)1:CDRDA$"INSERT SOURCE DISK.":SOS1:DVD1:510A$"INSERT TARGET DISK.":SOS2:DVD2D1D2S1S2İ470:1:1:39);::A$"READING":CDWRA$"WRSERT BLANK DISK IN SLOT "(S2)", DRIVE "(D2):470b80::A$"FORMATING"::450::IO:VL0:}PRINT TRACK & SECTOR#3:10:"TRACK=>"TK2)"SECTOR=>"ST2):CENTER MESSAGE21(A$)2:A$;:PRINT MESSAGE AND WAIT9:11:450:47378,170:47389,173:D ^SWAP RWTS AT $1900 WITH THE ONE AT $B800g h253,25:255,184:224,8:832:x rFORMAT DISK |A$"VOLUME NUMBER FOR COPY =>254"::450:32:"";VL$:VL(VL$):VL$""VL254 VL255VL03805CMD,INIT:SOS2:DVD2:A$"IN ALTERED ADDRESS MARKSI "A1,A2,A3:47478,A1:47488,A2:47499,A3:a ,ALTERED DATA MARKS 6A1,A2,A3:47368,A1:47378,A2:47389,A3: @NORMALIZER J47530,208:47531,183:47438,208:47439,19:47478,213 T47488,170:47499,181:47368,213:47356,A3: NORMALIZERT 47405,208:47406,19:47497,208:47498,183:47445,213 47455,170:47466,150:47335,213:47345,170:47356,173: 13 SECTOR RWTS ALTERATIONS IGNORE CHECKSUM & END MARKS 47530,24:47531,96:47438,24:47439,96: PROGRAM WRITTEN BY3 ROBB CANFIELDX16 SECTOR RWTS ALTERATIONS @ IGNORE CHECKSUM & END MARKSn 47405,24:47406,96:47497,24:47498,96: ALTERED ADDRESS MARKS "CHKSM" A1,A2,A3:47445,A1:47455,A2:47466,A3: ALTERED DATA MARKS A1,A2,A3:47335,A1:47345,A2:T,SO16: ZR/W SECTOR] dBF0:TRK,TK:SCT,ST:CMD,CD:IO:BUF,(BUF)1:(BUF)MBBF1c nv xMOVE S PHASES 49289SO16DV,0:49289SO16,0:APH(PH4)4:1144,128A:811,128SA:813,SO16:810:49288SO16,0:PHPHS:PH0PH0    *************************?** SUPER IOB **^** BY RAY DARRAH **}(*************************2SET HIMEM BELOW BUFFER AND SET LOMEM ABOVE THE BLOADED RWTS<10010FINITIAL IOB SETUP PBUF,39:DRV,DV:VOL,VL:SL          ŠŠԠΠӍӍŠӧ󠠠٠ϠŠ§ŠϠРƠŠΠéӍٍؠӮҫԠԠŠˠĠŠƠŠ ΧԠōӠԠԠӠŠˠҍҠؠӮҠàӠŠΠҠϠŠŠҠҠԠРҍРƠΠРϠؠؠĠŠ٠ӠԠ̠ŠĠϠ٠ŠӠӢРӍŠҠΠҠҠŠàҍŠŠˠ͠ӠŠϠԠРŠӠŠǠӍӮҠӠӠĠΠҬԠŠҠōҠŠԠ٠ҍҍҍؠҠԠϠؠϠà̠ŠŠŠҠōРˠ֠ӠŠ٠ĠԠӠŠŠƠŠӠōӠӠӭҠˬҠԠӠĸҭΠŠԍӮҠҠөĠӠĠŠ˩ӮҠӠҠŠŠӮ¸Ӡȍ̠ӠŠҠƠԠĠˍԠӠԠ٠ĠҠϠŠŠӠōϠӠӠŠ ƠҠҠϡƠӠҠҠŠҠǠӠԠčԠӠŠԠҠ̠Ԭϩ֠ӠŠϠŠĠԠҠ̠ӠŠϠŠĠǠ̠ϩˠӠˠϠӍԠӠҠϠӍҠԠϠϠŠӠԠ¸ӠӮҠƠŠ٠ԠΠŠàҍӠŬ̠Ӡ̠Ϡ΍РӠŠƠŠ©ԠӠԠϠŠĠԠ̠֭ӠϠР٠ԠҠǠŠӠȠÍ٠Р٠ԠϠŠ ōҠӮ¸͠ҍϠѠŠŠӠϧҍӠѠŰҠƠӠƠ٠ϠōҠӠԠŠōƠ®ʰàϠϠŠҠĠΠ؍ӮѠŰ٠ԠϠŠӠԠӠѠ¹٠ԠϠŠӠŠԠ¸ӮҠѠàΠҠҠō͠ѠàŠ 󍱰٠٠ȍӮ¸ѠĹ٠ԠϠӠ¸ҠѠĴŠԠӠ!! ! ! ! ! !!!!!!!!!   %(ERR2A$"VOLUME MISMATCH ERROR"A((ERR4A$"DRIVE ERROR"\2(ERR8A$"READ ERROR"q<(20:450:(7):0DATA FOR MARKS аP 'A$;:'DISK ERRORC'ERR(222):ERR15ERR254Ĺ216,0:822j'ERR254ĺ"TYPE AGAIN PLEASE:"::y(ERR255ij (ERR0A$"INITIALIZATION ERROR"(ERR1A$"WRITE PROTECTED"(ERR2A$"VOLUME MISMATCH ERROR"((ERR4A$"DRIVE ERROR"S.":470::1000)'GET SLOT AND DRIVE#U'450:::10)"SLOT=>"S28)"DRIVE=>"D2;t'16:B$"7":10180:S2(A$)'32:B$"2":10180:D2(A$):'GET A KEY'A$:(A$"1"A$B$)A$(13)10180'A$(13)A$(((40)(41)256(36))128)782:SCT783:BUF787:CMD790:OVL7927`':DOS16:MB151kj'8::A$"ORIGINAL":S26:D21:10140:S1S2:D1D2t':::D2(D21)1:A$"DUPLICATE":10140~'A$"FORMAT BACK UP FIRST? N"(8)::12:450:A$:A$"Y"İ380':A$"INSERT DISKS IN PROPER DRIVE0:::A$"CREATED BY RAY DARRAH":4508'10:A$"INSERT SUPER IOB DISK":450::::A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$B':(4)"BLOAD IOB.OBJ0,A$300"L'TKSTVLCDDVSO:RD1:WR2:INIT4:10220#V'IO768:SLT779:DRV780:VOL781:TRKTING"450::809ONERR IGNORE UNREADABLE SECTORSd&822:ERR(222):ERR15ERR254Ĺ216,00(ERR255ERR254)CDRD10230:ERR15ĦD(7);:BUF,(BUF)1:(BUF)MBBF1N$'(768)(769)50710060%.':A$"* SUPER IOB *":4513:A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$:OTOGGLE READ/WRITECD(CD1)1:CDRDA$"INSERT SOURCE DISK.":SOS1:DVD1:510A$"INSERT TARGET DISK.":SOS2:DVD2D1D2S1S2İ470:1:1:39);::A$"READING":CDWRA$"WRIERT BLANK DISK IN SLOT "(S2)", DRIVE "(D2):470a80::A$"FORMATING"::450::IO:VL0:|PRINT TRACK & SECTOR#3:10:"TRACK=>"TK2)"SECTOR=>"ST2):CENTER MESSAGE21(A$)2:A$;:PRINT MESSAGE AND WAIT8:11:450:7378,170:47389,173:C ^SWAP RWTS AT $1900 WITH THE ONE AT $B800f h253,25:255,184:224,8:832:w rFORMAT DISK |A$"VOLUME NUMBER FOR COPY =>254"::450:32:"";VL$:VL(VL$):VL$""VL254 VL255VL03804CMD,INIT:SOS2:DVD2:A$"INS ALTERED ADDRESS MARKSH "A1,A2,A3:47478,A1:47488,A2:47499,A3:` ,ALTERED DATA MARKS 6A1,A2,A3:47368,A1:47378,A2:47389,A3: @NORMALIZER J47530,208:47531,183:47438,208:47439,19:47478,213 T47488,170:47499,181:47368,213:47356,A3: NORMALIZERS 47405,208:47406,19:47497,208:47498,183:47445,213 47455,170:47466,150:47335,213:47345,170:47356,173: 13 SECTOR RWTS ALTERATIONS IGNORE CHECKSUM & END MARKS 47530,24:47531,96:47438,24:47439,96:0 + 16 SECTOR RWTS ALTERATIONS L IGNORE CHECKSUM & END MARKSz 47405,24:47406,96:47497,24:47498,96: ALTERED ADDRESS MARKS A1,A2,A3:47445,A1:47455,A2:47466,A3: ALTERED DATA MARKS A1,A2,A3:47335,A1:47345,A2:4:VOL,VL:SLT,SO16:% ZR/W SECTORi dBF0:TRK,TK:SCT,ST:CMD,CD:IO:BUF,(BUF)1:(BUF)MBBF1o n xMOVE S PHASES 49289SO16DV,0:49289SO16,0:APH(PH4)4:1144,128A:811,128SA:813,SO16:810:49288SO16,0:PHPHS:PH0PHI  *************************?** SUPER IOB **^** BY RAY DARRAH **}(*************************2SET HIMEM BELOW BUFFER AND SET LOMEM ABOVE THE BLOADED RWTS<8448:9983:10010FINITIAL IOB SETUP PBUF,39:DRV,DV"" " " " " """""""""