home *** CD-ROM | disk | FTP | other *** search
/ Software Recommendations - 1998 Season 1 / DNBCD4.iso / share / compress / exe / untiny / EXELOCKF / EXELOCKF.ASM next >
Encoding:
Assembly Source File  |  1997-07-18  |  2.5 KB  |  88 lines
  1. ;; faker, rar, 12.01.96
  2. ;; install this tsr and execute the corrupted EXE-Lock Program....
  3. ;; found it on a virus creation kit called DREG....
  4.  
  5. comment ß
  6.  
  7.  
  8. (C)opyright 1987-97 (ALL RIGHTS RESERVED!)
  9.  
  10.             ┌────────────────────────────────┐
  11.             │ ROSE Softwareentwicklung       │█
  12.             │ Dipl.-Ing. (FH) Ralph Roth     │█
  13.             │ Finkenweg 24                   │█
  14.             │                                │█
  15.             │ D 78658 Zimmern o. R.          │█
  16.             │                                │█
  17.             │ FAX/AB:  +49.741-32647         │█
  18.             └────────────────────────────────┘█
  19.               ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
  20.  
  21.     EMail:        Ralph_Roth@p2.f2101.n246.z2.fidonet.org
  22.     Fido:         2:246/2101.2
  23.  
  24.  
  25. Type Bits/KeyID    Date       User ID
  26. pub   512/CC3742A5 1995/02/08 Dipl.-Ing. (FH) Ralph Roth, Fido: 2:246/2101.2
  27.  
  28. -----BEGIN PGP PUBLIC KEY BLOCK-----
  29. Version: 2.6.3i
  30.  
  31. mQBNAi847YIAAAECANEe8vGPyKnR0bVoMO9vEu0hD+pMItDzLSvxqWF8W8YWzZ3U
  32. AdhzfNDKL9uEo6BY/jHAF3m8vi5T//pgOsw3QqUABRG0HVJhbHBoIFJvdGggPHJh
  33. ckBmaC1hbGJzaWcuZGU+iQBVAwUQMvEC1v/6YDrMN0KlAQGq1AH9GOZnCI5VSJK6
  34. EJGPK8UwYnzIhN3YGg1uBBCzsrMnPucB8J8GnaYxfA/r9bBsjfUYPkhI9s0XumAt
  35. ScbHr68TxrQuRGlwbC4tSW5nLiAoRkgpIFJhbHBoIFJvdGgsIEZpZG86IDI6MjQ2
  36. LzIxMDEuMokAVQMFEDL45u+ZiMHovEmyvQEBZScB/iWIEez/0zVa4e0lYQjgy82i
  37. TBemfNnm3ABzr9e9iqbO5Vg0Ne2FxquawIo6Nl4wvzD1oyuGl6PDo592M5+41CiJ
  38. AFUDBRAyxov///pgOsw3QqUBAbEhAf9cIvlfV0oTQ7tZ58V/xlVfY7YoCdHpjbif
  39. bBw8sdUZLhpueAEZKEUOO2BVMFnP4toA8CgDS27gSYowQRrk/3DD
  40. =sAec
  41. -----END PGP PUBLIC KEY BLOCK-----
  42.  
  43.  
  44. ß
  45. .model  tiny
  46. .code
  47. .286
  48. include rose.inc
  49.  
  50.         org     100h
  51.  
  52. start:  jmp     init
  53. ;; ---------------------------------------------------------
  54. newint21:
  55.  
  56.         .IF     AH == 4ch  && DX==102h   ; EXE-Lock?
  57.         iret
  58.         .ENDIF
  59. retit:
  60.         db      0eah                    ; far_jmp
  61. old21   dw      0, 0
  62.  
  63. ;;----------------------------------------------------------------------
  64.  
  65. init:
  66.         mov     ah, 9
  67.         mov     dx, offset intro
  68.         int     21h
  69.  
  70.         @GetInt 21h
  71.  
  72.         mov     cs:old21, bx
  73.         mov     cs:old21+2, es
  74.         @SetInt 21h, newint21, cs
  75.  
  76.         push    cs
  77.         pop     ds
  78.  
  79.         mov     dx, offset Init         ; resident until
  80.         int     27h
  81.  
  82. .data
  83. intro   db      13, 10
  84. %       db      13, 10, "ExeLock Faker by ROSE, Ralph Roth ■ 1.01 ■ &@Date& ■ Freeware"
  85.         db      13, 10, "Installed...."
  86.         db      13, 10, 13, 10, "$"
  87. end     start
  88.