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

init("compiler", "Microsoft QuickPascal");

function detect(bShowType, bShowVersion, bShowOptions) {
    if (MSDOS.compareEP("b0..9a########50b430cd213c..73..cd20b8....8ed88c06....c706........8c0e....58545b3bdc74..0ac074..be....e8....32c0e9")) {
        sVersion = "1.0-1.08";
        sOptions = "1989";
        bDetected = true;
    }


    _setLang("Pascal", bDetected);
    return result(bShowType, bShowVersion, bShowOptions);
}