.model small
.stack 100h

.data

COLOR equ 6
pos_x dw 10
pos_y dw 10
screen_color db COLOR

.code

PRINT macro
    mov AH, 0Ch
    mov AL, [screen_color]
    mov BX, 0
    mov CX, [pos_x]
    mov DX, [pos_y]
    int 10h

endm

;START
mov ax, @data
mov ds, ax

; Set video mode (320x200, 256 colors)
mov ax, 13h
int 10h

mov CX,50
print_loop:
    push CX
    PRINT
    inc [pos_y]
    inc [pos_x]
    pop CX
    loop print_loop

dont_exit:
jmp dont_exit

mov ax,4c01h
int 021h
end