MEMBUAT PASSWORD
.model small
.code
org 100h
mulai:
jmp proses
vcal db 10, 'ENTER PASSWORD: $'
vcal1 db 10, 'INCORRECT$'
vcal2 db 10, 'WELLCOME GUYS$'
proses:
mov ah, 09h
lea dx, vcal
int 21h
mov ah, 07h
int 21h
cmp al, 'Y'
je ya1
jne tidak1
ya1:
mov ah, 02h
mov dl, 2Ah
int 21h
mov ah, 07h
int 21h
cmp al, 'O'
je ya2
jne tidak2
tidak1:
mov ah, 09h
lea dx, vcal1
int 21h
jmp proses
ya2:
mov ah, 02h
mov dl, 2Ah
int 21h
mov ah, 07h
int 21h
cmp al, 'U'
je ya3
jne tidak3
tidak2:
mov ah, 09h
lea dx, vcal1
int 21h
jmp proses
ya3:
mov ah, 02h
mov dl, 2Ah
int 21h
mov ah, 07h
int 21h
cmp al, 'R'
je ya4
jne tidak4
tidak3:
mov ah, 09h
lea dx, vcal1
int 21h
jmp proses
ya4:
mov ah, 02h
mov dl, 2Ah
int 21h
mov ah, 09h
lea dx, vcal2
int 21h
int 20h
tidak4:
mov ah, 09h
lea dx, vcal1
int 21h
jmp proses
end mulai
hasil : Password YOUR (Kapital semua)
ENTER PASSWORD : ****
WELCOME GUYS
Apabila terjadi kesalahan maka akan tampil “INCORRECT”
Lanjut ke praktikum VI - Whoamm.. semakin mengantuk
