6_18

;====== Программа 18 Файл z6_pr18.asm ====================

MASM
MODEL small
STACK 256




.code

delay macro time

    local outer,inner
    mov cx,time
outer:
    push cx
    mov cx,20000
inner:
    loop inner
    pop cx
    loop outer
endm


;Первый параметр = адрес строки, второй параметр = ее длина

; outstring macro mes,len

; -----

; endm


main:
    mov ax,@data
    mov ds,ax
    ; outstring m1,3
    ; outstring m2,4
    ; delay 5
    ; outstring m3,1

    mov dl,m3
    mov ah,02h
    int 21h


    mov     ax,4C00h
    int     21h


.data
    m1 db '<>'
    m2 db '*** '
    m3 db '!'


end main