.model small
.code
org 100h
mulai: jmp start ;pindah ke label start
jmp proses ;pindah ke label Proses
jmp tambah ;pindah ke label tambah
jmp programing ;pindah ke label Programing
start: jmp begin ;pindah ke label begin
kal1 db “Masukan karakter Hexa antara a sampai f:$” ;isi dari variable dari kal1
programing:
jmp program ;pindah ke label Program
octav db “Desimalnya: $” ;isi dari variabel octav
begin: mov ah,09h ;output kalimat
lea dx,kal1 ;nilai dx adalah variabel ‘kal1′
int 21h ;eksekusi
proses: mov ah,01h ;input karakter
int 21h ;eksekusi
mov bl,al ;pindahkan al ke bl
sub bl,31h ;kurangkan nilai bl dengan 31h
tambah: mov ah,02h ;output karakter
mov dl,10 ;pindah baris
int 21h
mov ah,02h ;output karakter
mov dl,13 ;memulai karakter dari awal
int 21h
program:
mov ah,09h ;output kalimat
lea dx,octav ;pindahkan nilai di variabel ‘octav’ ke dx
int 21h
mov ah,02h ;output karakter
mov dl,”1″ ;masukan nilai dl 1
int 21h
progres:
mov ah,02h ;output karakter
mov dl,bl ;pindahkan nilai di bl ke dl
int 21h
ending:
int 20h ;ending program
end mulai
BAGI yang belum punya emulator 8086 nya bisa di download disini
Tidak ada komentar:
Posting Komentar