// Free Pascal
// Author: Rinat Aminow <rinat84.a@gmail.com>

var bFPC;
if(typeof bFPC==="undefined")
{
    if(PE.section[".data"])
    {
        var nOffset=PE.section[".data"].FileOffset + PE.section[".data"].FileSize - 0x1024;

        bFPC=PE.findString(nOffset,0x1024,"FPC ")!=-1;
    }
}