《汇编语言程序设计》报告 五.doc

.评阅汇编语言程序设计报告 五姓名 学号 时间 指导老师 五、 数据处理及输入输出 实验1. 实验目的及要求目的：1) 全面掌握输入和输出的中断功能调用（键盘和显示器）2) 掌握子程序的定义和调用3) 学会编制良好风格的汇编语言程序要求：1) 在实验四的基础上，在屏幕上开设二个窗口（如左右或上下）2) 定义输入缓冲区（最多输入50个字符）3) 在第一个窗口输入（要求有输入提示）4) 后台程序完成实验四的工作5) 结果显示在第二个窗口（要求有输出提示）6) 所有程序必须以子程序方式体现（除了初始化和程序结尾）7) 必须在程序中做好子程序的功能说明以及参数说明8) 注意调试结果，并做好记录。2. 实验源代码.model small.386.model small.386DATAS SEGMENTSTRING1DBPlease input a string:$ STRING2DBPlease input a character:$ SORT_STRDB SORTED STRING:$ FIRST_STRDBFIRST LOCATION:$ LAST_STRDBLAST LOCATION:$ SUM_STRDBSUM:$ BUFA DB80,?,80 dup(?) BUFB DB80,?,80 dup(?)CRLF DB13,10,$FLAG DB0FLOC DB0LLOC DB0TEN DB10SUMDB0LFLAG DB 0DATAS ENDS;定义宏指令 清屏CLEAR MACRO A,B,C,D MOV AH,6 MOV AL,0 MOV CH,A MOV CL,B MOV DH,C MOV DL,D MOV BH,7 INT 10H ENDM;宏指令 向上卷动SCROLL MACRO CNT,ULROW,ULCOL,LRROW,LRCOL MOV AH,7 MOV AL,CNT MOV CH,ULROW MOV CL,ULCOL MOV DH,LRROW MOV DL,LRCOL MOV BH,70H INT 10H ENDM;宏指令 光标定位POSTC MACRO X,Y MOV AH,2 MOV DH,X MOV DL,Y MOV BH,0 INT 10H ENDM CODES SEGMENTSTART:MAIN PROC ASSUME CS:CODES,DS:DATASPUSH DSXOR AX,AXPUSH AX MOV AX,DATAS MOV DS,AX CLEAR 0,0,24,79 SCROLL 5,3,5,8,70 SCROLL 5,10,5,15,70 POSTC 3,5BEGIN: ;输入字符串MOVAH,09HLEADX,STRING1INT21HLEADX,BUFAMOVAH,0AHINT21HLEADX,CRLFMOVAH,09HINT21H ;排序CALL POP_SORT;传送CALL MOVE_TO_NEW;输入查找字符POSTC 4,5LEADX,STRING2MOVAH,09HINT 21HMOVAH,01HINT 21H;查找字符CALL FIND_CHAR;求和CALL GET_SUM;输出排序结果CALL PRINT_SORTED;输出查找结果CALL PRINT_LOCATIONMOV AH,4CH INT 21HMAIN ENDP ;=冒泡排序=POP_SORT PROC NEAR MOV BL,BUFA1DECBLLOOP1:MOV CH,BLLEASI,BUFA2LOOP2:MOVAL,SICMPAL,SI+1JLECNEXTXCHG AL,SI+1MOVSI,ALCNEXT:INCSIDECCHJNZLOOP2DECBLJNZLOOP1RETPOP_SORT ENDP;=移动=MOVE_TO_NEW PROC NEARLEASI,BUFA1LEADI,BUFB1MOVCH,BUFA1INCCHMOVE:MOVAL,SIMOVDI,ALINCDIINCSIDECCHJNZMOVERETMOVE_TO_NEW ENDP;=查找=FIND_CHAR PROC NEARLEASI,BUFB2MOVCH,0FIND:CMPAL,SIJZFOUNDJMPNEXTFOUND:CMPFLAG,1JNZFIRSTJMPLASTFIRST:INCFLAGMOVFLOC,CHINCFLOCJMPNEXTLAST:INC LFLAGMOVLLOC,CHINCLLOCCMPAL,SI+1JNZFENDJMPNEXTNEXT:INCSIINCCHCMPCH,BUFB1JNAE FINDFEND:LEADX,CRLFMOVAH,09HINT 21HRETFIND_CHAR ENDP;=求和GET_SUM PROC NEARXORAL,AL ;清零ALADDAL,FLOCADDAL,LLOCMOVSUM,AL ;求和RETGET_SUM ENDP;=输出排序结果PRINT_SORTED PROC NEARPOSTC 10,5 LEADX,SORT_STR MOV AH,09H INT 21H MOV AH,09H LEA DX,BUFB2 INT 21HLEA DX,CRLFMOV AH,09HINT 21HRETPRINT_SORTED ENDP;=输出查找结果PRINT_LOCATION PROC NEARPOSTC 12,5LEADX,FIRST_STRMOVAH,09HINT21HMOVAL,FLOC;第一个位置SUBAH,AHDIVTENADDAX,3030HMOVBL,AHMOVDL,ALMOVAH,2INT 21HMOVDL,BLMOVAH,2INT21HLEADX,CRLFMOVAH,09HINT21HCMPLFLAG,0 JZFIN ;若只找到一个，跳转到末尾;找到不止一个，输出最后一个位置及位置和 PLAST:POSTC 13,5LEADX,LAST_STRMOVAH,09HINT21HMOVAL,LLOC;最后一个位置SUBAH,AHDIVTENADDAX,3030HMOVBL,AHMOVDL,ALMOVAH,2INT 21HMOVDL,BLMOVAH,2INT21HLEADX,CRLFMOVAH,09HINT21HPOSTC 14,5LEADX,SUM_STRMOVAH,09HINT21HMOVAL,SUM;位置之和SUBAH,AHDIVTENADDAX,3030HMOVBL,AHMOVDL,ALMOVAH,2INT 21HMOVDL,BLMOVAH,2INT21HLEADX,CRL