【正文】 返回：光標(biāo)位置Finally輸出框CleanFinally proc near push ax push bx push cx push dx mov ah,2 mov bh,0 mov dx,080ah int 10h mov cx,6 mov dl,39。 clean3:int 21h loop clean3 mov ah,2。 clean1:int 21h loop clean1 mov dx,060ah int 10h mov cx,6 mov dl,39。《ReloadExe》。參數(shù)：ax。 jb sign cmp al,39。參數(shù)：[bx]?！禗ivInterger》。返回：endaxSubInterger proc near push si push bx lea si,Number1 mov ax,[si] lea si,Number2 mov bx,[si] sub ax,bx pop bx pop si retSubInterger endp。參數(shù)：無?！禛etMouse》。 ax=0ffffh success。點中按鈕5并放開左鍵 mov bh,01h mov cx,1303h mov dx,1524h call DrawRect mov bh,0f1h mov cx,1202h mov dx,1423h call DrawRect mov ah,2 mov bh,0 mov dx,1310h int 10h mov ah,9 mov dx,offset Menu5 int 21h call ReloadExe jmp regetMouseState1 retMenuChoose endp。點中按鈕1并放開左鍵 mov cx,0d03h mov dx,1009h call DrawRect mov bh,0f1h dec ch dec cl dec dh dec dl call DrawRect mov ah,2 mov bh,0 mov dx,0e04h int 10h mov ah,9 mov dx,offset Menu1 int 21h call AddInterger call CleanFinally call OutInterger jmp regetMouseState1 btn2:mov bh,01h。點中按鈕1，設(shè)置bx=1 push bx mov bh,8fh mov cx,0c02h mov dx,0f08h call DrawRect mov bh,0f1h inc ch inc cl inc dh inc dl call DrawRect mov ah,2 mov bh,0 mov dx,0f05h int 10h mov ah,9 mov dx,offset Menu1 int 21h jmp regetMouseState2 button2:mov bx,2。點中按鈕外圍，設(shè)置bx=0 push bx jmp regetMouseState2 n3:cmp ah,8 jbe n4 mov bx,0。點中按鈕外圍，設(shè)置bx=0 push bx jmp regetMouseState2 m3:cmp cx,23h jbe m4 mov bx,0。返回：siMenuChoose proc near regetMouseState1:call GetMouse cmp bx,01h jne regetMouseState1 cmp dx,12 jae n1 mov bx,0。參數(shù)：bh=color,cx,dx。參數(shù)：無?！吨骱瘮?shù)》Main proc far start: mov ax, data mov ds, ax mov es, ax call ShowMainWindow call MouseInit cmp ax,0ffffh je success mov dx,offset ErrorString mov ah,9 int 21h jmp exitSystem success:。Error39。Reload39。Div39。Mul39。Sub39。Add39。Finally:39。Number2:39。Number1:39。(Notice: 0=Number=32767)39。同樣也是不能進行負(fù)數(shù)的運算，無法輸入負(fù)數(shù)。了解課題內(nèi)容后，我們進行了分工合作，先查閱了相關(guān)資料，然后開始源代碼的編寫，最后是調(diào)試結(jié)果，直到符合課題要求。而寫代碼的時候，經(jīng)常會因為一些符號，或者字長的失誤，完全是無心之失而導(dǎo)致程序無法執(zhí)行?？蛇M行相應(yīng)值的其他運算，并得到相應(yīng)的結(jié)果。注意：0=interger=32767GetInterger proc near push cx push dx push bx xor ax,ax xor bx,bx xor cx,cx xor dx,dx reget:mov ah,8 int 21h cmp al,’0’ jb sign cmp al,’9’ ja reget cmp cl,5 je reget jmp getInt sign:cmp al,0dh je enter cmp al,8h je backspace jmp reget getInt:mov dl,al mov ah,2 int 21h and ax,0fh xchg ax,bx push bx mov bx,10 mul bx pop bx xchg ax,bx add bx,ax inc cx jmp reget backspace:cmp cl,0 je reget xchg ax,bx push bx mov bx,10 div bx pop bx xchg ax,bx dec cx mov ah,2 mov dl,08h int 21h mov dl,20h int 21h mov dl,08h int 21h xor dx,dx jmp reget enter:mov ax,bx pop bx mov [bx],ax pop dx pop cx ret GetInterger endp 。返回：endaxDivInterger proc near push dx push si push bx lea si,Number1 mov ax,[si] lea si,Number2 mov bx,[si]