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");

}




}