disp proc push ebx push ecx mov ecx,8 ; 8位 dhw1: rol eax,4 mov ebx,eax and al,0fh ; 转换为ASCII码 add al,30h cmp al,'9' jbe dhw2 add al,7
dhw2: call dispc mov eax,ebx loop dhw1 pop ecx pop ebx ret disp endp
（2） ; 数据段
wvar word 307281AFH temp word ? ; 代码段，主程序 mov eax,wvar mov temp,eax call disp mov al,'H' call dispc ; 代码段，子程序 disp proc push ebx push ecx mov ecx,8 ; 8位 mov eax,temp dhw1: rol eax,4 mov ebx,eax and al,0fh ; 转换为ASCII码 add al,30h cmp al,'9' jbe dhw2 add al,7
dhw2: call dispc ; 显示一个字符 mov eax,ebx loop dhw1 pop ecx pop ebx ret
disp endp （3） ; 数据段
wvar word 307281AFH ; 代码段，主程序 push wvar call disp add esp,4 mov al,'H' call dispc ; 代码段，子程序 disp proc push ebp mov ebp,esp push ebx push ecx mov ecx,8 ; 8位 mov eax,[ebp+8] dhw1: rol eax,4 mov ebx,eax and al,0fh ; 转换为ASCII码 add al,30h cmp al,'9' jbe dhw2 add al,7
dhw2: call dispc mov eax,ebx loop dhw1 pop ecx pop ebx pop ebp ret disp endp
〔习题4.27〕
配合例题4-11的简单加密解密程序，设计一个输入密码的程序，将输入的若干字符经过适当算法得到一个字节量密码。 〔解答〕 ;ex0427.asm include io32.inc .data key byte ?
msg0 byte 'Enter your password:',0 passw byte 50 dup(0)
errormsg byte 'Password error, input again!',13,10,0 bufnum = 255
buffer byte bufnum+1 dup(0) ; 定义键盘输入需要的缓冲区 msg1 byte 'Enter messge: ',0
msg2 byte 'Encrypted message: ',0
msg3 byte 'Original messge: ',0 .code start: mov eax,offset msg0 ; 提示输入加密密码 call dispmsg mov eax,offset passw ; 设置入口参数EAX call readmsg ; 调用输入字符串子程序输入密码 mov ecx,eax dec ecx xor ebx,ebx mov al,passw[ebx] again0: inc ebx xor al,passw[ebx] ;使用简单的异或方法得到加密关键字 loop again0 mov key,al ; 保存加密关键字 mov eax,offset msg1 ; 提示输入字符串 call dispmsg mov eax,offset buffer ; 设置入口参数EAX call readmsg ; 调用输入字符串子程序 push eax ; 字符个数保存进入堆栈 mov ecx,eax ; ECX＝实际输入的字符个数，作为循环的次数 xor ebx,ebx ; EBX指向输入字符 encrypt: mov al,key ; AL＝加密关键字 xor buffer[ebx],al ; 异或加密 inc ebx dec ecx ; 等同于指令：loop encrypt jnz encrypt ; 处理下一个字符 mov eax,offset msg2 call dispmsg mov eax,offset buffer ; 显示加密后的密文 call dispmsg call dispcrlf ;
again: mov eax,offset msg0 ; 提示输入解密密码 call dispmsg mov eax,offset passw ; 设置入口参数EAX call readmsg ; 调用输入字符串子程序输入密码 mov ecx,eax dec ecx xor ebx,ebx mov al,passw[ebx] again1: inc ebx xor al,passw[ebx] ;使用简单的异或方法得到加密关键字 loop again1 cmp key,al ; 与原加密关键字比较 jz next ; 密码相同，则进行解密 mov eax,offset errormsg ; 提示输入解密密码错误
call dispmsg jmp again
next: pop ecx ; 从堆栈弹出字符个数，作为循环的次数 xor ebx,ebx ; EBX指向输入字符 decrypt: mov al,key ; AL＝解密关键字 xor buffer[ebx],al ; 异或解密 inc ebx dec ecx jnz decrypt ; 处理下一个字符 mov eax,offset msg3 call dispmsg mov eax,offset buffer ; 显示解密后的明文 call dispmsg 〔习题4.28〕
设计一个简单的两个整数的加法器程序。 〔解答〕 ;ex0428.asm include io32.inc .data
msg1 byte 'Enter the integers:',13,10,0
msg2 byte 13,10,'Enter space to continue! Enter any other key to exit!',13,10,0 .code start: mov eax,offset msg1 call dispmsg call readsid mov ebx,eax mov al,'+' call dispc call dispcrlf call readsid add ebx,eax mov al,'=' call dispc mov eax,ebx call dispsid call dispcrlf mov eax,offset msg2 call dispmsg call readc cmp al,20h je start exit 0