Penambahan, Pengurangan dan Perkalian Assembly

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

cmp d,4

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 :