上机作业四
1.实验目的
1.增强和提高汇编语言程序设计的能力,掌握模块化程序设计的方法.
2.熟练掌握DOS常用功能的调用方法.
2.试验仪器
586微机  一台
3.实验内容
编写如下程序,并在机器上调试成功。程序采用菜单式选择,可以接收用户从键盘输入的五个命令(1-5),各命令功能分别为:
1)按下1”键,完成字符串小写字母变成大写字母。
用户输入一由英文大小写字母或数字0-9组成的字符串(以回车结束),程序逐个检查字符串
中各字符,将原串中小写字母变成大写字母,其他字符不变,并在屏幕上显示。用户按任一键,重做,按ESC键,返回主菜单。
2)按下2”键,完成最大值(二选一)。
a.接收用户输入的可显示字符串(以回车结束),程序将其中ASCII码值最大的字符显示出来;
b.接收用户输入若干个无符号8位数(以空格或逗号为分隔符,以回车结束),程序将其中最大的数显示出来。用户按任一键,重做,按ESC键,返回主菜单。
3)按下3”键,完成排序(二选一)。
a.接收用户输入的可显示字符串,以回车结束。程序按ASCII码值大小由大到小排序并输出显示;
b.接收用户输入若干个有符号8位数(以空格或逗号为分隔符,以回车结束),程序将其中最大的数显示出来。用户按任一键,重做,按ESC键,返回主菜单。
4)按下4”键,显示时间。
首先提示用户对时,即用户输入时、分、秒(以空格或逗号为分隔符,以回车结束),然后,在屏幕上不断显示时间,格式为:
XX(时): XX(分): XX(秒)
最好定点显示。用户按任一键,重新对时,按ESC键,返回主菜单。
5)按下5”键,结束程序运行,返回系统提示符。
四.程序代码
STACK    SEGMENT STACK
        DB 256 DUP(?)
TOP        LABEL WORD
STACK    ENDS
DATA        SEGMENT
TABLE        DW G1, G2, G3, G4, G5
STRING1    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 61
            DB ?
            DB 61 DUP (?)
NUMBUF    DB ?
            DB 20 DUP (?)
DATA        ENDS
CODE    SEGMENT
        ASSUME CS:CODE, DS:DATA, SS:STACK
START:
        MOV AX, DATA
        MOV DS, AX
        MOV AX, STACK
        MOV SS, AX
        MOV SP, OFFSET TOP
MAIN:    CALL FAR PTR MENU        ; 汇编语言大小写字母转换设置显示器
AGAIN:
        MOV AH, 2
        MOV BH, 0                ; 页号
        MOV DL, 41                ; 列号
        MOV DH, 10                ; 行号
        INT 10H                    ; 光标位置设置
        MOV AH, 1
        INT 21H
        CMP AL, '1'
        JB AGAIN
        CMP AL, '5'
        JA AGAIN
        SUB AL, '1'                ; N-1
        SHL AL, 1                ; (N-1)*2
        CBW                    ; AL->AX
        LEA BX, TABLE
        ADD BX, AX
        JMP WORD PTR [BX]
G1:
        CALL FAR PTR CHGLTR
        MOV AH, 8
        INT 21H
        CMP AL, 1BH
        JZ MAIN
        JMP G1
G2:
        CALL FAR PTR MAXLTR
        MOV AH, 8
        INT 21H
        CMP AL, 1BH
        JZ MAIN
        JMP G2
G3:
        CALL FAR PTR SORTNUM
        MOV AH, 8
        INT 21H
        CMP AL, 1BH
        JZ MAIN
        JMP G3
G4:
        CALL FAR PTR TIMCHK
        MOV AH, 8
        INT 21H
        CMP AL, 1BH
JZ MAIN
        JMP G4
G5:
        MOV AH, 4CH
        INT 21H
MENU    PROC FAR                ; 显示主界面
        ;设置显示器方式
        MOV AH, 0
        MOV AL, 3;
        MOV BL, 0;
        INT 10H                    ; 清屏
        MOV AH, 2
        MOV BH, 0                ; 页号
        MOV DL, 5                ; 列号
        MOV DH, 5                ; 行号
        INT 10H                    ; 光标位置设置
        MOV AH, 9
        LEA DX, STRING1
        INT 21H
        MOV AH, 2
        MOV DL, 5                ; 列号
        MOV DH, 6                ; 行号
        INT 10H                    ; 光标位置设置
        MOV AH, 9
        LEA DX, STRING2
        INT 21H

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。