|@@<7-(,(%@%;7) +(('7+7+(7*,+8S XFSUB / SECTOR JMS XFSUB / TRACK CLL RAL / SHIFT LEFT: AC = 2 = EMPTY BUFFER. CKDN, SDNF / WAIT FOR DONE. JMP XFSUB+1 / CHECK TRANSFER REQ. FLAG AS WELL. SERF / CHECK ERROR FLAG.m},%*V~i+X(d'k-kZj+[oAD, LCDR DATLP, JMS XFSUB / UNLOAD THE BUFFER. DCA 2 / STARTING AT 2 ISZ .-1 JMP DATLP / XFSUB - TRANSFER DATA SUB. XFSUB, 0 STRF JMP CKDN / ALLOW ESCAPE ON ERROR. XDR JM