Penambahan, Pengurangan dan Perkalian Assembly
A. Kode Program :
.MODEL SMALL
.CODE
ORG 100h
start : jmp proses
a DW 35
b DW 12
c DW 2
d DW 5
Kal01 DB 'Bil A = $'
Kal02 DB 13,10,'Bil B = $'
Kal03 DB 13,10,'Bil C = $'
Kal04 DB 13,10,'Hasil Penjumlahan A+B = $'
Kal05 DB 13,10,'Hasil Pengurangan B-C = $'
Kal06 DB 13,10,'Hasil Perkalian A*C = $'
proses:
mov AH,09
mov DX,OFFSET Kal01
int 21h
mov AX, a
jmp show
bag1 :
mov AH,09
mov DX,OFFSET Kal02
int 21h
mov AX, b
jmp show
bag2 :
mov AH,09
mov DX,OFFSET Kal03
int 21h
mov AX, c
jmp show
bag3 :
mov AH,09
mov DX,OFFSET Kal04
int 21h
mov AX, a
ADD AX, b
jmp show
bag4 :
mov AH,09
mov DX,OFFSET Kal05
int 21h
mov AX, b
SUB AX, c
jmp show
bag5 :
mov AH,09
mov DX,OFFSET Kal06
int 21h
mov AX, a
MUL c
jmp show
show :
DEC d
mov BX,10
XOR CX,CX
putar :
XOR DX,DX
DIV BX
PUSH DX
INC CX
cmp AX,0
JNE putar
print :
pop DX
ADD DL,'0'
mov AH,02
int 21h
loop print
je bag1
cmp d,3
je bag2
cmp d,2
je bag3
cmp d,1
je bag4
cmp d,0
je bag5
int 20h
END start
B. Screenshoot :
Tidak ada komentar:
Posting Komentar