主题:请教:这个程序可以显示ASCII值吗?
;怎么调试?我是一窍不通,请大家来帮个忙,指点一下,在线等。
TITLE A08DISAS (COM) DISPLAY ASCII
.MODEL SMALL
.CODE
ORG 100H
BEGIN: JMP SHORT A10MAIN
ASCHAR DB 00,'$'
A10MAIN PROC NEAR
CALL B10SCREEN
CALL C10CURSOR
CALL D10DISPLY
MOV AX,4C00H
INT 21H
A10MAIN ENDP
B10SCREEN PROC NEAR
; PUSHA
MOV AX,0600H
MOV BH,07
MOV CX,0000
MOV DX,184FH
INT 10H
; POPA
RET
B10SCREEN ENDP
C10CURSOR PROC NEAR
; PUSHA
MOV AH,02H
MOV BH,00
MOV DX,0800H
INT 10H
; POPA
RET
C10CURSOR ENDP
D10DISPLY PROC
; PUSHA
MOV CX,256
LEA DX,ASCHAR
D20: CMP ASCHAR,08H
JB D30
CMP ASCHAR,0DH
JBE D40
D30: MOV AH,09H
INT 21H
D40: INC ASCHAR
LOOP D20
; POPA
RET
D10DISPLY ENDP
END BEGIN
TITLE A08DISAS (COM) DISPLAY ASCII
.MODEL SMALL
.CODE
ORG 100H
BEGIN: JMP SHORT A10MAIN
ASCHAR DB 00,'$'
A10MAIN PROC NEAR
CALL B10SCREEN
CALL C10CURSOR
CALL D10DISPLY
MOV AX,4C00H
INT 21H
A10MAIN ENDP
B10SCREEN PROC NEAR
; PUSHA
MOV AX,0600H
MOV BH,07
MOV CX,0000
MOV DX,184FH
INT 10H
; POPA
RET
B10SCREEN ENDP
C10CURSOR PROC NEAR
; PUSHA
MOV AH,02H
MOV BH,00
MOV DX,0800H
INT 10H
; POPA
RET
C10CURSOR ENDP
D10DISPLY PROC
; PUSHA
MOV CX,256
LEA DX,ASCHAR
D20: CMP ASCHAR,08H
JB D30
CMP ASCHAR,0DH
JBE D40
D30: MOV AH,09H
INT 21H
D40: INC ASCHAR
LOOP D20
; POPA
RET
D10DISPLY ENDP
END BEGIN