f4f2985c1a2b6d886c8a350dd673a8dd7e4c6b9d
* Copyright (c) 1983, 1993
* The Regents of the University of California. All rights reserved.
* %sccs.include.redist.c%
static char sccsid
[] = "@(#)dr_4.c 8.1 (Berkeley) %G%";
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
);