Código:
void CHAT_COMMANDS::LimparPK(DWORD aIndex)
{
	OBJECTSTRUCT *lpObj = (OBJECTSTRUCT*)OBJECT_POINTER(aIndex);
	OBJECTSTRUCT * gObj = (OBJECTSTRUCT*)OBJECT_POINTER(aIndex);

	int tipovip = MYSQL->GetFieldInt("MuOnline.dbo.MEMB_INFO","Vip","WHERE memb___id='%s'",gObj->AccountID);

	int LevelPK = GetPrivateProfileInt("PkCommand","Level",0,CFG_COMMAND);
	int LevelPK1 = GetPrivateProfileInt("PkCommand","LevelVS",0,CFG_COMMAND);
	int LevelPK2 = GetPrivateProfileInt("PkCommand","LevelVP",0,CFG_COMMAND);
	unsigned int ZenPK = GetPrivateProfileInt("PkCommand","Price",30000000,CFG_COMMAND);
	unsigned int ZenPK1 = GetPrivateProfileInt("PkCommand","PriceVS",20000000,CFG_COMMAND);
	unsigned int ZenPK2 = GetPrivateProfileInt("PkCommand","PriceVP",10000000,CFG_COMMAND);
	
	if(stricmp(&this->PkAtivo[0], "NAO") == 0)
	{
		sprintf_s(msN,"[%s] Comando Desabilitado. Consulte Um Admin.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);
		return;
	}
	switch(tipovip)
	{
	case 0:
	{
	if(this->LevelPK > lpObj->Level)
	{
		sprintf_s(msN,"[%s] Você Não Tem Level Suficiente Para Ser Perdoado.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);
		return;
	}
	else if(this->ZenPK > lpObj->Money)
	{
		sprintf_s(msN,"[%s] Você Não Tem Zen Suficiente Para Ser Perdoado.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);
		return;
	}
	else if(lpObj->PkLevel < 5)
	{
		
		sprintf_s(msN,"[%s] Você Não Está PK.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);
		return;
	}

	else
	{
		sprintf_s(msN,"[%s] Parabéns Todos Os Seus Pecados Estão Perdoados.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);

        lpObj->PkLevel = 3;
		lpObj->Money -= this->ZenPK;
		GCPkLevelSend(aIndex,lpObj->PkLevel);
		GCMoneySend(aIndex,lpObj->Money);
		}
		}break;
	case 1:
	{
	if(this->LevelPK1 > lpObj->Level)
	{
		sprintf_s(msN,"[%s] Você Não Tem Level Suficiente Para Ser Perdoado.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);
		return;
	}
	else if(this->ZenPK1 > lpObj->Money)
	{
		sprintf_s(msN,"[%s] Você Não Tem Zen Suficiente Para Ser Perdoado.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);
		return;
	}
	else if(lpObj->PkLevel < 5)
	{
		
		sprintf_s(msN,"[%s] Você Não Está PK.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);
		return;
	}

	else
	{
		sprintf_s(msN,"[%s] Parabéns Todos Os Seus Pecados Estão Perdoados.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);

        lpObj->PkLevel = 3;
		lpObj->Money -= this->ZenPK1;
		GCPkLevelSend(aIndex,lpObj->PkLevel);
		GCMoneySend(aIndex,lpObj->Money);
		}
		}break;
    case 2:
	{
	if(this->LevelPK2 > lpObj->Level)
	{
		sprintf_s(msN,"[%s] Você Não Tem Level Suficiente Para Ser Perdoado.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);
		return;
	}
	else if(this->ZenPK2 > lpObj->Money)
	{
		sprintf_s(msN,"[%s] Você Não Tem Zen Suficiente Para Ser Perdoado.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);
		return;
	}
	else if(lpObj->PkLevel < 5)
	{
		
		sprintf_s(msN,"[%s] Você Não Está PK.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);
		return;
	}

	else
	{
		sprintf_s(msN,"[%s] Parabéns Todos Os Seus Pecados Estão Perdoados.",gObj->Name);
		ServerMsgSend(msN,aIndex,1);

        lpObj->PkLevel = 3;
		lpObj->Money -= this->ZenPK2;
		GCPkLevelSend(aIndex,lpObj->PkLevel);
		GCMoneySend(aIndex,lpObj->Money);
		            }
        }break;
    }
}
Créditos: -_Dark_-