Mencari Huruf atau karakter

by - January 30, 2011

Nama: Frida Fatah Abdullah Aziz
NIM: SIR200913
Kuliah: Pemrograman Bahasa Rakitan

masih serupa dengan 2 postingan sebelumnya yaitu ( membuat pasword dan fungsi if-then )dengan konsep membuat program dengan perbandingan kemudian lompat.
untuk pertama tuliskan source berikut ke notepad:

.model small
.code
org 100h
data:
jmp mulai

asal db 'widyautama$'
kata db 'masukan huruf yang dicari : $'
ket1 db 'Huruf ditemukan $'
ket2 db 'huruf tidak ditemukan $'

mulai:
xor bx, bx ;cek panjang kalimat

cek:
mov al, asal [bx] ; pindahan asal [index] ke al
inc bx
cmp al, '$'
jne cek

dec bx
mov cx, bx

xor bx,bx
mov ah,9
mov dx, offset asal
int 21h

mov ah,2
mov dl,13
int 21h
mov dl,10
int 21h

mov ah,9
mov dx,offset kata
int 21h
mov ah,1
int 21h

ulang:
mov dl,asal[bx]
inc bx
cmp dl, '$'
je salah
cmp al,dl
jne ulang
jmp benar

salah:
mov ah,2
mov dl,13
int 21h
mov dl,10
int 21h
mov ah,9
mov dx, offset ket2
int 21h
jmp barisbaru

benar:
mov ah,2
mov dl,13
int 21h
mov dl,10
int 21h
mov ah,9
mov dx, offset asal
int 21h
mov ah,2
mov dl,13
int 21h
mov dl,10
int 21h
mov ah,9
mov dx, offset ket1
int 21h
jmp barisbaru

barisbaru:
mov ah,2
mov dl,13
int 21h
mov dl,10
int 21h
int 20h

end data

setelah program dijalankan maka hasilnya adalah

widyautama
Huruf yang dicari : (kursor _) w
Huruf ditemukan

You May Also Like

0 komentar