汇编程序部分整理.doc

5.2 DATAS SEGMENT string db Please input:,$ string1 db mis-input!,$ DATAS ENDS CODES SEGMENT main proc far ASSUME CS:CODES,ds:datas,es:datas START: mov ax,datas mov ds,ax mov es,ax lea dx,string mov ah,9 int 21h mov ah,01h int 21h mov bl,al mov dl,0dh mov ah,02h int 21h mov dl,0ah mov ah,02h int 21h cmp bl,61h jl stop1 je printfz cmp bl,7ah je printfa ja stop1 dec bl mov cx,3 display: mov dl,bl mov ah,2h int 21h inc bl loop display jmp stop printfz: mov dl,z mov ah,02h int 21h mov dl,a mov ah,02h int 21h mov dl,b mov ah,02h int 21h mov ah,4ch int 21h printfa: mov dl,y mov ah,02h int 21h mov dl,z mov ah,02h int 21h mov dl,a mov ah,02h int 21h stop: mov ah,4ch int 21h stop1: lea dx,string1 mov ah,9 int 21h mov ah,4ch int 21h main endp CODES ENDS END start 5.6 DSEG SEGMENT COUNT EQU 20 ARRAY DW 20 DUP (?) ；存放数组 COUNT1 DB 0 ；存放正数的个数 ARRAY1 DW 20 DUP (?) ；存放正数 COUNT2 DB 0 ；存放负数的个数 ARRAY2 DW 20 DUP (?) ；存放负数 ZHEN DB 0DH, 0AH, ‘The positive number is：’, ‘$’ ；正数的个数是： FU DB 0DH, 0AH, ‘The negative number is：’, ‘$’ ；负数的个数是： CRLF DB 0DH, 0AH, ‘$’ DSEG ENDS ；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR ASSUME CS: CSEG, DS: DSEG START: PUSH DS ；设置返回DOS SUB AX, AX PUSH AX MOV AX, DSEG MOV DS, AX ；给DS赋值 BEGIN: MOV CX, COUNT LEA BX, ARRAY LEA SI, ARRAY1 LEA DI, ARRAY2 BEGIN1: MOV AX, [BX] CMP AX, 0 ；是负数码？ JS FUSHU MOV [SI], AX ；是正数，存入正数数组 INC COUNT1 ；正数个数+1 ADD SI, 2 JMP SHORT NEXT FUSHU: MOV [DI], AX ；是负数，存入负数数组 INC COUNT2 ；负数个数+1 ADD DI, 2 NEXT: ADD BX, 2 LOOP BEGIN1 LEA DX, ZHEN ；显示正数个数 MOV AL, COUNT1 CALL DISPLAY ；调显示子程序 LEA DX, FU ；显示负数个数 MOV AL, COUNT2 CALL DISPLAY ；调显示子程序 RET MAIN ENDP ；-------------------------------------------------------------------------- DISPLAY PROC