Fix ManiaApps URL

LastManStanding.Script.txt

@@ -47,7 +47,7 @@
 #Const Description "$zIn $<$t$6F9LastManStanding$> mode, The goal is to be the last player not to fall off the structure. Collisions are activated and you can push your opponents to win. From a certain time, malus are sent to all the players of the game to accelerate its end."
 
 #Const C_HudModulePath "" //< Path to the hud module
-#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/TMNext/TrackMania/Rounds/Rounds.Script.txt" //< Url of the mania app
+#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/Trackmania/Modes/Rounds.Script.txt" //< Url of the mania app
 #Const C_FakeUsersNb 0
 
 #Const C_Malus_Reset 0

TM_Alfadream.Script.txt

@@ -0,0 +1,248 @@
+#Extends "Modes/TrackMania/TM_Cup_Online.Script.txt"
+
+#Setting S_PointsLimit 50
+#Setting S_RoundsPerMap 4
+#Setting S_PointsRepartition "10,6,4,3,0"
+#Setting S_PlayersPerMatch 12
+
+#Const C_ML_TeamPicker "Custom_TeamPicker"
+
+***Match_StartServer***
+***
+Clans::SetClansNb(6);
+Clans::SetUseForcedClans(True);
+WarmUp::SetSpawnInRequestedClan(False); // Must be disabled because Clans are forced
+***
+
+***Match_StartMatch***
+***
+declare netwrite Integer[Text] Net_Custom_PlayersClan for Teams[0] ;
+Net_Custom_PlayersClan = [];
+
+Teams[2].Name = "Cyan";
+Teams[3].Name = "Pink";
+Teams[4].Name = "Yellow";
+Teams[5].Name = "Green";
+***
+
+
+***Match_InitMap***
+***
+log(Dbg_DumpDeclareForVariables(This, False));
+
+Users_SetNbFakeUsers(11,0);
+if (GetPlayersNb() < S_PlayersPerMatch) {
+    SendPickManialink();
+    declare netwrite Integer[Text] Net_Custom_PlayersClan for Teams[0] = [];
+
+    foreach (Player in AllPlayers) {
+        if (Player.IsFakePlayer) {
+            Net_Custom_PlayersClan[Player.User.WebServicesUserId] = ML::Rand(1,6);
+            Player.Score.LadderClan = Net_Custom_PlayersClan[Player.User.WebServicesUserId];
+        }
+    }
+
+
+    while (GetPlayersNb() < S_PlayersPerMatch) {
+        MB_Yield();
+
+        foreach (Event in UIManager.PendingEvents) {
+            if (Event.Type == CUIConfigEvent::EType::OnLayerCustomEvent && Event.CustomEventType == "Custom_Join_Clan") {
+                declare CSmPlayer Player = GetPlayer(Event.UI);
+                if (Player != Null) {
+                    Net_Custom_PlayersClan[Player.User.WebServicesUserId] = TL::ToInteger(Event.CustomEventData[0]);
+                    Player.Score.LadderClan = Net_Custom_PlayersClan[Player.User.WebServicesUserId];
+                    SetPlayerClan(Player, Net_Custom_PlayersClan[Player.User.WebServicesUserId]);
+                }
+            }
+        }
+    }
+
+    Layers::Detach(C_ML_TeamPicker);
+}
+declare Int2[] Custom_RoundsVersus for This = [];
+Custom_RoundsVersus = GenerateRoundVersus();
+***
+
+
+***Match_InitRound***
+***
+declare Integer Custom_NbOfValidRounds for This = 0;
+Custom_NbOfValidRounds = G_NbOfValidRounds;
+declare Int2[] Custom_RoundsVersus for This = [];
+if (Custom_NbOfValidRounds >= 3) {
+    UIModules_BigMessage::SetMessage("All teams play");
+} else {
+    declare CTeam Team1 <=> Teams[Custom_RoundsVersus[Custom_NbOfValidRounds].X - 1];
+    declare CTeam Team2 <=> Teams[Custom_RoundsVersus[Custom_NbOfValidRounds].Y - 1];
+
+    UIModules_BigMessage::SetMessage(Team1.Name ^ " vs " ^ Team2.Name);
+}
+MB_Sleep(3000);
+UIModules_BigMessage::SetMessage("");
+***
+
+***Match_Yield***
+***
+foreach (Event in PendingEvents) {
+    if (Event.Type == CSmModeEvent::EType::OnPlayerAdded) {
+        declare netwrite Integer[Text] Net_Custom_PlayersClan for Teams[0] = [];
+        if (Net_Custom_PlayersClan.existskey(Event.Player.User.WebServicesUserId)) {
+            Event.Player.Score.LadderClan = Net_Custom_PlayersClan[Event.Player.User.WebServicesUserId];
+            SetPlayerClan(Event.Player, Net_Custom_PlayersClan[Event.Player.User.WebServicesUserId]);
+        }
+    }
+}
+***
+
+***Rounds_SpawnPlayer***
+***
+SetPlayerClan(Player, Player.Score.LadderClan);
+Race::Start(Player, StartTime);
+***
+
+
+***Rounds_CheckCanSpawn***
+***
+
+declare netwrite Integer[Text] Net_Custom_PlayersClan for Teams[0] = [];
+if (!Net_Custom_PlayersClan.existskey(_Player.Score.User.WebServicesUserId)) return False;
+// TODO Team can spawn
+declare Integer Custom_NbOfValidRounds for This = 0;
+if (Custom_NbOfValidRounds <= 2) {
+    declare Int2[] Custom_RoundsVersus for This = [];
+    if (Custom_RoundsVersus.existskey(Custom_NbOfValidRounds)) {
+        if (Custom_RoundsVersus[Custom_NbOfValidRounds].X != Net_Custom_PlayersClan[_Player.Score.User.WebServicesUserId] 
+             && Custom_RoundsVersus[Custom_NbOfValidRounds].Y != Net_Custom_PlayersClan[_Player.Score.User.WebServicesUserId]) {
+            return False;
+        }
+    }
+}
+log(_Player.Score.User.Name ^" " ^_Player.Score.LadderClan);
+***
+
+Integer GetPlayersNb() {
+    declare netwrite Integer[Text] Net_Custom_PlayersClan for Teams[0] = [];
+    return Net_Custom_PlayersClan.count;
+}
+
+Int2[] GenerateRoundVersus() {
+    declare Integer[Integer] SortingTeam;
+    for (I, 1, 6) {
+        SortingTeam[I] = ML::Rand(0, 10000);
+    }
+
+    SortingTeam = SortingTeam.sort();
+
+    declare Integer[] SortedTeam;
+
+    foreach (ClanId => Rand in SortingTeam.sort()) {
+        SortedTeam.add(ClanId);
+    }
+
+    declare Int2[] RoundOrder;
+    for (I, 0, 2) {
+        RoundOrder.add(<SortedTeam[I * 2], SortedTeam[I * 2 + 1]>);
+    }
+    return RoundOrder;
+}
+
+Void SendPickManialink() {
+    declare Text Manialink = """
+    <?xml version="1.0" encoding="utf-8" standalone="yes" ?>
+    <manialink version="3" name="{{{C_ML_TeamPicker}}}">
+        <stylesheet>
+			<style class="center" halign="center" valign="center" />
+		</stylesheet>
+        <framemodel id="framemodel-team">
+            <label id="label-team-name" pos="0 -5" class="center" textsize=3 textfont="GameFontExtraBold"/>
+
+            <frame id="frame-players" pos="0 -15">
+                <label pos="0 0" class="center" textsize=2 textfont="GameFontSemiBold"/>
+                <label pos="0 -5" class="center" textsize=2 textfont="GameFontSemiBold"/>
+                <label pos="0 -10" class="center" textsize=2 textfont="GameFontSemiBold"/>
+                <label pos="0 -15" class="center" textsize=2 textfont="GameFontSemiBold"/>
+            </frame>
+
+            <label id="label-join-clan" pos="0 -76" class="center" style="CardButtonSmallS" text="Join" scriptevents=2/>
+        </framemodel>
+        <frame id="frame-global">
+            <quad id="background" class="center" z-index="-1" size="180 80" bgcolor="000" opacity="0.7" />
+
+            <frame id="frame-teams">
+                <frameinstance modelid="framemodel-team" pos="-45 40" data-clanid="2"/>
+                <frameinstance modelid="framemodel-team" pos="-15 40" data-clanid="3"/>
+                <frameinstance modelid="framemodel-team" pos="15 40" data-clanid="4"/>
+                <frameinstance modelid="framemodel-team" pos="45 40" data-clanid="5"/>
+                <frameinstance modelid="framemodel-team" pos="75 40" data-clanid="6"/>
+            </frame>
+        </frame>
+        <script><!--
+            #Include "TextLib" as TL
+            #Include "TimeLib" as TimeLib
+
+            #Const C_AttachId {{{dump(C_ML_TeamPicker)}}}
+
+            main() {
+                log("Init");
+
+                declare CMlFrame Frame_Teams <=> (Page.GetFirstChild("frame-teams") as CMlFrame);
+                foreach (Key => Control in Frame_Teams.Controls) {
+                    if (!Teams.existskey(Key)) break;
+                    declare CMlFrame Frame <=> Control as CMlFrame;
+                    declare CMlLabel Label_TeamName <=> (Frame.GetFirstChild("label-team-name") as CMlLabel);
+                    Label_TeamName.Value = Teams[Key].Name;
+                    Label_TeamName.TextColor = Teams[Key].ColorPrimary;
+                }
+
+                // Wait C++ initialize the player
+                wait (InputPlayer != Null);
+
+                declare netread Integer[Text] Net_Custom_PlayersClan for Teams[0] = [];
+
+                while(True) {
+                    yield;
+
+                    declare Text[][Integer] PlayerPerTeams = [];
+
+                    foreach (Player in Players) {
+                        if (!Net_Custom_PlayersClan.existskey(Player.User.WebServicesUserId)) continue;
+
+                        declare Integer TeamId = Net_Custom_PlayersClan[Player.User.WebServicesUserId] - 1;
+
+                        if (!PlayerPerTeams.existskey(TeamId)) PlayerPerTeams[TeamId] = [];
+                        PlayerPerTeams[TeamId].add(Player.User.Name);
+                    }
+
+                    foreach (TeamId => Control in Frame_Teams.Controls) {
+                        declare CMlFrame Frame_Team <=> Control as CMlFrame;
+                        declare CMlFrame Frame_Players <=> (Frame_Team.GetFirstChild("frame-players") as CMlFrame);
+                        foreach (Key => Control in Frame_Players.Controls) {
+                            declare CMlLabel Label <=> Control as CMlLabel ;
+                            //declare CMlLabel Label <=> (Frame_Player.GetFirstChild("") as CMlLabel);
+                            if (PlayerPerTeams.existskey(TeamId) && PlayerPerTeams[TeamId].existskey(Key)) {
+                                Label.Value = PlayerPerTeams[TeamId][Key];
+                            } else {
+                                Label.Value = "";
+                            }
+                        }
+                    }
+
+                    foreach (Event in PendingEvents) {
+                        if (Event.Type == CMlScriptEvent::Type::MouseClick) {
+                            if (Event.ControlId == "label-join-clan") {
+                                declare Text ClanId = Event.Control.Parent.DataAttributeGet("clanid");
+                                SendCustomEvent("Custom_Join_Clan", [ClanId]);
+                            }
+                        }
+                    }
+                }
+            }
+        --></script>
+    </manialink>
+    """;
+
+	Layers::Create(C_ML_TeamPicker, Manialink);
+	Layers::SetType(C_ML_TeamPicker, CUILayer::EUILayerType::Normal);
+    Layers::Attach(C_ML_TeamPicker);
+}

TM_CPKnockout.Script.txt

@@ -51,7 +51,7 @@
 #Const Description _("$zIn $<$t$6F9Laps$> mode, the goal is to drive as far as possible by passing $<$t$6F9checkpoints$>.\n\nThe laps mode takes place on multilap (cyclical) maps, and is played in one go for every map.\n\nWhen the time is up, the $<$t$6F9winner$> is the player who passed the most $<$t$6F9checkpoints$>. In case of draws, the winner is the player who passed the last checkpoint first.")
 
 #Const C_HudModulePath "" //< Path to the hud module
-#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/TMNext/TrackMania/Laps/Laps.Script.txt" //< Url of the mania app
+#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/Trackmania/Modes/Laps.Script.txt" //< Url of the mania app
 
 #Const C_UploadRecord True
 #Const C_DisplayRecordGhost False

TM_ClimbTheMap.Script.txt

@@ -7,7 +7,7 @@
 
 #Const	CompatibleMapTypes	"TrackMania\\TM_Race,TM_Race"
 #Const	Version							"2023-09-25"
-#Const	ScriptName					"Modes/TrackMania/TM_TimeAttack_Online.Script.txt"
+#Const	ScriptName					"Modes/TM2020-Gamemodes/TM_ClimbTheMap.Script.txt"
 
 // ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ //
 // Libraries
@@ -36,7 +36,7 @@
 #Const Description _("$zIn $<$t$6F9Time Attack$> mode, the goal is to set the $<$t$6F9best time$>.\n\nYou have as many tries as you want, and you can $<$t$6F9retry$> when you want by pressing the respawn button.\n\nWhen the time is up, the $<$t$6F9winner$> is the player with the $<$t$6F9best time$>.")
 
 #Const C_HudModulePath "" //< Path to the hud module
-#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/TMNext/TrackMania/TimeAttack/TimeAttack.Script.txt" //< Url of the mania app
+#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/Trackmania/Modes/TimeAttack.Script.txt" //< Url of the mania app
 
 #Const C_UploadRecord True
 #Const C_DisplayRecordGhost False

TM_KnockoutDelayedCountdown.Script.txt

@@ -69,7 +69,7 @@
 #Const Description _("$zIn $<$t$6F9Knockout$> mode, the goal is to be the last player standing. \n\nYou play a series of races as in Round mode. $<$t$6F9At the end of each race, the last players are eliminated$>!\n\nThe winner is the player who eliminates all of their opponents.")
 
 #Const C_HudModulePath "" //< Path to the hud module
-#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/TMNext/TrackMania/Knockout/Knockout.Script.txt" //< Url of the mania app
+#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/Trackmania/Modes/Knockout.Script.txt" //< Url of the mania app
 #Const C_FakeUsersNb 0
 
 #Const C_Callback_Elimination "Trackmania.Knockout.Elimination"

TM_LapsKnockout.Script.txt

@@ -69,7 +69,7 @@
 #Const Description _("$zIn $<$t$6F9Laps$> mode, the goal is to drive as far as possible by passing $<$t$6F9checkpoints$>.\n\nThe laps mode takes place on multilap (cyclical) maps, and is played in one go for every map.\n\nWhen the time is up, the $<$t$6F9winner$> is the player who passed the most $<$t$6F9checkpoints$>. In case of draws, the winner is the player who passed the last checkpoint first.")
 
 #Const C_HudModulePath "" //< Path to the hud module
-#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/TMNext/TrackMania/Laps/Laps.Script.txt" //< Url of the mania app
+#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/Trackmania/Modes/Laps.Script.txt" //< Url of the mania app
 #Const C_FakeUsersNb 0
 
 #Const C_UploadRecord True

TM_ReverseCup.Script.txt

@@ -54,7 +54,7 @@
 #Const Description _("$zThe cup mode consists of $<$t$6F9a series of races on multiple maps$>.\n\nWhen you finish a race in a bad $<$t$6F9position$>, you loose $<$t$6F9points$> substracted from your total.\nServers might propose warmup races to get familiar with a map first.\n\nTo win, you must be the last player with points. Once you are a LastChance, if you finish a race last you will be eliminated.The cup mode ends once there is one player left.")
 
 #Const C_HudModulePath "" //< Path to the hud module
-#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/TMNext/TrackMania/Cup/Cup.Script.txt" //< Url of the mania app
+#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/Trackmania/Modes/Cup.Script.txt" //< Url of the mania app
 #Const C_FakeUsersNb 0
 
 #Const C_UploadRecord True

TM_RoundsNearest.Script.txt

@@ -44,7 +44,7 @@
 #Const Description _("$zIn $<$t$6F9Rounds$z$z$> mode, the goal is to win a maximum number of $<$t$6F9points.\n\n$z$>The rounds mode consists of $<$t$6F9a series of races$z$>.\nWhen you finish a race in a good $<$t$6F9position$z$>, you get $<$t$6F9points$z$>, added to your total.\n\nThe $<$t$6F9winner$z$> is the first player whose total reaches the $<$t$6F9point limit$z$> (30 for example).")
 
 #Const C_HudModulePath "" //< Path to the hud module
-#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/TMNext/TrackMania/Rounds/Rounds.Script.txt" //< Url of the mania app
+#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/Trackmania/Modes/Rounds.Script.txt" //< Url of the mania app
 
 #Const C_PointsLimit_NotReached 0
 #Const C_PointsLimit_Reached 1

TM_RoyalRounds_Online.Script.txt

@@ -51,7 +51,7 @@
 #Const Description _("$zIn $<$t$6F9RoyalRounds$z$z$> mode, the goal is to win a maximum number of $<$t$6F9points.\n\n$z$>The rounds mode consists of $<$t$6F9a series of races$z$>.\nWhen you finish a race in a good $<$t$6F9position$z$>, you get $<$t$6F9points$z$>, added to your total.\n\nThe $<$t$6F9winner$z$> is the first player whose total reaches the $<$t$6F9point limit$z$> (30 for example).")
 
 #Const C_HudModulePath "" //< Path to the hud module
-#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/TMNext/TrackMania/Rounds/Rounds.Script.txt" //< Url of the mania app
+#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/Trackmania/Modes/Rounds.Script.txt" //< Url of the mania app
 
 #Const C_FakeUsersNb 0
 

TM_SeedingTimeAttack_Online.Script.txt

@@ -48,7 +48,7 @@
 #Const Description _("$zIn $<$t$6F9Time Attack$> mode, the goal is to set the $<$t$6F9best time$>.\n\nYou have as many tries as you want, and you can $<$t$6F9retry$> when you want by pressing the respawn key.\n\nWhen the time is up, the $<$t$6F9winner$> is the player with the $<$t$6F9best time$>.")
 
 #Const C_HudModulePath "" //< Path to the hud module
-#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/TMNext/TrackMania/TimeAttack/TimeAttack.Script.txt" //< Url of the mania app
+#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/Trackmania/Modes/TimeAttack.Script.txt" //< Url of the mania app
 #Const C_FakeUsersNb 0
 
 #Const C_UploadRecord True

TM_TimeAttackRounds_Online.Script.txt

@@ -50,7 +50,7 @@
 #Const Description _("$zIn $<$t$6F9Time Attack$> mode, the goal is to set the $<$t$6F9best time$>.\n\nYou have as many tries as you want, and you can $<$t$6F9retry$> when you want by pressing the respawn key.\n\nWhen the time is up, the $<$t$6F9winner$> is the player with the $<$t$6F9best time$>.")
 
 #Const C_HudModulePath "" //< Path to the hud module
-#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/TMNext/TrackMania/TimeAttack/TimeAttack.Script.txt" //< Url of the mania app
+#Const C_ManiaAppUrl "file://Media/ManiaApps/Nadeo/Trackmania/Modes/TimeAttack.Script.txt" //< Url of the mania app
 #Const C_FakeUsersNb 0
 
 #Const C_UploadRecord True