[FNC] CheckFileForBuggers

stock CheckFileForBuggers()
{
    new buf[2048], File:handle = fopen("money/money.txt", io_read), c, kelintas, kur[2], suma[11];
    if(handle)
    {
        while(fread(handle, buf))
        {
            if(strfind(buf, "[BANK | CH]", true) == -1 || strfind(buf, "Opt: 10", true) == -1) continue;
            kelintas = 0;
            for(c = 0; c < 200; c++)
            {
                if(buf[c] == 0x7C)
                {
                    kelintas ++;
                    if(kelintas == 1) continue;
                                kur[kelintas-2] = c;
                    if(kelintas > 2) break;
                }
            }
            strmid(suma, buf, kur[0] + 6, kur[1] - 1);
            if(strval(suma) > 3000) print(buf);
        }
        fclose(handle);
    }
    return 1;
}