汇编语言实现四则运算

汇编语言实现四则运算汇编语言实现四则运算汇编语言实现四则运算DISPMACROVARMOVAH,2MOVDL,VARINT21HENDMDATASSEGMENTDATA0DB'PLEASEINPUTANUMBER(0-999):','$'DATA1DB'overflowinputagain:','$'DATA2DB'PLEASEINPUTANOTHERNUMBER(EXP:123)','$'DATA3DB'PLEASEINPUTANOPREATOR:','$'DATA4DB'THEOPERATORISWRONG,INPUTAGAIN:','$'OPERDB?FLAGDB0FLAG1DB0DATADW3DUP(?)DATASENDSSTACKSSEGMENTDW256DUP(?)STACKSENDSCODESSEGMENTASSUMECS:CODES,DS:DATAS,SS:STACKSSTART:MOVAX,DATASMOVDS,AXMOVDI,OFFSETDATA0

;提示信息CALLDISPLMOVSI,0

;SI作为数组下标CALLINPUTCALLNEWLINEMOVDI,OFFSETDATA3

;提示信息CALLDISPLAGAIN:MOVAH,1

;1号功能输入四则运算符INT21HCMPAL,'+'

;判断输入的可否是

+，-，*，/JENEXT0CMPAL,'-'JENEXT0CMPAL,'*'JENEXT0CMPAL,'/'JENEXT0CALLNEWLINE;输入的运算符不合法，从头输入MOVDI,OFFSETDATA4CALLDISPLJMPAGAINNEXT0:MOVOPER,AL;保留运算符CALLNEWLINEMOVDI,OFFSETDATA2;输入第二个操作数CALLDISPLMOVSI,2CALLINPUTMOVAX,DATA[0]MOVBX,DATA[2]CMPOPER,'+';判断是那种操作，进行运算JENEXT1CMPOPER,'-'JENEXT2CMPOPER,'*'JENEXT3CMPOPER,'/'JENEXT4NEXT1:;加法运算CLCADCAX,BXJNCN1MOVFLAG,1;判断可否进位N1:MOVDATA[4],AX;运算结果放入内存JMPOUTPUTNEXT2:;减法运算CLCSBBAX,BXJNCN2MOVFLAG,1;判断可否借位NEGAXN2:MOVDATA[4],AX;运算结果放入内存JMPOUTPUTNEXT3:;乘法运算CLCMOVDX,0MULBXMOVDATA[4],AX;运算结果放入内存JMPOUTPUTNEXT4:;除法运算CLCMOVDX,0CMPBX,0JNZN4;判断除数可否为0CALLNEWLINECALLERRORCALLNEWLINEMOVDI,OFFSETDATA2CALLDISPLMOVSI,2CALLINPUTJMPNEXT4N4:DIVBXMOVDATA[4],AX;运算结果放入内存OUTPUT:CALLNEWLINEMOVDI,0CALLPRINTDISPOPERMOVDI,2CALLPRINTDISP'='CMPFLAG,1JNZNEXT5DISP'-'NEXT5:MOVDI,4CALLPRINT

;输出第一个操作数;输出运算符;输出第二个操作数;输出结果MOVAH,4CHINT21H;输入函数INPUTPROCNEARPUSHAXPUSHBXPUSHCXPUSHDXMOVBX,0;BX寄存十进制数CLCMOVDX,0L0:;输入数字MOVAH,1INT21HCMPAL,0DHJEL2SUBAL,30HJLL1CMPAL,9JGL1

;判断数字可否合法;变换成十进制数

MOVAH,0XCHGAX,BXMOVCX,10MULCXADDAX,BXJCL1XCHGAX,BXJMPL0

;变换成10进制数放入内存L1:MOVDX,0MOVBX,0CALLNEWLINECALLERRORJMPL0L2:CMPDX,0JNZL1MOVDATA[SI],BXMOVDX,0POPDXPOPCXPOPBXPOPAXRETINPUTENDP;提示信息DISPLPROCNEARMOVAH,9MOVDX,DIINT21HRETDISPLENDP;回车换行NEWLINEPROCNEARPUSHAXPUSHDXMOVDL,0AHMOVAH,2INT21HMOVDL,0DHMOVAH,2INT21HPOPDXPOPAXRETNEWLINEENDP;错误提示ERRORPROCNEARPUSHAXPUSHDXMOVDX,OFFSETDATA1MOVAH,9INT21HPOPDXPOPAXRETERRORENDP;显示函数PRINTPROCNEARPUSHAXPUSHBXPUSHCXPUSHDXMOVCX,0MOVBX,10MOVAX,DATA[DI]LAST:MOVDIV

DX,0BX

;除10压栈PUSHDXINCCXCM