5914ed2ab5
Updated Release Archive. Fixed Mage-killer prereqs. Removed old LETO & ConvoCC related files. Added organized spell scroll store. Fixed Gloura spellbook. Various TLK fixes. Reorganized Repo. Removed invalid user folders. Added DocGen back in.
250 lines
9.3 KiB
Plaintext
250 lines
9.3 KiB
Plaintext
//:://////////////////////////////////////////////
|
|
//:: Expel Vestige choice script
|
|
//:: bnd_expelcnv
|
|
//:://////////////////////////////////////////////
|
|
/*
|
|
@author Stratovarius - 2021.02.03
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:://////////////////////////////////////////////
|
|
|
|
#include "bnd_inc_bndfunc"
|
|
#include "inc_dynconv"
|
|
|
|
//////////////////////////////////////////////////
|
|
/* Constant defintions */
|
|
//////////////////////////////////////////////////
|
|
|
|
const int STAGE_SELECT_VESTIGE = 0;
|
|
const int STAGE_CONFIRM_SELECTION = 1;
|
|
|
|
const int CHOICE_BACK_TO_LSELECT = -1;
|
|
const int STRREF_SELECTED_HEADER1 = 16824209; // "You have selected:"
|
|
const int STRREF_SELECTED_HEADER2 = 16824210; // "Is this correct?"
|
|
const int STRREF_YES = 4752; // "Yes"
|
|
const int STRREF_NO = 4753; // "No"
|
|
|
|
const int SORT = TRUE; // If the sorting takes too much CPU, set to FALSE
|
|
const int DEBUG_LIST = FALSE;
|
|
|
|
//////////////////////////////////////////////////
|
|
/* Function defintions */
|
|
//////////////////////////////////////////////////
|
|
|
|
void PrintList(object oBinder)
|
|
{
|
|
string tp = "Printing list:\n";
|
|
string s = GetLocalString(oBinder, "PRC_MeldshapeConvo_List_Head");
|
|
if(s == ""){
|
|
tp += "Empty\n";
|
|
}
|
|
else{
|
|
tp += s + "\n";
|
|
s = GetLocalString(oBinder, "PRC_MeldshapeConvo_List_Next_" + s);
|
|
while(s != ""){
|
|
tp += "=> " + s + "\n";
|
|
s = GetLocalString(oBinder, "PRC_MeldshapeConvo_List_Next_" + s);
|
|
}
|
|
}
|
|
|
|
DoDebug(tp);
|
|
}
|
|
|
|
/**
|
|
* Creates a linked list of entries that is sorted into alphabetical order
|
|
* as it is built.
|
|
* Assumption: mystery names are unique.
|
|
*
|
|
* @param oBinder The storage object aka whomever is gaining powers in this conversation
|
|
* @param sChoice The choice string
|
|
* @param nChoice The choice value
|
|
*/
|
|
void AddToTempList(object oBinder, string sChoice, int nChoice)
|
|
{
|
|
if(DEBUG_LIST) DoDebug("\nAdding to temp list: '" + sChoice + "' - " + IntToString(nChoice));
|
|
if(DEBUG_LIST) PrintList(oBinder);
|
|
// If there is nothing yet
|
|
if(!GetLocalInt(oBinder, "PRC_MeldshapeConvo_ListInited"))
|
|
{
|
|
SetLocalString(oBinder, "PRC_MeldshapeConvo_List_Head", sChoice);
|
|
SetLocalInt(oBinder, "PRC_MeldshapeConvo_List_" + sChoice, nChoice);
|
|
|
|
SetLocalInt(oBinder, "PRC_MeldshapeConvo_ListInited", TRUE);
|
|
}
|
|
else
|
|
{
|
|
// Find the location to instert into
|
|
string sPrev = "", sNext = GetLocalString(oBinder, "PRC_MeldshapeConvo_List_Head");
|
|
while(sNext != "" && StringCompare(sChoice, sNext) >= 0)
|
|
{
|
|
if(DEBUG_LIST) DoDebug("Comparison between '" + sChoice + "' and '" + sNext + "' = " + IntToString(StringCompare(sChoice, sNext)));
|
|
sPrev = sNext;
|
|
sNext = GetLocalString(oBinder, "PRC_MeldshapeConvo_List_Next_" + sNext);
|
|
}
|
|
|
|
// Insert the new entry
|
|
// Does it replace the head?
|
|
if(sPrev == "")
|
|
{
|
|
if(DEBUG_LIST) DoDebug("New head");
|
|
SetLocalString(oBinder, "PRC_MeldshapeConvo_List_Head", sChoice);
|
|
}
|
|
else
|
|
{
|
|
if(DEBUG_LIST) DoDebug("Inserting into position between '" + sPrev + "' and '" + sNext + "'");
|
|
SetLocalString(oBinder, "PRC_MeldshapeConvo_List_Next_" + sPrev, sChoice);
|
|
}
|
|
|
|
SetLocalString(oBinder, "PRC_MeldshapeConvo_List_Next_" + sChoice, sNext);
|
|
SetLocalInt(oBinder, "PRC_MeldshapeConvo_List_" + sChoice, nChoice);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Reads the linked list built with AddToTempList() to AddChoice() and
|
|
* deletes it.
|
|
*
|
|
* @param oBinder A PC gaining powers at the moment
|
|
*/
|
|
void TransferTempList(object oBinder)
|
|
{
|
|
string sChoice = GetLocalString(oBinder, "PRC_MeldshapeConvo_List_Head");
|
|
int nChoice = GetLocalInt (oBinder, "PRC_MeldshapeConvo_List_" + sChoice);
|
|
|
|
DeleteLocalString(oBinder, "PRC_MeldshapeConvo_List_Head");
|
|
string sPrev;
|
|
|
|
if(DEBUG_LIST) DoDebug("Head is: '" + sChoice + "' - " + IntToString(nChoice));
|
|
|
|
while(sChoice != "")
|
|
{
|
|
// Add the choice
|
|
AddChoice(sChoice, nChoice, oBinder);
|
|
|
|
// Get next
|
|
sChoice = GetLocalString(oBinder, "PRC_MeldshapeConvo_List_Next_" + (sPrev = sChoice));
|
|
nChoice = GetLocalInt (oBinder, "PRC_MeldshapeConvo_List_" + sChoice);
|
|
|
|
if(DEBUG_LIST) DoDebug("Next is: '" + sChoice + "' - " + IntToString(nChoice) + "; previous = '" + sPrev + "'");
|
|
|
|
// Delete the already handled data
|
|
DeleteLocalString(oBinder, "PRC_MeldshapeConvo_List_Next_" + sPrev);
|
|
DeleteLocalInt (oBinder, "PRC_MeldshapeConvo_List_" + sPrev);
|
|
}
|
|
|
|
DeleteLocalInt(oBinder, "PRC_MeldshapeConvo_ListInited");
|
|
}
|
|
|
|
void main()
|
|
{
|
|
object oBinder = GetPCSpeaker();
|
|
int nValue = GetLocalInt(oBinder, DYNCONV_VARIABLE);
|
|
int nStage = GetStage(oBinder);
|
|
string sVestigeFile = GetVestigeFile();
|
|
|
|
// Check which of the conversation scripts called the scripts
|
|
if(nValue == 0) // All of them set the DynConv_Var to non-zero value, so something is wrong -> abort
|
|
return;
|
|
|
|
if(nValue == DYNCONV_SETUP_STAGE)
|
|
{
|
|
if(DEBUG) DoDebug("bnd_expelcnv: Running setup stage for stage " + IntToString(nStage));
|
|
// Check if this stage is marked as already set up
|
|
// This stops list duplication when scrolling
|
|
if(!GetIsStageSetUp(nStage, oBinder))
|
|
{
|
|
if(DEBUG) DoDebug("bnd_expelcnv: Stage was not set up already");
|
|
if(nStage == STAGE_SELECT_VESTIGE)
|
|
{
|
|
if(DEBUG) DoDebug("bnd_expelcnv: Building vestige selection");
|
|
|
|
SetHeader("Choose the vestige to expel.");
|
|
|
|
string sVestige;
|
|
int i, nVestige;
|
|
for(i = 0; i < 50 ; i++)
|
|
{
|
|
sVestige = GetStringByStrRef(StringToInt(Get2DACache(sVestigeFile, "Name", i)));
|
|
nVestige = StringToInt(Get2DACache(sVestigeFile, "SpellID", i));
|
|
if (DEBUG) DoDebug("sVestige: "+sVestige);
|
|
|
|
// If we have the vestige bound
|
|
if(GetHasSpellEffect(nVestige, oBinder))
|
|
{
|
|
AddChoice(GetStringByStrRef(StringToInt(Get2DACache(sVestigeFile, "Name", i))), i, oBinder);
|
|
}
|
|
}
|
|
|
|
// Set the next, previous and wait tokens to default values
|
|
SetDefaultTokens();
|
|
// Set the convo quit text to "Abort"
|
|
SetCustomToken(DYNCONV_TOKEN_EXIT, GetStringByStrRef(DYNCONV_STRREF_ABORT_CONVO));
|
|
}
|
|
// Selection confirmation stage
|
|
else if(nStage == STAGE_CONFIRM_SELECTION)
|
|
{
|
|
if(DEBUG) DoDebug("bnd_expelcnv: Building selection confirmation");
|
|
// Build the confirmation query
|
|
string sToken = GetStringByStrRef(STRREF_SELECTED_HEADER1) + "\n\n"; // "You have selected:"
|
|
int nSpellId = GetLocalInt(oBinder, "nVestige");
|
|
sToken += GetStringByStrRef(StringToInt(Get2DACache(sVestigeFile, "Description", nSpellId)))+"\n\n";
|
|
sToken += GetStringByStrRef(STRREF_SELECTED_HEADER2); // "Is this correct?"
|
|
SetHeader(sToken);
|
|
|
|
AddChoice(GetStringByStrRef(STRREF_YES), TRUE, oBinder); // "Yes"
|
|
AddChoice(GetStringByStrRef(STRREF_NO), FALSE, oBinder); // "No"
|
|
}
|
|
}
|
|
|
|
// Do token setup
|
|
SetupTokens();
|
|
}
|
|
else if(nValue == DYNCONV_EXITED)
|
|
{
|
|
if(DEBUG) DoDebug("bnd_expelcnv: Running exit handler");
|
|
// End of conversation cleanup
|
|
DeleteLocalInt(oBinder, "nVestige");
|
|
}
|
|
else if(nValue == DYNCONV_ABORTED)
|
|
{
|
|
// This section should never be run, since aborting this conversation should
|
|
// always be forbidden and as such, any attempts to abort the conversation
|
|
// should be handled transparently by the system
|
|
}
|
|
// Handle PC response
|
|
else
|
|
{
|
|
int nChoice = GetChoice(oBinder);
|
|
if(DEBUG) DoDebug("bnd_expelcnv: Handling PC response, stage = " + IntToString(nStage) + "; nChoice = " + IntToString(nChoice) + "; choice text = '" + GetChoiceText(oBinder) + "'");
|
|
|
|
if(nStage == STAGE_SELECT_VESTIGE)
|
|
{
|
|
if(DEBUG) DoDebug("bnd_expelcnv: Chakra selected");
|
|
SetLocalInt(oBinder, "nVestige", nChoice);
|
|
nStage = STAGE_CONFIRM_SELECTION;
|
|
|
|
MarkStageNotSetUp(STAGE_SELECT_VESTIGE, oBinder);
|
|
}
|
|
else if(nStage == STAGE_CONFIRM_SELECTION)
|
|
{
|
|
if (nChoice)
|
|
{
|
|
int nContactTime = VESTIGE_CONTACT_TIME;
|
|
if(GetPRCSwitch(PRC_CONTACT_VESTIGE_TIMER) >= 6) nContactTime = GetPRCSwitch(PRC_CONTACT_VESTIGE_TIMER);
|
|
ContactVestige(oBinder, nContactTime, GetLocalInt(oBinder, "nVestige"), TRUE);
|
|
DeleteLocalInt(oBinder, "nVestige");
|
|
AllowExit(DYNCONV_EXIT_FORCE_EXIT);
|
|
}
|
|
else
|
|
nStage = STAGE_SELECT_VESTIGE;
|
|
|
|
MarkStageNotSetUp(STAGE_CONFIRM_SELECTION, oBinder);
|
|
}
|
|
|
|
if(DEBUG) DoDebug("bnd_expelcnv: New stage: " + IntToString(nStage));
|
|
|
|
// Store the stage value. If it has been changed, this clears out the choices
|
|
SetStage(nStage, oBinder);
|
|
}
|
|
}
|