public void executeMsg(final Environmental myHost, final CMMsg msg) {
if (processing) return;
if (!(affected instanceof Item)) return;
processing = true;
Item myItem = (Item) affected;
if ((myItem != null)
&& (msg.targetMinor() == CMMsg.TYP_DAMAGE)
&& ((msg.value()) > 0)
&& (!myItem.amWearingAt(Wearable.IN_INVENTORY))
&& (myItem.owner() instanceof MOB)
&& (msg.target() instanceof MOB)) {
MOB mob = (MOB) myItem.owner();
if ((mob.isInCombat()) && (mob.location() != null) && (!mob.amDead())) {
if ((myItem instanceof Weapon)
&& (msg.tool() == myItem)
&& (myItem.amWearingAt(Wearable.WORN_WIELD))
&& (msg.amISource(mob)))
addMeIfNeccessary(msg.source(), (MOB) msg.target(), true, 0, maxTicks);
else if ((msg.amITarget(mob))
&& (!myItem.amWearingAt(Wearable.WORN_WIELD))
&& (!(myItem instanceof Weapon))) addMeIfNeccessary(mob, mob, true, 0, maxTicks);
}
}
processing = false;
}
public static InventoryList fetchInventory(MOB seer, MOB mob) {
final InventoryList lst = new InventoryList();
Vector<Coins> coinsV = null;
int insertAt = -1;
CMLib.beanCounter().getTotalAbsoluteNativeValue(mob);
for (final Enumeration<Item> i = mob.items(); i.hasMoreElements(); ) {
final Item thisItem = i.nextElement();
if (thisItem == null) continue;
if ((thisItem.container() == null) && (thisItem.amWearingAt(Wearable.IN_INVENTORY))) {
if (CMLib.flags().canBeSeenBy(thisItem, seer)) lst.foundAndSeen = true;
else lst.foundButUnseen = true;
if ((!(thisItem instanceof Coins)) || (((Coins) thisItem).getDenomination() == 0.0))
lst.viewItems.add(thisItem);
else {
coinsV = lst.moneyItems.get(((Coins) thisItem).getCurrency());
if (coinsV == null) {
coinsV = new Vector<Coins>();
lst.moneyItems.put(((Coins) thisItem).getCurrency(), coinsV);
}
for (insertAt = 0; insertAt < coinsV.size(); insertAt++)
if (coinsV.get(insertAt).getDenomination() > ((Coins) thisItem).getDenomination())
break;
if (insertAt >= coinsV.size()) coinsV.add((Coins) thisItem);
else coinsV.insertElementAt((Coins) thisItem, insertAt);
}
}
}
return lst;
}
public String correctItem(MOB mob) {
for (int i = 0; i < mob.numItems(); i++) {
final Item I = mob.getItem(i);
if ((I != null)
&& (CMLib.flags().canBeSeenBy(I, mob))
&& (I.amWearingAt(Wearable.IN_INVENTORY))
&& (!((((I instanceof Armor) && (I.basePhyStats().armor() > 1))
|| ((I instanceof Weapon) && (I.basePhyStats().damage() > 1)))))) return I.Name();
}
return null;
}
public boolean armorCheck(MOB mob, int allowedArmorLevel) {
if (allowedArmorLevel == CharClass.ARMOR_ANY) return true;
for (int i = 0; i < mob.inventorySize(); i++) {
Item I = mob.fetchInventory(i);
if ((I != null) && (!I.amWearingAt(Wearable.IN_INVENTORY))) {
boolean ok = armorCheck(mob, I, allowedArmorLevel);
if ((!ok) && ((I.rawWornCode() & CharClass.ARMOR_WEARMASK) > 0)) return false;
}
}
return true;
}
public Item targetItem(MOB target) {
final Vector<Item> V = new Vector<Item>();
for (int i = 0; i < target.numItems(); i++) {
final Item I2 = target.getItem(i);
if ((!I2.amWearingAt(Wearable.IN_INVENTORY))
&& (((I2 instanceof Weapon) && (I2.basePhyStats().damage() > 1))
|| ((I2 instanceof Armor) && (I2.basePhyStats().armor() > 1)))
&& (I2.container() == null)) V.addElement(I2);
}
if (V.size() > 0) return V.elementAt(CMLib.dice().roll(1, V.size(), -1));
return null;
}
@Override
public boolean tick(Tickable ticking, int tickID) {
Item I = null;
if (affected instanceof Item) I = (Item) affected;
if ((canBeUninvoked())
&& (I != null)
&& (I.owner() instanceof MOB)
&& (I.amWearingAt(Wearable.WORN_NECK))) {
final MOB mob = (MOB) I.owner();
if ((!mob.amDead()) && (mob.isMonster()) && (CMLib.flags().isInTheGame(mob, false)))
CMLib.commands().postRemove(mob, I, false);
}
return super.tick(ticking, tickID);
}
public void outfit(MOB mob, Vector items) {
if ((mob == null) || (items == null) || (items.size() == 0)) return;
for (int i = 0; i < items.size(); i++) {
Item I = (Item) items.elementAt(i);
if (mob.fetchInventory("$" + I.name() + "$") == null) {
I = (Item) I.copyOf();
I.text();
I.recoverEnvStats();
mob.addInventory(I);
if (I.whereCantWear(mob) <= 0) I.wearIfPossible(mob);
if (((I instanceof Armor) || (I instanceof Weapon))
&& (I.amWearingAt(Wearable.IN_INVENTORY))) I.destroy();
}
}
}
private Item getItem(MOB mobTarget) {
final Vector goodPossibilities = new Vector();
final Vector possibilities = new Vector();
for (int i = 0; i < mobTarget.numItems(); i++) {
final Item item = mobTarget.getItem(i);
if (item != null) {
if (item.amWearingAt(Wearable.IN_INVENTORY)) possibilities.addElement(item);
else goodPossibilities.addElement(item);
}
}
if (goodPossibilities.size() > 0)
return (Item) goodPossibilities.elementAt(CMLib.dice().roll(1, goodPossibilities.size(), -1));
else if (possibilities.size() > 0)
return (Item) possibilities.elementAt(CMLib.dice().roll(1, possibilities.size(), -1));
return null;
}
@Override
public void unInvoke() {
Item I = null;
if (affected instanceof Item) I = (Item) affected;
super.unInvoke();
if ((canBeUninvoked())
&& (I != null)
&& (I.owner() instanceof MOB)
&& (!I.amWearingAt(Wearable.IN_INVENTORY))) {
final MOB mob = (MOB) I.owner();
if ((!mob.amDead()) && (CMLib.flags().isInTheGame(mob, false))) {
mob.tell(L("@x1 loosens its grip on your neck and falls off.", I.name(mob)));
I.setRawWornCode(0);
mob.location().moveItemTo(I, ItemPossessor.Expire.Player_Drop);
}
}
}
public void confirmWearability(MOB mob) {
if (mob == null) return;
Race R = mob.charStats().getMyRace();
DVector reWearSet = new DVector(2);
Item item = null;
for (int i = 0; i < mob.inventorySize(); i++) {
item = mob.fetchInventory(i);
if ((item != null) && (!item.amWearingAt(Wearable.IN_INVENTORY))) {
Long oldCode = Long.valueOf(item.rawWornCode());
item.unWear();
if (reWearSet.size() == 0) reWearSet.addElement(item, oldCode);
else {
short layer = (item instanceof Armor) ? ((Armor) item).getClothingLayer() : 0;
int d = 0;
for (; d < reWearSet.size(); d++)
if (reWearSet.elementAt(d, 1) instanceof Armor) {
if (((Armor) reWearSet.elementAt(d, 1)).getClothingLayer() > layer) break;
} else if (0 > layer) break;
if (d >= reWearSet.size()) reWearSet.addElement(item, oldCode);
else reWearSet.insertElementAt(d, item, oldCode);
}
}
}
for (int r = 0; r < reWearSet.size(); r++) {
item = (Item) reWearSet.elementAt(r, 1);
long oldCode = ((Long) reWearSet.elementAt(r, 2)).longValue();
int msgCode = CMMsg.MSG_WEAR;
if ((oldCode & Wearable.WORN_WIELD) > 0) msgCode = CMMsg.MSG_WIELD;
else if ((oldCode & Wearable.WORN_HELD) > 0) msgCode = CMMsg.MSG_HOLD;
CMMsg msg =
CMClass.getMsg(
mob, item, null, CMMsg.NO_EFFECT, null, msgCode, null, CMMsg.NO_EFFECT, null);
if ((R.okMessage(mob, msg))
&& (item.okMessage(item, msg))
&& ((mob.charStats().getWearableRestrictionsBitmap() & oldCode) == 0)
&& (item.canWear(mob, oldCode))) item.wearAt(oldCode);
}
// why wasn't that here before?
mob.recoverEnvStats();
mob.recoverCharStats();
mob.recoverMaxState();
}
public Item getPossibility(MOB mobTarget) {
if (mobTarget != null) {
final Vector goodPossibilities = new Vector();
final Vector possibilities = new Vector();
for (int i = 0; i < mobTarget.numItems(); i++) {
final Item item = mobTarget.getItem(i);
if ((item != null)
&& ((item.material() & RawMaterial.MATERIAL_MASK) == RawMaterial.MATERIAL_WOODEN)
&& (item.subjectToWearAndTear())) {
if (item.amWearingAt(Wearable.IN_INVENTORY)) possibilities.addElement(item);
else goodPossibilities.addElement(item);
}
if (goodPossibilities.size() > 0)
return (Item)
goodPossibilities.elementAt(CMLib.dice().roll(1, goodPossibilities.size(), -1));
else if (possibilities.size() > 0)
return (Item) possibilities.elementAt(CMLib.dice().roll(1, possibilities.size(), -1));
}
}
return null;
}
public Item isRuinedLoot(DVector policies, Item I) {
if (I == null) return null;
if ((CMath.bset(I.envStats().disposition(), EnvStats.IS_UNSAVABLE))
|| (CMath.bset(I.envStats().sensesMask(), EnvStats.SENSE_ITEMNORUIN))
|| (I instanceof Coins)) return I;
if (I.name().toLowerCase().indexOf("ruined ") >= 0) return I;
for (int d = 0; d < policies.size(); d++) {
if ((((Vector) policies.elementAt(d, 3)).size() > 0)
&& (!CMLib.masking().maskCheck((Vector) policies.elementAt(d, 3), I, true))) continue;
if (CMLib.dice().rollPercentage() > ((Integer) policies.elementAt(d, 1)).intValue()) continue;
int flags = ((Integer) policies.elementAt(d, 2)).intValue();
if (CMath.bset(flags, CMMiscUtils.LOOTFLAG_WORN) && I.amWearingAt(Wearable.IN_INVENTORY))
continue;
else if (CMath.bset(flags, CMMiscUtils.LOOTFLAG_UNWORN)
&& (!I.amWearingAt(Wearable.IN_INVENTORY))) continue;
if (CMath.bset(flags, CMMiscUtils.LOOTFLAG_LOSS)) return null;
Item I2 = CMClass.getItem("GenItem");
I2.baseEnvStats().setWeight(I.baseEnvStats().weight());
I2.setName(I.Name());
I2.setDisplayText(I.displayText());
I2.setDescription(I2.description());
I2.recoverEnvStats();
I2.setMaterial(I.material());
String ruinDescAdder = null;
switch (I2.material() & RawMaterial.MATERIAL_MASK) {
case RawMaterial.MATERIAL_LEATHER:
case RawMaterial.MATERIAL_CLOTH:
case RawMaterial.MATERIAL_VEGETATION:
case RawMaterial.MATERIAL_FLESH:
case RawMaterial.MATERIAL_PAPER:
ruinDescAdder =
CMStrings.capitalizeFirstLetter(I2.name()) + " is torn and ruined beyond repair.";
break;
case RawMaterial.MATERIAL_METAL:
case RawMaterial.MATERIAL_MITHRIL:
case RawMaterial.MATERIAL_WOODEN:
ruinDescAdder =
CMStrings.capitalizeFirstLetter(I2.name()) + " is battered and ruined beyond repair.";
break;
case RawMaterial.MATERIAL_GLASS:
ruinDescAdder =
CMStrings.capitalizeFirstLetter(I2.name())
+ " is shattered and ruined beyond repair.";
break;
case RawMaterial.MATERIAL_ROCK:
case RawMaterial.MATERIAL_PRECIOUS:
case RawMaterial.MATERIAL_PLASTIC:
ruinDescAdder =
CMStrings.capitalizeFirstLetter(I2.name()) + " is cracked and ruined beyond repair.";
break;
case RawMaterial.MATERIAL_UNKNOWN:
case RawMaterial.MATERIAL_ENERGY:
case RawMaterial.MATERIAL_LIQUID:
default:
ruinDescAdder = CMStrings.capitalizeFirstLetter(I2.name()) + " is ruined beyond repair.";
break;
}
I2.setDescription(CMStrings.endWithAPeriod(I2.description()) + " " + ruinDescAdder);
String oldName = I2.Name();
I2.setName(CMLib.english().insertUnColoredAdjective(I2.Name(), "ruined"));
int x = I2.displayText().toUpperCase().indexOf(oldName.toUpperCase());
I2.setBaseValue(0);
if (x >= 0)
I2.setDisplayText(
I2.displayText().substring(0, x)
+ I2.Name()
+ I2.displayText().substring(x + oldName.length()));
return I2;
}
return I;
}
@Override
public boolean invoke(MOB mob, Vector commands, Physical givenTarget, boolean auto, int asLevel) {
if ((auto || mob.isMonster())
&& ((commands.size() < 1) || (((String) commands.firstElement()).equals(mob.name())))) {
commands.clear();
if (mob.numItems() > 0) commands.addElement(mob.getRandomItem());
commands.addElement(CMLib.map().getRandomArea().Name());
}
final Room oldRoom = mob.location();
if (commands.size() < 2) {
mob.tell(L("Teleport what object to what place or person?"));
return false;
}
final String objectName = (String) commands.firstElement();
final Item target = mob.findItem(null, objectName);
if (target == null) {
mob.tell(L("You don't seem to have an item '@x1'.", objectName));
return false;
}
if (target.amWearingAt(Wearable.IN_INVENTORY)) {
mob.tell(L("You seem to be wearing or holding the item '@x1'.", objectName));
return false;
}
String searchWhat = null;
if (commands.size() > 2) {
final String s = (String) commands.elementAt(1);
if (s.equalsIgnoreCase("room")) searchWhat = "R";
if (s.equalsIgnoreCase("area")) searchWhat = "E";
if (s.equalsIgnoreCase("mob")) searchWhat = "M";
if (s.equalsIgnoreCase("monster")) searchWhat = "M";
if (s.equalsIgnoreCase("player")) searchWhat = "P";
if (s.equalsIgnoreCase("user")) searchWhat = "P";
if (s.equalsIgnoreCase("item")) searchWhat = "I";
if (s.equalsIgnoreCase("object")) searchWhat = "I";
if (searchWhat != null) commands.removeElementAt(1);
}
if (searchWhat == null) searchWhat = "ERIPM";
final String destinationString = CMParms.combine(commands, 1).trim().toUpperCase();
final List<Room> candidates =
CMLib.map().findWorldRoomsLiberally(mob, destinationString, searchWhat, 10, 600000);
if (candidates.size() == 0) {
mob.tell(L("You don't know of a place called '@x1'.", destinationString.toLowerCase()));
return false;
}
if (CMLib.flags().isSitting(mob) || CMLib.flags().isSleeping(mob)) {
mob.tell(L("You need to stand up!"));
return false;
}
Room newRoom = null;
int tries = 0;
while ((tries < 20) && (newRoom == null)) {
newRoom = candidates.get(CMLib.dice().roll(1, candidates.size(), -1));
if (((newRoom.roomID().length() == 0) && (CMLib.dice().rollPercentage() > 50))
|| ((newRoom.domainType() == Room.DOMAIN_OUTDOORS_AIR)
&& (CMLib.dice().rollPercentage() > 10))) {
newRoom = null;
continue;
}
final CMMsg enterMsg =
CMClass.getMsg(
mob,
newRoom,
null,
CMMsg.MSG_ENTER,
null,
CMMsg.MSG_ENTER,
null,
CMMsg.MSG_ENTER,
null);
if (!newRoom.okMessage(mob, enterMsg)) newRoom = null;
tries++;
}
if ((newRoom == null) || (newRoom == oldRoom)) {
mob.tell(L("Your magic seems unable to send anything there."));
return false;
}
if (!super.invoke(mob, commands, givenTarget, auto, asLevel)) return false;
boolean success = proficiencyCheck(mob, 0, auto);
final CMMsg msg =
CMClass.getMsg(
mob,
target,
this,
somanticCastCode(mob, target, auto),
L("^S<S-NAME> invoke(s) a teleportation spell upon <T-NAME>.^?"));
if (oldRoom.okMessage(mob, msg)) {
oldRoom.send(mob, msg);
newRoom.bringMobHere(mob, false);
target.unWear();
success = CMLib.commands().postDrop(mob, target, true, false, false) && (!mob.isMine(target));
oldRoom.bringMobHere(mob, false);
if (success) {
oldRoom.show(mob, target, null, CMMsg.MSG_OK_VISUAL, L("<T-NAME> vanishes!"));
newRoom.showOthers(
mob, target, null, CMMsg.MSG_OK_VISUAL, L("<T-NAME> appear(s) out of nowhere!"));
} else mob.tell(L("Nothing happens."));
}
// return whether it worked
return success;
}
public StringBuffer deviations(MOB mob, String rest) {
final Vector<String> V = CMParms.parse(rest);
if ((V.size() == 0)
|| ((!V.get(0).equalsIgnoreCase("mobs"))
&& (!V.get(0).equalsIgnoreCase("items"))
&& (!V.get(0).equalsIgnoreCase("both"))))
return new StringBuffer(
"You must specify whether you want deviations on MOBS, ITEMS, or BOTH.");
final String type = V.get(0).toLowerCase();
if (V.size() == 1)
return new StringBuffer(
"You must also specify a mob or item name, or the word room, or the word area.");
final Room mobR = mob.location();
Faction useFaction = null;
for (final Enumeration<Faction> e = CMLib.factions().factions(); e.hasMoreElements(); ) {
final Faction F = e.nextElement();
if (F.showInSpecialReported()) useFaction = F;
}
final String where = V.get(1).toLowerCase();
final Environmental E = mobR.fetchFromMOBRoomFavorsItems(mob, null, where, Wearable.FILTER_ANY);
final Vector<Environmental> check = new Vector<Environmental>();
if (where.equalsIgnoreCase("room")) fillCheckDeviations(mobR, type, check);
else if (where.equalsIgnoreCase("area")) {
for (final Enumeration<Room> r = mobR.getArea().getFilledCompleteMap();
r.hasMoreElements(); ) {
final Room R = r.nextElement();
fillCheckDeviations(R, type, check);
}
} else if (where.equalsIgnoreCase("world")) {
for (final Enumeration<Room> r = CMLib.map().roomsFilled(); r.hasMoreElements(); ) {
final Room R = r.nextElement();
fillCheckDeviations(R, type, check);
}
} else if (E == null)
return new StringBuffer("'" + where + "' is an unknown item or mob name.");
else if (type.equals("items") && (!(E instanceof Weapon)) && (!(E instanceof Armor)))
return new StringBuffer("'" + where + "' is not a weapon or armor item.");
else if (type.equals("mobs") && (!(E instanceof MOB)))
return new StringBuffer("'" + where + "' is not a MOB.");
else if ((!(E instanceof Weapon)) && (!(E instanceof Armor)) && (!(E instanceof MOB)))
return new StringBuffer("'" + where + "' is not a MOB, or Weapon, or Item.");
else check.add(E);
final StringBuffer str = new StringBuffer("");
str.append(L("Deviations Report:\n\r"));
final StringBuffer itemResults = new StringBuffer();
final StringBuffer mobResults = new StringBuffer();
for (int c = 0; c < check.size(); c++) {
if (check.get(c) instanceof Item) {
final Item I = (Item) check.get(c);
Weapon W = null;
if (I instanceof Weapon) W = (Weapon) I;
final Map<String, String> vals =
CMLib.itemBuilder()
.timsItemAdjustments(
I,
I.phyStats().level(),
I.material(),
I.rawLogicalAnd() ? 2 : 1,
(W == null) ? 0 : W.weaponClassification(),
I.maxRange(),
I.rawProperLocationBitmap());
itemResults.append(CMStrings.padRight(I.name(), 20) + " ");
itemResults.append(CMStrings.padRight(I.ID(), 10) + " ");
itemResults.append(CMStrings.padRight("" + I.phyStats().level(), 4) + " ");
itemResults.append(
CMStrings.padRight(
"" + getDeviation(I.basePhyStats().attackAdjustment(), vals, "ATTACK"), 5)
+ " ");
itemResults.append(
CMStrings.padRight("" + getDeviation(I.basePhyStats().damage(), vals, "DAMAGE"), 5)
+ " ");
itemResults.append(
CMStrings.padRight("" + getDeviation(I.basePhyStats().damage(), vals, "ARMOR"), 5)
+ " ");
itemResults.append(
CMStrings.padRight("" + getDeviation(I.baseGoldValue(), vals, "VALUE"), 5) + " ");
itemResults.append(
CMStrings.padRight(
""
+ ((I.phyStats().rejuv() == PhyStats.NO_REJUV)
? " MAX"
: "" + I.phyStats().rejuv()),
5)
+ " ");
if (I instanceof Weapon)
itemResults.append(CMStrings.padRight("" + I.basePhyStats().weight(), 4));
else
itemResults.append(
CMStrings.padRight("" + getDeviation(I.basePhyStats().weight(), vals, "WEIGHT"), 4)
+ " ");
if (I instanceof Armor)
itemResults.append(CMStrings.padRight("" + ((Armor) I).phyStats().height(), 4));
else itemResults.append(CMStrings.padRight(" - ", 4) + " ");
itemResults.append("\n\r");
} else {
final MOB M = (MOB) check.get(c);
mobResults.append(CMStrings.padRight(M.name(), 20) + " ");
mobResults.append(CMStrings.padRight("" + M.phyStats().level(), 4) + " ");
mobResults.append(
CMStrings.padRight(
""
+ getDeviation(
M.basePhyStats().attackAdjustment(), CMLib.leveler().getLevelAttack(M)),
5)
+ " ");
mobResults.append(
CMStrings.padRight(
""
+ getDeviation(
M.basePhyStats().damage(),
(int)
Math.round(
CMath.div(
CMLib.leveler().getLevelMOBDamage(M),
M.basePhyStats().speed()))),
5)
+ " ");
mobResults.append(
CMStrings.padRight(
""
+ getDeviation(
M.basePhyStats().armor(), CMLib.leveler().getLevelMOBArmor(M)),
5)
+ " ");
mobResults.append(
CMStrings.padRight(
""
+ getDeviation(
M.basePhyStats().speed(), CMLib.leveler().getLevelMOBSpeed(M)),
5)
+ " ");
mobResults.append(
CMStrings.padRight(
""
+ ((M.phyStats().rejuv() == PhyStats.NO_REJUV)
? " MAX"
: "" + M.phyStats().rejuv()),
5)
+ " ");
if (useFaction != null)
mobResults.append(
CMStrings.padRight(
""
+ (M.fetchFaction(useFaction.factionID()) == Integer.MAX_VALUE
? "N/A"
: "" + M.fetchFaction(useFaction.factionID())),
7)
+ " ");
double value = CMLib.beanCounter().getTotalAbsoluteNativeValue(M);
double[] range = CMLib.leveler().getLevelMoneyRange(M);
if (value < range[0])
mobResults.append(CMStrings.padRight("" + getDeviation(value, range[0]), 5) + " ");
else if (value > range[1])
mobResults.append(CMStrings.padRight("" + getDeviation(value, range[1]), 5) + " ");
else mobResults.append(CMStrings.padRight("0%", 5) + " ");
int reallyWornCount = 0;
for (int j = 0; j < M.numItems(); j++) {
final Item Iw = M.getItem(j);
if (!(Iw.amWearingAt(Wearable.IN_INVENTORY))) reallyWornCount++;
}
mobResults.append(CMStrings.padRight("" + reallyWornCount, 5) + " ");
mobResults.append("\n\r");
}
}
if (itemResults.length() > 0) str.append(itemHeader() + itemResults.toString());
if (mobResults.length() > 0) str.append(mobHeader(useFaction) + mobResults.toString());
return str;
}