PRC8/nwn/nwnprc/trunk/newspellbook/tob_etbl_conv.nss
Jaysyn904 e641b42f84 Exalted update
Updated Vow of Poverty. Added Sanctify Ki Strike, Holy Strike, Fist of Heavens, Vow of Abstinence, Vow of Chastity & Gift of Faith.  (@fenac).  Turned off the Taunt & Parry skills.  Re-disabled AC & save bonuses from Tumble & Spellcraft.   Updated min() & max() to PRCmin() & PRCmax() to not conflict with similarly named NUI adjacent functions.  Set Point Blank Shot to 30' per PnP.  Added icon for Chosen of Evil.  Started work on Hidden Talent.  Created Psionics function cheatsheet.  Updated release archive.
2025-01-29 22:46:38 -05:00

400 lines
18 KiB
Plaintext

//:://////////////////////////////////////////////
//:: Tome of Battle Maneuver gain conversation script
//:: tob_moveconv
//:://////////////////////////////////////////////
/** @file
This script controls the Tome of Battle maneuver selection
conversation.
@author Stratovarius - 2006.07.19
*/
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
#include "tob_inc_tobfunc"
#include "inc_dynconv"
#include "prc_inc_function"
//////////////////////////////////////////////////
/* Constant defintions */
//////////////////////////////////////////////////
const int STAGE_SELECT_LEVEL = 0;
const int STAGE_SELECT_MANEUVER = 1;
const int STAGE_SELECT_SLOT = 2;
const int STAGE_ALL_MANEUVERS_SELECTED = 3;
const int CHOICE_BACK_TO_LSELECT = -1;
const int STRREF_BACK_TO_LSELECT = 16829723; // "Return to maneuver level selection."
const int STRREF_LEVELLIST_HEADER = 16829724; // "Select level of maneuver to gain.\n\nNOTE:\nThis may take a while when first browsing a particular level's maneuvers."
const int STRREF_MOVELIST_HEADER1 = 16829725; // "Select a maneuver to gain.\nYou can select"
const int STRREF_MOVELIST_HEADER2 = 16829726; // "more maneuvers"
const int STRREF_SELECTED_HEADER1 = 16824209; // "You have selected:"
const int STRREF_SELECTED_HEADER2 = 16824210; // "Is this correct?"
const int STRREF_END_HEADER = 16829727; // "You will be able to select more maneuvers after you gain another level in a blade magic initiator class."
const int STRREF_END_CONVO_SELECT = 16824212; // "Finish"
const int LEVEL_STRREF_START = 16824809;
const int STRREF_YES = 4752; // "Yes"
const int STRREF_NO = 4753; // "No"
const int STRREF_MOVESTANCE_HEADER = 16829729; // "Choose Maneuver or Stances."
const int STRREF_STANCE = 16829730; // "Stances"
const int STRREF_MANEUVER = 16829731; // "Maneuvers"
const int SORT = TRUE; // If the sorting takes too much CPU, set to FALSE
const int DEBUG_LIST = FALSE;
//////////////////////////////////////////////////
/* Function defintions */
//////////////////////////////////////////////////
void PrintList(object oInitiator)
{
string tp = "Printing list:\n";
string s = GetLocalString(oInitiator, "PRC_MoveConvo_List_Head");
if(s == ""){
tp += "Empty\n";
}
else{
tp += s + "\n";
s = GetLocalString(oInitiator, "PRC_MoveConvo_List_Next_" + s);
while(s != ""){
tp += "=> " + s + "\n";
s = GetLocalString(oInitiator, "PRC_MoveConvo_List_Next_" + s);
}
}
DoDebug(tp);
}
/**
* Creates a linked list of entries that is sorted into alphabetical order
* as it is built.
* Assumption: Maneuver names are unique.
*
* @param oInitiator The storage object aka whomever is gaining maneuvers in this conversation
* @param sChoice The choice string
* @param nChoice The choice value
*/
void AddToTempList(object oInitiator, string sChoice, int nChoice)
{
if(DEBUG_LIST) DoDebug("\nAdding to temp list: '" + sChoice + "' - " + IntToString(nChoice));
if(DEBUG_LIST) PrintList(oInitiator);
// If there is nothing yet
if(!GetLocalInt(oInitiator, "PRC_MoveConvo_ListInited"))
{
SetLocalString(oInitiator, "PRC_MoveConvo_List_Head", sChoice);
SetLocalInt(oInitiator, "PRC_MoveConvo_List_" + sChoice, nChoice);
SetLocalInt(oInitiator, "PRC_MoveConvo_ListInited", TRUE);
}
else
{
// Find the location to instert into
string sPrev = "", sNext = GetLocalString(oInitiator, "PRC_MoveConvo_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(oInitiator, "PRC_MoveConvo_List_Next_" + sNext);
}
/* Insert the new entry */
// Does it replace the head?
if(sPrev == "")
{
if(DEBUG_LIST) DoDebug("New head");
SetLocalString(oInitiator, "PRC_MoveConvo_List_Head", sChoice);
}
else
{
if(DEBUG_LIST) DoDebug("Inserting into position between '" + sPrev + "' and '" + sNext + "'");
SetLocalString(oInitiator, "PRC_MoveConvo_List_Next_" + sPrev, sChoice);
}
SetLocalString(oInitiator, "PRC_MoveConvo_List_Next_" + sChoice, sNext);
SetLocalInt(oInitiator, "PRC_MoveConvo_List_" + sChoice, nChoice);
}
}
/**
* Reads the linked list built with AddToTempList() to AddChoice() and
* deletes it.
*
* @param oInitiator A PC gaining maneuvers at the moment
*/
void TransferTempList(object oInitiator)
{
string sChoice = GetLocalString(oInitiator, "PRC_MoveConvo_List_Head");
int nChoice = GetLocalInt (oInitiator, "PRC_MoveConvo_List_" + sChoice);
DeleteLocalString(oInitiator, "PRC_MoveConvo_List_Head");
string sPrev;
if(DEBUG_LIST) DoDebug("Head is: '" + sChoice + "' - " + IntToString(nChoice));
while(sChoice != "")
{
// Add the choice
AddChoice(sChoice, nChoice, oInitiator);
// Get next
sChoice = GetLocalString(oInitiator, "PRC_MoveConvo_List_Next_" + (sPrev = sChoice));
nChoice = GetLocalInt (oInitiator, "PRC_MoveConvo_List_" + sChoice);
if(DEBUG_LIST) DoDebug("Next is: '" + sChoice + "' - " + IntToString(nChoice) + "; previous = '" + sPrev + "'");
// Delete the already handled data
DeleteLocalString(oInitiator, "PRC_MoveConvo_List_Next_" + sPrev);
DeleteLocalInt (oInitiator, "PRC_MoveConvo_List_" + sPrev);
}
DeleteLocalInt(oInitiator, "PRC_MoveConvo_ListInited");
}
void EternalTrainingTempManeuver(object oInitiator, int nList, int n2daRow, int nChoice)
{
string sManeuverFile = GetAMSDefinitionFileName(nList);
// Get the spells.2da row corresponding to the cls_move_*.2da row
// Will be cast from UseManeuver
int nManeuver2daRow = StringToInt(Get2DACache(sManeuverFile, "SpellID", n2daRow));
// Set spells.2da row
if(DEBUG) DoDebug("tob_etbl_conv: nManeuver2daRow value = " + IntToString(nManeuver2daRow));
SetLocalInt(oInitiator, "ETBL_MANEUVER_QUICK" + IntToString(nChoice), nManeuver2daRow);
// Get strref for maneuver
int nName = StringToInt(Get2DACache("spells", "Name", nManeuver2daRow));
if(DEBUG) DoDebug("tob_etbl_conv: Maneuver name: " + GetStringByStrRef(nName));
//int nFeatID = StringToInt(Get2DACache(sManeuverFile, "FeatID", nManeuver));
SetLocalInt(oInitiator, "ETBL_MANEUVER_NAME_QUICK" + IntToString(nChoice), nName);
}
void main()
{
object oInitiator = GetPCSpeaker();
int nValue = GetLocalInt(oInitiator, DYNCONV_VARIABLE);
int nStage = GetStage(oInitiator);
int nClass = GetPrimaryBladeMagicClass(oInitiator);//GetLocalInt(oInitiator, "nClass");
string sManeuverFile = GetAMSDefinitionFileName(nClass);
// 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("tob_moveconv: 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, oInitiator))
{
if(DEBUG) DoDebug("tob_moveconv: Stage was not set up already");
// Level selection stage
if(nStage == STAGE_SELECT_LEVEL)
{
if(DEBUG) DoDebug("tob_moveconv: Building level selection");
SetHeader(GetStringByStrRef(STRREF_LEVELLIST_HEADER));
// Determine maximum maneuver level
// Initiators get new maneuvers at the same levels as wizards
// See ToB p39, table 3-1
int nMaxLevel = PRCMin(9, (GetInitiatorLevel(oInitiator, nClass) + 1)/2);
// Set the tokens
int i;
for(i = 0; i < nMaxLevel; i++){
AddChoice(GetStringByStrRef(LEVEL_STRREF_START - i), // The minus is correct, these are stored in inverse order in the TLK. Whoops
i + 1
);
}
// 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));
}
// Maneuver selection stage
if(nStage == STAGE_SELECT_MANEUVER)
{
if(DEBUG) DoDebug("tob_moveconv: Building maneuver selection");
string sMoveStance;
int nMoveStance = GetLocalInt(oInitiator, "nStanceOrManeuver");
if (nMoveStance == MANEUVER_TYPE_MANEUVER) sMoveStance = "ManeuverKnown";
else if (nMoveStance == MANEUVER_TYPE_STANCE) sMoveStance = "StancesKnown";
int nCurrentManeuvers = GetManeuverCount(oInitiator, nClass, nMoveStance);
int nMaxManeuvers = GetMaxManeuverCount(oInitiator, nClass, nMoveStance);
string sToken = GetStringByStrRef(STRREF_MOVELIST_HEADER1) + " " + //"Select a maneuver to gain.\n You can select "
IntToString(nMaxManeuvers-nCurrentManeuvers) + " " +
GetStringByStrRef(STRREF_MOVELIST_HEADER2); //" more maneuvers"
SetHeader(sToken);
// Set the first choice to be return to level selection stage
AddChoice(GetStringByStrRef(STRREF_BACK_TO_LSELECT), CHOICE_BACK_TO_LSELECT, oInitiator);
// Determine maximum maneuver level
int nInitiatorLevel = GetInitiatorLevel(oInitiator, nClass);
int nManeuverLevelToBrowse = GetLocalInt(oInitiator, "nManeuverLevelToBrowse");
int i, nManeuverLevel, nDiscipline, nFeatID, nPrereqs;
for(i = 0; i < GetPRCSwitch(FILE_END_CLASS_POWER) ; i++)
{
nManeuverLevel = StringToInt(Get2DACache(sManeuverFile, "Level", i));
// Skip any maneuvers of too low or too high level
if(nManeuverLevel != nManeuverLevelToBrowse){
continue;
}
// If looking for stances, skip maneuvers, else reverse
if(nMoveStance == MANEUVER_TYPE_STANCE && Get2DACache(sManeuverFile, "Type", i) != "1"){
continue;
} // Skip stances when looking for maneuvers
else if(nMoveStance == MANEUVER_TYPE_MANEUVER && Get2DACache(sManeuverFile, "Type", i) == "1"){
continue;
}
nDiscipline = StringToInt(Get2DACache(sManeuverFile, "Discipline", i));
if(nDiscipline)// Non-blank row
{
nFeatID = StringToInt(Get2DACache(sManeuverFile, "FeatID", i));
nPrereqs = StringToInt(Get2DACache(sManeuverFile, "Prereqs", i));
if(!GetHasFeat(nFeatID, oInitiator) // PC does not already possess the maneuver
&& CheckManeuverPrereqs(nClass, nPrereqs, nDiscipline, oInitiator)) // PC possess the prerequisites
{
if(SORT) AddToTempList(oInitiator, GetStringByStrRef(StringToInt(Get2DACache("feat", "FEAT", nFeatID))), i);
else AddChoice(GetStringByStrRef(StringToInt(Get2DACache("feat", "FEAT", nFeatID))), i, oInitiator);
}
}
}
if(SORT) TransferTempList(oInitiator);
/* Hack - In the maneuver selection stage, on returning from
* confirmation dialog where the answer was "No", restore the
* offset to be the same as on entering the confirmation dialog.
*/
if(GetLocalInt(oInitiator, "ManeuverListChoiceOffset"))
{
if(DEBUG) DoDebug("tob_moveconv: Running offset restoration hack");
SetLocalInt(oInitiator, DYNCONV_CHOICEOFFSET, GetLocalInt(oInitiator, "ManeuverListChoiceOffset") - 1);
DeleteLocalInt(oInitiator, "ManeuverListChoiceOffset");
}
MarkStageSetUp(STAGE_SELECT_MANEUVER, oInitiator);
}
// Selection confirmation stage
else if(nStage == STAGE_SELECT_SLOT)
{
string sToken = GetStringByStrRef(STRREF_SELECTED_HEADER1) + "\n \n"; // "You have selected:"
int nManeuver = GetLocalInt(oInitiator, "nManeuver");
int nFeatID = StringToInt(Get2DACache(sManeuverFile, "FeatID", nManeuver));
sToken += GetStringByStrRef(StringToInt(Get2DACache("feat", "FEAT", nFeatID)))+"\n";
sToken += GetStringByStrRef(StringToInt(Get2DACache("feat", "DESCRIPTION", nFeatID)))+"\n \n";
//sToken += GetStringByStrRef(STRREF_SELECTED_HEADER2); // "Is this correct?"
sToken += "Select Quickslot:";
SetHeader(sToken);
//SetHeader("Select QuickSlot:");
AddChoice("Slot 1", 1, oInitiator);
AddChoice("Slot 2", 2, oInitiator);
AddChoice("Slot 3", 3, oInitiator);
AddChoice("Slot 4", 4, oInitiator);
MarkStageSetUp(nStage, oInitiator); // This prevents the setup being run for this stage again until MarkStageNotSetUp is called for it
SetDefaultTokens(); // Set the next, previous, exit and wait tokens to default values
}
// Conversation finished stage
else if(nStage == STAGE_ALL_MANEUVERS_SELECTED)
{
if(DEBUG) DoDebug("tob_moveconv: Building finish note");
SetHeader(GetStringByStrRef(STRREF_END_HEADER));
// Set the convo quit text to "Finish"
SetCustomToken(DYNCONV_TOKEN_EXIT, GetStringByStrRef(STRREF_END_CONVO_SELECT));
AllowExit(DYNCONV_EXIT_ALLOWED_SHOW_CHOICE, FALSE, oInitiator);
}
}
// Do token setup
SetupTokens();
}
else if(nValue == DYNCONV_EXITED)
{
if(DEBUG) DoDebug("tob_moveconv: Running exit handler");
// End of conversation cleanup
DeleteLocalInt(oInitiator, "nClass");
DeleteLocalInt(oInitiator, "nManeuver");
DeleteLocalInt(oInitiator, "nStanceOrManeuver");
DeleteLocalInt(oInitiator, "nManeuverLevelToBrowse");
DeleteLocalInt(oInitiator, "ManeuverListChoiceOffset");
// Restart the convo to pick next maneuver if needed
// done via EvalPRCFFeats to avoid convlicts with new spellbooks
//ExecuteScript("psi_maneuvergain", oInitiator);
DelayCommand(1.0, EvalPRCFeats(oInitiator));
}
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
if(DEBUG) DoDebug("tob_moveconv: ERROR: Conversation abort section run");
}
// Handle PC response
else
{
int nChoice = GetChoice(oInitiator);
if(DEBUG) DoDebug("tob_moveconv: Handling PC response, stage = " + IntToString(nStage) + "; nChoice = " + IntToString(nChoice) + "; choice text = '" + GetChoiceText(oInitiator) + "'");
if(nStage == STAGE_SELECT_LEVEL)
{
if(DEBUG) DoDebug("tob_moveconv: Level selected");
SetLocalInt(oInitiator, "nManeuverLevelToBrowse", nChoice);
nStage = STAGE_SELECT_MANEUVER;
}
else if(nStage == STAGE_SELECT_MANEUVER)
{
if(nChoice == CHOICE_BACK_TO_LSELECT)
{
if(DEBUG) DoDebug("tob_moveconv: Returning to level selection");
nStage = STAGE_SELECT_LEVEL;
DeleteLocalInt(oInitiator, "nManeuverLevelToBrowse");
}
else
{
if(DEBUG) DoDebug("tob_moveconv: Entering maneuver confirmation");
SetLocalInt(oInitiator, "nManeuver", nChoice);
// Store offset so that if the user decides not to take the maneuver,
// we can return to the same page in the maneuver list instead of resetting to the beginning
// Store the value +1 in order to be able to differentiate between offset 0 and undefined
SetLocalInt(oInitiator, "ManeuverListChoiceOffset", GetLocalInt(oInitiator, DYNCONV_CHOICEOFFSET) + 1);
nStage = STAGE_SELECT_SLOT;
}
MarkStageNotSetUp(STAGE_SELECT_MANEUVER, oInitiator);
}
else if(nStage == STAGE_SELECT_SLOT)
{
if(DEBUG) DoDebug("tob_moveconv: Handling maneuver confirmation");
int nMoveStance = GetLocalInt(oInitiator, "nStanceOrManeuver");
if(DEBUG) DoDebug("tob_moveconv: Adding maneuver");
int nManeuver = GetLocalInt(oInitiator, "nManeuver");
//AddManeuverKnown(oInitiator, nClass, nManeuver, nMoveStance, TRUE, GetHitDice(oInitiator));
EternalTrainingTempManeuver(oInitiator, nClass, nManeuver, nChoice);
// Delete the stored offset
DeleteLocalInt(oInitiator, "ManeuverListChoiceOffset");
nStage = STAGE_ALL_MANEUVERS_SELECTED;
// Clean up all of these
DeletePersistantLocalInt(oInitiator, "AllowedDisciplines");
}
if(DEBUG) DoDebug("tob_moveconv: New stage: " + IntToString(nStage));
// Store the stage value. If it has been changed, this clears out the choices
SetStage(nStage, oInitiator);
}
}