22 lines
852 B
Plaintext
22 lines
852 B
Plaintext
void main()
|
|
// Modified by AW Olorin on 6-11-2004
|
|
// Changed trigger level of portal to above 16 to reflect Area Level Lists
|
|
|
|
{
|
|
object oPC = GetEnteringObject();
|
|
int hd = GetHitDice(oPC);
|
|
location loc = GetLocation(oPC);
|
|
location sucked = GetLocation(GetWaypointByTag("sucked"));
|
|
if (GetIsPC(oPC) && !GetIsDM(oPC) && hd >= 17){
|
|
ApplyEffectAtLocation(DURATION_TYPE_TEMPORARY, EffectVisualEffect(VFX_FNF_IMPLOSION), loc, 3.0);
|
|
DelayCommand(1.0, AssignCommand(oPC, JumpToLocation(sucked)));
|
|
DelayCommand(1.1, AssignCommand(oPC, TakeGoldFromCreature(100000, oPC, TRUE)));
|
|
DelayCommand(1.2, SendMessageToPC(oPC, "A strange portal has opened, and you have been sucked into it!"));
|
|
DelayCommand(1.3, SendMessageToPC(oPC, "Some of your gold has been turned to lead!"));
|
|
DelayCommand(1.4, SetCommandable(FALSE));
|
|
DelayCommand(4.0, SetCommandable(TRUE));
|
|
}
|
|
|
|
|
|
}
|