SetFag.pas Fag.asm, . SetFag (.8.1) , Fag.asm (.8.2) . , Fag.asm
tasm fag /L
13
Warning* Open procedure: XXXXXX :
Error message: None Warning message: 13 Passes: I Remainig memory: XXX
Error message None , fag.lst, . fag.obj Fag.prg
tiink fag, fag.prg
Warning: No stack
, Fag.prg SetFag.exe, PRG. -
setfag NAME,
NAME- . , SetFag.exe . NAME , / * ? - , . ,
setfag d:\mydir *
- MYDIR D.
. , MZ ( -). , , , . , , ( ). , -. . - , /NOBAK, setfag myprog /nobak. , :
Type
HeadType = record
case Byte of
1:(Sign: Word; { 'MZ' = $5MD}
PartPag: Word; { }
PageCnt: Word; { }
ReloCnt: Word; { }
HdrSize: Word; { }
MinMem: Word; { }
: Word); { }
end.
, , F_Anti CheckFile . , , , . SetFag.
|
|
ReloSS: Word; { SS}
ExeSP: Word; { SP}
ChkSum: Word; { }
ExelP: Word; { }
ReloCS: Word; { CS});
2:(W: array [1..12] of Word) end;
TAVir = record
Head24: HeadType; {24 }
Starts: Word; { }
StartO: Word; { } Leng24: Longint;{ 24 }
Key: Word; { }
end;
, - F_Anti: 24 ( TablOff Overlay), HFf StartS StartO . Key - . SizeOf {TAVir) 34 .
.
1) FAG.PRG. SetFag , /F: NameFag.Ext, NameFag,Ext- , . , SetFag 34 (. FAG. ASM) 34 . P^G . , .
2) Head24 TAVir - : StartS StartO ; LS , - ( , ); ReloCS , ExelP- ; PageCnt PartPag; MinMem ExeSP , .
3) - HH.Head24, 15*16 . FAG. ASM .
, PSP DS ( ) DS CS ( ). , SPO , CSO- . ( , PSP+16) StartS- .
|
|
( ). GetExeNome - . , 3.0 . - 32 , COMSPEC, PATH, PROMPT .. , ASCII, 0 - IBM ASCIIZ (Z - Zero, ). . ( ) . , ( ) , , . , , - . , , , . , :
db *COMSPEC==C:\COMMAND. ',0;
COMSPEC db 'PATH=C:\;C:\DOS;D:\TP*,0;
PATH db * PROMPT==$p$g *, 0;
PROMPT db 0;
( 3.0 !).
dw 2;
db 'D:\MYDIR\SETFAG. ',0;
db */NOBAK*,0;
PSP ( 44 PSP).
, SetFag Fag.asm . , - . , , Yankee , .
Fag.asm , , . , , , .
AntiVir
, , . ̗ ? , , ^ , . ( ) PSP . , - . , 1 , .
AntiVir (.9.1), . PSP. - .
|
|
AntiVir , . .
. Turbo Vision. :
ANTIVIR
,
ANTIVIR /AUTO
.
, . , $13 BIOS . $13 BIOS. BIOS , , - BIOS , $13 ( $13 110. ). $13 $2F, $13 DS'.DX . DS'.DX $13, DS'.DX (. BuildArch ANTIVIR). $62 , $13, . , / ( Double Space Stacker). , , . PSP .
1) F_Anti Uses- .
2) -, (, ., lexicon.exe ..), Fag.prg. , , F_Anti, .
3) ̗ - Antivir. ( /AUTO) AUTOEXEC.BAT.
4) ( ) .