简单的计算器模拟程序的设计和实现
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
简单的计算器模拟程序的设计和实现1.问题描述
对任意给定的正确四则运算表达式,程序计算其结果值并输出。程序无需查错功能,假定所输入的都是正确的四则运算表达式,并且表达式中运算分量均为无正负号整数,运算符为 +、-、*、/,表达式以字符 "=" 结束。程序应有操作提示、输入和输出,界面追求友好,最好是菜单式的界面。
2.设计说明
2.1简要的分析
根据要求,要先输入包含有+,-,*,/的运算符的表达式,然后经过计算得到正确的答案。从键盘中输入的是ASCII码,因此要将其转换为十进制的数据然后才能进行计算。如果输入混合表达式,要将中缀式先变化成后缀式,然后再进行计算。
2.2概要分析
2.2.1 定义的数据段
用于定义一些中间变量,并将显示在试验界面上,以及提示信息。data segment
stri db 50 dup(0)
exp db 30 dup(0)
track db 30 dup(0)
instr db 100 dup(0)
msg0 db 'please input your formular:',0dh,0ah,'$'
msg1 db 0dh,0ah,'wrong input','$'
msg2 db 0dh,0ah,') and ( does not match','$'
msg3 db 0dh,0ah,'div zero error','$'
msg4 db 0dh,0ah,'sorry,minus data appears','$'
msg5 db 0dh,0ah,'any key to continue,esc to exit','$'
data ends
2.2.2 定义的堆栈段
声明用于将中缀表达式转换为后缀表达式,以及进行后缀表达式求值过程用到的堆栈段。
stack segment para stack
dw 256 dup(0)
stack ends
2.2.3 用到的子过程
2.2.
3.1 compare子过程
作用:用于判断键盘输入的符号是否合法,若合法,则在屏幕上显示,否则报错。
2.2.
3.2 mult子过程
作用:用于对输入的数字进行乘10累加操作,以便将连续输入的数字字符串转换为相对应的数值。
2.2.
3.3 trans子过程
作用:将输入的中缀表达式转换为后缀表达式。
2.2.
3.4 value子过程
作用:将后缀表达式结合堆栈结构进行表达式求值。
2.2.
3.5 divi子过程
作用:通过除以10以及进一步处理将某数值转换为相应的ASCII字符串。
2.2.
3.6 print子过程
作用:将表达式求值结果输出到屏幕上。
3.详细的算法描述
3.1.程序运行流程
3.2程序代码
STACK SEGMENT PARA STACK
DW 256 DUP(0)
STACK ENDS
DATA SEGMENT
STRI DB 50 DUP(0)
EXP DB 30 DUP(0)
TRACK DB 30 DUP(0)
INSTR DB 100 DUP(0)
MSG0 DB 'please input the formular:',0DH,0AH,'$'
MSG1 DB 0DH,0AH,'sorrry,wrong input','$'
MSG2 DB 0DH,0AH,') and ( does not match','$'
MSG3 DB 0DH,0AH,'div by zero error','$'
MSG4 DB 0DH,0AH,'sorry,minus data appears','$'
MSG5 DB 0DH,0AH,'any key to continue,esc to exit','$'
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,SS:STACK,DS:DATA START: MOV AX,STACK
MOV SS,AX
MOV AX,DATA
MOV DS,AX
MOV DX,OFFSET MSG0
MOV AH,9
INT 21H
XOR AX,AX
;READ
MOV BX,OFFSET INSTR
MOV DL,20H
JMP L2
COMPARE PROC NEAR
CMP AL,0DH
JZ L2
MOV DL,AL
MOV AH,2
INT 21H
RET
COMPARE ENDP
L2: MOV AH,8
INT 21H
CALL COMPARE
CMP AL,3DH ;end with '='
JZ L2_OVER
MOV AH,39H
CMP AH,AL ;del the wrong data ( > 9 )
JNB CONTI
MOV AH,2
MOV DL,8
INT 21H
MOV DL,20H
INT 21H
MOV DL,8
INT 21H
JMP L2
CONTI: CMP AL,28H ;'('
JZ L2_YES
CMP AL,29H
JZ L2_YES ;')'