По экрану (хаотично!) летают два шарика (нули), зеркально отражаясь от его границ. К границе шарики подлетают под углом 45 градусов.

;По экрану (хаотично!) летают два шарика (нули), зеркально отражаясь от его границ. К границе шарики подлетают под углом 45 градусов. 
;Нажатие клавиши SPACE останавливает движение шариков, а последующее нажатие любой другой клавиши снова его возобновляет. 
;Выход из программы по нажатию клавиши ESC или при столкновении шариков.
 
          
model small
 
stack 100h
 
dataseg
    char    db     'O'
        char1   db  'O' 
    posx    db  40 
    posy    db  10 
    posx1   db  34 
    posy1   db  13 
 
 
codeseg
 
...
 
_loop:        m1:   call char_out_1; выводим символ на экран
                    cmp posy, 21
                    ja  razv1
                    inc posy
                    inc posx
                    
                    jne m1
                    
            razv1:  cmp posx, 55
                    je razv2
                    dec posy
                    inc posx 
                    jne m1
                    
            razv2:  
                    jne m1   
 
...
 
char_out_1 proc near        ; вывод первого шарика
    mov ah, 02h     ; в указанной позиции
    mov dh, posy
    mov dl, posx
    int 10h
 
    mov ah, 09h
    mov bl, 07h
    mov al, char
    mov cx, 1
    int 10h
 
    ret
    
    
char_out_1 endp
 
...
 
// описываем 2ю процедуру char_out_2 proc near(здесь не совсем понял с регистрами)
 
 
end

mov bx,00f9fh; Цикл задержки, вроде
m100:
mov cx,0ffffh
m200:
loop m200
dec bx
jnz m100

;include 'macro\masm.inc'
struc BALL x, y, ch, atr, dx, dy, ox, oy
{
.x  db  x     ; 0
.y  db  y     ; 1
.ch db  ch    ; 2
.atr    db  atr   ; 3
.dx db  dx    ; 4
.dy db  dy    ; 5
.ox db  ox    ; 6
.oy db  oy    ; 7
}
    org 100h
    push    cs
    pop ds
        ; очистка экрана
        call clear_scr
 
        ; главный цикл
_loop:  ;call char_out; выводим символ на экран
 
        mov     ah, 1       ; считываем код нажатой клавиши
        int     16h
        jz  draw
        cmp     ah, 1
        jz  exit       ; если это <ESC>
draw:   
    mov si, ballG
    call    ball
    call    delay
    mov si, ballR
    call    ball
    call    delay
    mov si, ballB
    call    ball
    call    delay
    mov si, ballY
    call    ball
    call    delay
    jmp _loop
 
 
exit:   call clear_scr
        mov ah, 4ch
        int 21h
 
 
clear_scr: ; proc       ; функция очистки экрана
        mov ax, 0600h
        mov bh, 07h
        mov cx, 0000h
        mov dx, 184fh
        int 10h
        ret
;clear_scr       endp
 
char_out:; proc
draw1:  ; proc near
        mov ah, 02h             ; в указанной позиции
        mov dh, [si+6]  ; ox
        mov dl, [si+7]       ; oy
        mov bh, 0
        int 10h
    mov ax, 0A20h
    xor bx,bx
    mov cx,1
    int 10h
                      ; вывод текущего символа
        mov ah, 02h             ; в указанной позиции
        mov dh, [si]    ; .x
        mov dl, [si+1]       ; .y
        mov bh, 0
        int 10h
 
        mov     ah, 09h
        mov al, [si+2]          ; chr
        mov bl, [si+3]      ; atr
        mov bh, 0
        mov cx, 1
        int 10h
        ret
;char_out endp
 
; проверки на допустимость и изменения координат символа
ball:
    mov al,[si]     ; y
    mov [si+6],al   ; oy
    add al, [si+4]  ; dy
    jz  @b0
    cmp al, 25
    jb  @b1
@b0:    neg byte [si+4] ; dy
@b1:    mov [si], al        ; y
;
    mov al,[si+1]   ; x
    mov [si+7],al       ; ox
    add al, [si+5]      ; dx
    jz  @b2
    cmp al, 80
    jb  @b3
@b2:    neg byte [si+5] ; dx
@b3:    mov [si+1], al      ; x
    call    draw1
    ret
 
delay:  pusha
    mov dx,378h     ; это LPT0:
    mov ecx, 0FFFh ; подбери сам
@_loop: in  al,dx
    loop    @_loop
    popa
    ret
 
ballR   BALL     0,  0, '*', 4, 1, 2, 0, 0
ballG   BALL    10, 14, '*', 2, -1,-2, 0, 0
ballB   BALL    10, 70, '*', 1, -1,2, 0, 0
ballY   BALL    20, 40, '*', 0Eh, 1,-2,0, 0
 
;end    start

model small
 
stack 100h
 
dataseg
    char    db               'O'
                    char1   db  'O' 
    posx    db  4 ;горизонтальная координата
    posy    db  2 ;вертикальная координата
    posx1   db  1 ;горизонтальная координата
    posy1   db  1 ;вертикальная координата
 
codeseg
 
    startupcode
 
    ; очистка экрана
    call clear_scr
 
    ; главный цикл
_loop:        m1:   call char_out_1; выводим символ на экран
                   cmp posy, 24              
                    je  razv1  
             m2:    mov ah,posy1                  ;
                    add posy, ah
                    mov ah, 1
                    add posx, ah
                 ;   int 21h
               
                    jne m1
                    
            razv1:  cmp posy, 1        ;отражает
                    je razv2
                    mov posy1,-1 
                    jne m2
                    
            razv2:  cmp posx, 60
                    je razv2
 
    mov ah, 0   ; считываем код нажатой клавиши
    int 16h
    cmp al, ' ' ; если это символ
;   je space
    cmp al, 09
    jne _loop       ; если это Tab
    jmp exit
 
 
exit:   call clear_scr
    mov ah, 4ch
    int 21h
 
    
clear_scr   proc near   ; функция очистки экрана
    mov ax, 0600h
    mov cx, 0000h
    mov dx, 184fh
    int 10h
clear_scr   endp
 
 
char_out_1 proc near        ; вывод первого шарика
    mov ah, 02h     ; в указанной позиции
    mov dh, posy
    mov dl, posx
    int 10h
 
    mov ah, 09h
    mov bl, 07h
    mov al, char
    mov cx, 1
    int 10h
    
    ; Цикл задержки
;                 mov bx,00078h        ;00f9fh
;                 m100:
;                 mov cx,0dfffh              ;0ffffh
;                 m200:
;                 loop m200
;                 dec bx
;                 jnz m100   
    ret
    
    
char_out_1 endp
 
end