void mech_fall_event(EVENT * e)
{
MECH *mech = (MECH *) e->data;
int fallspeed = (int) e->data2;
int fallen_elev;
if (Started(mech) && fallspeed >= 0)
return;
if (fallspeed <= 0 && (!Started(mech) || !(FlyingT(mech)) ||
((AeroFuel(mech) <= 0) && !AeroFreeFuel(mech)) ||
((MechType(mech) == CLASS_VTOL) &&
(SectIsDestroyed(mech, ROTOR)))))
fallspeed -= FALL_ACCEL;
else
fallspeed += FALL_ACCEL;
MarkForLOSUpdate(mech);
if (MechsElevation(mech) > abs(fallspeed)) {
MechZ(mech) -= abs(fallspeed);
MechFZ(mech) = MechZ(mech) * ZSCALE;
MECHEVENT(mech, EVENT_FALL, mech_fall_event, FALL_TICK, fallspeed);
return;
}
/* Time to hit da ground */
fallen_elev = factoral(abs(fallspeed));
mech_notify(mech, MECHALL, "You hit the ground!");
MechLOSBroadcast(mech, "hits the ground!");
MechFalls(mech, fallen_elev, 0);
MechStatus(mech) &= ~JUMPING;
}
void mech_recovery_event(EVENT * e)
{
MECH *mech = (MECH *) e->data;
if (Destroyed(mech) || !Uncon(mech))
return;
if (handlemwconc(mech, 0)) {
MechStatus(mech) &= ~UNCONSCIOUS;
mech_notify(mech, MECHALL, "The pilot regains consciousness!");
return;
}
}
void ProlongUncon(MECH * mech, int len)
{
int l;
if (Destroyed(mech))
return;
if (!Recovering(mech)) {
MechStatus(mech) |= UNCONSCIOUS;
MECHEVENT(mech, EVENT_RECOVERY, mech_recovery_event, len, 0);
return;
}
l = event_last_type_data(EVENT_RECOVERY, (void *) mech) + len;
event_remove_type_data(EVENT_RECOVERY, (void *) mech);
MECHEVENT(mech, EVENT_RECOVERY, mech_recovery_event, l, 0);
}
static int
load_update1(void *key, void *data, int depth, void *arg)
{
const dbref key_val = (dbref)key;
XCODE *const xcode_obj = data;
FILE *const fp = arg;
MAP *map;
int doh;
char mapbuffer[MBUF_SIZE];
MECH *mech;
int i;
int ctemp;
switch (xcode_obj->type) {
case GTYPE_MAP:
map = (MAP *)xcode_obj;
memset(map->mapobj, 0, sizeof(map->mapobj));
map->map = NULL;
strcpy(mapbuffer, map->mapname);
doh = (map->flags & MAPFLAG_MAPO);
if(strcmp(map->mapname, "Default Map"))
map_loadmap(1, map, mapbuffer);
if(!strcmp(map->mapname, "Default Map") || !map->map)
initialize_map_empty(map, key_val);
if(!feof(fp)) {
load_mapdynamic(fp, map);
if(!feof(fp))
if(doh)
load_mapobjs(fp, map);
}
if(feof(fp)) {
map->first_free = 0;
map->mechflags = NULL;
map->mechsOnMap = NULL;
map->LOSinfo = NULL;
}
debug_fixmap(GOD, map, NULL);
break;
case GTYPE_MECH:
mech = (MECH *)xcode_obj;
if(!(FlyingT(mech) && !Landed(mech))) {
MechDesiredSpeed(mech) = 0;
MechSpeed(mech) = 0;
MechVerticalSpeed(mech) = 0;
}
ctemp = MechCocoon(mech);
if(MechCocoon(mech)) {
MechCocoon(mech) = 0;
initiate_ood((dbref) GOD, mech, tprintf("%d %d %d", MechX(mech), MechY(mech), MechZ(mech)));
MechCocoon(mech) = ctemp;
}
if(!FlyingT(mech) && Started(mech) && Jumping(mech))
mech_Rsetxy(GOD, (void *) mech, tprintf("%d %d", MechX(mech),MechY(mech)));
MechStatus(mech) &= ~(BLINDED | UNCONSCIOUS | JUMPING | TOWED);
MechSpecials2(mech) &=
~(ECM_ENABLED | ECM_DISTURBANCE | ECM_PROTECTED |
ECCM_ENABLED | ANGEL_ECM_ENABLED | ANGEL_ECCM_ENABLED |
ANGEL_ECM_PROTECTED | ANGEL_ECM_DISTURBED);
MechCritStatus(mech) &= ~(JELLIED | LOAD_OK | OWEIGHT_OK | SPEED_OK);
MechWalkXPFactor(mech) = 999;
MechCarrying(mech) = -1;
MechBoomStart(mech) = 0;
MechC3iNetworkSize(mech) = -1;
MechHeatLast(mech) = 0;
MechCommLast(mech) = 0;
// ClearStaggerDamage
mech->rd.staggerDamageList = NULL;
if(!(MechXPMod(mech)))
MechXPMod(mech) = 1;
for(i = 0; i < FREQS; i++)
if(mech->freq[i] < 0)
mech->freq[i] = 0;
break;
}
return 1;
}
void showNetworkTargets(dbref player, MECH * mech, int tIsC3)
{
MAP *objMap = getMap(mech->mapindex);
int i, j, wTemp, bearing;
MECH *otherMech;
float realRange, c3Range;
char buff[100];
char *mech_name;
char move_type[30];
char cStatus1, cStatus2, cStatus3, cStatus4, cStatus5;
char weaponarc;
int losFlag;
int arc;
int wSeeTarget = TARG_LOS_NONE;
int wC3SeeTarget = TARG_LOS_NONE;
int tShowStatusInfo = 0;
char bufflist[MAX_MECHS_PER_MAP][120];
float rangelist[MAX_MECHS_PER_MAP];
int buffindex = 0;
int sbuff[MAX_MECHS_PER_MAP];
int networkSize;
dbref myNetwork[C3_NETWORK_SIZE];
dbref c3Ref;
buildTempNetwork(mech, myNetwork, &networkSize, 1, 1, 0, tIsC3);
/*
* Send then a 'contacts' style report. This is different from the
* normal contacts since it has a 'physical' range in it too.
*/
notify_printf(player, "%s Contacts:", tIsC3 ? "C3" : "C3i");
for(i = 0; i < objMap->first_free; i++) {
if(!(objMap->mechsOnMap[i] != mech->mynum &&
objMap->mechsOnMap[i] != -1))
continue;
otherMech = (MECH *) FindObjectsData(objMap->mechsOnMap[i]);
if(!otherMech)
continue;
if(!Good_obj(otherMech->mynum))
continue;
tShowStatusInfo = 0;
realRange = FlMechRange(objMap, mech, otherMech);
losFlag =
InLineOfSight(mech, otherMech, MechX(otherMech),
MechY(otherMech), realRange);
/*
* If we do see them, let's make sure it's not just a 'something'
*/
if(losFlag) {
if(InLineOfSight_NB(mech, otherMech, MechX(otherMech),
MechY(otherMech), 0.0))
wSeeTarget = TARG_LOS_CLEAR;
else
wSeeTarget = TARG_LOS_SOMETHING;
} else
wSeeTarget = TARG_LOS_NONE;
/*
* If I don't see it, let's see if someone else in the network does
*/
if(wSeeTarget != TARG_LOS_CLEAR)
wC3SeeTarget = mechSeenByNetwork(mech, otherMech, tIsC3);
/* If noone sees it, we continue */
if(!wSeeTarget && !wC3SeeTarget)
continue;
/* Get our network range */
c3Range =
findC3RangeWithNetwork(mech, otherMech, realRange, myNetwork,
networkSize, &c3Ref);
/* Figure out if we show the info or not... ie, do we actually 'see' it */
if((wSeeTarget != TARG_LOS_CLEAR) && (wC3SeeTarget != TARG_LOS_CLEAR)) {
tShowStatusInfo = 0;
mech_name = "something";
} else {
tShowStatusInfo = 1;
mech_name = silly_atr_get(otherMech->mynum, A_MECHNAME);
}
bearing =
FindBearing(MechFX(mech), MechFY(mech), MechFX(otherMech),
MechFY(otherMech));
strcpy(move_type, GetMoveTypeID(MechMove(otherMech)));
/* Get our weapon arc */
arc = InWeaponArc(mech, MechFX(otherMech), MechFY(otherMech));
weaponarc = getWeaponArc(mech, arc);
/* Now get our status chars */
if(!tShowStatusInfo) {
cStatus1 = ' ';
cStatus2 = ' ';
cStatus3 = ' ';
cStatus4 = ' ';
cStatus5 = ' ';
} else {
cStatus1 = getStatusChar(mech, otherMech, 1);
cStatus2 = getStatusChar(mech, otherMech, 2);
cStatus3 = getStatusChar(mech, otherMech, 3);
cStatus4 = getStatusChar(mech, otherMech, 4);
cStatus5 = getStatusChar(mech, otherMech, 5);
}
/* Now, build the string */
sprintf(buff,
"%s%c%c%c[%s]%c %-11.11s x:%3d y:%3d z:%3d r:%4.1f c:%4.1f b:%3d s:%5.1f h:%3d S:%c%c%c%c%c%s",
otherMech->mynum == MechTarget(mech) ? "%ch%cr" :
(tShowStatusInfo &&
!MechSeemsFriend(mech, otherMech)) ? "%ch%cy" : "",
(losFlag & MECHLOSFLAG_SEESP) ? 'P' : ' ',
(losFlag & MECHLOSFLAG_SEESS) ? 'S' : ' ', weaponarc,
MechIDS(otherMech, MechSeemsFriend(mech, otherMech) ||
!tShowStatusInfo), move_type[0], mech_name,
MechX(otherMech), MechY(otherMech), MechZ(otherMech),
realRange, c3Range, bearing, MechSpeed(otherMech),
MechVFacing(otherMech), cStatus1, cStatus2, cStatus3,
cStatus4, cStatus5, (otherMech->mynum == MechTarget(mech)
|| !MechSeemsFriend(mech,
otherMech)) ? "%c" :
"");
rangelist[buffindex] = realRange;
rangelist[buffindex] +=
(MechStatus(otherMech) & DESTROYED) ? 10000 : 0;
strcpy(bufflist[buffindex++], buff);
}
for(i = 0; i < buffindex; i++)
sbuff[i] = i;
/* print a sorted list of detected mechs */
/* use the ever-popular bubble sort */
for(i = 0; i < (buffindex - 1); i++)
for(j = (i + 1); j < buffindex; j++)
if(rangelist[sbuff[j]] > rangelist[sbuff[i]]) {
wTemp = sbuff[i];
sbuff[i] = sbuff[j];
sbuff[j] = wTemp;
}
for(i = 0; i < buffindex; i++)
notify(player, bufflist[sbuff[i]]);
notify_printf(player, "End %s Contact List", tIsC3 ? "C3" : "C3i");
}
