static char *sccsid
= "@(#)dr_4.c 2.2 83/12/17";
register struct ship
*from
, *to
;
if ((k
= grappled2(from
, to
)) == 0)
friend = capship(from
)->nationality
== capship(to
)->nationality
;
if (friend || die() < 3) {
cleangrapple(from
, to
, 0);
makesignal(from
, "ungrappling %s (%c%c)", to
);
register struct ship
*from
, *to
;
if (capship(from
)->nationality
!= capship(to
)->nationality
&& die() > 2)
Write(W_GRAP
, from
, 0, to
->file
->index
, 0, 0, 0);
Write(W_GRAP
, to
, 0, from
->file
->index
, 0, 0, 0);
makesignal(from
, "grappled with %s (%c%c)", to
);