int
-increase_mob(time_t *counter, float mult)
+increase_mob(time_t * counter, float mult)
{
time_t secs;
time_t now;
extern int updating_mob;
int newetus;
float newmob;
- int inewmob;
+ int inewmob;
time(&now);
secs = now - *counter;
if (secs < 1 || secs < s_p_etu)
- return 0;
- newetus = (int)(secs / s_p_etu);
+ return 0;
+ newetus = (int)(secs / s_p_etu);
if (newetus < 1)
return 0;
left = (secs % s_p_etu);
do {
- newmob = (float)(newetus * mult);
- inewmob = (int)(newetus * mult);
- if (newmob == inewmob || newetus > 7)
- break;
- newetus--;
- left += s_p_etu;
+ newmob = (float)(newetus * mult);
+ inewmob = (int)(newetus * mult);
+ if (newmob == inewmob || newetus > 7)
+ break;
+ newetus--;
+ left += s_p_etu;
} while (newetus > 0);
if (newetus <= 0)
- return 0;
+ return 0;
time(counter);
*counter = *counter - left;
if (updating_mob)
- return (newetus);
+ return (newetus);
return 0;
}
void
update_timestamps(time_t lastsavedtime)
{
- struct shpstr *shipp;
- struct sctstr *sectp;
- struct lndstr *landp;
- struct plnstr *planep;
- int n;
- time_t now;
- time_t delta;
-
- timestamp_fixing = 1;
- time(&now);
- delta = now - lastsavedtime;
- for (n = 0; (shipp = getshipp(n)); n++)
- shipp->shp_access += delta;
- for (n = 0; (sectp = getsectid(n)); n++)
- sectp->sct_access += delta;
- for (n = 0; (landp = getlandp(n)); n++)
- landp->lnd_access += delta;
- for (n = 0; (planep = getplanep(n)); n++)
- planep->pln_access += delta;
- timestamp_fixing = 0;
+ struct shpstr *shipp;
+ struct sctstr *sectp;
+ struct lndstr *landp;
+ struct plnstr *planep;
+ int n;
+ time_t now;
+ time_t delta;
+
+ timestamp_fixing = 1;
+ time(&now);
+ delta = now - lastsavedtime;
+ for (n = 0; (shipp = getshipp(n)); n++)
+ shipp->shp_access += delta;
+ for (n = 0; (sectp = getsectid(n)); n++)
+ sectp->sct_access += delta;
+ for (n = 0; (landp = getlandp(n)); n++)
+ landp->lnd_access += delta;
+ for (n = 0; (planep = getplanep(n)); n++)
+ planep->pln_access += delta;
+ timestamp_fixing = 0;
}
void
update_all_mob(void)
{
- struct shpstr *shipp;
- struct sctstr *sectp;
- struct lndstr *landp;
- struct plnstr *planep;
- int n;
-
- n = 0;
- while (1) {
- do_upd_checking = 1;
- shipp = getshipp(n);
- sectp = getsectid(n);
- landp = getlandp(n);
- planep = getplanep(n);
+ struct shpstr *shipp;
+ struct sctstr *sectp;
+ struct lndstr *landp;
+ struct plnstr *planep;
+ int n;
+
+ n = 0;
+ while (1) {
+ do_upd_checking = 1;
+ shipp = getshipp(n);
+ sectp = getsectid(n);
+ landp = getlandp(n);
+ planep = getplanep(n);
+ do_upd_checking = 0;
+ if (shipp)
+ shp_do_upd_mob(shipp);
+ if (sectp)
+ sct_do_upd_mob(sectp);
+ if (landp)
+ lnd_do_upd_mob(landp);
+ if (planep)
+ pln_do_upd_mob(planep);
+ if (!shipp && !sectp && !landp && !planep)
+ break;
+ n++;
+ }
do_upd_checking = 0;
- if (shipp)
- shp_do_upd_mob(shipp);
- if (sectp)
- sct_do_upd_mob(sectp);
- if (landp)
- lnd_do_upd_mob(landp);
- if (planep)
- pln_do_upd_mob(planep);
- if (!shipp && !sectp && !landp && !planep)
- break;
- n++;
- }
- do_upd_checking = 0;
}
void
int etus;
if (do_upd_checking || timestamp_fixing || update_pending)
- return;
+ return;
if (sp->sct_own == 0)
- return;
+ return;
if (sp->sct_type == SCT_SANCT)
- return;
+ return;
if ((etus = increase_mob(&sp->sct_access, sect_mob_scale)) == 0)
return;
do_upd_checking = 1;
int etus;
if (do_upd_checking || timestamp_fixing || update_pending)
- return;
+ return;
if (sp->shp_own == 0)
- return;
+ return;
if ((etus = increase_mob(&sp->shp_access, ship_mob_scale)) == 0)
- return;
+ return;
do_upd_checking = 1;
do_mob_ship(sp, etus);
do_upd_checking = 0;
int etus;
if (do_upd_checking || timestamp_fixing || update_pending)
- return;
+ return;
if (lp->lnd_own == 0)
- return;
+ return;
if ((etus = increase_mob(&lp->lnd_access, land_mob_scale)) == 0)
- return;
+ return;
do_upd_checking = 1;
do_mob_land(lp, etus);
int etus;
if (do_upd_checking || timestamp_fixing || update_pending)
- return;
+ return;
if (pp->pln_own == 0)
- return;
+ return;
if ((etus = increase_mob(&pp->pln_access, plane_mob_scale)) == 0)
- return;
+ return;
do_upd_checking = 1;
do_mob_plane(pp, etus);
void
mob_sect(register int etus)
{
- register struct sctstr *sp;
- register int n;
- time_t now;
-
- time(&now);
- for (n=0; NULL != (sp = getsectid(n)); n++) {
- sp->sct_timestamp = now;
- if (opt_MOB_ACCESS)
- sct_do_upd_mob(sp);
- else
- do_mob_sect(sp, etus);
- }
+ register struct sctstr *sp;
+ register int n;
+ time_t now;
+
+ time(&now);
+ for (n = 0; NULL != (sp = getsectid(n)); n++) {
+ sp->sct_timestamp = now;
+ if (opt_MOB_ACCESS)
+ sct_do_upd_mob(sp);
+ else
+ do_mob_sect(sp, etus);
+ }
}
void
do_mob_sect(register struct sctstr *sp, register int etus)
{
- extern float sect_mob_scale;
- extern int sect_mob_max;
- register int value;
+ extern float sect_mob_scale;
+ extern int sect_mob_max;
+ register int value;
if (sp->sct_own == 0)
- return;
+ return;
if (sp->sct_type == SCT_SANCT)
- return;
- /* Do we have to even bother? */
- if (sp->sct_mobil >= sect_mob_max) {
- /* No, so set just in case and then return */
- sp->sct_mobil = sect_mob_max;
- return;
- }
- value = sp->sct_mobil + ((float)etus * sect_mob_scale);
- if (value > sect_mob_max)
- value = sect_mob_max;
- sp->sct_mobil = value;
+ return;
+ /* Do we have to even bother? */
+ if (sp->sct_mobil >= sect_mob_max) {
+ /* No, so set just in case and then return */
+ sp->sct_mobil = sect_mob_max;
+ return;
+ }
+ value = sp->sct_mobil + ((float)etus * sect_mob_scale);
+ if (value > sect_mob_max)
+ value = sect_mob_max;
+ sp->sct_mobil = value;
}
void
mob_ship(register int etus)
{
- register struct shpstr *sp;
- register int n;
- time_t now;
-
- time(&now);
- for (n=0; NULL != (sp = getshipp(n)); n++) {
- sp->shp_timestamp = now;
- if (opt_MOB_ACCESS)
- shp_do_upd_mob(sp);
- else
- do_mob_ship(sp, etus);
- }
+ register struct shpstr *sp;
+ register int n;
+ time_t now;
+
+ time(&now);
+ for (n = 0; NULL != (sp = getshipp(n)); n++) {
+ sp->shp_timestamp = now;
+ if (opt_MOB_ACCESS)
+ shp_do_upd_mob(sp);
+ else
+ do_mob_ship(sp, etus);
+ }
}
void
do_mob_ship(register struct shpstr *sp, register int etus)
{
- extern int ship_mob_max;
- extern float ship_mob_scale;
- int newfuel=0;
+ extern int ship_mob_max;
+ extern float ship_mob_scale;
+ int newfuel = 0;
register int value;
- int can_add,have_fuel_for,total_add;
- double d;
- extern int fuel_mult;
+ int can_add, have_fuel_for, total_add;
+ double d;
+ extern int fuel_mult;
if (sp->shp_own == 0)
- return;
-
- /* Do we even have to bother updating this mobility? */
- if (sp->shp_mobil >= ship_mob_max) {
- /* No, so don't. Just set it to max (just in case) and
- return. */
- sp->shp_mobil = ship_mob_max;
- return;
- }
+ return;
+
+ /* Do we even have to bother updating this mobility? */
+ if (sp->shp_mobil >= ship_mob_max) {
+ /* No, so don't. Just set it to max (just in case) and
+ return. */
+ sp->shp_mobil = ship_mob_max;
+ return;
+ }
- if (opt_FUEL == 0) { /* only a bit to do ... */
- value = sp->shp_mobil + ((float)etus * ship_mob_scale);
- if (value > ship_mob_max)
- value = ship_mob_max;
- sp->shp_mobil = value;
- return; /* so we ship the FUEL stuff */
+ if (opt_FUEL == 0) { /* only a bit to do ... */
+ value = sp->shp_mobil + ((float)etus * ship_mob_scale);
+ if (value > ship_mob_max)
+ value = ship_mob_max;
+ sp->shp_mobil = value;
+ return; /* so we ship the FUEL stuff */
}
/* opt_FUEL in force */
if (mchr[(int)sp->shp_type].m_fuelu == 0) {
- value = sp->shp_mobil + ((float)etus * ship_mob_scale);
- if (value > ship_mob_max)
- value = ship_mob_max;
- sp->shp_mobil = (s_char)value;
+ value = sp->shp_mobil + ((float)etus * ship_mob_scale);
+ if (value > ship_mob_max)
+ value = ship_mob_max;
+ sp->shp_mobil = (s_char)value;
} else {
- can_add = ship_mob_max - sp->shp_mobil;
- if (can_add > ((float)etus*ship_mob_scale))
- can_add = ((float)etus*ship_mob_scale);
- have_fuel_for = ldround((((double)sp->shp_fuel /
- (double)mchr[(int)sp->shp_type].m_fuelu)*
- (double)fuel_mult),1);
-
- if (can_add > have_fuel_for){
- int need;
- need = can_add - have_fuel_for;
- d = (double)need;
- d *= (double)mchr[(int)sp->shp_type].m_fuelu;
- d /= (double)fuel_mult;
- d /= 5.0;
- if ((d-(int)d) > 0.0)
- d++;
- need = (int)d;
- newfuel = supply_commod(sp->shp_own,sp->shp_x,
- sp->shp_y,I_PETROL,need);
- sp->shp_fuel += (u_char)(newfuel * 5);
- }
-
- have_fuel_for = ldround((((double)sp->shp_fuel /
- (double)mchr[(int)sp->shp_type].m_fuelu)*
- (double)fuel_mult),1);
-
- if (can_add > have_fuel_for){
- int need;
- need = can_add - have_fuel_for;
- d = (double)need;
- d *= (double)mchr[(int)sp->shp_type].m_fuelu;
- d /= (double)fuel_mult;
- d /= 50.0;
- if ((d-(int)d) > 0.0)
- d++;
- need = (int)d;
- newfuel = supply_commod(sp->shp_own,sp->shp_x,
- sp->shp_y,I_OIL,need);
- sp->shp_fuel += (u_char)(newfuel * 50);
- }
-
- have_fuel_for = ldround((((double)sp->shp_fuel /
- (double)mchr[(int)sp->shp_type].m_fuelu)*
- (double)fuel_mult),1);
-
- if (can_add > have_fuel_for)
- total_add = have_fuel_for;
- else
- total_add = can_add;
- d = (double)total_add;
- d *= (double)mchr[(int)sp->shp_type].m_fuelu;
- d /= (double)fuel_mult;
- sp->shp_fuel -= (u_char)ldround(d,1);
- sp->shp_fuel = (u_char)min(sp->shp_fuel,
- mchr[(int)sp->shp_type].m_fuelc);
- sp->shp_mobil += (s_char)total_add;
+ can_add = ship_mob_max - sp->shp_mobil;
+ if (can_add > ((float)etus * ship_mob_scale))
+ can_add = ((float)etus * ship_mob_scale);
+ have_fuel_for = ldround((((double)sp->shp_fuel /
+ (double)mchr[(int)sp->shp_type].
+ m_fuelu) * (double)fuel_mult), 1);
+
+ if (can_add > have_fuel_for) {
+ int need;
+ need = can_add - have_fuel_for;
+ d = (double)need;
+ d *= (double)mchr[(int)sp->shp_type].m_fuelu;
+ d /= (double)fuel_mult;
+ d /= 5.0;
+ if ((d - (int)d) > 0.0)
+ d++;
+ need = (int)d;
+ newfuel = supply_commod(sp->shp_own, sp->shp_x,
+ sp->shp_y, I_PETROL, need);
+ sp->shp_fuel += (u_char)(newfuel * 5);
+ }
+
+ have_fuel_for = ldround((((double)sp->shp_fuel /
+ (double)mchr[(int)sp->shp_type].
+ m_fuelu) * (double)fuel_mult), 1);
+
+ if (can_add > have_fuel_for) {
+ int need;
+ need = can_add - have_fuel_for;
+ d = (double)need;
+ d *= (double)mchr[(int)sp->shp_type].m_fuelu;
+ d /= (double)fuel_mult;
+ d /= 50.0;
+ if ((d - (int)d) > 0.0)
+ d++;
+ need = (int)d;
+ newfuel = supply_commod(sp->shp_own, sp->shp_x,
+ sp->shp_y, I_OIL, need);
+ sp->shp_fuel += (u_char)(newfuel * 50);
+ }
+
+ have_fuel_for = ldround((((double)sp->shp_fuel /
+ (double)mchr[(int)sp->shp_type].
+ m_fuelu) * (double)fuel_mult), 1);
+
+ if (can_add > have_fuel_for)
+ total_add = have_fuel_for;
+ else
+ total_add = can_add;
+ d = (double)total_add;
+ d *= (double)mchr[(int)sp->shp_type].m_fuelu;
+ d /= (double)fuel_mult;
+ sp->shp_fuel -= (u_char)ldround(d, 1);
+ sp->shp_fuel = (u_char)min(sp->shp_fuel,
+ mchr[(int)sp->shp_type].m_fuelc);
+ sp->shp_mobil += (s_char)total_add;
}
}
void
mob_land(register int etus)
{
- register struct lndstr *lp;
- register int n;
- time_t now;
-
- time(&now);
- for (n=0; NULL != (lp = getlandp(n)); n++) {
- lp->lnd_timestamp = now;
- if (opt_MOB_ACCESS)
- lnd_do_upd_mob(lp);
- else
- do_mob_land(lp, etus);
- }
+ register struct lndstr *lp;
+ register int n;
+ time_t now;
+
+ time(&now);
+ for (n = 0; NULL != (lp = getlandp(n)); n++) {
+ lp->lnd_timestamp = now;
+ if (opt_MOB_ACCESS)
+ lnd_do_upd_mob(lp);
+ else
+ do_mob_land(lp, etus);
+ }
}
void
do_mob_land(register struct lndstr *lp, register int etus)
{
- extern int land_mob_max;
- extern float land_mob_scale;
- int newfuel=0;
+ extern int land_mob_max;
+ extern float land_mob_scale;
+ int newfuel = 0;
register int value;
- int can_add,have_fuel_for,total_add;
- double d;
- extern int fuel_mult;
-
+ int can_add, have_fuel_for, total_add;
+ double d;
+ extern int fuel_mult;
+
if (lp->lnd_own == 0)
- return;
-
- if (lp->lnd_mobil >= land_mob_max) {
- lp->lnd_mobil = land_mob_max;
- return;
- }
+ return;
+
+ if (lp->lnd_mobil >= land_mob_max) {
+ lp->lnd_mobil = land_mob_max;
+ return;
+ }
/*
* Give damaged units a break. When at low
* be too much of an advantage. So, we just add double
* the small amount of mob if we are < 0 instead.
*/
-
+
if (!opt_MOB_ACCESS) {
- if (lp->lnd_mobil < 0)
- lp->lnd_mobil /= 2;
- }
-
- if (opt_FUEL == 0) { /* just some bits and pieces */
- if (opt_MOB_ACCESS) {
if (lp->lnd_mobil < 0)
- value = lp->lnd_mobil + (2 * ((float)etus * land_mob_scale));
- else
+ lp->lnd_mobil /= 2;
+ }
+
+ if (opt_FUEL == 0) { /* just some bits and pieces */
+ if (opt_MOB_ACCESS) {
+ if (lp->lnd_mobil < 0)
+ value =
+ lp->lnd_mobil + (2 * ((float)etus * land_mob_scale));
+ else
+ value = lp->lnd_mobil + ((float)etus * land_mob_scale);
+ } else {
value = lp->lnd_mobil + ((float)etus * land_mob_scale);
- } else {
- value = lp->lnd_mobil + ((float)etus * land_mob_scale);
- }
- if (value > land_mob_max)
- value = land_mob_max;
- lp->lnd_mobil = value;
-
- return; /* Done! */
+ }
+ if (value > land_mob_max)
+ value = land_mob_max;
+ lp->lnd_mobil = value;
+
+ return; /* Done! */
}
-
+
/* opt_FUEL in force ... */
- if (lp->lnd_fuelu == 0){
- if (opt_MOB_ACCESS) {
- if (lp->lnd_mobil < 0)
- value = lp->lnd_mobil + (2 * ((float)etus * land_mob_scale));
- else
+ if (lp->lnd_fuelu == 0) {
+ if (opt_MOB_ACCESS) {
+ if (lp->lnd_mobil < 0)
+ value =
+ lp->lnd_mobil + (2 * ((float)etus * land_mob_scale));
+ else
+ value = lp->lnd_mobil + ((float)etus * land_mob_scale);
+ } else {
value = lp->lnd_mobil + ((float)etus * land_mob_scale);
- } else {
- value = lp->lnd_mobil + ((float)etus * land_mob_scale);
- }
- if (value > land_mob_max)
- value = land_mob_max;
- lp->lnd_mobil = value;
+ }
+ if (value > land_mob_max)
+ value = land_mob_max;
+ lp->lnd_mobil = value;
} else {
-
- can_add = land_mob_max - lp->lnd_mobil;
-
- if (can_add > ((float)etus*land_mob_scale))
- can_add = ((float)etus*land_mob_scale);
-
- have_fuel_for = (lp->lnd_fuel /
- lp->lnd_fuelu)*fuel_mult;
-
- if (can_add > have_fuel_for){
- int need;
- need = can_add - have_fuel_for;
- d = (double)need;
- d *= (double)lp->lnd_fuelu;
- d /= (double)fuel_mult;
- d /= 5.0;
- if ((d-(int)d) > 0.0)
- d++;
- need = (int)d;
- newfuel = supply_commod(lp->lnd_own,lp->lnd_x,
- lp->lnd_y,I_PETROL,need);
- lp->lnd_fuel += (u_char)(newfuel * 5);
- }
-
- have_fuel_for = (lp->lnd_fuel /
- lp->lnd_fuelu)*fuel_mult;
-
- if (can_add > have_fuel_for){
- int need;
- need = can_add - have_fuel_for;
- d = (double)need;
- d *= (double)lp->lnd_fuelu;
- d /= (double)fuel_mult;
- d /= 50.0;
- if ((d-(int)d) > 0.0)
- d++;
- need = (int)d;
- newfuel = supply_commod(lp->lnd_own,lp->lnd_x,
- lp->lnd_y,I_OIL,need);
- lp->lnd_fuel += (u_char)(newfuel * 50);
- }
-
- have_fuel_for = (lp->lnd_fuel /
- lp->lnd_fuelu)*fuel_mult;
-
- if (can_add > have_fuel_for){
- total_add = have_fuel_for;
- }
- else
- total_add = can_add;
- d = (double)total_add;
- d *= (double)lp->lnd_fuelu;
- d /= (double)fuel_mult;
- lp->lnd_fuel -= (u_char)ldround(d,1);
- lp->lnd_fuel = (u_char)min(lp->lnd_fuel,
- lp->lnd_fuelc);
- if(total_add + lp->lnd_mobil > land_mob_max) {
+
+ can_add = land_mob_max - lp->lnd_mobil;
+
+ if (can_add > ((float)etus * land_mob_scale))
+ can_add = ((float)etus * land_mob_scale);
+
+ have_fuel_for = (lp->lnd_fuel / lp->lnd_fuelu) * fuel_mult;
+
+ if (can_add > have_fuel_for) {
+ int need;
+ need = can_add - have_fuel_for;
+ d = (double)need;
+ d *= (double)lp->lnd_fuelu;
+ d /= (double)fuel_mult;
+ d /= 5.0;
+ if ((d - (int)d) > 0.0)
+ d++;
+ need = (int)d;
+ newfuel = supply_commod(lp->lnd_own, lp->lnd_x,
+ lp->lnd_y, I_PETROL, need);
+ lp->lnd_fuel += (u_char)(newfuel * 5);
+ }
+
+ have_fuel_for = (lp->lnd_fuel / lp->lnd_fuelu) * fuel_mult;
+
+ if (can_add > have_fuel_for) {
+ int need;
+ need = can_add - have_fuel_for;
+ d = (double)need;
+ d *= (double)lp->lnd_fuelu;
+ d /= (double)fuel_mult;
+ d /= 50.0;
+ if ((d - (int)d) > 0.0)
+ d++;
+ need = (int)d;
+ newfuel = supply_commod(lp->lnd_own, lp->lnd_x,
+ lp->lnd_y, I_OIL, need);
+ lp->lnd_fuel += (u_char)(newfuel * 50);
+ }
+
+ have_fuel_for = (lp->lnd_fuel / lp->lnd_fuelu) * fuel_mult;
+
+ if (can_add > have_fuel_for) {
+ total_add = have_fuel_for;
+ } else
+ total_add = can_add;
+ d = (double)total_add;
+ d *= (double)lp->lnd_fuelu;
+ d /= (double)fuel_mult;
+ lp->lnd_fuel -= (u_char)ldround(d, 1);
+ lp->lnd_fuel = (u_char)min(lp->lnd_fuel, lp->lnd_fuelc);
+ if (total_add + lp->lnd_mobil > land_mob_max) {
total_add = land_mob_max - lp->lnd_mobil;
}
-
+
if (opt_MOB_ACCESS) {
- if (lp->lnd_mobil < 0)
- lp->lnd_mobil += (s_char)total_add;
+ if (lp->lnd_mobil < 0)
+ lp->lnd_mobil += (s_char)total_add;
}
- lp->lnd_mobil += (s_char)total_add;
+ lp->lnd_mobil += (s_char)total_add;
}
}
void
mob_plane(register int etus)
{
- register struct plnstr *pp;
- register int n;
- time_t now;
-
- time(&now);
- for (n=0; NULL != (pp = getplanep(n)); n++) {
- pp->pln_timestamp = now;
- if (opt_MOB_ACCESS)
- pln_do_upd_mob(pp);
- else
- do_mob_plane(pp, etus);
- }
+ register struct plnstr *pp;
+ register int n;
+ time_t now;
+
+ time(&now);
+ for (n = 0; NULL != (pp = getplanep(n)); n++) {
+ pp->pln_timestamp = now;
+ if (opt_MOB_ACCESS)
+ pln_do_upd_mob(pp);
+ else
+ do_mob_plane(pp, etus);
+ }
}
void
do_mob_plane(register struct plnstr *pp, register int etus)
{
- extern int plane_mob_max;
- extern float plane_mob_scale;
+ extern int plane_mob_max;
+ extern float plane_mob_scale;
register int value;
if (pp->pln_own == 0)
- return;
- if (pp->pln_mobil >= plane_mob_max) {
- pp->pln_mobil = plane_mob_max;
- return;
- }
+ return;
+ if (pp->pln_mobil >= plane_mob_max) {
+ pp->pln_mobil = plane_mob_max;
+ return;
+ }
value = pp->pln_mobil + ((float)etus * plane_mob_scale);
if (value > plane_mob_max)
- value = plane_mob_max;
+ value = plane_mob_max;
pp->pln_mobil = value;
}