org 100h
call 1
call 2
call 3
call 4
call 5
call 6
call 7
call 8
call 9
call 10
call 11
call 12
call 13
call 14
call 15
call 16
call 17
call 18
1 proc
mulai1: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg1end - offset msg1 ; calculate message size.
mov dl, 00
mov dh, 00
push cs
pop es
mov bp, offset msg1
mov ah, 13h
int 10h
jmp msg1end
msg1 db "meutia yoansyah"
msg1end:
1 endp
2 proc
mulai2: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg2end - offset msg2 ; calculate message size.
mov dl, 00
mov dh, 05
push cs
pop es
mov bp, offset msg2
mov ah, 13h
int 10h
jmp msg2end
msg2 db "palembang_27_02_1992"
msg2end:
2 endp
3 proc
mulai3: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg3end - offset msg3 ; calculate message size.
mov dl, 00
mov dh, 08
push cs
pop es
mov bp, offset msg3
mov ah, 13h
int 10h
jmp msg3end
msg3 db "TK4"
msg3end:
3 endp
4 proc
mulai4: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg4end - offset msg4 ; calculate message size.
mov dl, 00
mov dh, 12
push cs
pop es
mov bp, offset msg4
mov ah, 13h
int 10h
jmp msg4end
msg4 db "unsri"
msg4end:
4 endp
5 proc
mulai5: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg5end - offset msg5 ; calculate message size.
mov dl, 00
mov dh, 18
push cs
pop es
mov bp, offset msg5
mov ah, 13h
int 10h
jmp msg5end
msg5 db "teknik"
msg5end:
5 endp
6 proc
mulai6: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg6end - offset msg6 ; calculate message size.
mov dl, 00
mov dh, 24
push cs
pop es
mov bp, offset msg6
mov ah, 13h
int 10h
jmp msg6end
msg6 db "palembang"
msg6end:
6 endp
7 proc
mulai7: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg7end - offset msg7 ; calculate message size.
mov dl, 40
mov dh, 00
push cs
pop es
mov bp, offset msg7
mov ah, 13h
int 10h
jmp msg7end
msg7 db "?"
msg7end:
7 endp
8 proc
mulai8: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg8end - offset msg8 ; calculate message size.
mov dl, 40
mov dh, 05
push cs
pop es
mov bp, offset msg8
mov ah, 13h
int 10h
jmp msg8end
msg8 db "?"
msg8end:
8 endp
9 proc
mulai9: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg9end - offset msg9 ; calculate message size.
mov dl, 40
mov dh, 08
push cs
pop es
mov bp, offset msg9
mov ah, 13h
int 10h
jmp msg9end
msg9 db "?"
msg9end:
9 endp
10 proc
mulai10: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg10end - offset msg10 ; calculate message size.
mov dl, 40
mov dh, 12
push cs
pop es
mov bp, offset msg10
mov ah, 13h
int 10h
jmp msg10end
msg10 db "?"
msg10end:
10 endp
11 proc
mulai11: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg11end - offset msg11 ; calculate message size.
mov dl, 40
mov dh, 18
push cs
pop es
mov bp, offset msg11
mov ah, 13h
int 10h
jmp msg11end
msg11 db "?"
msg11end:
11 endp
12 proc
mulai12: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg12end - offset msg12 ; calculate message size.
mov dl, 40
mov dh, 24
push cs
pop es
mov bp, offset msg12
mov ah, 13h
int 10h
jmp msg12end
msg12 db "?"
msg12end:
12 endp
13 proc
mulai13: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg13end - offset msg13 ; calculate message size.
mov dl, 78
mov dh, 00
push cs
pop es
mov bp, offset msg13
mov ah, 13h
int 10h
jmp msg13end
msg13 db "?"
msg13end:
13 endp
14 proc
mulai14: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg14end - offset msg14; calculate message size.
mov dl, 78
mov dh, 05
push cs
pop es
mov bp, offset msg14
mov ah, 13h
int 10h
jmp msg14end
msg14 db "?"
msg14end:
14 endp
15 proc
mulai15: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg15end - offset msg15 ; calculate message size.
mov dl, 78
mov dh, 08
push cs
pop es
mov bp, offset msg15
mov ah, 13h
int 10h
jmp msg15end
msg15 db "?"
msg15end:
15 endp
16 proc
mulai16: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg16end - offset msg16 ; calculate message size.
mov dl, 78
mov dh, 12
push cs
pop es
mov bp, offset msg16
mov ah, 13h
int 10h
jmp msg16end
msg16 db "?"
msg16end:
16 endp
17 proc
mulai17: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg17end - offset msg17 ; calculate message size.
mov dl, 78
mov dh, 18
push cs
pop es
mov bp, offset msg17
mov ah, 13h
int 10h
jmp msg17end
msg17 db "?"
msg17end:
17 endp
18 proc
mulai18: mov al, 1
mov bh, 0
mov bl, 0100_1011b
mov cx, msg18end - offset msg18 ; calculate message size.
mov dl, 78
mov dh, 24
push cs
pop es
mov bp, offset msg18
mov ah, 13h
int 10h
jmp msg18end
msg18 db "?"
msg18end:
18 endp
end
Tidak ada komentar:
Posting Komentar