#include "database_inc"

void main()

{

object pres1PC = GetPCSpeaker();

if(GetGold(pres1PC)>4999)
{
TakeGoldFromCreature(5000, pres1PC, TRUE);
SetLocalInt(pres1PC, "X1_AllowArcher", 0);
DBSetPrestigePermisson (pres1PC,CLASS_TYPE_ARCANE_ARCHER);
SendMessageToPC(pres1PC, "You have unlocked the Arcane Archer Prestige Class");
}
else
{
}
}