data    segment
message        db    'This is a sample program of passward'db    0dh,0ah,'Please strike the key!',0dh,0ah,'$'
passward     db     'huangchangsheng$'
buf1         db    20db  ?db     20 dup('$')
FAULT         db     0dh,0ah,'NOMATCH!Please enter again!',0dh,0ah,'$'
RIGHT         db     0dh,0ah,'MATCH!CONGRATULATION!',0dh,0ah,'$'
ending        db    0dh,0ah,'You have typed the wrong passward for three times!',0dh,0ah,'$'
data    ends
code    segment
assume    cs:code,ds:data
start:        mov    ax,datamov    ds,ax            mov    dx,offset message            mov    ah,9                        int    21h    mov cl,3jmp input
rinput:        mov    dx,offset FAULT                ;提示错误mov    ah,9                        int    21h
input:        lea    dx, buf1                     ;字符串输入mov ah, 0ah                        int 21hxor si,si
strcmp:                                        ;串比较mov al,passward[si]cmp al,'$'jz output2mov al,passward[si]                cmp buf1[si+2],aljnz output1inc sijmp strcmp
output1:    loop rinputmov    dx,offset ending        mov    ah,9                        int    21hjmp exit
output2:    mov    dx,offset RIGHT                ;提示正确mov    ah,9                        int    21h
exit:        mov    ah,4ch                                    int    21h
code    ends
end    start

data    segment
message        db    'This is a sample program of passward'db    0dh,0ah,'Please strike the key!',0dh,0ah,'$'
buf1         db     20,?,20 dup('$')
FAULT         db     0dh,0ah,'NOMATCH!Please enter again!',0dh,0ah,'$'
RIGHT         db     0dh,0ah,'MATCH!CONGRATULATION!',0dh,0ah,'$'
ending        db    0dh,0ah,'You have typed the wrong passward for three times!',0dh,0ah,'$'
data    ends
ext segment
passward db 'huangchangsheng$'
ext ends
code    segment
assume    cs:code,ds:data,es:ext
start:        mov    ax,datamov    ds,axmov ax,extmov es,ax            mov    dx,offset message            mov    ah,9                        int    21h    mov cx,3jmp input
rinput:        mov    dx,offset FAULT                ;提示错误mov    ah,9                        int    21h
input:        lea    dx, buf1                     ;字符串输入mov ah, 0ah                        int 21hlea di,passwardlea si,buf1+2push cxmov cl,buf1+1repz cmpsb                        ;当前字符相同则继续循环jz output2jnz output1
output1:pop cxloop rinputmov    dx,offset ending        mov    ah,9                        int    21hjmp exit
output2:    mov    dx,offset RIGHT                ;提示正确mov    ah,9                        int    21h
exit:        mov    ah,4ch                                    int    21h
code    ends
end    start