/* This is just a 'toy' event */
void mech_lock_event(EVENT * e)
{
MECH *mech = (MECH *) e->data;
MAP *map;
MECH *target;
if (MechTarget(mech) >= 0) {
map = getMap(mech->mapindex);
target = FindObjectsData(MechTarget(mech));
if (!target)
return;
if (!InLineOfSight(mech, target, MechX(target), MechY(target),
FlMechRange(map, mech, target)))
return;
mech_notify(mech, MECHALL,
tprintf("The sensors acquire a stable lock on %s.",
GetMechToMechID(mech, target)));
} else if (MechTargX(mech) >= 0 && MechTargY(mech) >= 0)
mech_notify(mech, MECHALL,
tprintf("The sensors acquire a stable lock on (%d,%d).",
MechTargX(mech), MechTargY(mech)));
}
float findC3RangeWithNetwork(MECH * mech, MECH * mechTarget,
float realRange, dbref * myNetwork,
int networkSize, dbref * c3Ref)
{
float c3Range = 0.0;
float bestRange = 0.0;
int i;
int inLOS = 0;
int mapX, mapY;
float hexX, hexY, hexZ;
MECH *otherMech;
MAP *map;
bestRange = realRange;
*c3Ref = 0;
if(networkSize == 0)
return realRange;
for(i = 0; i < networkSize; i++) {
otherMech = getMechInTempNetwork(i, myNetwork, networkSize);
if(!otherMech)
continue;
if(!Good_obj(otherMech->mynum))
continue;
if(mechTarget) {
if(otherMech == mechTarget)
continue;
debugC3(tprintf
("C3RANGE-NETWORK (mech): Finding range from %d to %d.",
mech->mynum, mechTarget->mynum));
c3Range = FaMechRange(otherMech, mechTarget);
inLOS =
InLineOfSight(otherMech, mechTarget, MechX(mechTarget),
MechY(mechTarget), c3Range);
} else if((MechTargX(mech) > 0) && (MechTargY(mech) > 0)) {
mapX = MechTargX(mech);
mapY = MechTargY(mech);
map = getMap(mech->mapindex);
debugC3(tprintf
("C3RANGE-NETWORK (hex): Finding range from %d to %d %d.",
mech->mynum, mapX, mapY));
MechTargZ(mech) = Elevation(map, mapX, mapY);
hexZ = ZSCALE * MechTargZ(mech);
MapCoordToRealCoord(mapX, mapY, &hexX, &hexY);
c3Range =
FindRange(MechFX(otherMech), MechFY(otherMech),
MechFZ(otherMech), hexX, hexY, hexZ);
inLOS = LOS_NB(otherMech, NULL, mapX, mapY, c3Range);
} else {
continue;
}
if(inLOS && (c3Range < bestRange)) {
bestRange = c3Range;
*c3Ref = otherMech->mynum;
}
}
return bestRange;
}
