with EinheitenDatentypen;
with EinheitenRecordKonstanten;
with EinheitendatenbankRecord;
with KartenDatentypen;
with KartenRecordKonstanten;
with EinheitenKonstanten;
with KartenextraDatentypen;

with DebugobjekteLogik;

-- Es muss darauf geachtet werden dass KannTransportieren immer kleiner ist als KannTransportiertWerden.
package EinheitenLamustra is
   pragma Elaborate_Body;
   use type KartenDatentypen.Senkrechte;
   use type KartenDatentypen.Waagerechte;

   EinheitenlisteLamustra : constant EinheitendatenbankRecord.EinheitenlisteArray := (
                                                                                      -- Siedler
                                                                                      1 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Arbeiter_Enum,
                                                                                         PreisGeld               => 10,
                                                                                         Produktionskosten       => 10,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 0,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 3,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 1,
                                                                                         Angriff                 => 0,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Steinzeitkämpfer
                                                                                      2 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 0,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 5,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 1,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Bogenschütze
                                                                                      3 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Fernkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 1,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 8,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
      
                                                                                        -- Erstes Schiff
                                                                                      4 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 7,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Küstenwasser_Enum => True,
                                                                                                                     others                                => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 10,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 1,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Bronzekämpfer
                                                                                      5 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 10,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 6,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Eisenkämpfer
                                                                                      6 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 13,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 12,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Streitwagen
                                                                                      7 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 5,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 17,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Katapult
                                                                                      8 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Fernkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 11,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 9,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Balliste
                                                                                      9 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Fernkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 12,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 13,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Segelschiff
                                                                                      10 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 14,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Wasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum => True,
                                                                                                                     others                                => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 11,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Groß_Transport_Enum,
                                                                                         Transportkapazität      => 2,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Großes Segelschiff
                                                                                      11 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 23,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Wasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum => True,
                                                                                                                     others                                => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 14,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Gigantisch_Transport_Enum,
                                                                                         Transportkapazität      => 4,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Gewehrkämpfer
                                                                                      12 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 28,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 44,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Kanone
                                                                                      13 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Fernkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 34,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 40,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Dampfschiff
                                                                                      14 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 31,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Wasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum => True,
                                                                                                                     others                                => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 15,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Gigantisch_Transport_Enum,
                                                                                         Transportkapazität      => 4,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Motorschiff
                                                                                      15 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 38,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Wasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum => True,
                                                                                                                     others                                => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 42,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Gigantisch_Transport_Enum,
                                                                                         Transportkapazität      => 4,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- U-Boot
                                                                                      16 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 39,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Wasser_Enum            => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum      => True,
                                                                                                                     EinheitenDatentypen.Unterwasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Unterküstenwasser_Enum => True,
                                                                                                                     others                                     => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 42,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         Transportkapazität      => 2,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Gepanzerter Wagen
                                                                                      17 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 40,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 18,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Panzer
                                                                                      18 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 42,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 35,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Jäger
                                                                                      19 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 41,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Luft_Enum => True,
                                                                                                                     others                        => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 22,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Groß_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Bomber
                                                                                      20 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Fernkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 41,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Luft_Enum => True,
                                                                                                                     others                        => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 23,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Groß_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Rakete
                                                                                      21 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 46,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Luft_Enum     => True,
                                                                                                                     EinheitenDatentypen.Weltraum_Enum => True,
                                                                                                                     others                            => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Düsenjäger
                                                                                      22 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 51,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Luft_Enum => True,
                                                                                                                     others                        => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 38,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Groß_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Düsenbomber
                                                                                      23 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Fernkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 51,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Luft_Enum => True,
                                                                                                                     others                        => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 39,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Groß_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Atombombe
                                                                                      24 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Einmalig_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 45,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (others => True),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Groß_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (KartenextraDatentypen.Strahlung_Enum => True,
                                                                                                                     others                               => False),
                                                                                         Effektreichweite        => (KartenextraDatentypen.Strahlung_Enum => (YAchseAnfang => -2,
                                                                                                                                                              YAchseEnde   => 2,
                                                                                                                                                              XAchseAnfang => -2,
                                                                                                                                                              XAchseEnde   => 2),
                                                                                                                     others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Drohne
                                                                                      25 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Fernkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 49,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Luft_Enum => True,
                                                                                                                     others                        => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Gensoldat
                                                                                      26 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 56,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 28,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Wassersiedler
                                                                                      27 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Arbeiter_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 58,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum        => True,
                                                                                                                     EinheitenDatentypen.Wasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum => True,
                                                                                                                     others                                => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Cyborg
                                                                                      28 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 57,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 33,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Unterwasser/Unterirdischer Siedler
                                                                                      29 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Arbeiter_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 62,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum             => True,
                                                                                                                     EinheitenDatentypen.Wasser_Enum            => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum      => True,
                                                                                                                     EinheitenDatentypen.Unterwasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Unterküstenwasser_Enum => True,
                                                                                                                     EinheitenDatentypen.Unterirdisch_Enum      => True,
                                                                                                                     others                                     => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- PZB200
                                                                                      30 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Einmalig_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 63,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Gigantisch_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (KartenextraDatentypen.Vernichtet_Enum => True,
                                                                                                                     others                                => False),
                                                                                         Effektreichweite        => (KartenextraDatentypen.Vernichtet_Enum => (YAchseAnfang => KartenDatentypen.Senkrechte'First / 10,
                                                                                                                                                               YAchseEnde   => KartenDatentypen.Senkrechte'Last / 10,
                                                                                                                                                               XAchseAnfang => KartenDatentypen.Waagerechte'First / 10,
                                                                                                                                                               XAchseEnde   => KartenDatentypen.Waagerechte'Last / 10),
                                                                                                                     others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- PZB400
                                                                                      31 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Einmalig_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 66,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Gigantisch_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (KartenextraDatentypen.Vernichtet_Enum => True,
                                                                                                                     others                                => False),
                                                                                         Effektreichweite        => (KartenextraDatentypen.Vernichtet_Enum => (YAchseAnfang => KartenDatentypen.Senkrechte'First / 5,
                                                                                                                                                               YAchseEnde   => KartenDatentypen.Senkrechte'Last / 5,
                                                                                                                                                               XAchseAnfang => KartenDatentypen.Waagerechte'First / 5,
                                                                                                                                                               XAchseEnde   => KartenDatentypen.Waagerechte'Last / 5),
                                                                                                                     others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- PZB1000
                                                                                      32 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Einmalig_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 66,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Gigantisch_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (KartenextraDatentypen.Vernichtet_Enum => True,
                                                                                                                     others                                => False),
                                                                                         Effektreichweite        => (KartenextraDatentypen.Vernichtet_Enum => (YAchseAnfang => KartenDatentypen.Senkrechte'First,
                                                                                                                                                               YAchseEnde   => KartenDatentypen.Senkrechte'Last,
                                                                                                                                                               XAchseAnfang => KartenDatentypen.Waagerechte'First,
                                                                                                                                                               XAchseEnde   => KartenDatentypen.Waagerechte'Last),
                                                                                                                     others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Gaußkämpfer
                                                                                      33 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 68,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 34,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Magnetkämpfer
                                                                                      34 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 74,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Schwebepanzer
                                                                                      35 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 74,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum        => True,
                                                                                                                     EinheitenDatentypen.Wasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum => True,
                                                                                                                     others                                => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Planetenkernsiedler
                                                                                      36 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Arbeiter_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 65,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum             => True,
                                                                                                                     EinheitenDatentypen.Wasser_Enum            => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum      => True,
                                                                                                                     EinheitenDatentypen.Unterwasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Unterküstenwasser_Enum => True,
                                                                                                                     EinheitenDatentypen.Unterirdisch_Enum      => True,
                                                                                                                     EinheitenDatentypen.Lava_Enum              => True,
                                                                                                                     EinheitenDatentypen.Planeteninneres_Enum   => True,
                                                                                                                     others                                     => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Himmel/Orbitalsiedler
                                                                                      37 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Arbeiter_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 72,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum        => True,
                                                                                                                     EinheitenDatentypen.Wasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum => True,
                                                                                                                     EinheitenDatentypen.Luft_Enum         => True,
                                                                                                                     EinheitenDatentypen.Weltraum_Enum     => True,
                                                                                                                     others                                => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Atmosphärenjäger
                                                                                      38 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 74,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Luft_Enum     => True,
                                                                                                                     EinheitenDatentypen.Weltraum_Enum => True,
                                                                                                                     others                            => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Groß_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Atmosphärenbomber
                                                                                      39 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Fernkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 74,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Luft_Enum     => True,
                                                                                                                     EinheitenDatentypen.Weltraum_Enum => True,
                                                                                                                     others                            => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Groß_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Artillerie
                                                                                      40 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Fernkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 42,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 41,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Stellare Artillerie
                                                                                      41 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Fernkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 74,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum        => True,
                                                                                                                     EinheitenDatentypen.Wasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum => True,
                                                                                                                     others                                => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Mittel_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Gräberschiff
                                                                                      42 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 62,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum             => True,
                                                                                                                     EinheitenDatentypen.Wasser_Enum            => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum      => True,
                                                                                                                     EinheitenDatentypen.Unterwasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Unterküstenwasser_Enum => True,
                                                                                                                     EinheitenDatentypen.Unterirdisch_Enum      => True,
                                                                                                                     others                                     => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 43,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Groß_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         Transportkapazität      => 4,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Kerngräber
                                                                                      43 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 65,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum             => True,
                                                                                                                     EinheitenDatentypen.Wasser_Enum            => True,
                                                                                                                     EinheitenDatentypen.Küstenwasser_Enum      => True,
                                                                                                                     EinheitenDatentypen.Unterwasser_Enum       => True,
                                                                                                                     EinheitenDatentypen.Unterküstenwasser_Enum => True,
                                                                                                                     EinheitenDatentypen.Unterirdisch_Enum      => True,
                                                                                                                     EinheitenDatentypen.Lava_Enum              => True,
                                                                                                                     EinheitenDatentypen.Planeteninneres_Enum   => True,
                                                                                                                     others                                     => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 0,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         Transportkapazität      => 1,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Moderne Infanterie
                                                                                      44 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Nahkämpfer_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 40,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (EinheitenDatentypen.Boden_Enum => True,
                                                                                                                     others                         => False),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 26,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (others => False),
                                                                                         Effektreichweite        => (others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Biowaffe
                                                                                      45 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Einmalig_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 52,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (others => True),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 26,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (KartenextraDatentypen.Biologisch_Enum => True,
                                                                                                                     others                                => False),
                                                                                         Effektreichweite        => (KartenextraDatentypen.Biologisch_Enum => (YAchseAnfang => -2,
                                                                                                                                                               YAchseEnde   => 2,
                                                                                                                                                               XAchseAnfang => -2,
                                                                                                                                                               XAchseEnde   => 2),
                                                                                                                     others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                                                                      
                                                                                        -- Chemische Waffe
                                                                                      46 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Einmalig_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 20,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (others => True),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 26,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (KartenextraDatentypen.Chemisch_Enum => True,
                                                                                                                     others                              => False),
                                                                                         Effektreichweite        => (KartenextraDatentypen.Chemisch_Enum => (YAchseAnfang => -2,
                                                                                                                                                             YAchseEnde   => 2,
                                                                                                                                                             XAchseAnfang => -2,
                                                                                                                                                             XAchseEnde   => 2),
                                                                                                                     others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Verschmutzende Waffe
                                                                                      47 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Einmalig_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 20,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (others => True),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 26,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (KartenextraDatentypen.Verschmutzt_Enum => True,
                                                                                                                     others                                 => False),
                                                                                         Effektreichweite        => (KartenextraDatentypen.Verschmutzt_Enum => (YAchseAnfang => -2,
                                                                                                                                                                YAchseEnde   => 2,
                                                                                                                                                                XAchseAnfang => -2,
                                                                                                                                                                XAchseEnde   => 2),
                                                                                                                     others => KartenRecordKonstanten.LeerEffektbereich)
                                                                                        ),
                                               
                                                                                        -- Einmal alle Feldeffekte
                                                                                      48 =>
                                                                                        (
                                                                                         Einheitenart            => EinheitenDatentypen.Einmalig_Enum,
                                                                                         PreisGeld               => 25,
                                                                                         Produktionskosten       => 20,
                                                                                         PermanenteKosten        => (others => 0),
                                                                                         Anforderungen           => 0,
                                                                                         NotwendigeGebäude       => (others => EinheitenKonstanten.LeerGebäudeBenötigt),
                                                                                         Passierbarkeit          => (others => True),
                                                                                         MaximaleLebenspunkte    => 5,
                                                                                         MaximaleBewegungspunkte => 10,
                                                                                         VerbesserungZu          => 26,
                                                                                         Beförderungsgrenze      => 30,
                                                                                         MaximalerRang           => 3,
                                                                                         Reichweite              => 2,
                                                                                         Angriff                 => 3,
                                                                                         Verteidigung            => 1,
                                                                                         KannTransportieren      => EinheitenDatentypen.Kein_Transport_Enum,
                                                                                         KannTransportiertWerden => EinheitenDatentypen.Klein_Transport_Enum,
                                                                                         Transportkapazität      => 0,
                                                                                         Zusatzeffekt            => (KartenextraDatentypen.Vernichtet_Enum => False,
                                                                                                                     others                                => True),
                                                                                         Effektreichweite        => (KartenextraDatentypen.Vernichtet_Enum => KartenRecordKonstanten.LeerEffektbereich,
                                                                                                                     others => (YAchseAnfang => -2,
                                                                                                                                YAchseEnde   => 2,
                                                                                                                                XAchseAnfang => -2,
                                                                                                                                XAchseEnde   => 2))
                                                                                        ),
                                                                                      
                                                                                      EinheitendatenbankRecord.EinheitenlisteArray'Last => DebugobjekteLogik.AlleskönnerEintrag,
                                                               
                                                                                      others => EinheitenRecordKonstanten.LeerEinheitListe
                                                                                     );

end EinheitenLamustra;
