Антивирусный модуль из книги В.В.Фаронова"Практика программирования на Паскале" f_anti.pas - Executable virus protection; Модуль содержит программу контроля возможногозаражения исполняемого EXE-файла компьютернымвирусом. Эталонный заголовок файла и его длиназапоминаются при первом запуске программыв типизированной константе HEAD. Если фактзаражения установлен, программа сообщает обэтом, переносит копию на место испорченноговирусом заголовка файла и восстанавливаетдлину файла.