52 lines
1.3 KiB
Plaintext
52 lines
1.3 KiB
Plaintext
|
|
#include "x0_i0_partywide"
|
|
#include "nw_i0_generic"
|
|
|
|
void main()
|
|
|
|
{
|
|
object oSpawn;
|
|
object oActor;
|
|
|
|
// Get the PC who is in this conversation.
|
|
object oPC = GetPCSpeaker();
|
|
|
|
SetLocalString(oPC, "crbtmnst", "1");
|
|
|
|
// Cutscene functions:
|
|
BlackScreen(oPC);
|
|
|
|
// Give 10 XP (to party) to the PC.
|
|
GiveXPToAll(oPC, 10);
|
|
|
|
// Spawn "wcorbitt1".
|
|
oSpawn = CreateObject(OBJECT_TYPE_CREATURE, "wcorbitt1", GetLocation(oPC));
|
|
AssignCommand(oSpawn, DetermineCombatRound(oPC));
|
|
|
|
// Destroy objects (not fully effective until this script ends).
|
|
DelayCommand(0.1, DestroyObject(GetObjectByTag("CorbittCorpse1")));
|
|
|
|
// Cutscene functions:
|
|
DelayCommand(0.2, FadeFromBlack(oPC));
|
|
|
|
// Have the PC say something.
|
|
DelayCommand(0.5, AssignCommand(oPC, SpeakString("Insanity!")));
|
|
|
|
// Have the PC perform a sequence of actions.
|
|
AssignCommand(oPC, ActionWait(1.0));
|
|
|
|
// Have the PC perform a sequence of actions.
|
|
AssignCommand(oPC, ActionPlayAnimation(ANIMATION_FIREFORGET_SPASM));
|
|
|
|
// Have "" cast Confusion.
|
|
oActor = GetObjectByTag("crbtcpse1");
|
|
DelayCommand(4.0, AssignCommand(oActor, ActionCastSpellAtObject(SPELL_CONFUSION, oPC, METAMAGIC_ANY, TRUE)));
|
|
|
|
// Destroy objects
|
|
DelayCommand(4.1, DestroyObject(GetObjectByTag("crbtcpse1")));
|
|
|
|
}
|
|
|
|
|
|
|