微原软件报告

微原软件报告内容摘要：

ACK ENDS CODE SEGMENT PARA 39。 code39。 ASSUME CS:CODE,DS:DATA,SS:STACK START PROC FAR PUSH DS XOR AX,AX PUSH AX MOV AX,DATA MOV DS,AX。 初始化 DS LEA DX,STR1 MOV AH,09H。 调用 DOS 09 号功能显示字符串 STR1 INT 21H INPUT: LEA DX,BUFFER MOV AH,0AH。 调用 DOS 0A 号功能，从键盘输入字符串并存储 INT 21H LEA DI,TAB XOR CX,CX MOV AH,30H MOV DH,31H LEA BX,BUFFER+2 CALL CHECK。 调用检错子程序 CMP CK,1 JZ INPUT CALL COM。 调用排序子程序 MOV DL,0DH MOV AH,02H。 调用 DOS 02 号功能，显示 DL 字符 INT 21H MOV DL,0AH MOV AH,02H INT 21H LEA DX,STR3。 调用 DOS 09 号功能，显示字符串STR3 MOV AH,09H INT 21H CALL DISPY。 调用送显程序 RET START ENDP CHECK PROC。 检验子程序 NEXT1: MOV CK,0 MOV [DI],AH INC DI MOV [DI],DH INC DI CMP DH,39H JZ L1 INC DH JMP L2 L1: MOV DH,30H INC AH L2: MOV AL,[BX] CMP AL,30H JB ERROR CMP AL,39H JA ERROR MOV [DI],AL INC DI INC BX MOV AL,[BX] CMP AL,30H JB ERROR CMP AL,39H JA ERROR MOV [DI],AL INC DI INC BX INC CX MOV AL,[BX] CMP AL,0DH JZ FINISH1 INC BX JMP NEXT1 ERROR: LEA DX,STR2。 调用 DOS 09 号功能，显示字符串STR2 MOV AH,9 INT 21H MOV CK,1 FINISH1: RET CHECK ENDP COM PROC。 调用排序子程序 COMP1: PUSH CX MOV VAR1,CX SHL CX,1 SHL CX,1 SUB CX,4 MOV VAR2,CX POP CX DEC DI DEC DI JMP COTI COMP2: ADD DI,VAR2 COTI: MOV BL,0 MOV CX,VAR1 DEC CX AGAN: MOV AL,[DI] CMP AL,[DI4] JA GOON1 JB GOON3 INC DI MOV AL,[DI] CMP AL,[DI4] PUSHF DEC DI POPF JA GOON1 JBE GOON3 GOON1: MOV。