protected void clearWarrants(
final MOB officer, final MOB invoker, final Room R, final Area A, final LegalBehavior B) {
final List<LegalWarrant> warrants = B.getWarrantsOf(A, invoker);
if ((warrants != null) && (warrants.size() > 0)) {
boolean didSomething = false;
for (LegalWarrant W : warrants) {
if ((W.arrestingOfficer() == officer)
&& (System.currentTimeMillis() > W.getIgnoreUntilTime())) {
if (W.state() != Law.STATE_SEEKING) didSomething = true;
B.release(A, W);
}
}
if (didSomething && (officer.location() == invoker.location())) {
R.show(officer, invoker, CMMsg.MSG_HANDS, L("<S-NAME> wink(s) at <T-NAME>."));
}
}
}
@Override
public void executeMsg(final Environmental myHost, final CMMsg msg) {
if ((System.currentTimeMillis() - lastClanCheck) > TimeManager.MILI_HOUR) {
lastClanCheck = System.currentTimeMillis();
if ((clanID().length() > 0) && (CMLib.clans().getClan(clanID()) == null)) {
destroy();
return;
}
}
if (StdClanItem.stdExecuteMsg(this, msg)) {
super.executeMsg(myHost, msg);
if ((msg.amITarget(this))
&& (clanID().length() > 0)
&& (msg.source().getClanRole(clanID()) != null)) {
final Room R = msg.source().location();
if (R == null) return;
if ((msg.targetMinor() == CMMsg.TYP_DROP) && (msg.trailerMsgs() == null)) {
msg.addTrailerMsg(CMClass.getMsg(msg.source(), this, CMMsg.MSG_LOOK, null));
setRightfulOwner(R);
} else if ((msg.targetMinor() == CMMsg.TYP_LOOK)
|| (msg.targetMinor() == CMMsg.TYP_EXAMINE)) {
final LegalBehavior B = CMLib.law().getLegalBehavior(R);
String s = "";
if (B != null) s = B.conquestInfo(CMLib.law().getLegalObject(R));
if (s.length() > 0) msg.source().tell(s);
else msg.source().tell(L("This area is under the control of the Archons."));
return;
} else if ((msg.targetMinor() == CMMsg.TYP_SPEAK)
&& (CMSecurity.isAllowed(msg.source(), R, CMSecurity.SecFlag.CMDROOMS))
&& (msg.targetMessage() != null)) {
final String msgStr = CMStrings.getSayFromMessage(msg.targetMessage().toUpperCase());
final String alert = "I HEREBY DECLARE THIS AREA";
final int msgIndex = msgStr.indexOf(alert);
if (msgIndex >= 0) {
final LegalBehavior B = CMLib.law().getLegalBehavior(R);
if (B != null) B.setControlPoints(clanID(), B.controlPoints() + 1);
}
}
}
}
}
@Override
public int castingQuality(MOB mob, Physical target) {
if ((mob != null) && (target != null) && (target instanceof MOB)) {
final Race R = ((MOB) target).charStats().getMyRace();
if (R.bodyMask()[Race.BODY_HEAD] <= 0) return Ability.QUALITY_INDIFFERENT;
LegalBehavior B = null;
if (mob.location() != null) B = CMLib.law().getLegalBehavior(mob.location());
List<LegalWarrant> warrants = new Vector<LegalWarrant>();
if (B != null)
warrants = B.getWarrantsOf(CMLib.law().getLegalObject(mob.location()), (MOB) target);
if (warrants.size() == 0) return Ability.QUALITY_INDIFFERENT;
final Item w = mob.fetchWieldedItem();
Weapon ww = null;
if ((w == null) || (!(w instanceof Weapon))) return Ability.QUALITY_INDIFFERENT;
ww = (Weapon) w;
if (ww.weaponDamageType() != Weapon.TYPE_SLASHING) return Ability.QUALITY_INDIFFERENT;
if (mob.isInCombat() && (mob.rangeToTarget() > 0)) return Ability.QUALITY_INDIFFERENT;
if (!CMLib.flags().isBoundOrHeld(target)) return Ability.QUALITY_INDIFFERENT;
}
return super.castingQuality(mob, target);
}
public static boolean robberyCheck(LandTitle A, CMMsg msg) {
if (((msg.targetMinor() == CMMsg.TYP_GET) && (!msg.isTarget(CMMsg.MASK_INTERMSG)))
|| (msg.targetMinor() == CMMsg.TYP_PUSH)
|| (msg.targetMinor() == CMMsg.TYP_PULL)) {
if ((msg.target() instanceof Item)
&& (((Item) msg.target()).owner() == msg.source().location())
&& ((!(msg.tool() instanceof Item)) || (msg.source().isMine(msg.tool())))
&& (!msg.sourceMajor(CMMsg.MASK_ALWAYS))
&& (A.getOwnerName().length() > 0)
&& (msg.source().location() != null)
&& (msg.othersMessage() != null)
&& (msg.othersMessage().length() > 0)
&& (!shopkeeperMobPresent(msg.source().location()))
&& (!CMLib.law().doesHavePriviledgesHere(msg.source(), msg.source().location()))) {
final Room R = msg.source().location();
final LegalBehavior B = CMLib.law().getLegalBehavior(R);
if (B != null) {
for (int m = 0; m < R.numInhabitants(); m++) {
final MOB M = R.fetchInhabitant(m);
if (CMLib.law().doesHavePriviledgesHere(M, R)) return true;
}
MOB D = null;
final Clan C = CMLib.clans().getClan(A.getOwnerName());
if (C != null) D = C.getResponsibleMember();
else D = CMLib.players().getLoadPlayer(A.getOwnerName());
if (D == null) return true;
B.accuse(
CMLib.law().getLegalObject(R),
msg.source(),
D,
new String[] {"PROPERTYROB", "THIEF_ROBBERY"});
}
}
return true;
}
return false;
}
@Override
public boolean invoke(
MOB mob, List<String> commands, Physical givenTarget, boolean auto, int asLevel) {
if (commands.size() < 1) {
mob.tell(L("Pay Off Whom?"));
return false;
}
final MOB target = this.getTarget(mob, commands, givenTarget);
if (target == null) return false;
if ((target.charStats().getStat(CharStats.STAT_INTELLIGENCE) < 3) || (!target.isMonster())) {
mob.tell(L("You can't pay off @x1.", target.name(mob)));
return false;
}
final LegalBehavior B = CMLib.law().getLegalBehavior(mob.location());
final Area A = (B == null) ? null : CMLib.law().getLegalObject(mob.location());
if ((A == null) || (B == null)) {
mob.tell(L("There's no point in paying off @x1.", target.name(mob)));
return false;
}
boolean isJudge = B.isJudge(A, target);
if ((!isJudge) && (!B.isAnyOfficer(A, target))) {
mob.tell(L("Paying off @x1 won't help you.", target.name(mob)));
return false;
}
final List<LegalWarrant> warrants = B.getWarrantsOf(A, mob);
if ((warrants == null) || (warrants.size() == 0)) {
mob.tell(L("Pay off @x1? Why? You aren't in any trouble.", target.name(mob)));
return false;
}
if (target.fetchEffect(ID()) != null) {
mob.tell(L("@x1 is already paid off.", target.name(mob)));
return false;
}
if (!super.invoke(mob, commands, givenTarget, auto, asLevel)) return false;
double amountRequired =
CMLib.beanCounter().getTotalAbsoluteNativeValue(target)
+ ((double)
((100l
- ((mob.charStats().getStat(CharStats.STAT_CHARISMA)
+ (2l * getXLEVELLevel(mob)))
* 2)))
* target.phyStats().level());
if (isJudge) amountRequired *= 2;
final String currency = CMLib.beanCounter().getCurrency(target);
boolean success = proficiencyCheck(mob, 0, auto);
if ((!success) || (CMLib.beanCounter().getTotalAbsoluteValue(mob, currency) < amountRequired)) {
final CMMsg msg =
CMClass.getMsg(
mob,
target,
this,
CMMsg.MSG_SPEAK,
L(
"^T<S-NAME> attempt(s) to pay off <T-NAMESELF> to '@x1', but no deal is reached.^?",
CMParms.combine(commands, 0)));
if (mob.location().okMessage(mob, msg)) mob.location().send(mob, msg);
if (CMLib.beanCounter().getTotalAbsoluteValue(mob, currency) < amountRequired) {
final String costWords = CMLib.beanCounter().nameCurrencyShort(currency, amountRequired);
mob.tell(L("@x1 requires @x2 to do this.", target.charStats().HeShe(), costWords));
}
success = false;
} else {
final String costWords = CMLib.beanCounter().nameCurrencyShort(target, amountRequired);
final CMMsg msg =
CMClass.getMsg(
mob,
target,
this,
CMMsg.MSG_THIEF_ACT,
L("^T<S-NAME> pay(s) off <T-NAMESELF>.^?", CMParms.combine(commands, 0), costWords));
if (mob.location().okMessage(mob, msg)) {
mob.location().send(mob, msg);
CMLib.beanCounter().subtractMoney(mob, currency, amountRequired);
CMLib.beanCounter().addMoney(mob, currency, amountRequired);
if (isJudge) {
for (LegalWarrant W : warrants) {
if (W.punishment() > 0) W.setPunishment(W.punishment() - 1);
}
} else {
clearWarrants(target, mob, mob.location(), A, B);
super.beneficialAffect(mob, target, asLevel, 0);
}
}
target.recoverPhyStats();
}
return success;
}
@Override
public boolean okMessage(final Environmental myHost, final CMMsg msg) {
if ((clanID().length() > 0) && (msg.amITarget(this))) {
if (msg.source().getClanRole(clanID()) == null) {
if ((msg.targetMinor() == CMMsg.TYP_GET)
|| (msg.targetMinor() == CMMsg.TYP_PUSH)
|| (msg.targetMinor() == CMMsg.TYP_PULL)
|| (msg.targetMinor() == CMMsg.TYP_CAST_SPELL)) {
final Room R = CMLib.map().roomLocation(this);
if (CMLib.clans().findRivalrousClan(msg.source()) == null) {
msg.source().tell(L("You must belong to an elligible clan to take a clan item."));
return false;
} else if (R != null) {
for (int i = 0; i < R.numInhabitants(); i++) {
final MOB M = R.fetchInhabitant(i);
if ((M != null)
&& (M.isMonster())
&& (M.getClanRole(clanID()) != null)
&& (CMLib.flags().aliveAwakeMobileUnbound(M, true))
&& (CMLib.flags().canBeSeenBy(this, M))
&& (!CMLib.flags().isAnimalIntelligence(M))) {
R.show(
M, null, CMMsg.MSG_QUIETMOVEMENT, L("<S-NAME> guard(s) @x1 closely.", name()));
return false;
}
}
String rulingClan = "";
final LegalBehavior B = CMLib.law().getLegalBehavior(R);
if (B != null) rulingClan = B.rulingOrganization();
if (msg.source().getClanRole(rulingClan) == null) {
msg.source()
.tell(L("You must conquer and fully control this area to take the clan flag."));
return false;
}
if ((B != null) && (!B.isFullyControlled())) {
msg.source().tell(L("Your clan does not yet fully control the area."));
return false;
}
}
} else if ((msg.targetMinor() == CMMsg.TYP_DROP)
&& (!CMath.bset(msg.targetMajor(), CMMsg.MASK_INTERMSG))) {
final Room R = msg.source().location();
LandTitle T = null;
Area A = null;
LegalBehavior B = null;
if (R != null) {
A = R.getArea();
T = CMLib.law().getLandTitle(R);
}
if ((T == null)
|| ((!T.getOwnerName().equals(clanID()))
&& ((!T.getOwnerName().equals(msg.source().getLiegeID()))
|| (!msg.source().isMarriedToLiege()))
&& (!T.getOwnerName().equals(msg.source().Name())))) {
boolean ok = false;
if (A != null) {
B = CMLib.law().getLegalBehavior(R);
if (B != null) ok = B.controlPoints() > 0;
}
if (!ok) {
msg.source()
.tell(
L("You can not place a flag here, this place is controlled by the Archons."));
return false;
}
}
}
} else if ((msg.targetMinor() == CMMsg.TYP_GET)
&& (msg.source().location() != null)
&& (msg.source().isMonster())) {
boolean foundOne = false;
for (int i = 0; i < msg.source().location().numInhabitants(); i++) {
final MOB M = msg.source().location().fetchInhabitant(i);
if ((M != null) && (!M.isMonster()) && (M.getClanRole(clanID()) != null)) {
foundOne = true;
break;
}
}
if (!foundOne) {
msg.source().tell(L("You are guarding @x1 too closely.", name()));
return false;
}
}
}
if (StdClanItem.stdOkMessage(this, msg)) {
if ((clanID().length() > 0)
&& (msg.amITarget(this))
&& (msg.targetMinor() == CMMsg.TYP_DROP)) {
final LegalBehavior B = CMLib.law().getLegalBehavior(msg.source().location());
final String rulingClan = (B != null) ? B.rulingOrganization() : "";
if (rulingClan.length() == 0)
msg.source()
.tell(
L("Area '@x1' is presently neutral.", msg.source().location().getArea().name()));
else {
msg.source()
.tell(
L(
"Area '@x1' is presently controlled by @x2.",
msg.source().location().getArea().name(),
rulingClan));
if (!rulingClan.equals(clanID())) {
int relation = Clan.REL_WAR;
final Clan C = CMLib.clans().getClan(clanID());
if (C == null) {
msg.source().tell(L("This ancient relic from a lost clan fades out of existence."));
this.destroy();
return false;
}
relation = C.getClanRelations(rulingClan);
if (relation != Clan.REL_WAR) {
msg.source()
.tell(
L("You must be at war with this clan to put down your flag on their area."));
return false;
}
}
}
}
return super.okMessage(myHost, msg);
}
return false;
}
@Override
public boolean invoke(
MOB mob, List<String> commands, Physical givenTarget, boolean auto, int asLevel) {
final MOB target = super.getTarget(mob, commands, givenTarget);
if (target == null) return false;
final Race R = target.charStats().getMyRace();
if (R.bodyMask()[Race.BODY_HEAD] <= 0) {
mob.tell(L("@x1 has no head!", target.name(mob)));
return false;
}
LegalBehavior B = null;
if (mob.location() != null) B = CMLib.law().getLegalBehavior(mob.location());
List<LegalWarrant> warrants = new Vector<LegalWarrant>();
if (B != null) warrants = B.getWarrantsOf(CMLib.law().getLegalObject(mob.location()), target);
if ((warrants.size() == 0)
&& (!CMSecurity.isAllowed(mob, mob.location(), CMSecurity.SecFlag.ABOVELAW))) {
mob.tell(L("You are not allowed to behead @x1 at this time.", target.Name()));
return false;
}
final Item w = mob.fetchWieldedItem();
Weapon ww = null;
if ((w == null) || (!(w instanceof Weapon))) {
mob.tell(L("You cannot behead without a weapon!"));
return false;
}
ww = (Weapon) w;
if ((!auto) && (!CMSecurity.isASysOp(mob))) {
if (ww.weaponDamageType() != Weapon.TYPE_SLASHING) {
mob.tell(L("You cannot behead with a @x1!", ww.name()));
return false;
}
if (mob.isInCombat() && (mob.rangeToTarget() > 0)) {
mob.tell(L("You are too far away to try that!"));
return false;
}
if (!CMLib.flags().isBoundOrHeld(target)) {
mob.tell(L("@x1 is not bound and would resist.", target.charStats().HeShe()));
return false;
}
}
if (!super.invoke(mob, commands, givenTarget, auto, asLevel)) return false;
int levelDiff =
target.phyStats().level() - (mob.phyStats().level() + (2 * getXLEVELLevel(mob)));
if (levelDiff > 0) levelDiff = levelDiff * 3;
else levelDiff = 0;
final boolean hit = (auto) || CMLib.combat().rollToHit(mob, target);
boolean success = proficiencyCheck(mob, 0, auto) && (hit);
if (success) {
final CMMsg msg =
CMClass.getMsg(
mob,
target,
this,
CMMsg.MASK_MALICIOUS
| CMMsg.MASK_MOVE
| CMMsg.MASK_SOUND
| CMMsg.TYP_JUSTICE
| (auto ? CMMsg.MASK_ALWAYS : 0),
null);
if (mob.location().okMessage(mob, msg)) {
mob.location().send(mob, msg);
target.curState().setHitPoints(1);
final Ability A2 = target.fetchEffect("Injury");
if (A2 != null) A2.setMiscText(mob.Name() + "/head");
CMLib.combat()
.postDamage(
mob,
target,
ww,
Integer.MAX_VALUE / 2,
CMMsg.MSG_WEAPONATTACK,
ww.weaponClassification(),
auto
? ""
: L(
"^F^<FIGHT^><S-NAME> rear(s) back and behead(s) <T-NAME>!^</FIGHT^>^?@x1",
CMLib.protocol().msp("decap.wav", 30)));
mob.location().recoverRoomStats();
final Item limb = CMClass.getItem("GenLimb");
limb.setName(L("@x1`s head", target.Name()));
limb.basePhyStats().setAbility(1);
limb.setDisplayText(L("the bloody head of @x1 is sitting here.", target.Name()));
limb.setSecretIdentity(target.name() + "`s bloody head.");
int material = RawMaterial.RESOURCE_MEAT;
for (int r = 0; r < R.myResources().size(); r++) {
final Item I = R.myResources().get(r);
final int mat = I.material() & RawMaterial.MATERIAL_MASK;
if (((mat == RawMaterial.MATERIAL_FLESH)) || (r == R.myResources().size() - 1)) {
material = I.material();
break;
}
}
limb.setMaterial(material);
limb.basePhyStats().setLevel(1);
limb.basePhyStats().setWeight(5);
limb.recoverPhyStats();
mob.location().addItem(limb, ItemPossessor.Expire.Player_Drop);
for (int i = 0; i < warrants.size(); i++) {
final LegalWarrant W = warrants.get(i);
W.setCrime("pardoned");
W.setOffenses(0);
}
} else success = false;
if (mob.getVictim() == target) mob.makePeace(true);
if (target.getVictim() == mob) target.makePeace(true);
} else maliciousFizzle(mob, target, L("<S-NAME> attempt(s) a beheading and fail(s)!"));
return success;
}