rdos/debug/edit.asm

24 lines
342 B
NASM
Raw Normal View History

; let the user edit the word at ES:BX
edit_word:
push bx
mov dx, [es:bx]
call print16
mov al, '.'
call putc
mov byte [inmin], 4
mov byte [inmax], 4
mov word [ingetc], getch
call gets
pop bx
jc .ret
mov si, inbuf
call eat_hex_word
jc .err
mov [es:bx], dx
.ret: ret
.err: call crlf
mov di, eat_hex_word.emsg
jmp parse_error