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.
43 lines
1.0 KiB
Plaintext
43 lines
1.0 KiB
Plaintext
void main()
|
|
{
|
|
object oObject=OBJECT_SELF;
|
|
object oPC=GetPCSpeaker();
|
|
object oAmmo=GetItemPossessedBy(oObject,"jw_ammo_stone");
|
|
object oMonster=GetObjectByTag("jw_ammo_door");
|
|
int iDamage = d20(2);
|
|
effect eFireball = EffectVisualEffect(VFX_FNF_FIREBALL);
|
|
|
|
if (!GetIsObjectValid(oMonster))
|
|
|
|
{
|
|
SpeakString("There is no target to aim at");
|
|
return;
|
|
|
|
}
|
|
|
|
if (GetIsObjectValid(oAmmo))
|
|
|
|
{
|
|
ActionPauseConversation();
|
|
DestroyObject(oAmmo);
|
|
DelayCommand(1.8, ActionDoCommand(ApplyEffectToObject(DURATION_TYPE_INSTANT, eFireball, oMonster, 4.0f)));
|
|
DelayCommand(0.3, ActionDoCommand(ActionCastFakeSpellAtObject(SPELL_FIREBALL, oMonster, PROJECTILE_PATH_TYPE_BALLISTIC)));
|
|
DelayCommand(1.3, ActionDoCommand(SetPlotFlag(oMonster,FALSE)));
|
|
//DelayCommand(1.5, ActionDoCommand(AssignCommand(oMonster,ActionOpenDoor(oMonster))));
|
|
AssignCommand(oPC,SetCameraFacing(0.0,20.0));
|
|
DelayCommand(2.0, ActionDoCommand(DestroyObject(oMonster)));
|
|
DelayCommand(1.0, ActionDoCommand(ActionResumeConversation()));
|
|
|
|
}
|
|
|
|
else
|
|
{
|
|
SpeakString("This catapult has no ammunition");
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
}
|