static char *sccsid
= "@(#)pl_6.c 2.2 83/12/09";
if (repaired
|| loaded
|| fired
|| changed
|| turned()) {
Signal("No hands free to repair", (struct ship
*)0);
c
= sgetch("Repair (hull, guns, rigging)? ", (struct ship
*)0, 1);
Signal("Avast heaving!", (struct ship
*)0);
if (ptr
->hull
< ptr
->guns
/4)
if (ptr
->gunL
< ptr
->gunR
) {
if (ptr
->gunL
+ ptr
->carL
< ptr
->guns
/5)
ptr
->gunL
+ 2, ptr
->carL
, 0, 0);
if (ptr
->gunR
+ ptr
->carR
< ptr
->guns
/5)
ptr
->gunR
+ 2, ptr
->carR
, 0, 0);
Write(W_RIG3
, ms
, 0, 2, 0, 0, 0);
Write(W_RIG2
, ms
, 0, 2, 0, 0, 0);
Write(W_RIG1
, ms
, 0, 2, 0, 0, 0);
Signal("Repairs completed.", (struct ship
*)0);
for (p
= movebuf
; *p
; p
++)
if (*p
== 'r' || *p
== 'l')
register loadL
, loadR
, ready
, load
;
Signal("Out of crew", (struct ship
*)0);
c
= sgetch("Load which broadside (left or right)? ",
if (!loadL
&& loadR
|| loadL
&& !loadR
) {
c
= sgetch("Reload with (round, double, chain, grape)? ",
Signal("Broadside not loaded.",
mf
->readyR
= ready
|R_LOADING
;
mf
->readyL
= ready
|R_LOADING
;