微机原理课第39题.docVIP

39．(上机题)编写程序实现下列5项功能，通过从键盘输入1～5进行菜单式选择：（1）按数字键“1”，完成将字符串中的小写字母变换成大写字母。用户输入由英文大小写字母或数字0～9组成的字符串（以回车结束），变换后按下列格式在屏幕上显示：原字符串例如：abcdgyt0092新字符串 ABCDGYT0092按任一键重做；按Esc键返回主菜单。（2）按数字键“2”，完成在字符串中找最大值。用户输入由英文大小写字母或数字0～9 组成的字符串（以回车结束），找出最大值后按下列格式在屏幕上显示：原字符串 The maximum is 最大值．按任一键重做；按Esc键返回主菜单。（3）按数字键“3”，完成输入数据组的排序。用户输入一组十进制数值（小于255），然后变换成十六进制数，并按递增方式进行排序，按下列格式在屏幕上显示：原数值串新数值串按任一键重做；按Esc键返回主菜单。（4）按数字键“4”，完成时间的显示。首先提示用户对时，即改变系统的定时器HH：MM：SS（以冒号间隔，回车结束），然后在屏幕的右上角实时显示出时间：HH：MM：SS。按任一键重新对时；按Esc键返回主菜单。（5）按数字键“5”，结束程序的运行，返回操作系统。解：主程序的编程思路：四、程序代码STACK SEGMENT STACKDB 256 DUP(?)TOP LABELWORDSTACK ENDSDATA SEGMENTTABLE DW G1, G2, G3, G4, G5STRING1 DB 1. Change small letters into capital letters of string;, 0DH, 0AH, $STRING2 DB 2. Find the maximum of string;, 0DH, 0AH, $STRING3 DB 3. Sort for datas;, 0DH, 0AH, $STRING4 DB 4. Show Time;, 0DH, 0AH, $STRING5 DB 5. Exit., 0DH, 0AH, $STRINGN DB Input the number you select (1-5) : $IN_STR DB Input the string (including letters numbers, less than 60 letters) :, 0DH, 0AH, $PRESTR DB Original string : $NEWSTR DB New string : $OUT_STR DB The string is $MAXCHR DB The maximum is $IN_NUM DB Input the numbers (0 - 255, no more than 20 numbers) : , 0DH, 0AH, $OUT_NUM DB Sorted numbers : , 0DH, 0AH, $IN_TIM DB Correct the time (HH:MM:SS) : $HINTSTR DB Press ESC, go back to the menu; or press any key to play again!$KEYBUF DB 61DB ?DB 61 DUP (?)NUMBUF DB ?DB 20 DUP (?)DATA ENDSCODE SEGMENTASSUME CS:CODE, DS:DATA, SS:STACKSTART:MOVAX, DATAMOV DS, AXMOVAX, STACKMOV SS, AXMOV SP, OFFSET TOPMAIN: CALL FAR PTR MENU ; 设置显示器AGAIN:MOVAH, 2MOV BH, 0 ; 页号MOV DL, 41 ; 列号MOV DH, 10 ; 行号INT 10H ; 光标位置设置MOVAH, 1INT 21HCMPAL, 1JB AGAINCMPAL, 5JAAGAINSUB AL, 1 ; N-1SHLAL, 1 ; (N-1)*2CBW ; AL-AXLEA BX, TABLEADD BX, AXJMPWORD PTR [BX]G1:CALL FAR PTR CHGLTRMOVAH, 8INT 21HCMPAL, 1BHJZ MAINJMP G1G2:CALL FAR PTR MAXLTRMOVAH, 8INT 21HCMPAL, 1BHJZ MAINJMP G2G3:CALL FAR PTR SORTNUMMOVAH, 8INT 21HCMPAL, 1BHJZ MAINJMP G3G4:CALL FAR PTR TIMCHKMOVAH, 8INT 21HCMPAL, 1BHJZ MAINJMP G4