.include #system

dd_secs:
   dey                        ; ought to be at least one sector
   tya                        ; save it on stack
   pha
   jsr   dskinv               ; do disk io (assume everything else's setup)
   bmi   :xover               ; leave on errors
   pla                        ; get sectors left
   beq   :over                ; 0 = done->

   tay                        ; get no in Y
   inc   dbufhi               ; add #$100 to buffer count
   inc   daux1                ; wanna next sector ?
   bne   dd_secs              ; sure !
   inc   daux2
   bne   dd_secs
                              ; this is really awful...
:xover
   pla
   ldy   #$FF
:over 
   rts