《西电微机原理大作业》由会员分享，可在线阅读，更多相关《西电微机原理大作业（21页珍藏版）》请在金锄头文库上搜索。
1、汇编语言程序设计综合实验姓名：刘发强学号：14020199044 2016年12月25日题目功能及要求题目要求编写程序实现下列5项功能，通过从键盘输入15进行菜单式选择：（1）按数字键“1”，完成将字符串中的小写字母变换成大写字母。用户输入由英文大小写字母或数字09组成的字符串（以回车结束），变换后按下列格式在屏幕上显示：例如：abcdgyt0092 ABCDGYT0092按任一键重做；按Esc键返回主菜单。（2）按数字键“2”，完成在字符串中找最大值。用户输入由英文大小写字母或数字09组成的字符串（以回车结束），找出最大值后按下列格式在屏幕上显示： The maximum is 按任一键重做
2、；按Esc键返回主菜单。（3）按数字键“3”，完成输入数据组的排序。用户输入一组十进制数值（小于255），然后变换成十六进制数，并按递增方式进行排序，按下列格式在屏幕上显示：按任一键重做；按Esc键返回主菜单。（4）按数字键“4”，完成时间的显示。首先提示用户对时，即改变系统的定时器HH：MM：SS（以冒号间隔，回车结束），然后在屏幕的右上角实时显示出时间：HH：MM：SS。按任一键重新对时；按Esc键返回主菜单。（5）按数字键“5”，结束程序的运行，返回操作系统。程序功能及分析：程序主干：（1） 主程序：通过调用屏幕初始化子程序、光标位置设定子程序、清屏子程序、菜单显示子程序、命令解析子程序
3、完成显示器初始化，设置光标位置，打印程序菜单列表以及用户输入提示信息，并等待用户从键盘输入15进行菜单选择。用户输入错误会被要求重输。子程序跳转利用数据段转移地址查找表实现。从子服务退回时，重新开始上述操作。（2） 子服务一：将字符串中的小写字母转换成大写字母，并输出到屏幕上。先调用字符串输出子程序输出提示信息，后调用字符串输入子程序将用户从键盘输入的字符串读到BUFFER1存储区，后逐个判断字符是否为小写字母，如果是，则通过逻辑与进行转化，完成后，将结果放置到BUFFER2，后调用字符串输出子程序完成输出。然后输出是否重做提示信息，调用无回显的字符读入子程序，并判断退出到主程序或重做。（3）
4、 子服务二：找出一字符串中ASCII码最大的字符并输出。先调用字符串输出子程序输出提示信息，后调用字符串输入子程序将用户从键盘输入的字符串读到BUFFER1存储区，将AL赋初值为第一个字符，后将AL作为暂时最大值与各字符逐个比较，若小于则将其值赋给AL，否则不赋。后将结果与提示信息生成字符串，后调用字符串输出子程序完成输出。然后输出是否重做提示信息，调用无回显的字符读入子程序，并判断退出到主程序或重做。（4） 子服务三：读入一组十进制数，递增排序，并原格式输出。先调用字符串输出子程序输出提示信息，后调用字符串输入子程序将用户从键盘输入的字符串读到BUFFER1存储区，后调用十进制数转二进制数子
5、程序，将转换数据放置到BUFFER2，再利用冒泡算法对BUFFER2内的数据递增排序，再调用二进制数转十进制数子程序将BUFFER2内的二进制数转化为十进制数，放置到BUFFER3存储区内，并调用字符串格式修正子程序将不必要的前导0删除，再调用字符串输出子程序将BUFFER3内的数据输出。对于非法输入（数值超过255、非法字符）会给出错误提示信息。然后输出是否重做提示信息，调用无回显的字符读入子程序，并判断退出到主程序或重做。（5） 子服务四：完成时间的显示、修改。调用字符串输出子程序将是否更改时间提示信息输出，并调用无等待字符读入子程序等待用户输入。然后通过DOS功能调用读出系统时间，后调用
6、二进制转十进制数子程序，将系统时间显示到屏幕右上方。如果用户确认修改时间，则调用字符串读入子程序将时间放置到BUFFER1，后调用十进制数转二进制数子程序并将结果放置到BUFFER2，后通过DOS功能调用将数据送给系统，如果出错则给出出错信息。然后输出是否重做提示信息，调用无回显的字符读入子程序，并判断退出到主程序或重做。（6） 子服务五：退出到系统。通过DOS功能调用完成。辅助子程序：（1） 命令解析子程序：完成对用户输入选择信息的检查，合法则安排服务跳转，否则要求用户重做。（2） 菜单显示子程序：调用字符串输出子程序将菜单输出到屏幕上。（3） 屏幕初始化子程序：通过BIOS功能调用将屏幕设
7、置成80*25字符模式。（4） 光标位置设定：通过BIOS功能调用完成设定。（5） 字符串显示子程序：通过DOS功能调用完成。（6） 清屏子程序：通过重新设置屏幕显示模式到达清屏目的。（7） 字符串读入子程序：通过DOS功能调用完成字符串输入，数据放在BUFFER1。（8） 字符读入子程序：通过DOS功能调用完成。（9） 无等待的字符读子程序：通过DOS功能调用完成。（10） 无回显的字符读入子程序：通过DOS功能调用完成。（11） 字符串结束符添加子程序：在指定存储区的字符串的最后添加回车、换行、字符串结束符。（12） 字符输出子程序：通过DOS功能调用完成。（13） 十进制数转二进制数子程
8、序：利用加权求和公式将读入的十进制数（ASCII码字符串表示的数字）转化成二进制数并放到BUFFER存储区，其中第一个字节变量值为数据个数。具有非法字符判定、数值超过255等判断。（14） 二进制数转十进制数子程序：利用除10取余并逆序的算法将每一个二进制数转化为十进制数（ASCII字符串），将输出放置到BUFFER3存储区。（15） 字符串前导0删除子程序：将十进制数（ASCII码字符串）高位的前导0删除。 汇编源程序STACK SEGMENT STACK DW 4096 DUP(C) TOP LABEL WORDSTACK ENDSDATA SEGMENT TRANSFORM DB 1.T
9、RANSFORM, 0DH,0AH,$ MAX DB 2.MAX,0DH,0AH,$ SORT DB 3.SORT,0DH,0AH,$ TIME DB 4.TIME,0DH,0AH,$ EXIT DB 5.EXIT,0DH,0AH,$ WAITING DB PLEASE INPUT NUM 1-5 TO SELECT SERVICE:,0DH,0AH,$ TIP DB PLEASE INPUT A STRING,0DH,0AH,$ TIPNUM DB PLEASE INPUT A GROUP OF DECIMAL,0DH,0AH,$ ANYKEY DB PRESS ANY KEY TO CON
10、TINUE,0DH,0AH,$ MAXIMUM DB THE MAXIMUM IS:$ INPUT_TIME DB PLEASE INPUT CURRENT TIME LIKE HH:MM:SS,0DH,0AH,$ QUESTION DB DO YOU WANT TO SET TIME(Y/N),0DH,0AH,$ INPUT_ERROR DBERROR OR INVALID INPUT,0DH,0AH,$ SUCCESS DB SET TIME SUCCEED,0DH,0AH,$ STRING DW TRANSFORM,MAX,SORT,TIME,EXIT,WAITING SERVICE D
11、W TRANS,FIND_MAX,SORTING,SET_TIME,EXIT_TOSYS BUFFER1 DB 512 DUP(C) ;INPUT BUFFER BUFFER2 DB 512 DUP(C) ;PROCESS WORKSPACE BUFFER3 DB 512 DUP(C) ;OUTPUT BUFFER DATA ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATA,ES:DATA,SS:STACKSTART: MOV AX,DATA MOV DS,AX MOV ES,AX LEA AX,TOP MOV SP,AX CALL SCREEN_INITMAIN
12、_AGAIN: CALL CLEAR_SCREEN CALL DISPLAY_MENU CALL GET_CHAR CALL ORDER_PARSE JMP MAIN_AGAIN MOV AH,4CH INT 21H ORDER_PARSE PROC NEAR ;RETURN AL=-1 IF ERROR ELSE INVOKE SERVICE PUSH AX PUSH BX AND AL,0FH CMP AL,1 JB ERROR_OVER CMP AL,5 JA ERROR_OVER LEA BX,SERVICE DEC AL SHL AL ,1 XOR AH,AH ADD BX,AX C
13、ALL CLEAR_SCREEN CALL word ptr BX POP BX POP AX JMP OVER_ORDERERROR_OVER : MOV AL,0FFHOVER_ORDER: RETORDER_PARSE ENDP DISPLAY_MENU PROC NEAR ;display menu including five items PUSH DX PUSH CX PUSH SI MOV DH,0BH MOV DL,14H MOV CX,06H LEA SI,STRING NEXT_DIS: MOV BH,0 CALL CURSOR_SET PUSH DX MOV DX,SI ADD SI,02H CALL STRING_DISPLAY POP DX INC DHLOOP NEXT_DIS POP SI POP CX POP DX RETDISPLAY_MENU ENDP SCREEN_INIT PROC NEAR ;set screen mode 80*25 character PUSH AX MOV AH,0 MOV AL,02H INT 10H POP AX RETSCREEN_INIT ENDP
