- [Duke's Virus Labs #8] - [Page 28] -

                     ୠ  D V L  # 8  ।⠢:

                 Duke's Pascal Overwriting Generator v0.02
                            (c) by Duke/SMF


DPOG -  , 騩 ᮧ 室 ⥪ १
Overwriting ᮢ  몥 Pascal.

 ⠢  DPOG :
-------------------------------------
   * DPOG.EXE      - ᯮ 䠩 ணࠬ
   * DPOG.CFG      - ਬ 䨣樮 䠩
   * DPOG.TXT      - ᠭ 
   * SAMPLE.ZIP    - ਬ ᮧ 
   * MAKEDPOG.EXE  - ᮧ 80 樮 DPOG ᮢ

 :
-------------------------
- ᮧ ᮢ ࠦ COM, EXE, COM & EXE 䠩
- ࠧ ਠ 楤 ࠦ
- ࠦ ᠬ    ࠭ ⢠ 䠩
-  ஢ન   ࠦ 䠩 COMMAND.COM
-  祭 ᮡ⢥ ᯥ䥪⮢
-  ࠡ⪨ ᠬ ਡ Read-Only
-  뢮 ᠬ ⥪⮢ ᮮ饭
-  ⨬樨 ࠧ 

History & what's new
--------------------

v0.01 - Nov'98
v0.02 - Jul'99
        ᠭ ᫥ ⮣,  AVP  DrWeb ⠫ ⥪஢
        HLLO.DPOG-based . ⮦ ᨣ  ⥪஢.
        饭  ࠡ. ࠢ ⢥ .

 :
----------------
 ⮣, ⮡ ᮧ   DPOG ࠡᯮᮡ HLLO-, 室
믮 ᫥騥 ⢨:

1)  䨣樮 䠩 ( ࠢ    祭
   㭪⮢    ). ।,  ⥪  㤥
   뢠  䠩 VIRUS.PAS.
2)    ࠬ஬:
           DPOG.EXE  DPOG.CFG
3) ⪮஢ 祭 PAS-䠩    Turbo Pascal
   (tpc.exe)  Borland Pascal (bpc.exe):
   TPC.EXE VIRUS.PAS        BPC.EXE VIRUS.PAS
4) ᫨  㪠  䨣樮 䠩  H=N,  室:
   a) ᬮ ࠧ 祭 䠩 VIRUS.EXE     䠩
      VIRUS.PAS  ப "VirusSize=",  饣 ⠬ ᫠ 4000;
   b) ᭮ ⪮஢ 䠩 VIRUS.PAS (    㭪 3)

᫥ ⮣ 100% ࠡ騩  ⮢!


ࠢ  䨣樮 䠩
------------------------------------------
 DPOG v0.02    窨  "饭"  짮⥫
室 १ 䨣樮 䠩.

ப 䨣樮 䠩, 稭騥  ᨬ ";", ஬
.

* A *
 ப 稭, ᮤঠ   (ਬ, A=DemoVirus).

* B *
 ப 稭, ᮤঠ    (ਬ, B=Duke/SMF).

* C *
 䠩,   㤥 뢠 室 ⥪   ᪠
(ਬ, C=virus.pas).

* D *
 䠩,   ࠦ ᮬ.  ਠ:
D=C  - ࠦ *.com 䠩
D=E  - ࠦ *.exe 䠩
D=B  - ࠦ *.com  *.exe 䠩

* E *
᫮ 稭,  ᫮ 䠩, ࠦ   .
᫨ 室 ࠧ  䠩 ⥪饣 ⠫,  室
⠢ E=0

* G *
 ४⥫ ⢥砥  ਡ ࠦ 䠩. 
᫥騥 ਠ:
G=Y  - ࠦ 䠩  ਡ⮬ Read-Only (.. ࠦ 䠩 c
       ਡ⠬ $21)
G=N  -  ࠦ Read-Only 䠩 (.. ࠦ 䠩  ਡ⠬ $20)

* H *
४⥫ ᯮᮡ ࠦ 䠩, ᪠騩  ਠ:
H=Y  - ᯮ짮 COMMAND.COM  ࠦ 䠩.  ⮬ ࠧ
       ᮧ  砥  訬.
H=N  -  ᯮ짮 COMMAND.COM,  ᯮ짮 ᮡ⢥ 楤
        ࠦ 䠩.  ⮬ ࠧ ᮧ  㤥
       .

* I *
४⥫ ⢥騩  ஢ 䠩 । ࠦ. 뢠
஬ ⮫쪮  ⮬ 砥,  D=C  D=B .   ਠ:
I=Y  - ஢   䠩   ࠦ COMMAND.COM (
        ࠦ COMMAND.COM ᮬ ⠭ 㦠 設)
I=N  - ࠦ   䠩  ஢ન

* J *
 襭 ࠡ  뢮  ࠭ 㪠  ⮬ ࠬ
⥪⮢ ப. ⢮ ப "J="   ॢ 25 . ⮡
 ᮮ饭  뢮, 室 ⠢ ப "J=" 
祭.

* K *
祭 䠩  ᯥ䥪⠬.
    ⮫쪮 楤, ଫ  :
    procedure _楤;{ ࠬ஢}
    begin
    {⥫ 楤}
    end;
᫨  ࠡ 楤 ॡ 㣨 㫨,  dos.tpu,   
  楤.
ଠ : K=_䠩#_楤
᫨ ⠢ ப "K="  祭,  祣  砥.

* L *
४⥫, ⢥騩  ⨬    ᪠騩 
ਠ:
L=Y  -  室 ⥪   ப, 㬥 ࠧ
       ⪮஢ 
L=N  - ⨬  ࠧ 䠩  ந

 ᯮ짮 DPOG
---------------------
  DPOG ⠢  짮⥫ﬨ ࠢ ஢ 
᢮ ᬮ७ ᮤন ᣥ஢ ஬ ᮢ, ⠢
 ⮬  室 ⥪  ப "Generator:='[DPOG v0.02]';".



