prog1.asm

本程序的功能是：内存中连续存放着二十个ASCII字符

         EXTRN      LOAD:FAR,SAVE:FAR
N        EQU        20
STAC     SEGMENT    STACK
         DB         128 DUP (?)
STAC     ENDS
DATA     SEGMENT
SOURCE   DB         N DUP(?)
RESULT   DB         N DUP(0)
NAME0    DB         'INPUT1.DAT',0
NAME1    DB         'OUTPUT1.DAT',0
DATA     ENDS
CODE     SEGMENT
           ASSUME     CS:CODE, DS:DATA, SS:STAC
START    PROC        FAR
           PUSH        DS
           XOR         AX,AX
           PUSH        AX
           MOV         AX,DATA
           MOV         DS,AX
           LEA         DX,SOURCE         ; 数据区起始地址
           LEA         SI,NAME0          ; 原始数据文件名
           MOV         CX,N              ; 字节数
           CALL        LOAD              ; 从 'INPUT.DAT'中读取数据
;  **** BEGIN ****
           LEA         SI,SOURCE
           MOV         DI,OFFSET RESULT
           MOV         CX,N
NEXT:      MOV         AL,[SI]
           CMP         AL,'0'
           JB          INVALID
           CMP         AL,'9'           ;
           JBE         STRIP            ;
           CMP         AL,'A'
           JB          INVALID
           CMP         AL, 'F'          ;
           JA          INVALID          ;
           ADD         AL,9
STRIP:     AND         AL,0FH
INVALID:   MOV         [DI],AL
           ADD         SI,1
           ADD         DI,1
           LOOP        NEXT
;  ****  END  ****
           LEA         DX,RESULT         ; 结果数据区首址
           LEA         SI,NAME1          ; 结果文件名
           MOV        CX,N               ; 结果字节数
           CALL        SAVE              ; 保存结果到文件
           RET
START    ENDP
CODE     ENDS
         END         START