Kasus Assembly - a blog of a local hero wannabe

.MODEL SMALL
.CODE
ORG 100h

Mulai:
    JMP Proses
    a DW 0
    b DW 0
    k DW 5
    tabel DW 19,10,17
    Kal1 DB 'A = $'
    Kal2 DB 13,10,'B = $'
    Kal3 DB 13,10,'C = $'
    Kal4 DB 13,10,'A-B = $'
    Kal5 DB 13,10,'B+C = $'
    Kurang DB 13,10,'Hasil Pengurangan < Hasil Penjumlahan, maka',13,10,'Hasil perkalian hasil operasi = $'
    Equal DB 13,10,'Hasil Pengurangan = Hasil Penjumlahan, maka',13,10,'Hasil penjumlahan hasil operasi = $'
    Lebih DB 13,10,'Hasil Pengurangan > Hasil Penjumlahan, maka',13,10,'Hasil pengurangan hasil operasi = $'
Proses:
    MOV AH,09
    MOV DX,OFFSET Kal1
    int 21h
    LEA BX,tabel
    MOV AX,tabel
    JMP tampil
hitung1:
    MOV AH,09
    MOV DX,OFFSET Kal2
    int 21h
    LEA BX,tabel
    MOV AX,[BX]+2
    JMP tampil
hitung2:
    MOV AH,09
    MOV DX,OFFSET Kal3
    int 21h
    LEA BX,tabel
    MOV AX,[BX]+4
    JMP tampil
hitung3:
    MOV AH,09
    MOV DX,OFFSET Kal4
    int 21h
    LEA BX,tabel
    MOV AX,tabel
    SUB AX,[BX]+2
    MOV a,AX
    JMP tampil
hitung4:
    MOV AH,09
    MOV DX,OFFSET Kal5
    int 21h
    LEA BX,tabel
    MOV AX,[BX]+2
    ADD AX,[BX]+4
    MOV b,AX
    JMP tampil
tampil :
    DEC k
    mov BX,10
    XOR CX,CX
putar :
    XOR DX,DX
    DIV BX
    PUSH DX
    INC CX
    cmp AX,0
    JNE putar
cetak :
    pop DX
    ADD DL,'0'
    mov AH,02
    int 21h
    loop cetak
    CMP k,4
    JE hitung1
    CMP k,3
    JE hitung2
    CMP k,2
    JE hitung3
    CMP k,1
    JE hitung4
    CMP k,0
    JE hitung5
    JMP keluar
hitung5:
    MOV AX,a
    CMP AX,b
    JB kecil
    JA besar
    JE sama
kecil:
    MOV AH,09
    MOV DX,OFFSET Kurang
    int 21h
    MOV AX,a
    Mul b
    JMP tampil
sama:
    MOV AH,09
    MOV DX,OFFSET Equal
    int 21h
    MOV AX,a
    ADD AX,b
    JMP tampil
besar:
    MOV AH,09
    MOV DX,OFFSET Lebih
    int 21h
    MOV AX,a
    SUB AX,b
    JMP tampil
keluar:
INT 20h
END Mulai