You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
62<br />
93 UlA &008<br />
94 STR aFMIHI<br />
95<br />
96 • Cette routine lit le secteur indiqué en $3D de l piste<br />
97 • irw:liquH en "1, " l' .cjresse ringt!e en $26-127.<br />
98<br />
99 READIRQ( a.c<br />
100<br />
101 f Attend OS M 96 si carry " 0 ,<br />
102 • attena D5 j:w:I AD si c,ury " 1 •<br />
103<br />
104 RDTROl PW<br />
lOS ITDATA LOO DRVRD,X<br />
106 !Pl WAITDATA<br />
107 ITI EDR "DS ;attend D5 AA 9G<br />
lOB llNE WAITDATA<br />
109 Wlm2 UlA DRVRD, l<br />
110 ""- WAH2<br />
111 "" "AA<br />
112 lItE iMHTI<br />
113 ...,<br />
114 WAIT3 UlA DRVRD, X<br />
115 ""- "H13<br />
11& "" "96<br />
117 "" ADRaOCX<br />
11B PlP<br />
"' BCC RESlDTRQ(<br />
120 EOR "AD<br />
;si trouvè D5 AR AD et souhaite,<br />
121 "', DATA!l.OC ;alors saute en SC6A6.<br />
122 IINE READTRCK<br />
12.3<br />
124 f hlyse du cl"IMp "adresse"<br />
125<br />
126 ADRBU))( LDY fS03<br />
127 ADRIl..OCl SHI TI!OO(IIl<br />
128 ADRBL0C2 LOO DRVRD, X ;attend le prefllier ntbble<br />
129 fA.. ADRBL0C2<br />
130 ROl<br />
131 SIR TE'"<br />
132 ADJUlLOC3 LDA DRVRD, X<br />
133 ""- ADRlL0C3<br />
134 RNO T<br />
135<br />
ŒY<br />
136 lItE ADRBlOCl<br />
137 PlP<br />
138 "" SECTOR<br />
;attend le second nibble<br />
;reco!"l5titul! l'octet<br />
; recooVlfrre 3 fOlS<br />
; (vOIU_ . plste, secteutl<br />
;(' . est le Oon secteur ?<br />
13' lItE READTRCK ;non =) recolllleoce<br />
140 UlA TRACKRD ; l''kupère le nuléro de piste<br />
141 "" TRIO( ;c' est <strong>la</strong> bonne piste 1<br />
142 SNE READTRCK ;non :)<br />
'43<br />
144 f lectuf'l' du chaap 'do!'InêH'<br />
'45<br />
recofllel1Ce<br />
a6 lK:S RDTROO