//Nothing important, just used to write out arbitrary data to a file to help with whatever
//sorting or data analysis is needed at the time.
void ItemDef :: Debug_WriteToStream(FILE *output)
{
fprintf(output, "%d;%d;%d;%d;", mID, mQualityLevel, mLevel, mMinUseLevel);
fprintf(output, "%s;%s;%s;%s;", mDisplayName.c_str(), GetEquipType(mEquipType), GetArmorType(mArmorType), GetWeaponType(mWeaponType));
if(mBonusStrength != 0) fprintf(output, "%d;", mBonusStrength); else fputc(';', output);
if(mBonusDexterity != 0) fprintf(output, "%d;", mBonusDexterity); else fputc(';', output);
if(mBonusConstitution != 0) fprintf(output, "%d;", mBonusConstitution); else fputc(';', output);
if(mBonusPsyche != 0) fprintf(output, "%d;", mBonusPsyche); else fputc(';', output);
if(mBonusSpirit != 0) fprintf(output, "%d;", mBonusSpirit); else fputc(';', output);
fprintf(output, "%d;%d;", mArmorResistMelee, mValue);
if(mWeaponDamageMax != 0) fprintf(output, "%d-%d;", mWeaponDamageMin, mWeaponDamageMax); else fputc(';', output);
switch(mBindingType)
{
case BIND_ON_EQUIP: fputs("E;", output); break;
case BIND_ON_PICKUP: fputs("P;", output); break;
default: fputc(';', output); break;
}
fprintf(output, "%s;%s;", mSv1.c_str(), mFlavorText.c_str());
fputs("\r\n", output);
}
void ItemDef :: Debug_WriteReport(ReportBuffer &report)
{
report.AddLine("%s [%d] lev:%d, qlev:%d", mDisplayName.c_str(), mID, mLevel, mQualityLevel);
report.AddLine("%s | %s | %s", GetEquipType(mEquipType), GetArmorType(mArmorType), GetWeaponType(mWeaponType));
report.AddLine("str:%d, dex:%d, con:%d, psy:%d, spi:%d", mBonusStrength, mBonusDexterity, mBonusConstitution, mBonusPsyche, mBonusSpirit);
report.AddLine("armor:%d, dmg:%d-%d", mArmorResistMelee, mWeaponDamageMin, mWeaponDamageMax);
if(mFlavorText.size() > 0)
{
std::string tmp = mFlavorText;
size_t pos;
pos = tmp.find(FLAVOR_TEXT_HEADER);
if(pos != string::npos)
tmp.erase(pos, strlen(FLAVOR_TEXT_HEADER));
pos = tmp.find(FLAVOR_TEXT_FOOTER);
if(pos != string::npos)
tmp.erase(pos, strlen(FLAVOR_TEXT_FOOTER));
report.AddLine("flavor:%s", tmp.c_str());
}
report.AddLine(NULL);
}
script SAMSARA_DECORATE (int choice, int arg1, int arg2)
{
int clipcount;
int result;
int i, j, k;
int x, y, z;
int armorIndex, armorToSet;
int pln = PlayerNumber();
switch (choice)
{
case 1:
result = GetActorProperty(0, APROP_Dropped);
break;
case 2:
if (CheckInventory("WolfenMovement") == 1) { SetActorState(0, "Spawn"); }
break;
case 3:
result = !(GetCVar("sv_itemrespawn") || GetCVar("sv_weaponstay"));
break;
case 4:
result = isInvasion() || !(isCoop() || isSinglePlayer());
break;
case 5:
SetActivatorToTarget(0);
result = CheckInventory("Cell");
if (arg1) { TakeInventory("Cell", result); }
break;
case 6:
result = GetCVar("skulltag");
break;
case 7:
if (arg2 != 1)
{
GiveQuad(arg1);
}
else
{
if (isLMS())
{
if (GetCvar("samsara_permaquad") == 1)
{ GiveInventory("QuadDamageItem", 1); }
break;
}
GiveQuad(arg1);
if (GetCvar("samsara_permaquad") == 1)//if (isCoop() || isSinglePlayer())
{ GiveInventory("QuadDamageItem", 1); }
}
break;
case 8:
result = defaultCVar("samsara_cl_expparticles", 0);
if (!result) { result = 100; }
result = max(0, result);
result *= max(arg1, 1);
result /= max(arg2, 1);
GiveInventory("QuakeExplosionCounter", result);
break;
case 9:
clipcount = CheckInventory("Clip");
if (clipcount < 50)
{
GiveInventory("Clip", 50 - clipcount);
TakeInventory("Clip", CheckInventory("Clip") - 50);
result = 1;
}
break;
case 10:
TakeInventory("QuakeExplosionCounter", arg1);
result = CheckInventory("QuakeExplosionCounter");
break;
case 15:
SetActorProperty(0, APROP_Speed, percFloat(arg1, arg2));
break;
case 16:
if (GameType () != GAME_SINGLE_PLAYER)
{
SetHudSize(400, 300, 0);
Hudmessage(s:"Press any button to respawn.";
HUDMSG_PLAIN,1,CR_LIGHTBLUE,200.4,9.1,1.75);
delay(15);
if (!CheckInventory("DukeBallgag"))
{
LocalAmbientSound("duke/mpdeath",127);
GiveInventory("DukeTauntCooldown",5);
ACS_ExecuteAlways(205,0,0);
}
}
break;
case 17:
if (arg1) { result = GetCVar("samsara_permault"); }
else { result = GetCVar("sv_weaponstay"); }
break;
case 18:
if (MapArmors[0] == -1) { CheckMapArmors(); }
SetArmorMode();
i = Timer() != 0;
if (MapArmors[ARMOR_YELLOW] == 1) { i += 2; }
SetActorState(0, ArmorModeStates[ArmorMode][i]);
break;
case 19:
result = isLMS();
break;
case 20:
SetArmorMode();
armorIndex = -1;
armorToSet = arg1;
for (i = 0; i < ARMORCOUNT; i++)
{
if (GetArmorType(ArmorItems[ArmorMode][i][0], pln))
{
armorIndex = i;
break;
}
}
arg1 = middle(0, arg1, ARMORCOUNT-1);
i = CheckInventory("Armor");
j = ArmorItems[ArmorMode][arg1][1];
if (j == 0) { result = 0; break; }
/* If we're adding armor, always follow through
Else, if the ending armor count is lower than the current armor count
and we're not upgrading our armor, give up now */
if (arg2 > 0)
{
if (arg1 <= armorIndex) { armorToSet = armorIndex; }
}
else if (((arg2 == 0 && i > j) || (arg2 < 0 && i > -arg2)) && (arg1 <= armorIndex))
{
result = 0;
break;
}
if (arg2 <= 0)
{
TakeInventory("BasicArmor", i);
GiveInventory(ArmorItems[ArmorMode][armorToSet][0], 1);
k = CheckInventory("Armor");
if (arg2 == 0) { break; }
TakeInventory("BasicArmor", k-1);
GiveInventory("InfiniteArmorBonus", -arg2 - 1);
}
else
{
TakeInventory("BasicArmor", i);
GiveInventory(ArmorItems[ArmorMode][armorToSet][0], 1);
k = CheckInventory("Armor");
TakeInventory("BasicArmor", k-1);
GiveInventory("InfiniteArmorBonus", (i + arg2) - 1);
}
result = 1;
break;
case 21:
i = CheckInventory("Armor");
if (i < arg1) { result = 0; break; }
TakeInventory("BasicArmor", i-arg1);
result = 1;
break;
case 22:
result = GetCVar("samsara_nohealthcap");
break;
case 23:
GiveInventory("TimeBombPause", 1);
Delay(arg1);
TakeInventory("TimeBombPause", 1);
break;
case 24:
result = GetCVar("samsara_noult");
break;
case 25:
if (GameType() == GAME_NET_COOPERATIVE)
{ AmbientSound("quake/invisannouncer",127); }
else
{ LocalAmbientSound("quake/invisannouncer",127); }
break;
case 26:
if (CheckInventory("PowerInvisibility") == 0)
{ GiveInventory("PowerInvisibility",1); }
else
{ TakeInventory("PowerInvisibility",1);
delay(1);
GiveInventory("PowerShadow",1);
delay(1);
GiveInventory("PowerShadow",1); }
break;
case 27:
result = GetCVar("samsara_nounique");
break;
case 28:
result = GetCVar("samsara_noinvuln");
break;
case 29:
result = GetCVar("instagib");
break;
case 30:
result = GetCVar("samsara_cl_bloodyhell");
break;
case 31:
result = GetCVar("samsara_cl_bloodypersistent");
break;
case 32:
result = GetCVar("samsara_nohealth");
break;
case 33:
result = GetCVar("samsara_vanillaquake");
break;
}
