Advance on FCB disk i/o
This commit is contained in:
parent
e07e13fd35
commit
a65f54b121
4 changed files with 84 additions and 39 deletions
|
@ -67,3 +67,17 @@ drive_read:
|
|||
jnz .try
|
||||
stc
|
||||
jmp .giveup
|
||||
|
||||
; Seek to fcb_off given in a ptr
|
||||
; IN BX ptr to FCB
|
||||
drive_seek:
|
||||
push ax
|
||||
push cx
|
||||
mov cl, [bx+fcb_ss]
|
||||
add cl, 7
|
||||
mov ax, 1
|
||||
sal ax, cl
|
||||
int3
|
||||
pop cx
|
||||
pop ax
|
||||
ret
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue