// Detect It Easy: detection rule file
// Author: horsicq <horsicq@gmail.com>

meta("compiler", "StonyBrook Pascal+");

function detect() {
    if (MSDOS.compareEP("31ED9A........5589E581EC....B8....0E509A........BE....1E0EBF....1E071FFC")) {
        sVersion = "7.0";
        bDetected = true;
    } else if (MSDOS.compareEP("31ed9a........5589e5b8....50ff1e")) {
        sVersion = "6.13";
        bDetected = true;
    } else if (MSDOS.compareEP("31ed9a........5589e581ec....16078dbe....b9....31c0fcf3ab1e07")) {
        sVersion = "6.12";
        bDetected = true;
    } else if (MSDOS.compareEP("31ed9a........5589e59a........c706........c706........e8")) {
        sVersion = "6.1G";
        bDetected = true;
    } else if (MSDOS.compareEP("31ed9a........5589e583ec..9a........9a")) {
        sVersion = "6.14";
        bDetected = true;
    }

    sLang = "Pascal";

    return result();
}
