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 EinheitenKasrodiah is
   pragma Elaborate_Body;
   use type KartenDatentypen.Senkrechte;
   use type KartenDatentypen.Waagerechte;

   EinheitenlisteKasrodiah : 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 EinheitenKasrodiah;
