data segment ;定义数据段
input db 100 dup (?)
;定义输入的字符串,字符串必须用db定义,长度为100个字节
cmpare db '5201314','$'
;定义密码
msg1 db 'PASSWORD RIGHT!','$'
;定义输入密码正确后显示出来的信息
msg2 db 'PASSWORD ERROR!','$'
;定义输入密码错误后显示出来的信息
headmsg db 'ENTER YOUR PASSWORD:','$'
;头信息
data ends ;数据段结尾
code segment ;定义代码段
assume cs:code ;规定cs的内容
assume ds:data ;规定ds的内容
start: mov ax,data ;程序从start开始
mov ds,ax ;ds置初值,data的段地址
mov si,0 ;变址寄存器置初值0
call enter ;调用显示回车换行子程序
lea dx,headmsg ;输出头信息字符串的偏移地址
call dispchs ;调用显示字符串子程序
repeat: mov ah,01h
;定义repeat标号,用于循环输入单个字符.调用1号功能:从键盘输入一个字符并回显
int 21h ;完成输入回显
cmp al,0dh ;输入的字符和cr(回车)比较
je finish ;如果等于回车就转移到finish
mov input,al ;把al的置传送到input的si地址中(好像是这样吧)
inc si ;si加1
jmp repeat ;无条件转移到repeat
finish: mov input,24h ;给输入完成的字符串加上结束标志($)
call enter
mov si,0 ;源变址寄存器置初值0
mov di,0 ;目的变址寄存器置初值0
mov cx,8 ;设置密码检查位数(结束标志也要算进去)
check: cmp cx,0 ;置位数为0.
je right ;如果密码检查完成,转移到right
mov bl,input ;把input的si地址中的数据传送到bl
mov dl,cmpare ;把cmpare的di地址中的数据传送到dl
cmp dl,bl ;dl和bl比较
jne error ;如果不相等,就转移到error
inc si ;si加1
inc di ;di加1
dec cx ;cx减1
jmp check ;无条件转移到check
right: call enter
lea dx,msg1
call dispchs
call enter
jmp exit
error: call enter
lea dx,msg2
call dispchs
mov dl,07h ;输出ascii码的报警(响铃)控制符bel(07h)
call dispch
call enter
jmp exit
exit: mov ah,4ch ;4c号功能调用:终止当前程序并返回
int 21h ;返回dos
enter proc near ;显示回车换行子程序
mov dl,0dh ;输出ascii码的回车控制符cr(odh)
call dispch
mov dl,0ah ;输出ascii码的换行控制符lf(0ah)
call dispch
ret ;返回
enter endp ;子程序结尾
dispch proc near ;显示单个字符子程序
mov ah,02h ;2号功能调用:显示器输出字符
int 21h ;完成输出显示
ret
dispch endp
dispchs proc near ;显示字符串子程序
mov ah,09h ;9号功能调用:显示字符串
int 21h ;完成输出显示
ret
dispchs endp
code ends ;代码段结尾
end start ;结束汇编
;把以上代码复制到记事本等文本程序中,并保存.(如passwrod.asm)
;编译:masm password.asm
;连接:link password.obj
;执行:password.exe