From 178c194e25896b80783d589b9912c926c07e3118 Mon Sep 17 00:00:00 2001
From: brunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Sat, 20 Feb 2010 14:05:25 +0000
Subject: never singing a song two times in the same party session; counter
 reset if there are too few songs

the medley-songs have their own counter

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2113 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Classes/UParty.pas | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'Game/Code/Classes/UParty.pas')

diff --git a/Game/Code/Classes/UParty.pas b/Game/Code/Classes/UParty.pas
index b57106a5..a843c393 100644
--- a/Game/Code/Classes/UParty.pas
+++ b/Game/Code/Classes/UParty.pas
@@ -167,6 +167,10 @@ begin
     Teams.Teaminfo[I].Joker := Round(NumRounds*0.7)+NumMedleys;
     Teams.Teaminfo[I].Score := 0;
   end;
+
+  //Reset Played-array
+  SetLength(ScreenSong.MedleyPlayed, 0);
+  SetLength(ScreenSong.PartyPlayed, 0);
 end;
 
 //----------
-- 
cgit v1.2.3