.model small 
.code
org 100h 

Start : 
jmp proses
kata  db 13,10,13,10,'Enter Your Password : $' 
kata1 db 13,10,'Your password is True',13,10,13,10,'$' 
kata2 db 13,10,'Your password is False',13,10,13,10,'$'

pilih db '===============================',13,10,13,10 
      db 'Hello... Choice please : (1..3)',13,10,13,10 
	  db '1. Tampilkan NPM',13,10,13,10 
	  db '2. Tampilkan Nama',13,10,13,10  
	  db '3. Exit',13,10,13,10 
	  db 'Your Choice : $' 

pakai1 :
mov ah,02h
mov dl,0ah
int 21h
mov dl,4eh
int 21h
mov dl,50h
int 21h
mov dl,4dh
int 21h
mov dl,20h
int 21h
mov dl,3ah
int 21h
mov dl,20h
int 21h
mov dl,35h
int 21h
mov dl,37h
int 21h
mov dl,34h
int 21h
mov dl,31h
int 21h
mov dl,35h
int 21h
mov dl,38h
int 21h
mov dl,33h
int 21h
mov dl,37h
int 21h
jmp menu

pakai2 :
mov ah,02h
mov dl,0ah
int 21h
mov dl,41h
int 21h
mov dl,72h
int 21h
mov dl,62h
int 21h
mov dl,79h
int 21h
jmp menu

proses :
	mov ah, 09h
	lea dx, kata
	int 21h
	mov ah, 07h
	int 21h
	cmp al,'I'
	JE yes
	JNE no

	yes :
		mov ah, 02h
		mov dl, 2Ah
		int 21h
		mov ah, 07h
		int 21h
		cmp al,'A'
		JE yes2
		JNE no

	no :
		mov ah, 09h
		lea dx, kata2
		int 21h
		jmp proses

	yes2 :
		mov ah, 02h
		mov dl, 2Ah
		int 21h
		mov ah, 07h
		int 21h
		cmp al,'2'
		JE yes3
		JNE no

	yes3 :
		mov ah, 02h
		mov dl, 2Ah
		int 21h
		mov ah, 07h
		int 21h
		cmp al,'2'
		JE yes4
		JNE no

	yes4 :
		mov ah, 02h
		mov dl, 2Ah
		int 21h
		mov dl, 20h
		int 21h
		mov ah, 09h
		lea dx, kata1
		int 21h

menu : 
mov ah,09h 
mov dx,offset pilih
int 21h 

choose : 
mov ah,01h 
int 21h 
cmp al,'1' 
je aa 
cmp al,'2' 
je bb 
cmp al,'3' 
je cc 
jne menu 

aa :
jmp pakai1
mov ah,09h  
int 21h

bb : 
jmp pakai2
mov ah,09h 
int 21h 

cc : 
jmp selesai

selesai : 
int 20h

End Start