journal of all scince V.1. NO.1 | Page 41

seg1 segment
assume cs:seg1
l:
mov bh,0
mov dh,12
mov dl,40
start: mov ah,2
int 10h
mov al,'*'
mov bh,0
mov bl,0FH
mov cx,1
mov ah,0ah
int 10h
mov ah,0
int 16h
cmp ah,1
je exit
cmp ah,4bh
jne R
mov al,' '
mov bh,0
mov cx,1
mov ah,0ah
int 10h
dec dl
cmp dl,0
jge start

R:

U:

mov dl,79
jmp start
cmp ah,4dh
jne U
mov al,' '
mov bh,0
mov cx,1
mov ah,0ah
int 10h
inc dl
cmp dl,79
jle start
mov dl,0
jmp start
cmp ah,48h
jne D
mov al,' '
mov bh,0
mov cx,1
mov ah,0ah
int 10h

dec dh
cmp dh,0
jge start
mov dh,24
jmp start
D:

cmp ah,50h
jne start
mov al,' '
mov bh,0
mov cx,1
mov ah,0ah
int 10h
inc dh
cmp dh,24
jle start
mov dh,0
jmp start
exit: mov a ????)????Š)???????)?????((0