/* Can ship A shoot at ship B? */
canshoot(a,b)
struct	shpstr *a,*b;
{
	/* Anyone can shoot a normal ship */
	if ((mchr[b->shp_type] & M_SUB) == 0)
		return 1;

	/* You can depth-charge a sub */
	if (mchr[a->shp_type] & M_DCH)
		return 1;

	/* If you have SUBT flag, you can torp a sub */
	if (mchr[a->shp_type] & M_SUBT)
		return 1;

	return 0;
}
