Praktikum V - Membuat Password

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