with Ada.Strings.Wide_Wide_Unbounded; use Ada.Strings.Wide_Wide_Unbounded; with Sf.System.Vector2; with MenueDatentypen; package KartenformmenueGrafik is pragma Elaborate_Body; function Kartenformmenü (WelchesMenüExtern : in MenueDatentypen.Menü_Doppelt_Enum; ViewflächeExtern : in Sf.System.Vector2.sfVector2f; AktuelleAuswahlExtern : in Natural) return Sf.System.Vector2.sfVector2f with Post => ( Kartenformmenü'Result.x >= 0.00 and Kartenformmenü'Result.y >= 0.00 ); private -- Ist um eins verschoben, da die Textdateien ja noch eine Überschrift enthalten. -- Später mit ZusatztextaufteilungGrafik zusammenführen? äöü EbeneOben : constant Positive := 2; EbeneUnten : constant Positive := 3; Norden : constant Positive := 4; Süden : constant Positive := 5; Westen : constant Positive := 6; Osten : constant Positive := 7; KeinÜbergang : constant Positive := 11; Übergang : constant Positive := 12; RückwärtsVerschobenerÜbergang : constant Positive := 13; VerschobenerÜbergang : constant Positive := 14; WelcherZusatztext : Positive; Textbreite : Float; Zusatztext : Unbounded_Wide_Wide_String; Textposition : Sf.System.Vector2.sfVector2f; function TextEinlesen (SchleifenwertExtern : in Positive) return Wide_Wide_String; end KartenformmenueGrafik;