Perkalian 3 bilangan dalam array - a blog of a local hero wannabe

.MODEL SMALL
.CODE
ORG 100h

Mulai:
    JMP Proses
    a DW 0
    b DW 0
    c DW 0
    k DW 4
    tabel DW 2,3,4
    Kal1 DB 'A = $'
    Kal2 DB 13,10,'B = $'
    Kal3 DB 13,10,'C = $'
    Kal4 DB 13,10,'A*B*C = $'

Proses:
    MOV AH,09
    MOV DX,OFFSET Kal1
    int 21h
    LEA BX,tabel
    MOV AX,tabel
    MOV a, AX
    JMP tampil
hitung1:
    MOV AH,09
    MOV DX,OFFSET Kal2
    int 21h
    LEA BX,tabel
    MOV AX,[BX]+2
    MOV b, AX
    JMP tampil
hitung2:
    MOV AH,09
    MOV DX,OFFSET Kal3
    int 21h
    LEA BX,tabel
    MOV AX,[BX]+4
    MOV c, AX
    JMP tampil
hitung3:
    MOV AH,09
    MOV DX,OFFSET Kal4
    int 21h
    MOV AX,a
    Mul b
    Mul c
    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,3
    JE hitung1
    CMP k,2
    JE hitung2
    CMP k,1
    JE hitung3
    CMP k,0
    JMP keluar

keluar:
INT 20h
END Mulai