From 3ba33f8e920a9e9a3114f159e2b6fda4273a6efb Mon Sep 17 00:00:00 2001
From: whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Wed, 28 Mar 2007 13:08:41 +0000
Subject: Added Jumpto Ability to SongScreen (Press J) Fixed: Golden Notes are
 not shown in PartyMode

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@39 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Classes/UThemes.pas | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

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

diff --git a/Game/Code/Classes/UThemes.pas b/Game/Code/Classes/UThemes.pas
index e9aa2141..e31e94d2 100644
--- a/Game/Code/Classes/UThemes.pas
+++ b/Game/Code/Classes/UThemes.pas
@@ -393,6 +393,12 @@ type
     TextMenu: TThemeText;
   end;
 
+  TThemeSongJumpTo = class(TThemeBasic)
+    ButtonSearchText: TThemeButton;
+    SelectSlideType:  TThemeSelectSlide;
+    TextFound:        TThemeText;
+  end;
+
   //Party Screens
   TThemePartyNewRound = class(TThemeBasic)
     TextRound1:        TThemeText;
@@ -525,6 +531,7 @@ type
     OptionsRecord:    TThemeOptionsRecord;
     //Menu
     SongMenu:         TThemeSongMenu;
+    SongJumpto:       TThemeSongJumpTo;
     //Party Screens:
     PartyNewRound:    TThemePartyNewRound;
     PartyScore:       TThemePartyScore;
@@ -606,6 +613,7 @@ begin
   OptionsRecord := TThemeOptionsRecord.Create;
 
   SongMenu := TThemeSongMenu.Create;
+  SongJumpto := TThemeSongJumpto.Create;
   //Party Screens
   PartyNewRound := TThemePartyNewRound.Create;
   PartyWin := TThemePartyWin.Create;
@@ -980,7 +988,7 @@ begin
       ThemeLoadSelectSlide(OptionsRecord.SelectSlideChannelR, 'OptionsRecordSelectSlideChannelR');
       ThemeLoadButton(OptionsRecord.ButtonExit, 'OptionsRecordButtonExit');
 
-    //Song Menu
+   //Song Menu
     ThemeLoadBasic (SongMenu, 'SongMenu');
     ThemeLoadButton(SongMenu.Button1, 'SongMenuButton1');
     ThemeLoadButton(SongMenu.Button2, 'SongMenuButton2');
@@ -990,6 +998,12 @@ begin
 
     ThemeLoadText(SongMenu.TextMenu, 'SongMenuTextMenu');
 
+    //Song Jumpto
+    ThemeLoadBasic (SongJumpto, 'SongJumpto');
+    ThemeLoadButton(SongJumpto.ButtonSearchText, 'SongJumptoButtonSearchText');
+    ThemeLoadSelectSlide(SongJumpto.SelectSlideType, 'SongJumptoSelectSlideType');
+    ThemeLoadText(SongJumpto.TextFound, 'SongJumptoTextFound');
+
     //Party Screens:
     //Party NewRound
     ThemeLoadBasic(PartyNewRound, 'PartyNewRound');
-- 
cgit v1.2.3