循环程序设计－实验一 BY KTL

DATAS SEGMENT
    ASCII DB  ? ;此处输入数据段代码
    LNUM DB  ?   
    DISPLAY DB  ?
DATAS ENDS

STACKS SEGMENT
    ;此处输入堆栈段代码
STACKS ENDS

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
    MOV AX,DATAS
    MOV DS,AX
    MOV LNUM,10H
    LOOPSTART1:
    MOV CX,10H
    LOOPSTART2:;此处输入代码据段代码
    MOV DISPLAY,20H
    CMP ASCII,07H
    JZ KTL
    CMP ASCII,08H
    JZ KTL
    CMP ASCII,09H
    JZ KTL
    CMP ASCII,0AH
    JZ KTL
    CMP ASCII,0DH
    JZ KTL
    MOV AL,ASCII
    MOV DISPLAY,AL
    MOV AH,02H
    KTL:
    MOV DL,DISPLAY
    INT 21H
    MOV AH,02H
    MOV DL,20H
    INT 21H
    INC ASCII
    LOOP LOOPSTART2
    MOV AH,02H
    MOV DL,0AH
    INT 21H
    MOV AH,02H
    MOV DL,0DH
    INT 21H
    DEC LNUM
    CMP LNUM,00H
    JNZ LOOPSTART1
    MOV AH,4CH
    INT 21H
CODES ENDS
    END START