Battledale_PRC8/_module/nss/x2_im_setrobe_0.nss
Jaysyn904 7b9e44ebbb Initial upload
Initial upload.  PRC8 has been added.  Module compiles, PRC's default AI & treasure scripts have been integrated.  Started work on top hak for SLA / Ability / Scripting modifications.
2024-03-11 23:44:08 -04:00

34 lines
814 B
Plaintext

#include "prc_x2_craft"
void main()
{
object oPC=GetPCSpeaker();
object oItem = CIGetCurrentModItem(GetPCSpeaker());
// object oNew = IPCreateAndModifyArmorRobe(oItem,1 );
// if (oItem != oNew)
// {
// DestroyObject(oItem);
// AssignCommand(GetPCSpeaker(),ActionEquipItem(oNew,INVENTORY_SLOT_CHEST));
// CISetCurrentModItem(GetPCSpeaker(),oNew);
// }
// show a casual robe
object oNew = IPCreateAndModifyArmorRobe(oItem,-2);
CISetCurrentModItem(oPC,oNew);
AssignCommand(oPC, ActionEquipItem(oNew, INVENTORY_SLOT_CHEST));
int nCost = 0;
int nDC =0;
if (GetIsDM(GetPCSpeaker())||GetIsDMPossessed(GetPCSpeaker()))
{
nCost=0;
nDC=0;
}
CIUpdateModItemCostDC(oPC, nDC, nCost);
}