Program teks berjalan dari kiri ke kanan
A500
Push ax
Push dx
Push bx
Push cx
Mov dx,bp
Mov bh,00
Mov ah,02
Int 10
Mov cx,c
Mov bx,0300
Mov dl,[bx]
Mov ah,02
Int 21
Inc bx
Loop 0512
Call 0200
Pop cx
Pop bx
Pop dx
Pop ax
Ret
A600
Push ax
Push dx
Push dx
Push cx
Mov dx,bp
Mov bh,00
Mov ah,02
Int 10
Mov cx,d
Mov bx,0400
Mov dl,[bx]
Mov ah,02
Int 21
Inc bx
Loop 0612
Call 0200
Pop cx
Pop bx
Pop dx
Pop ax
Ret
A400
Db’ yosefriandi’
A300
Db’yosefriandi’
A200
Push bp
Push cx
Mov bp,500
Mov cx,4000
Loop 208
Dec bp
Jnz 205
Pop cx
Pop bp
Ret
A100
Mov ah,00
Mov al,03
Int 10
Mov bp,1000
Call 0500
Call 0600
Mov ah,0b
Int 21
Cmp al,ff
Jz 0126
inc bp
Cmp bp,1040
Jnz 0109
Jmp 0106
Int 20
0 komentar:
Posting Komentar