7b9e44ebbb
Initial upload. PRC8 has been added. Module compiles, PRC's default AI & treasure scripts have been integrated. Started work on top hak for SLA / Ability / Scripting modifications.
32 lines
947 B
Plaintext
32 lines
947 B
Plaintext
#include "database_inc"
|
|
|
|
void main()
|
|
{
|
|
//Get PC
|
|
object oPC = GetLastUsedBy();
|
|
object oTarget = GetObjectByTag("fr_iwd_gw_portal_inv");
|
|
//get the target waypoint destination
|
|
object oDrop = GetWaypointByTag("fr_iwd_gw_portal_loc");
|
|
|
|
if(GetLocalInt(oPC, "IWD")==1)
|
|
{
|
|
}
|
|
else
|
|
{
|
|
DBSetIWDPermission(oPC, 1);
|
|
SetLocalInt(oPC, "IWD", 1);
|
|
}
|
|
|
|
|
|
//clear all actions
|
|
DelayCommand(0.5, AssignCommand (oPC,ClearAllActions()));
|
|
|
|
DelayCommand(0.7, ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_UNSUMMON), oPC));
|
|
DelayCommand(6.0, ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_SPELL_MANTLE_USE), oTarget));
|
|
DelayCommand(6.0, ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_UNSUMMON), oTarget));
|
|
|
|
//jump the PC to the destination
|
|
DelayCommand(1.0, AssignCommand (oPC,JumpToObject(oDrop)));
|
|
|
|
}
|