;The following command should be applied to DOSEDIT
;to patch it to work with FANSI-CONSOLE, or any
;machine emulating the IBM PC ROM BIOS video calls.
;Note that this is unnecessary if you use
;the FANSI-CONSOLE /Y=1 option.
;This is for the DOSEDIT version dated 05-09-84.
;(Use DEBUG to display at 100).
;After the patch is made, DOSEDIT will still
;also work without FANSI-CONSOLE.
;The commented lines (ones starting with semi-
;colons) will generate error text but that is OK.
;----------------------------------------------
;	debug dosedit.com <dosedit.pch
;----------------------------------------------
;	MOV	DX,ES:[0450]
A3ec
call A32
nop
nop

;	MOV	AH,ES:[044A]
A3f1
call A7A
nop
nop

;	MOV	DL,ES:[044A]
A416
call A85
nop
nop

;	MOV	CX,ES:[0450]
A421
call A42
nop
nop

;	CMP	CL,ES:[0450]
A42e
call A66
nop
nop

;	MOV	AX,ES:[0450]
A452
call A54
nop

;	MOV	BL,BH
;	XOR	BH,BH
;	SHL	BX,1
;	ADD	BX,0450
;	MOV	[03EF],BX
;	MOV	[0424],BX
;	MOV	[0431],BX
;	MOV	[0454],BX
;	MOV	[05D6],BX
;	MOV	[0665],BX
;	MOV	[06B8],BX
;	MOV	[0770],BX
A4A1
jmp 4CB

;	MOV	DX,ES:[0450]
A5d3
call A32
nop
nop

;	CMP	CX,ES:[0450]
A662
call A90
nop
nop

;	AND	AL,ES:[0450]
A6b5
call A1E
nop
nop

;	CMP	CX,ES:[0450]
A76d
call A90
nop
nop

;	MOV	DX,0A1E
A146
mov dx,AA4

;	MOV	SI,0A1E
A8F7
mov si,AA4

;	MOV	SI,0A1E
A9D8
mov si,AA4

;	AND	AL,ES:[0450]
AA1E
push dx
push bx
push cx
push ax
cs:mov bh,[406]
mov ah,03
int 10
pop ax
and al,dl
pop cx
pop bx
pop dx
ret

;	MOV	DX,ES:[0450]
AA32
push ax
push bx
push cx
cs:mov bh,[406]
mov ah,03
int 10
pop cx
pop bx
pop ax
ret

;	MOV	CX,ES:[0450]
AA42
push ax
push bx
push dx
cs:mov bh,[406]
mov ah,03
int 10
mov cx,dx
pop dx
pop bx
pop ax
ret

;	MOV	AX,ES:[0450]
AA54
push dx
push bx
push cx
cs:mov bh,[406]
mov ah,03
int 10
mov ax,dx
pop cx
pop bx
pop dx
ret

;	CMP	CL,ES:[0450]
AA66
push ax
push bx
push dx
push cx
cs:mov bh,[406]
mov ah,03
int 10
pop cx
cmp cl,dl
pop dx
pop bx
pop ax
ret

;	MOV	AH,ES:[044A]
AA7A
push bx
push ax
mov ah,0f
int 10
pop bx
mov al,bl
pop bx
ret

;	MOV	DL,ES:[044A]
AA85
push bx
push ax
mov ah,0f
int 10
mov dl,ah
pop ax
pop bx
ret

;	CMP	CX,ES:[0450]
AA90
push ax
push bx
push dx
push cx
cs:mov bh,[406]
mov ah,03
int 10
pop cx
cmp cx,dx
pop dx
pop bx
pop ax
ret

rcx
9A4
W
Q
