汇编语言四则混合运算.docVIP

assume cs:code,ds:data data segment ;【以下为数据区】 buffer db 100,?,100 DUP (?) change1 db 150 DUP (?) ;将字符串中的数转化成字型无符号数,符号不变 change2 db 100 DUP (?) ;低级优先级 result dw ? ;结果 switch db ? msg1 db Please Input an Expression!,0AH,0DH,$ msg2 db The Result is: ,$ msg3 db Do It Again? (y/n),$ msg4 db 6 DUP (0AH,0DH) db Thank You for Using the Program! Press Any Key to Exit! db 4 DUP (0AH,0DH),40 DUP ( ) db Coded by WDSYMH. No Rights Reserved,0AH,0DH,64 DUP ( ) db 2010/01,0AH,0DH,$ temp db 5 DUP (?),$ data ends code segment ;【以下为主程序区】 start: mov ax,data mov ds,ax begin: mov dx,offset msg1 mov ah,09H int 21H mov dx,offset buffer mov ah,0AH int 21H call EndL mov dx,offset msg2 mov ah,09H int 21H ;============================== mov si,offset buffer+2 mov di,offset change1 mov cl,buffer+1 xor ch,ch call Change ;============================== mov si,offset change1 mov di,offset change2 call Core1 cmp byte ptr switch,-1 jnz CalOve mov si,offset change2 mov di,offset result call Core1 mov byte ptr switch,0 CalOve: ;CALc OVEr ;============================== mov bx,offset temp call BIN2ASC mov ah,09H int 21H call EndL ;============================== call Again call EndL call EndL jc begin ;============================== exit: mov ah,09H mov dx,offset msg4 int 21H mov ah,07H int 21H mov ax,4C00H int 21H ;-------------------------------------------------------------- ;【以下为函数区】 Change proc near ;输入: ;SI=字符串指针 ;DI=目的数据指针 ;CX=字符串长度 ;------------------------------ push ax push bx push cx push si push di ;------------------------------ mov bx,si ChaCir: ;CHAnge CIRcle dec cx cmp byte ptr [si+1],30H jc NumEnd cmp byte ptr [si+1],3AH jnc NumEnd inc si jmp ChaCir NumEnd: ;NUMber END cmp cx,0 jz StrEnd dec cx call ASC2BIN mov [di],ax add di,2 mov al,[si+1] mov [di],al add si,2 inc di mov bx,si jmp ChaCir StrEnd: call ASC2BIN mov [di],ax add di,2 mov byte ptr [di],-1 ;------------------------------ pop di pop si pop cx p