3.2.2主模块程序代码
程序代码如下：
STACKS SEGMENT STACK DW 20 DUP(?) STACKS ENDS DATA SEGMENT NUM DW 0
TAB1 DB " PLEASE INPUT A FORMULA:(ENTER Q TO EXIT)",13,10,"$"
NUM1 DW 100 DUP(?)
NUM2 DW 10 DUP(?) ;存放除法产生的小数位 NUM4 DW 100 DUP(?) C0 DW 0 C1 DW 0 C2 DW 0 SUM1 DW 0 SUM2 DW 0 OLT DW 0 RESULT DW 0
TAB0 DW 10000,1000,100,10,1 ;定义输出时要用到的除数 WRONG DB 13,10,"WRONG INPUT!$"
;OVER DB 13,10,"NOT OPERATIONAL CHARACTER!$" DATA ENDS ;---------------------------- ;------代码段---------------- CODE SEGMENT
ASSUME CS:CODE,DS:DATA ;------主程序---------------
START: MOV AX,STACKS MOV SS,AX MOV AX,DATA MOV DS,AX
CALL DISPMENU ; 显示汇编计算器菜单 STARTA:
MOV BX,-1 MOV SI,0 MOV DI,30 MOV CX,0 MOV C0,0 MOV C1,0
MOV C2,0 ; 初始化各个变量 CALL INPUT