' +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-"(" @ ͠٠ˠ@跻~!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`EXTPAGEOFMEMORY LDABUF  CMPMB! BCSRTS1BUFFERFULL,RETURN LDASCTLASTSECTOR? $ CMPLS. BNENEWTRK 8 LDATRK B CMPLTL BCCNEWTRKV BCSRTS1ENDOFDISKEàˍӠӱĠƠˍԍàˠԠˍԮǠàƠԠŠƠٍƍРӠӱҠ̬΍ԠԠҿРӍŠˍˍРԠȍˍҠŠԠԍȍԍҠōҠϠԠҍàԠԠҍ̠ԮǍŠϠҠԠӠԠҠūԠӠԠˠϠԫӠӠƠԠҠϠԭıϠ³ˠҠƠӠϠōŠŮŠƠԠŬŠҠōӱӠĬӍĠҠŠŠŠҍ ӍԠŠĠōϩ٠ĠŠԠŠԠӍ٠ŠȠōŠŮŠϠРǠΠԍàͫԠԠ§󍱹àϫàӠԠŠŸ٠͠ĠŠ٠ԠϠҠԍ٠ύŮŠͩ٠ԠōĠŠԍϩ٠ԠŠŠŠŠĠŠӍͩ٠ĠŠԠŠŠĠŠԠӠŠˠҍŠŠԠΠӍӍŠӧ󍱸٠ϠŠ§󍱭РƠ΍РŠϠРƠŠΠéӍٍؠӮҫԠԠŠˠĠŠƠŠ ΧԠōӠԠȰŠҠΠҍҠؠӮҠàӠŠΠҠϠŠŠҠҠԠРҍ͍ӠŠϠԠРŠӠŠǠӍؠؠĠŠ٠ӠԠ̠ŠĠϠ٠ŠӠӢРӍҍҍҍؠҠԠϠؠϠà̠ŠŠŠҠōРҠŠàҍŠŠˠҰŠŠƠŠӠōӠӠӭҠˬҠԠӠĸҭΠŠԍӮҠӮҠӠӠĠΠҬԠŠҠōҠŠԠ٠ӮҠӠҠŠŠӮ¸Ӡȍ̠ӠŠҠƠԠĠˍԠӠԠ٠Ġ֠ӠŠ٠ĠԠӠϠӠӠŠ ƠҠҠϡƠӠҠҠŠҠǠӠԠčԠӠŠԠҠ̠ҠөĠӠĠŠ˩֠ӠŠϠŠĠԠҠ̠ӠŠϠŠĠǠ̠ϩˠӠˠϠӍԠӠҠϠӍҠԠҠϠŠŠӠō¸ϠϠŠӠԠ¸ӠӮҠƠŠ٠ԠΠŠàҍӠŬ̠Ӡ̠Ϡ΍РӠŠƠŠ©ԠӠԠϠŠĠԠԬϩ̠ӍϠР٠ԠҠǠŠӠȠÍ٠Р٠ԠϠŠ ōҠӮѠŠŠӠϧҍӠѠŰҠƠӠƠ٠ϠōȠѠҠؠ΍ŠѠӠ̠ōҠӠԠŠōƠ®ʰŠҠĠΠ؍ӮѠŰ٠ԠϠŠӠԠӠѠ¹٠ԠϠŠӠŠԠ¸ӮҠѠàΠҠҠō͠ѠàŠ͠ҍϱ 󍱰٠٠ȍӮ¸ѠĹ٠ԠϠӠ¸ҠѠĴŠԠӠàϠ          z#?????    ήӠΠήǠ "ήРήàԠή٠Ӡή٠ή٠ ήӠԠ͠٠ˠҠ ®ʰîҠ  ήĠ!ήԠ8(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:   RECTORY !!!": |:1000"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  LiF:ic n w  :b m v ~ :;iY : eR @© , Jjjj* ` ­P)): e: :ʎ­)e:`DGETIT LDACLKDATA*AND#$FKEEPANIBBLE 4ADCTENS>CLKENDRTSDADCTENS>CLKENDRTSEPANIBBLE 4ADCTENS>CLKENDRTSSPLACELDACLKDATA%BVCNORMSKIPTHISMASKEXCEPT.. AND#3..HOURSNEEDS2BITSNORM AND#$FOTHERWISE,1NIBBLE STATENSASLMULTIPLYBYTENASL ADCTENSASL STATENS DEXPOINTTOONESPLACESTXCLKADRANCK:LDA#0TAKECLOCKOFFHOLDDSTACLKADRNRTS:b***RDCLK--ONENTRY'A'CONTAINSACLOCKFIELDADDRESS+l*ONEXIT'A'CONTAINSITSBINARYVALUE vRDCLK)ORA#READPUTREADFLAGINTOADDRESSTAXHOLDTHEADDRESSSTACLKADRGETTENSRORROR#STA$BF90PUTWHATSLEFTWHERE LDA$BF91GETTHEYEARBACK"ROL...&STICKINTHEMONTH'SSTA$BF91...&PUTITBACKLDA#8ADDRESSOFDAYJSR5JSRRDCLK%&ORA$BF90PUTTHEMONTHIN&...0STA$BF90...PUTITBAADDRESSTBIT$BF06SETVFLAG...-^JSR2JSRRDCLK...HOURSGETSPECHANDLINGhSTA$BF93rCLV|LDA#12YEARADDRESSJSR3JSRRDCLK!STA$BF91STOREITUNSHIFTEDLDA#10MONTHADDRESSJSR4JSRRDCLKLSRSHIFTINTOPLACEROR4INDICATE#PARMS .HS00 .HS0 .HS00 .HS0***BEGINNINGOFDRIVER*** CLKSTARTCLVLDA#$40HOLDTHECLOCK"STACLKADR,LDA#3MINUTEADDRESS6JSR1JSRRDCLK%@STA$BF92STOREMINUTESDIRECTLYJLDA#5HOURSZLDA$C08B*dLDY#CLKEND-CLKSTART#BYTESTOMOVE-1 nLOOP(xLDACLKSTART,YOVERLAYCLOCKDRIVERSTA(TEMP),YDEY BPLLOOP JSRMLI.HS65EXECUTEQUITCODE.DAPARMS+***ENDOFDRIVERINSTALLATIONCODE***!PARMS.HS02SETUPRELOCINFOSTAJSR2+2STAJSR3+2STAJSR4+2STAJSR5+2 LDATEMPSTAJSR1+1STAJSR2+1 STAJSR3+1STAJSR4+1STAJSR5+1(LDA$BF07 2STATEMP<LDA$BF08FSTATEMP+1!PLDA$C08BALLOWWRITETORAMFE8CLKDATA.EQSLOT*$100+$C0F9BTEMP.EQ$3A!LMLI.EQ$BF00MLIENTRYPOINT `STARTjLDA#$4CSETUPGLOBALJUMPtSTA$BF06~CLC$LDA$BF07CALCADDRESSOFRDCLKADC#RDCLK-CLKSTART STATEMPLDA$BF08 ADC#0!STAJSR1+L 3*CLOCK.SYSTEM--USETHEMCSCLOCKWITHPRODOS2*REMEMBERTORENAMETHEORIGINAL.SYSTEMFILE*P.BLUMSTEIN--1/86.OR$2000%TENS.EQ$3AKEEPAWORKSPACELOC#READ.EQ$10CLOCKREADCOMMAND$SLOT.EQ2.CLKADR.EQSLOT*$100+$C0     ,12,255,130 12,0,236,24- 12,0,237,96> 12,2,119,24@MCS CONTROLLER2ST15:LS15:FAST1:CDWRFTK0:LT6:1050[TK7:LT35:1050p:"COPY DONE":~490:610$T1TK:TK(TRK)1::310:TKT1.490:610:(TRK)LTı8TK(TRK):ST(SCT):10505 CHANGES0,12,96,96 0 "EARLY GAMES CONTROLLER1XX0:TK3:LT10NST15:LS15:CDWR:FAST1a360:490:610360:490:610:(TRK)LT1050TK(TRK):ST(SCT):1020XX0TK11:LT35:XX1:1010$:"COPY DONE": '(4)"BLOAD RWTS.EARLY GAMES,A$1900 HARTLEY CONTROLLER AK775,96:TK3:LT35:ST15:LS15:CDWR:FAST1`:170:490:610230:490:610:(TRK)LT1050TK(TRK):ST(SCT):1020:"COPY DONE!":218,170,218,170HARTLEY CONTROLLER BSTK3:LT35:ST12:LS12:CDWR:FAST1:900,12:775,96f360:490:610360:490:610:(TRK)LT1050TK(TRK):ST(SCT):1020:"COPY DONE!":'(4)"BLOADHARTLEY.RWTS,A$1900"OAD RWTS.TLR"<8960:9983:10010<h253,25:255,182:224,10:832:PTLR CONTROLLERTK3:LT35:ST12:LS12:CDWR:FAST1:MB130900,12490:360:610360:490:610:(TRK)LT1050TK(TRK):ST(SCT):1020:"COPYDONE": '(4)"BL 3,6,25,96 3,6,26,64+ 11,8,176,169; 11,8,177,1>< P.S. COMPANION CONTROLLERHTK0:LT34:ST15:LS15:CDWR:FAST1X490::610490:T1TK:TK(TRK)1::310:TKT1:610(TRK)LT1060TK(TRK):ST(SCT):1020$:"COPY DONE":6 CHANGES0,4,252,1690,4,253,1  RK)LT1150) tTK(TRK):ST(SCT):1120/ ~@ 212,171,173ST1:LS15:CDWR:1100:T$11,S$00-$010 :210f TK17:LT17:ST15:LS1:CDWR:1100:T$11,S$02-$0F TK18:LT35:ST15:LS15:CDWR:1100:T$12,S$00 TO T$22,S$0F 230 :"COPY DONE": LREAD/WRITE SUBROUTINE `490:610 j490:610:(TA0CRACKING BY THE DISK JOCKEY II CONTROLLERhTK0:LT1:ST9:LS15:CDWR:1100:FAST1:T$00,S$0-9s:210TK0:LT0:ST15:LS9:CDWR:1100:T$00,S$0A-$0FTK1:LT17:ST15:LS15:CDWR:1100:T$01,S$00 TO T$10,S$0F230% TK17:LT18:  NITIALIZATION ERROR"4(ERR1A$"WRITE PROTECTED"Z(ERR2A$"VOLUME MISMATCH ERROR"v((ERR4A$"DRIVE ERROR"2(ERR8A$"READ ERROR"<(12:450:(7):2(A$):'GET A KEY@'A$:(A$"1"A$B$)A$(13)10180q'A$(13)A$(((40)(41)256(36))128)|'A$;:'DISK ERROR'ERR(222):ERR15ERR254Ĺ216,0:822:'ERR254ĺ"TYPE AGAIN PLEASE:"::(ERR255ij (ERR0A$"IATE":10140M~'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$) '32:B$"2":10180:DJV'IO768:SLT779:DRV780:VOL781:TRK782:SCT783:BUF787:CMD790:OVL792`':DOS16:MB151:HX$"000102030405060708090A0B0C0D0E0F101112131415161718191A1B1C1D1E1F202122"j'8::A$"ORIGINAL":S26:D21:10140:S1S2:D1D2 t':::D2(D21)1:A$"DUPLIC50710060L.':A$"* SUPER IOB *":450:::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:10220R254CDRD10230':ERR15Ĺ216,0:QD(7);:BUF,(BUF)1:(BUF)MBBF1WNpXR/W A RANGE QUICKLYb0:0:860,MB:861,LT:862,LSlCMD,CD:TRK,TK:SCT,ST:430:863:1002:'CONFIGURATION TIME'BLOAD RWTS HERE $'(768)(769)1:CDRDA$"INSERT SOURCE DISK.":SOS1:DVD1:510\A$"INSERT TARGET DISK.":SOS2:DVD2tD1D2S1S2İ470:1:1:39);::A$"READING":CDWRA$"WRITING"450::80ONERR IGNORE UNREADABLE SECTORS&822:ERR(222)0ERR255ERCTOR#K3:10:"TRACK $"(HX$,TK21,2)" SECTOR $"(HX$,ST21,2)" ":_CENTER MESSAGEv21(A$)2:A$;:PRINT MESSAGE AND WAIT:11:450:13:A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$:TOGGLE READ/WRITE3CD(CD1)Q |A$"VOLUME NUMBER FOR COPY =>254"::450:32:"";VL$:VL(VL$):VL$""VL254f VL255VL0380 CMD,INIT:SOS2:DVD2:A$"INSERT BLANK DISK IN SLOT "(S2)", DRIVE "(D2):470 80::A$"FORMATTING"::450::IO:VL0:PRINT TRACK & SE: ,THE SECTOR EDITOR9 6A$:(A$,7)"CHANGES"310U @A1(A$):A1,A2,A3,A4j JA1T1A1TKĂ: T9984(A1T1)4096(FAST15A2)256A3,A4:: ^SWAP RWTS AT $1900 WITH THE ONE AT $B800 h253,25:255,184:224,8:832: rFORMAT DISK56,A3: NORMALIZERG 47505,222:47515,170:47413,222:47423,170w 47445,213:47455,170:47466,150:47335,213 47345,170:47356,173:47360,0:47498,183: IGNORE ADDRESS CHECKSUM 47498,0: ALTERED DATA CHECKSUM "A1:47360,A1# 16 SECTOR RWTS ALTERATIONS= ALTERED ENDING MARKSx A1,A2,A3,A4:47505,A1:47515,A2:47413,A3:47423,A4: ALTERED ADDRESS MARKS A1,A2,A3:47445,A1:47455,A2:47466,A3: ALTERED DATA MARKS A1,A2,A3:47335,A1:47345,A2:473L,VL:SLT,SO16:! ZR/W SECTORe dBF0:TRK,TK:SCT,ST:CMD,CD:IO:BUF,(BUF)1:(BUF)MBBF1k n~ xMOVE S PHASES 49289SO16DV,0:49289SO16,0:APH(PH4)4:1144,128A:811,128SA:813,SO16:810:49288SO16,0:PHPHS:PH0PH0  ************************=** SUPER IOB 1.5 **[** BY RAY DARRAH **y(************************2SET HIMEM BELOW BUFFER AND SET LOMEM ABOVE THE BLOADED RWTS<8448:9983:10010FINITIAL IOB SETUP PBUF,39:DRV,DV:VO      ``'`حJJJJLԩLLhhߚHH`Hh`5()$ $ \ŭ^ɭ]B pSTACH zLDATRKJSRPRNTBYTEPRINTITLDA#28HTAB STACH LDASCTJSRPRNTBYTEJSRIOGETASECTORDECSCTNEXTSECTORBPLNXT.PG!LDA#15RESTORETOSECTOR15 STASCTINCTRKNEXTTRK&NXT.PGINCBUFND,RTS* -*READORTHEENTIREBUFFER* - #MB.HS97HIGHESTBUFFERPAGE+1! LT.HS35LASTTRACKTOGET+1)*LS.HS0F(LASTSECTORTOGET-1)MOD164>LDA#0DOAVTAB3 HSTA$28 RLDA#5 \STA$29fNEWTRKLDA#16HTAEITWHEREITGOESINY;DONEWITHAPAGE)BNEMOVE.PAGE;NOKEEPWORKINGONIT INCSWFRM+1;GETNEXTMSB'sINCSWTO+15DECPAGES;DECREMENTTHENUMBEROFPAGESTOMOVE2BNEMOVE.PAGE;IFNOTDONE,MOVEANOTHERPAGERTS1RTS;FINISHETZEROFORSTART XSTYSWTO'bMOVE.PAGELDA(SWFRM),Y;GETABYTElPHA;ANDSAVEIT8vLDA(SWTO),Y;GETTHEBYTEWHERETHESAVEDONEGOES8STA(SWFRM),Y;ANDSTOREITWHERETHESAVEDONEWASPLA;GETTHESAVEDBYTE-STA(SWTO),Y;ANDSTORETWHATTHESTACKWOULDBEIFTHEGOSUBWASN'TTHERE&TXSPUTTHATASTHESTACKPOINTERPHA(TYARESTORETHELASTRETURNADDRESSPHARTS* -&*EXCHANGERWTS's0* -:DLDY#0;ZEROTHELSB's,NSTYSWFRM;ANDHAVEYAINCONTROLLERr* -|QBASICERRLDXBAS.ERRBASICHASMADEANERRORSOCAUSETHEERRORNUMBERAT222JMPINVOKERROR* -*POPOFFRETURN* -9POPPLAROUTINETOPOPOFFONERETURN(BASIC)ADDRESSTAYPLAHLDXBAS.ERR+1GR* -*MOVETHEDISKARM"* -,M6MOVPHASESLDA#$00ROUTINETOSETUPTHEREGISTERSBEFORECALLINGSEEKABSS@LDX#$00XANDAHAVEDUMMYNUMBERSTHATWILLBEPOKEDINTOBY"MOVESPHASES"JJMPSEEKABST^* -h*CAUSEERRORMOTORCNT.HSEFD8MOTOR-ONTIMECOUNTADOS.ERRLDARWTS.ERRDOSHASHADANERROR,GETTHEERRORCODELSRDIVIDEITBY16LSRLSRLSRBTAXTRANSFERITTOXSOBASICWLLINDUCETHEFALSEERRORCODE'JMPINVOKERRORCAUSEABASICERRORETURNSWITH2OVL.HS00VOLUMENUMBEROFLASTACCESSEDDISK+OLDSLT.HS60SLOTPREVIOUSLYACCESSED,OLDDRV.HS01DRIVEPREVIOULSYACCESSED:DCT.HS00DEVICETYPEOFDEVICECHARACTERISTICSTABLE.PHASES.HS01PHASES-1PERTRACK,(0OR1))ALWAYSMAKELSBOFBUFFERPOINTERZERO!*PBUF.HS27SECTORBUFFERPAGEPOINTERZNOTHING.HS00NOTUSED?dBYTCOUNT.HS00BYTECOUNTFORPARTIALSECTOR(0=256BYTES)$nCMD.HS00COMMANDCODE(0=SEEK)=xRWTS.ERR.HS00ERRORCODETHATHERWTS.B800OKESLT,SO)1DRV.HS01DRIVETOBEACCESSEDNEXT(1OR2)7VOL.HS00VLUMETOBEACESSED(0=ANYTHINGWILLDO)(TRK.HS00TRACKTOACCESS2SCT.HS00SECTORTOACCESS><DCTPTR.DADCTPOINTERTOTHEDEVICECHARACTERISTICSTABLE;FBUFFERLO.HS00TYPA,YPOINTTOTHEIOBTABLE*JSRRWTS.B800GOTOTHERWTSAT$B8008BCSDOS.ERRIFTHECARRYSETTHENCAUSEBASICERROR)RTSOTHERWISE,ALLISWELLSORETURN)TABLETYP.HS01TYPEOFTABLE(1=IOB)8 SLT.HS60SLOTTOBEACCESSEDNEXT(VIAPANGE tCH.EQ$24CURSORXPOSITION.~PRNTBYTE.EQ$FDDAPRINTSHEXADECIMALBYTE#.OR$0300STARTSATPAGETHREE.TFIOB.OBJ0* -*CALLRWTS* -BIOLDA/TABLETYPENTRYPOINTFORCALINGTHERWTSTHROUGHBASIC-LDY#TABLEAT$1900ABSEEKABS.EQ$B9A0ENTRYPOINTTOTHESEEKABSROUTINEAT$B800,LBAS.ERR.EQ222;BASICONERRERRORCODE)VSWFRM.EQ$FC;EXCHANGEFROMPARAMTER.`SWTO.EQ$FE;EXCHANGERWTS'TO'PARAMETER8jPAGES.EQ$E0;NUMBEROFPAGESOFMEMORYTOEXCH* - *SuperIOBmachineroutines**BYRAYDARRAH* -2$RWTS.B800.EQ$03D9ENTRYPOINTTORWTS@$B800P.INVOKERROR.EQ$D412ROUTINETHATCASESBASICTODOTHEERRORCONTAINEDINX88RWTS.1900.EQ$1E00ENTRYPOINTTOTHERWTS     "DONE WITH COPY":1ASTANDARD CONTROLLER[TK0:ST0:LT35:CDWRjT1TK:490430:100:STST1:STDOS1030BF1060ST0:TKTK1:TKLT1030$490:TKT1:ST0.430:100:STST1:STDOS1070 8ST0:TKTK1:BF0TKLT1070 BTKLT1020: L:  FAST CONTROLLER>TK0:LT35:ST15:LS15:CDWR:FAST1L490:610j490:610:(TRK)LT1050TK(TRK):ST(SCT):1020:"COPYDONE":O!1020/ L:"EVERYTHING O.K. NO DOS ON COPY":] '(6400)162ĺ(4)"BLOAD RWTS.13,A$1900"S^SWAP CONTROLLER0TK3:ST0:LT35:CDWRJT1TK:490:360:550m430:100:STST1:STDOS1030zBF1060ST0:TKTK1:TKLT1030$490:TKT1:ST0:360.430:100:STST1:STDOS10708ST0:TKTK1:BF0TKLT1070 BTKLT""