cseg segment para public 'code' assume cs:cseg,ds:cseg org 100h main: jmp begin mess db ' ',10,13 db 'ллллллл лл лл ллллл лл лл лл лл лл лл лллллл лл лл ',10,13 db ' ллл лл лл л лл лл лл лл лл лл лл лл лл лл лл ',10,13 db ' ллл лл лл л лл лл лл лл лл лл лл лл лл лл лл ',10,13 db ' ллл лл лл лл лл ллл лл лл лл лл лл лл лл лл лл ',10,13 db ' ллл лллллллл лл лл лл л лл лллл лл лл лл лл лл ',10,13 db ' ллл лл лл лллллллл лл л лл лл лл лл лл лл лл лл ',10,13 db ' ллл лл лл лл лл лл ллл лл лл лл лл лл лл лл ',10,13 db ' ллл лл лл лл лл лл лл лл лл лл лл лл лл лл ',10,13 db ' ллл лл лл лл лл лл лл лл лл лл лллллл лл ',10,13 db ' ',36 begin: ;; “ст ­ ЂЋЈЂ ЅЌ уЊ Ї тЅЋь ­  ЂЈЄЅЎЁуфЅр ;; mov ax,0b800h mov es,ax ;; ŽчЈщ ЅЌ эЊр ­ ­  фЈЇЈчЅсЊЎЌ урЎЂ­Ѕ ;; mov di,0 mov cx,4000 mov ax,0 rep stosw ;; lea dx,mess mov ah,9 int 21h mov al,00h continue: mov bx,0 mov di,1 mov dx,25 ;; nextstr: mov cx,80 ;; do: or byte ptr es:[bx+di],al mov ah,al xor ah,0f0h and byte ptr es:[bx+di],ah inc di inc di loop do ;; ;; add bx,160 inc al and al,07h dec dx cmp dx,0 jne nextstr mov cx,0ffffh delay: loop delay mov ah,1 int 16h jz continue retn cseg ends end main