-/*
-** Abandon Ship
-**
-** The ship is abandoned. If your current ship is the Faire
-** Queene, or if your shuttlecraft is dead, you're out of
-** luck. You need the shuttlecraft in order for the captain
-** (that's you!!) to escape.
-**
-** Your crew can beam to an inhabited starsystem in the
-** quadrant, if there is one and if the transporter is working.
-** If there is no inhabited starsystem, or if the transporter
-** is out, they are left to die in outer space.
-**
-** If there are no starbases left, you are captured by the
-** Klingons, who torture you mercilessly. However, if there
-** is at least one starbase, you are returned to the
-** Federation in a prisoner of war exchange. Of course, this
-** can't happen unless you have taken some prisoners.
-**
-*/
-
-void abandn(void)
-/* abandon ship */
+#define SYSTEM_NAMES \
+ { \
+ /* \
+ * I used <http://www.memory-alpha.org> to find planets \
+ * with references in ST:TOS. Eath and the Alpha Centauri \
+ * Colony have been omitted. \
+ * \
+ * Some planets marked Class G and P here will be displayed as class M \
+ * because of the way planets are generated. This is a known bug. \
+ */ \
+ /* Federation Worlds */ \
+ _("Andoria (Fesoan)"), /* several episodes */ \
+ _("Tellar Prime (Miracht)"), /* TOS: "Journey to Babel" */ \
+ _("Vulcan (T'Khasi)"), /* many episodes */ \
+ _("Medusa"), /* TOS: "Is There in Truth No Beauty?" */ \
+ _("Argelius II (Nelphia)"),/* TOS: "Wolf in the Fold" ("IV" in BSD) */ \
+ _("Ardana"), /* TOS: "The Cloud Minders" */ \
+ _("Catulla (Cendo-Prae)"), /* TOS: "The Way to Eden" */ \
+ _("Gideon"), /* TOS: "The Mark of Gideon" */ \
+ _("Aldebaran III"), /* TOS: "The Deadly Years" */ \
+ _("Alpha Majoris I"), /* TOS: "Wolf in the Fold" */ \
+ _("Altair IV"), /* TOS: "Amok Time */ \
+ _("Ariannus"), /* TOS: "Let That Be Your Last Battlefield" */ \
+ _("Benecia"), /* TOS: "The Conscience of the King" */ \
+ _("Beta Niobe I (Sarpeidon)"), /* TOS: "All Our Yesterdays" */ \
+ _("Alpha Carinae II"), /* TOS: "The Ultimate Computer" */ \
+ _("Capella IV (Kohath)"), /* TOS: "Friday's Child" (Class G) */ \
+ _("Daran V"), /* TOS: "For the World is Hollow and I Have Touched the Sky" */ \
+ _("Deneb II"), /* TOS: "Wolf in the Fold" ("IV" in BSD) */ \
+ _("Eminiar VII"), /* TOS: "A Taste of Armageddon" */ \
+ _("Gamma Canaris IV"), /* TOS: "Metamorphosis" */ \
+ _("Gamma Tranguli VI (Vaalel)"), /* TOS: "The Apple" */ \
+ _("Ingraham B"), /* TOS: "Operation: Annihilate" */ \
+ _("Janus IV"), /* TOS: "The Devil in the Dark" */ \
+ _("Makus III"), /* TOS: "The Galileo Seven" */ \
+ _("Marcos XII"), /* TOS: "And the Children Shall Lead", */ \
+ _("Omega IV"), /* TOS: "The Omega Glory" */ \
+ _("Regulus V"), /* TOS: "Amok Time */ \
+ _("Deneva"), /* TOS: "Operation -- Annihilate!" */ \
+ /* Worlds from BSD Trek */ \
+ _("Rigel II"), /* TOS: "Shore Leave" ("III" in BSD) */ \
+ _("Beta III"), /* TOS: "The Return of the Archons" */ \
+ _("Triacus"), /* TOS: "And the Children Shall Lead", */ \
+ _("Exo III"), /* TOS: "What Are Little Girls Made Of?" (Class P) */ \
+ }
+#if 0 /* Others */
+ _("Hansen's Planet"), /* TOS: "The Galileo Seven" */
+ _("Taurus IV"), /* TOS: "The Galileo Seven" (class G) */
+ _("Antos IV (Doraphane)"), /* TOS: "Whom Gods Destroy", "Who Mourns for Adonais?" */
+ _("Izar"), /* TOS: "Whom Gods Destroy" */
+ _("Tiburon"), /* TOS: "The Way to Eden" */
+ _("Merak II"), /* TOS: "The Cloud Minders" */
+ _("Coridan (Desotriana)"), /* TOS: "Journey to Babel" */
+ _("Iotia"), /* TOS: "A Piece of the Action" */
+#endif
+
+#define DEVICE_NAMES \
+ { \
+ _("S. R. Sensors"), \
+ _("L. R. Sensors"), \
+ _("Phasers"), \
+ _("Photon Tubes"), \
+ _("Life Support"), \
+ _("Warp Engines"), \
+ _("Impulse Engines"), \
+ _("Shields"), \
+ _("Subspace Radio"), \
+ _("Shuttle Craft"), \
+ _("Computer"), \
+ _("Navigation System"), \
+ _("Transporter"), \
+ _("Shield Control"), \
+ _("Death Ray"), \
+ _("D. S. Probe") \
+ }
+
+static void setup_names(void)
+/* Sets up some arrays with localized names.
+ * Must be done after iostart() for localization to work. */