Files
dsrc/sku.0/sys.server/compiled/game/script/item/tool/medikit.script
T

363 lines
10 KiB
Plaintext

include library.consumable;
include library.pet_lib;
include library.sui;
include library.utils;
include library.pclib;
include library.prose;
include library.healing;
include java.util.Enumeration;
include library.ai_lib;
const string SCRIPTVAR_PID = "tool.pid";
const string SCRIPTVAR_PLAYER = "tool.player";
const string SCRIPTVAR_TARGET = "tool.lookattarget";
const string SCRIPTVAR_LASTCOMMAND = "tool.lastcommand";
const string STF = "tool/med_tool";
const string_id MNU_DIAGNOSE = new string_id(STF, "mnu_diagnose");
const string_id OPT_COLOR_TRIM = new string_id(STF, "opt_color_trim");
const string_id OPT_COLOR_FRAME = new string_id(STF, "opt_color_frame");
const string_id SID_OTHER_PLAYERS_ONLY = new string_id(STF, "other_players_only");
const string_id SID_DO_NOT_HEAL = new string_id(STF, "do_not_heal");
const string_id SID_MUST_BE_PLAYER_OR_PET = new string_id(STF, "must_be_player_or_pet");
// **********************************************************************************************************************************
// ********** TRIGGERS **********
// **********************************************************************************************************************************
trigger OnAttach()
{
clearTrackingScriptVars(self);
return SCRIPT_CONTINUE;
}
// If this object has another dragged on top of it, do this. Do not allow OnReceivedItem to go off if we decide to ScriptOverride
trigger OnAboutToReceiveItem(obj_id srcContainer, obj_id transferer, obj_id item)
{
string parentDirectory = getTemplateParentDirectory(item);
if ( parentDirectory.equals("foraged" ) && (getCount(self) < 99))
{
return SCRIPT_CONTINUE;
}
return SCRIPT_OVERRIDE;
}
// If this object actually receives another item, do this. If the item being dragged on top of the medtool is of the correct type, increment the tool's count
trigger OnReceivedItem(obj_id srcContainer, obj_id transferer, obj_id item)
{
// If we accepted the item, destroy the item and increment charges by one.
//int countDelta = 1; //Will the quality of gulped item determines how much the count increases? Not yet.
int countDelta = foragedItemsMod(item);
incrementCount(self, countDelta);
destroyObject (item);
return SCRIPT_CONTINUE;
}
trigger OnGetAttributes(obj_id player, string[] names, string[] attribs)
{
int idx = utils.getValidAttributeIndex(names);
if (idx == -1)
return SCRIPT_CONTINUE;
if (hasObjVar(self, "medikit.quality"))
{
names[idx] = "useModifier";
int attrib = getIntObjVar(self, "medikit.quality");
attribs[idx] = "" + attrib;
idx++;
if (idx >= names.length)
return SCRIPT_CONTINUE;
}
return SCRIPT_CONTINUE;
}
// Populate this item's use menu with the appropriate options.
trigger OnObjectMenuRequest(obj_id player, menu_info mi)
{
if ( !utils.isNestedWithin(self, player) )
return SCRIPT_CONTINUE;
int myPosture = getPosture(self);
if ( myPosture == POSTURE_DEAD )
{
return SCRIPT_CONTINUE;
}
// if the player can diagnose his 'target' (and if there is one)
obj_id lookatTarget = getLookAtTarget(player);
if ( canDiagnose(player, lookatTarget) )
{
int mnuDiagnose = mi.addRootMenu(menu_info_types.SERVER_MED_TOOL_DIAGNOSE, MNU_DIAGNOSE);
}
// if the med tool has any charges left, allow the menu_tendwound and menu_tenddamage options to come up
int currentCharges = getCount(self);
if ( !(currentCharges < 1))
{
if (healing.canHealDamage(player, false))
{
mi.addRootMenu (menu_info_types.SERVER_MED_TOOL_TENDWOUND, new string_id(STF,"menu_tendwound"));
mi.addRootMenu (menu_info_types.SERVER_MED_TOOL_TENDDAMAGE, new string_id(STF,"menu_tenddamage"));
}
}
return SCRIPT_CONTINUE;
}
trigger OnObjectMenuSelect(obj_id player, int item)
{
if ( !utils.isNestedWithin(self, player) )
return SCRIPT_CONTINUE;
obj_id lookatTarget = getLookAtTarget(player);
if ( item == menu_info_types.SERVER_MED_TOOL_DIAGNOSE ) //diagnose the patient's wound levels
{
queueCommand(player, ##"diagnosePatient", self, lookatTarget.toString(), COMMAND_PRIORITY_DEFAULT);
utils.setScriptVar(self, SCRIPTVAR_PLAYER, player);
utils.setScriptVar(self, SCRIPTVAR_TARGET, lookatTarget);
utils.setScriptVar(self, SCRIPTVAR_LASTCOMMAND, "diagnose");
}
if ( item == menu_info_types.SERVER_MED_TOOL_TENDWOUND ) //Tend a player's wounds
{
sendSystemMessageTestingOnly(player, "Selected TENDWOUND, line 144");
if ( isIdValid(self) && isIdValid(lookatTarget) )
{
sendSystemMessageTestingOnly(player, "Check passed isIdValid(self) AND isIdValid(target), line 147");
queueCommand(self, ##"tendWoundsTool", lookatTarget, "no_params", COMMAND_PRIORITY_DEFAULT);
utils.setScriptVar(self, SCRIPTVAR_TARGET, lookatTarget);
utils.setScriptVar(self, SCRIPTVAR_LASTCOMMAND, "tendwound");
}
}
if ( item == menu_info_types.SERVER_MED_TOOL_TENDDAMAGE ) //Tend a player's damage
{
sendSystemMessageTestingOnly(player, "Selected TENDDAMAGE, line 155");
if ( isIdValid(self) && isIdValid(lookatTarget) )
{
sendSystemMessageTestingOnly(player, "Check passed isIdValid(self) AND isIdValid(target), line 158");
queueCommand(self, ##"tendDamageTool", lookatTarget, "no_params", COMMAND_PRIORITY_DEFAULT);
utils.setScriptVar(self, SCRIPTVAR_TARGET, lookatTarget);
utils.setScriptVar(self, SCRIPTVAR_LASTCOMMAND, "tenddamage");
}
}
return SCRIPT_CONTINUE;
}
// **********************************************************************************************************************************
// ********** COMMAND HANDLERS **********
// **********************************************************************************************************************************
commandHandler cmdDiagnosePatient()
{
if ( !isIdValid(self) || !isIdValid(target) )
return SCRIPT_CONTINUE;
obj_id medic = null;
if (medic != target)
{
if (getDistance(medic, target) > consumable.MAX_AFFECT_DISTANCE)
{
sendSystemMessage(medic, consumable.SID_TARGET_OUT_OF_RANGE);
return SCRIPT_CONTINUE;
}
}
string[] dsrc = new string[NUM_ATTRIBUTES+1];
//int[] attribWound = {0, 0, 0, 0, 0, 0, 0, 0, 0};
for ( int i = 0; i < NUM_ATTRIBUTES; i++ )
{
string attribute_string = healing.attributeToString(i).toLowerCase();
int attribWound = getAttribWound(target, i);
dsrc[i] = attribute_string+" -- "+attribWound;
}
//set up the battle-fatigue display
dsrc[NUM_ATTRIBUTES] = new string_id(STF,"battle_fatigue")+" -- "+getShockWound(target);
//string prompt = new string_id(STF,"wounds"); -This doesn't work. Need to figure out how to localize
string prompt = "Wounds";
//string title = new string_id(STF,"patients_wounds"); -This doesn't work. Need to figure out how to localize
string title = "Patient's Wounds";
sui.listbox(self, medic, prompt, sui.OK_CANCEL, title, dsrc,"noHandler");
clearTrackingScriptVars(self);
return SCRIPT_CONTINUE;
}
// **********************************************************************************************************************************
// ********** FUNCTIONS **********
// **********************************************************************************************************************************
boolean canDiagnose(obj_id medic, obj_id target)
{
if ((medic!= target) && (isIdValid(target))) // if medic isn't the target
{
if (getDistance(medic, target) > consumable.MAX_AFFECT_DISTANCE) //if target is out of range
{
sendSystemMessage(medic, consumable.SID_TARGET_OUT_OF_RANGE);
}
else //target is in range for diagnose
{
if (!pvpCanHelp(medic, target)) //if target isn't an enemy
{
LOG("LOG_CHANNEL", medic + " ->It would be unwise to help such a patient.");
sendSystemMessage(medic, SID_DO_NOT_HEAL);
}
else
{
if (!isPlayer(target)) //if the target isn't a player
{
//if (!pet_lib.isCreaturePet(target) && !pet_lib.isNpcPet(target)) //if target isn't someone's pet
if (!isCreaturePet(target) && !pet_lib.isNpcPet(target)) //if target isn't someone's pet
{
LOG("LOG_CHANNEL", "Target must be a player or a creature pet in order to tend wounds.");
sendSystemMessage(medic, SID_MUST_BE_PLAYER_OR_PET);
}
else // if the target IS someone's pet
{
return true;
}
}
else // if the target IS a player
{
return true;
}
}
}
}
return false;
}
boolean haveChargedMedTool(obj_id player, obj_id medikitTool)
{
if (( getCount(medikitTool) > 0) && ( utils.isNestedWithin(medikitTool, player) ))
return true;
else
return false;
}
void clearTrackingScriptVars(obj_id self)
{
utils.removeScriptVar(self, SCRIPTVAR_PID);
utils.removeScriptVar(self, SCRIPTVAR_PLAYER);
utils.removeScriptVar(self, SCRIPTVAR_TARGET);
utils.removeScriptVar(self, SCRIPTVAR_LASTCOMMAND);
}
string getTemplateParentDirectory(obj_id target)
{
if ( !isIdValid(target) )
return null;
string parentDirectory = null;
string fullPath = getTemplateName(target);
if ( fullPath != null && !fullPath.equals("") )
{
string[] tmp = split(fullPath, '/');
if ( tmp != null && tmp.length > 0 )
{
parentDirectory = tmp[tmp.length - 2];
}
}
return parentDirectory;
}
// multi-value charge-up for differing foraged stuff
int foragedItemsMod(obj_id item)
{
if ( !isIdValid(item) )
return 0;
int health_mod = 0;
int mind_mod = 0;
int action_mod = 0;
int mod_time = 0;
int forageMod = 0;
if ( hasObjVar(item, "consumable.health_mod" ))
{
health_mod = getIntObjVar(item, "consumable.health_mod");
}
if ( hasObjVar(item, "consumable.mind_mod" ))
{
mind_mod = getIntObjVar(item, "consumable.mind_mod");
}
if ( hasObjVar(item, "consumable.action_mod" ))
{
action_mod = getIntObjVar(item, "consumable.mind_mod");
}
if ( hasObjVar(item, "consumable.mod_time" ))
{
mod_time = getIntObjVar(item, "consumable.mind_mod");
}
int tempItemModSum = health_mod + mind_mod + action_mod + mod_time;
if ( tempItemModSum < 400 )
{
forageMod = 1;
}
else if ( tempItemModSum < 700 )
{
forageMod = 2;
}
else
{
forageMod = 3;
}
return forageMod;
}
boolean isCreaturePet( obj_id npc )
{
return ( ai_lib.isMonster( npc ) || hasObjVar( npc, "ai.pet" ) );
}