ORG 100h
MOV AL, VAR1 ; check value of VAR1 by moving it to AL.
MOV BX, OFFSET VAR1 ; get address of VAR1 in BX.
MOV BYTE PTR [BX], 44h ; modify the contents of VAR1.
MOV AL, VAR1 ; check value of VAR1 by moving it to AL.
mulai1: mov al, 1
mov bh, 0
mov bl, 0100_1110b
mov cx, msg1end - offset msg1 ; calculate message size.
mov dl, 79
mov dh, 0
push cs
pop es
mov bp, offset msg1
mov ah, 13h
int 10h
jmp msg1end
msg1 db "m"
msg1end:
jmp mulai2
mulai2: mov al, 1
mov bh, 0
mov bl, 0100_1100b
mov cx, msg2end - offset msg2 ; calculate message size.
mov dl, 79
mov dh, 1
push cs
pop es
mov bp, offset msg2
mov ah, 13h
int 10h
jmp msg2end
msg2 db "e"
msg2end:
jmp mulai3
mulai3: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg3end - offset msg3 ; calculate message size.
mov dl, 79
mov dh, 2
push cs
pop es
mov bp, offset msg3
mov ah, 13h
int 10h
jmp msg3end
msg3 db "u"
msg3end:
jmp mulai4
mulai4: mov al, 1
mov bh, 0
mov bl, 0100_0010b
mov cx, msg4end - offset msg4 ; calculate message size.
mov dl, 79
mov dh, 3
push cs
pop es
mov bp, offset msg4
mov ah, 13h
int 10h
jmp msg4end
msg4 db "t"
msg4end:
jmp mulai5
mulai5: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg5end - offset msg5 ; calculate message size.
mov dl, 79
mov dh, 4
push cs
pop es
mov bp, offset msg5
mov ah, 13h
int 10h
jmp msg5end
msg5 db "i"
msg5end:
jmp mulai6
mulai6: mov al, 1
mov bh, 0
mov bl, 0100_0110b
mov cx, msg6end - offset msg6 ; calculate message size.
mov dl, 79
mov dh, 5
push cs
pop es
mov bp, offset msg6
mov ah, 13h
int 10h
jmp msg6end
msg6 db "a"
msg6end:
RET
VAR1 DB 22h
END
Tidak ada komentar:
Posting Komentar