mirror of
https://github.com/horsicq/Detect-It-Easy.git
synced 2026-06-24 01:54:08 +00:00
f249f403a6
Rename many db/MSDOS detection rules to include category prefixes (e.g. compiler_, extender_, immunizer_, linker_, protector_, other_) for clearer organization. Add sLang assignment for Microsoft_C rule to set "C" or "C/C++" based on sName. Normalize formatting/whitespace in several scripts and remove executable bit from a few rule files. No detection logic changes besides the explicit sLang assignment.
32 lines
No EOL
1 KiB
JavaScript
32 lines
No EOL
1 KiB
JavaScript
// Detect It Easy: detection rule file
|
|
// Author: hypn0 <hypn0@mail.ru>
|
|
// http://www.edm2.com/index.php/IBM_PC_Pascal_Compiler
|
|
meta("compiler", "IBM PC Pascal");
|
|
|
|
function detect() {
|
|
if (MSDOS.compareEP("b8....8ed88c06....fa8ed0268b1e....2bd881fb....7e..bb....d1e3")) {
|
|
sVersion = "2.00";
|
|
sOptions = "1984";
|
|
bDetected = true;
|
|
} else if (MSDOS.compareEP("b8....8ed88bd08c06....268b1e....891e....2bd8f7c3....75..b1..d3e3")) {
|
|
sVersion = "2.05";
|
|
sOptions = "1987";
|
|
bDetected = true;
|
|
} else if (MSDOS.compareEP("ba....b4..b0..8cc98ed9cd21")) {
|
|
sVersion = "2.00";
|
|
sOptions = "1984";
|
|
bDetected = true;
|
|
} else if (MSDOS.compareEP("b8....8ed88c06....ba....d1eab9....2bcad1ea")) {
|
|
sVersion = "1.00";
|
|
sOptions = "1981";
|
|
bDetected = true;
|
|
} else if (MSDOS.compareEP("2e8e1e....8cd08cdb2bc3d1e0")) {
|
|
sVersion = "2.02";
|
|
sOptions = "1987";
|
|
bDetected = true;
|
|
}
|
|
|
|
sLang = "Pascal";
|
|
|
|
return result();
|
|
} |