[INC] VIP (Save and Load with Dini)

/*
    @Project: Save and Get VIP With Dini
    @Credits: DraKiNs and DracoBlue (in Dini)
    @Date: 03/06/200xB
    @Release: 29/06/200xB
    @Site: www.ips-team.blogspot.com
*/

//================ [ Funções Vip Salvável ] ===================================

stock getDiasVip(sPlayer[])                    // Exemplo: if(getDiasVip("DraKiNs.ini")) print("drakisn é vip");
{
    new
        iYear_,
        iMonth_,
        _iDay;

    new
        iDay_   =   dini_Int(sPlayer, "Dia");
        _iMonth  =   dini_Int(sPlayer, "Mes");
        _iYear  =  dini_Int(sPlayer, "Ano");

    getdate(_iYear, _iMonth, iDay_);

    return (iYear_ == _iYear && _iMonth == iMonth_ && iDay_ == _iDay);
}


stock setDiasVip(iDias,sPlayer[])                //Exemplo: setDiasVip(20,"DraKiNs.ini");  (20 dias de vip para drakins)
{
    new Year, Month, Day;
    getdate(Year, Month, Day);
    return giveDias(Day, Month, Year,iDias,sPlayer);
}

// =============== [ Função para fazer as funções de vips] =================
stock giveDias(iDia,iMes,iAno,iDias,sPlayer[])
{
    new
        iMeses[6] =
        {
            1,
            2,
            4,
            6,
            8,
            9,
            0xB
        },
        bool:iMesAtual = false,
        sString[0x1F];

    iDia += iDias;
    if(iDia > 0x1E) {
        iVoltar:
        for(new i; i < sizeof(iMes); ++i) {
            if(iMes == iMeses[i]) {
                iMesAtual = true;
            }
        }
    }
    if(iMesAtual) {
        iMes++;
        iDia =- 0x1F;
        if(iDia > 0x1F) {
            goto iVoltar;
        }
    }
    else if(iDia > 0x1F) {
        iMes++;
        iDia =- 0x1F;
        if(iDia > 0x1F) {
            goto iVoltar;
        }
        iMesAtual = false;
    }
    return dini_IntSet(sPlayer,"Dia",iDia), dini_IntSet(sPlayer,"Mes",iMes), dini_IntSet(sPlayer,"Ano",iAno), true;
}