.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