call clear		;clear the screen
call center

mov ah,09h		;display string
lea dx,msg2		;prints Enter password
int 21h

mov bl,3

again:
        mov ah,07		;direct keyboard input
        int 21h
        mov bh,al		;move the input al to bh
        cmp bh,0dh
        je again
        call asterisk
        cmp bh,'a'		;compare bh with J
        je again1		;if equal jump to again
        jne wrong		;if not to wrong

again1:
        mov ah,07
        int 21h
        mov bh,al
        cmp bh,0dh
        je invalid9
        call asterisk
        cmp bh,08h
        je again
        cmp bh,'b'		;compare bh with P
        je again2
        jne wrong
again2:
        mov ah,07
        int 21h
        mov bh,al
        call asterisk
        cmp bh,'c'		;compare bh with h
        je again3
        jne wrong

invalid9:
         call invalid8

 again3:
        mov ah,07
        int 21h
        mov bh,al
        call asterisk
        cmp bh,'d'		;compare bh with I
        je again4
        jne wrong

again4:
        mov ah,07
        int 21h
        mov bh,al
        call asterisk
        cmp bh,'P'		;compare bh with C
        je again5
        jne wrong
again5:
        mov ah,07
        int 21h
        mov bh,al
        call asterisk
        cmp bh,'e'		;compare bh with E
        je again6
        jne wrong
again6:
        mov ah,07
        int 21h
        mov bh,al
        call asterisk
        cmp bh,'f'		;compare bh with s
        je again7
        jne wrong

invalid8:
        call invalid

again7:
        mov ah,07
        int 21h
        mov bh,al
        cmp bh,0dh	;compare the input with the enter key
        je exit
        jne wrong

wrong:
        mov ah,07
        int 21h
        mov bh,al
        call asterisk
        cmp bh,0dh	;compare the input with the enter key
        je invalid
        jne wrong

invalid:
        call clear
        call center
        mov ah,09
        lea dx,msg1	;prints retry password
        int 21h
        dec bl		;decrements bl until 3 attempts
        cmp bl,0
        je invalid2
        jmp again

invalid2:
        call clear
        call center
        mov ah,09		;print password failed!!!
        lea dx,msg3
        int 21h
        int 20h

exit:
        call clear
        call center

;ASCII program

	mov ax,0600		;setting background
	mov bh, 30h		;color of the attribute
	mov cx,0000h		;where the color starts to point
	mov dx,184fh		;where the color ends to point
	int 10h			

	mov ax,0b800		;location of the screen
	mov es,ax		;location of the screen move to es register
	mov bx,60+(160*4)	;where the title starts to display and move to bx register
	mov si,msg4		;the message move to si register
	mov cx,16		;the numbers of letters that will display

print:

	mov al,b[si]		;the value of si is move to al register
	mov es:[bx],al		;move the value of al to the location of es:[bx]
	inc si			;increment the si
	add bx,2		;add bx by 1 for the attribute
	loop print		;looping
	int 21h			;to terminate the loop

	mov bh,0		;holds the characters
	mov di,160*8		;where the characters will display and move to di register
	mov cx,255		;the number of characetrs that will display

char:
        mov al,bh		;moving bh to the al register
        mov es:[di],al		;move the value of al is move to the location of es:[di]
        inc bh			;increment the bh
        add di,8		;to make 20 columns
        loop char		;looping
	int 20h			;to terminate the loop

msg4:db 'ASCII CHARACTERS'

msg3 db 'PASSWORD INCORRECT!DENIED ACCESS!$'
msg2 db 'PASSWORD: $'
msg1 db 'RETRY: $'

asterisk:			;prints asterisk
        mov ah,09h
        lea dx,ask
        int 21h
        ret

ask db '#$'

clear:			;clear screen
        mov ax,03
        int 10h
center:			;set cursor at the center
        mov ah,02
        mov bh,00
        mov dh,12
        mov dl,33
        int 10h
        ret