11 lines
381 B
Plaintext
11 lines
381 B
Plaintext
void main()
|
|
{
|
|
object oPC = GetPCSpeaker();
|
|
effect eVis = EffectVisualEffect(VFX_DUR_IOUNSTONE_RED);
|
|
float fDuration = IntToFloat(75 + Random(46));
|
|
TakeGoldFromCreature(10000, oPC, TRUE);
|
|
SetLocalString(oPC, "FV_SHOP_ACCESS", "FV_VIRGINBLOOD");
|
|
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eVis, oPC, fDuration);
|
|
DelayCommand(fDuration, DeleteLocalString(oPC, "FV_SHOP_ACCESS"));
|
|
}
|