Detect-It-Easy/db/PE/compiler_Virtual_Pascal.4.sg

// Detect It Easy: detection rule file
// Author: hypn0 <hypn0@mail.ru>

// https://en.wikipedia.org/wiki/Virtual_Pascal
meta("compiler", "Virtual Pascal");

function detect() {
    if (PE.compareEP("b9........b8........e8$$$$$$$$83ec..fc51e8")) {
        sVersion = "2.1";
        bDetected = true;
    }

    sLang = "Pascal";

    return result();
}