Mencetak Hasil Pengurangan di Assembler

.model small

.code

org 100h

Tdata :

jmp Proses

kal db 'Hasil Pengurangan 20 - 10 =$'

Proses :

mov ah,09h

mov dx,offset kal

int 21h

mov ax,20

mov bx,10

sub ax,bx

mov bx,10

xor cx,cx

Ulang :

xor dx,dx

div bx

push dx

inc cx

cmp ax,0

jne ulang

Cetak :

pop dx

add dl,'0'

mov ah,02h

int 21h

loop cetak

int 20h

end Tdata

                          Praktek Bahasa Rakitan #Pertemuan 5