Initial upload

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.
This commit is contained in:
Jaysyn904
2024-03-11 23:44:08 -04:00
parent c4b5794c59
commit 7b9e44ebbb
11454 changed files with 10436475 additions and 0 deletions

View File

@@ -0,0 +1,42 @@
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");
}
}