static char *sccsid
= "@(#)dr_5.c 1.2 83/07/20";
subtract(from
, totalfrom
, crewfrom
, fromcap
, pcfrom
)
struct ship
*from
, *fromcap
;
register int totalfrom
, crewfrom
[3];
if (fromcap
== from
&& totalfrom
) { /* if not captured */
for (n
= 0; n
< 3; n
++) {
if (totalfrom
> crewfrom
[n
]) {
totalfrom
-= crewfrom
[n
];
crewfrom
[n
] -= totalfrom
;
Write(W_CREW
, from
, 0, crewfrom
[0], crewfrom
[1], crewfrom
[2], 0);
pcfrom
= pcfrom
< 0 ? 0 : pcfrom
;
Write(W_PCREW
, from
, 0, pcfrom
, 0, 0, 0);
mensent(from
, to
, crew
, captured
, pc
, isdefense
)
struct ship
*from
, *to
, **captured
;
{ /* returns # of crew squares sent */
*captured
= from
->file
->captured
;
crew
[0] = from
->specs
->crew1
;
crew
[1] = from
->specs
->crew2
;
crew
[2] = from
->specs
->crew3
;
bp
= isdefense
? from
->file
->DBP
: from
->file
->OBP
;
for (n
=0; n
< NBP
; n
++, bp
++) {
if (bp
->turnsent
&& bp
->toship
== to
)
c1
= men
/100 ? crew
[0] : 0;
c2
= (men
%100)/10 ? crew
[1] : 0;
c3
= men
/10 ? crew
[2] : 0;
c3
= *captured
== 0 ? crew
[2] : *pc
;