ld c,2\r
rw$common:\r
\r
-; ld hl,residual ; remainng sectors from last multi io?\r
-; ld a,(hl)\r
-; sub a,1\r
-; jr c,rwc_new_sectors\r
-;\r
-; ld (hl),a\r
-; xor a\r
-; ret\r
+ ld hl,residual ; remainng sectors from last multi io?\r
+ ld a,(hl)\r
+ sub a,1\r
+ jr c,rwc_new_sectors\r
+\r
+ ld (hl),a\r
+ xor a\r
+ ret\r
\r
rwc_new_sectors:\r
ld b,1 ; assume 1 sector to transfer\r
-; ld a,(@cnt)\r
-; or a\r
-; jr z,rwc_doit\r
-;\r
-; ld b,a ; number of sectors to transfer\r
-; dec a ; save remaining\r
-; ld (hl),a\r
-; xor a ; reset multi sector count\r
-; ld (@cnt),a\r
+ ld a,(@cnt)\r
+ or a\r
+ jr z,rwc_doit\r
+\r
+ ld b,a ; number of sectors to transfer\r
+ dec a ; save remaining\r
+ ld (hl),a\r
+ xor a ; reset multi sector count\r
+ ld (@cnt),a\r
\r
; compute pysical transfer address\r
; prepare message\r