+static void identify_ship(struct univ_object *univ)
+{
+ char buf[64];
+ int lasv;
+
+ lasv = ship_list[univ->type]->front_laser;
+ if (!(univ->flags & FLG_TACTICAL)) {
+#ifdef HACKING
+ unsigned flags = univ->flags;
+ sprintf(buf, "%s %s%s%s%s", ship_list[univ->type]->name,
+ (flags & FLG_ANGRY) ? "A" : "",
+ (flags & FLG_TARGET) ? "T" : "",
+ (flags & FLG_HOSTILE) ? "H" : "",
+ (flags & FLG_POLICE) ? "P" : "");
+#else
+ sprintf(buf, "%s", ship_list[univ->type]->name);
+#endif
+ } else {
+#ifdef HACKING
+ unsigned flags = univ->flags;
+ sprintf(buf, "%s (%d) %s%s%s%s", ship_list[univ->type]->name,
+ univ->energy,
+ (flags & FLG_ANGRY) ? "A" : "",
+ (flags & FLG_TARGET) ? "T" : "",
+ (flags & FLG_HOSTILE) ? "H" : "",
+ (flags & FLG_POLICE) ? "P" : "");
+#else
+ sprintf(buf, "%s (%d)", ship_list[univ->type]->name, univ->energy);
+#endif
+ }
+ gfx_display_text(point_list[lasv].x + 4, point_list[lasv].y + 4, buf);
+}