asdfas
f d
d f
s a
a s
fdsafd
Рисование символами
Здраствуйте. Помогите з Асемблером, если есть знатоки. Tasm 4.0. Написать програму, которая выводить строку на 20 символов в виде квадрата (ну на вид ето прямоугольник, но по количеству символов в грани - квадрат). Например:'asdfasdfasdfasdfasdf' (20 символов):
Часть задания сделал. Теперь нужно только правильно курсор перемещать
Код:
Часть задания сделал. Теперь нужно только правильно курсор перемещать
Код:
%TITLE "Lab6"
IDEAL
MODEL small
STACK 256
DATASEG
exCode DB 0
Msg DB 'algpembuqwobnzcbtphmdlepgmcuqpbmditkglblsyqitmboaltibnqplmstgaqt',13,10,'$'
CODESEG
Start:
mov ax, @Data
mov ds,ax
mov cx,64
mov di,offset Msg
mov ah,02h
print:
mov dl,[di]
int 21h
inc di
dec cx
;здесь нужно курсор переместить
jnz print
Exit:
mov ah,04Ch
mov al,[exCode]
int 21h
END Start
IDEAL
MODEL small
STACK 256
DATASEG
exCode DB 0
Msg DB 'algpembuqwobnzcbtphmdlepgmcuqpbmditkglblsyqitmboaltibnqplmstgaqt',13,10,'$'
CODESEG
Start:
mov ax, @Data
mov ds,ax
mov cx,64
mov di,offset Msg
mov ah,02h
print:
mov dl,[di]
int 21h
inc di
dec cx
;здесь нужно курсор переместить
jnz print
Exit:
mov ah,04Ch
mov al,[exCode]
int 21h
END Start
а почему нельзя строку сделать Msg DB 'algpem',13,10,'buqwob',13,10,'nzcbt',13,10,'phmdle',13,10,'pgmcu',13,10,'qpbmditkgl',13,10,'blsyqitmboa',13,10,'ltibnqplmstgaqt',13,10,'$' к примеру и вывести ее полностью?
Потому что задание на использование перемещения курсора заданием оотвеетствующих координат в ah