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.
221 lines
8.7 KiB
Plaintext
221 lines
8.7 KiB
Plaintext
//::///////////////////////////////////////////////
|
|
//:: PnP Shifter Chat Command include
|
|
//:: prc_inc_chat_shf
|
|
//::///////////////////////////////////////////////
|
|
|
|
#include "prc_inc_chat"
|
|
#include "prc_inc_shifting"
|
|
|
|
const string CMD_GREATER_WILDSHAPE = "gw";
|
|
const string CMD_SHIFT = "s-hift";
|
|
const string CMD_EPIC_SHIFT = "e-pic";
|
|
const string CMD_UNSHIFT = "u-nshift";
|
|
const string CMD_LIST = "l-ist";
|
|
const string CMD_INFO = "i-nfo";
|
|
const string CMD_MARK = "mark";
|
|
const string CMD_UNMARK = "unmark";
|
|
const string CMD_DELETE = "delete";
|
|
|
|
int PnPShifter_ProcessChatCommand_Help(object oPC, string sCommand)
|
|
{
|
|
string sCommandName = GetStringWord(sCommand, 2);
|
|
int nLevel = sCommandName != "";
|
|
int bResult = FALSE;
|
|
|
|
if (!nLevel)
|
|
{
|
|
HelpText(oPC, "=== PNP SHIFTER COMMANDS");
|
|
HelpText(oPC, "");
|
|
}
|
|
|
|
if(GetStringMatchesAbbreviation(sCommandName, CMD_GREATER_WILDSHAPE) || !nLevel)
|
|
{
|
|
if (nLevel)
|
|
{
|
|
bResult = TRUE;
|
|
HelpText(oPC, "=== PNP SHIFTER COMMAND: " + CMD_GREATER_WILDSHAPE + " (Greater Wildshape)");
|
|
HelpText(oPC, "");
|
|
}
|
|
|
|
HelpText(oPC, "~~" + CMD_GREATER_WILDSHAPE + " " + CMD_LIST + " <shape-name>");
|
|
if (nLevel)
|
|
HelpText(oPC, " Lists known shapes that match <shape-name>; if <shape-name> is omitted, lists all known shapes.");
|
|
HelpText(oPC, "~~" + CMD_GREATER_WILDSHAPE + " " + CMD_INFO + " <shape-name>");
|
|
if (nLevel)
|
|
HelpText(oPC, " Lists shapes that match <shape-name>; if an unambiguous match is found, prints information about it.");
|
|
HelpText(oPC, "~~" + CMD_GREATER_WILDSHAPE + " " + CMD_SHIFT + " <shape-name>");
|
|
if (nLevel)
|
|
HelpText(oPC, " Searches for shapes that match <shape-name>; if an unambiguous match is found, shifts into it.");
|
|
HelpText(oPC, "~~" + CMD_GREATER_WILDSHAPE + " " + CMD_EPIC_SHIFT + " <shape-name>");
|
|
if (nLevel)
|
|
HelpText(oPC, " Searches for shapes that match <shape-name>; if an unambiguous match is found, epic shifts into it.");
|
|
HelpText(oPC, "~~" + CMD_GREATER_WILDSHAPE + " " + CMD_UNSHIFT);
|
|
if (nLevel)
|
|
HelpText(oPC, " Unshifts back into true form.");
|
|
HelpText(oPC, "~~" + CMD_GREATER_WILDSHAPE + " " + CMD_MARK + " <shape-name>");
|
|
if (nLevel)
|
|
HelpText(oPC, " Marks the specified shape for deletion.");
|
|
HelpText(oPC, "~~" + CMD_GREATER_WILDSHAPE + " " + CMD_UNMARK + " <shape-name>");
|
|
if (nLevel)
|
|
HelpText(oPC, " Removes the shape's deletion mark, if any.");
|
|
HelpText(oPC, "~~" + CMD_GREATER_WILDSHAPE + " " + CMD_DELETE + " yes");
|
|
if (nLevel)
|
|
HelpText(oPC, " Deletes all shapes marked for deletion. Note that the word 'yes' is required as part of the command in order to confirm the deletion.");
|
|
if (nLevel)
|
|
{
|
|
HelpText(oPC, "");
|
|
HelpText(oPC, "'" + CMD_GREATER_WILDSHAPE + "' stands for 'Greater Wildshape'");
|
|
HelpText(oPC, "<shape-name> must match a known shape, is case-insenstive, and can be:");
|
|
HelpText(oPC, " '.': matches the shape the PC is currently shifted into");
|
|
HelpText(oPC, " A number: matches the shape with the given number. The numbers can be found found using command '~~gw list''.");
|
|
HelpText(oPC, " 'Q1' through 'Q10': matches the shape in the specified quickslot");
|
|
HelpText(oPC, " A resref: if you don't know what this means, ignore this option. The resref can be found found using command '~~gw list'.");
|
|
HelpText(oPC, " Part of the name of a shape:");
|
|
HelpText(oPC, " If there is exactly one exact match, that will be used.");
|
|
HelpText(oPC, " Otherwise, if there is exactly one shape whose name starts with <shape-name>, that will be used.");
|
|
HelpText(oPC, " Otherwise, if there is exactly one shape whose name contains <shape-name>, that will be used.");
|
|
HelpText(oPC, " Otherwise, no shape matches and nothing will happen.");
|
|
}
|
|
HelpText(oPC, "");
|
|
}
|
|
|
|
return bResult;
|
|
}
|
|
|
|
void _prc_inc_ChatShift(object oPC, string sShapeName, int bEpic)
|
|
{
|
|
//See if a valid shape was specified
|
|
if(sShapeName == "")
|
|
return;
|
|
|
|
string sResRef = FindResRefFromString(oPC, SHIFTER_TYPE_SHIFTER, sShapeName, FALSE);
|
|
if(sResRef == "")
|
|
return;
|
|
|
|
//Make sure we're not affected by a condition that prevents shifting
|
|
effect eTest = GetFirstEffect(oPC);
|
|
int nEType;
|
|
while(GetIsEffectValid(eTest))
|
|
{
|
|
nEType = GetEffectType(eTest);
|
|
if(nEType == EFFECT_TYPE_CUTSCENE_PARALYZE
|
|
|| nEType == EFFECT_TYPE_DAZED
|
|
|| nEType == EFFECT_TYPE_PARALYZE
|
|
|| nEType == EFFECT_TYPE_PETRIFY
|
|
|| nEType == EFFECT_TYPE_SLEEP
|
|
|| nEType == EFFECT_TYPE_STUNNED)
|
|
return;
|
|
eTest = GetNextEffect(oPC);
|
|
}
|
|
|
|
//If we have at least one use of a suitable feat remaining, shift
|
|
int nPaidFeat = GWSPay(oPC, bEpic);
|
|
if(nPaidFeat)
|
|
{
|
|
if(!ShiftIntoResRef(oPC, SHIFTER_TYPE_SHIFTER, sResRef, bEpic))
|
|
GWSRefund(oPC, nPaidFeat);
|
|
}
|
|
else
|
|
FloatingTextStrRefOnCreature(16828373, oPC, FALSE); // "You didn't have (Epic) Greater Wildshape uses available."
|
|
}
|
|
|
|
void _prc_inc_ListShapes(object oShifter, int nShifterType, string sFindString)
|
|
{
|
|
FindResRefFromString(oShifter, nShifterType, sFindString, TRUE);
|
|
}
|
|
|
|
void _prc_inc_ChatMark(object oPC, string sShapeName, int bMark)
|
|
{
|
|
if (sShapeName == "")
|
|
return;
|
|
|
|
string sResRef = FindResRefFromString(oPC, SHIFTER_TYPE_SHIFTER, sShapeName, FALSE);
|
|
if (sResRef == "")
|
|
return;
|
|
|
|
int nIndex = _prc_inc_shifting_GetIsTemplateStored(oPC, SHIFTER_TYPE_SHIFTER, sResRef);
|
|
if (!nIndex)
|
|
return;
|
|
|
|
SetStoredTemplateDeleteMark(oPC, SHIFTER_TYPE_SHIFTER, nIndex-1, bMark);
|
|
}
|
|
|
|
int PnPShifter_ProcessChatCommand(object oPC, string sCommand)
|
|
{
|
|
if(!GetLevelByClass(CLASS_TYPE_PNP_SHIFTER, oPC))
|
|
return FALSE;
|
|
|
|
int bResult = FALSE;
|
|
if(GetStringWord(sCommand, 1) == CMD_GREATER_WILDSHAPE)
|
|
{
|
|
bResult = TRUE;
|
|
string sWord = GetStringWord(sCommand, 2);
|
|
|
|
object oTemplate;
|
|
string sShape, sResRef;
|
|
if(GetStringMatchesAbbreviation(sWord, CMD_SHIFT))
|
|
{
|
|
sShape = GetStringWordToEnd(sCommand, 3);
|
|
_prc_inc_ChatShift(oPC, sShape, FALSE);
|
|
}
|
|
else if(GetStringMatchesAbbreviation(sWord, CMD_EPIC_SHIFT))
|
|
{
|
|
sShape = GetStringWordToEnd(sCommand, 3);
|
|
_prc_inc_ChatShift(oPC, sShape, TRUE);
|
|
}
|
|
else if(GetStringMatchesAbbreviation(sWord, CMD_UNSHIFT))
|
|
{
|
|
UnShift(oPC);
|
|
}
|
|
else if(GetStringMatchesAbbreviation(sWord, CMD_LIST))
|
|
{
|
|
sShape = GetStringWordToEnd(sCommand, 3);
|
|
DelayCommand(0.0f, _prc_inc_ListShapes(oPC, SHIFTER_TYPE_SHIFTER, sShape));
|
|
}
|
|
else if(GetStringMatchesAbbreviation(sWord, CMD_INFO))
|
|
{
|
|
sShape = GetStringWordToEnd(sCommand, 3);
|
|
if(sShape != "")
|
|
{
|
|
sResRef = FindResRefFromString(oPC, SHIFTER_TYPE_SHIFTER, sShape, FALSE);
|
|
if(sResRef != "")
|
|
{
|
|
oTemplate = _prc_inc_load_template_from_resref(sResRef, GetHitDice(oPC));
|
|
if(GetIsObjectValid(oTemplate))
|
|
{
|
|
DelayCommand(0.0, _prc_inc_PrintShape(oPC, oTemplate, FALSE));
|
|
DelayCommand(10.0, MyDestroyObject(oTemplate));
|
|
}
|
|
}
|
|
}
|
|
}
|
|
else if(GetStringMatchesAbbreviation(sWord, CMD_MARK))
|
|
{
|
|
sShape = GetStringWordToEnd(sCommand, 3);
|
|
_prc_inc_ChatMark(oPC, sShape, TRUE);
|
|
HelpText(oPC, "Shape marked for deletion");
|
|
}
|
|
else if(GetStringMatchesAbbreviation(sWord, CMD_UNMARK))
|
|
{
|
|
sShape = GetStringWordToEnd(sCommand, 3);
|
|
_prc_inc_ChatMark(oPC, sShape, FALSE);
|
|
HelpText(oPC, "Shape no longer marked for deletion");
|
|
}
|
|
else if(GetStringMatchesAbbreviation(sWord, CMD_DELETE))
|
|
{
|
|
if (GetStringWordToEnd(sCommand, 3) == "yes")
|
|
{
|
|
DelayCommand(0.0f, DeleteMarkedStoredTemplates(oPC, SHIFTER_TYPE_SHIFTER));
|
|
HelpText(oPC, "Marked shapes deleted");
|
|
}
|
|
else
|
|
HelpText(oPC, "Marked shapes not deleted: please enter 'yes' after the word 'delete' to confirm");
|
|
}
|
|
else
|
|
{
|
|
HelpText(oPC, "Unrecognize " + CMD_GREATER_WILDSHAPE + " command: " + sWord);
|
|
}
|
|
}
|
|
return bResult;
|
|
}
|