From 041ee1b932cc9c058c545595751b77893dde75dc Mon Sep 17 00:00:00 2001
From: brunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Mon, 21 Jun 2010 16:33:16 +0000
Subject: - individual line breaks for each player in duet songs are now
 possible - fade in and out of lyrics, notes and notelines in sing screen -
 update of acinerella.dll - update of BASS to v2.4 - removed joypad support
 (did it ever worked?) - removed unused units and options

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2553 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Classes/UIni.pas | 24 ------------------------
 1 file changed, 24 deletions(-)

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

diff --git a/Game/Code/Classes/UIni.pas b/Game/Code/Classes/UIni.pas
index 85aff535..cc24e3a8 100644
--- a/Game/Code/Classes/UIni.pas
+++ b/Game/Code/Classes/UIni.pas
@@ -83,15 +83,9 @@ type
     SumPlayers:     integer;
     DuelRatio:      integer;
 
-    // Controller
-    Joypad:         integer;
-
     // Soundcards
     SoundCard:      array[0..7, 1..2] of integer;
 
-    // Devices
-    LPT:            integer;
-
     procedure Load;
     procedure Save;
     procedure SaveNames;
@@ -183,9 +177,6 @@ const
   ISumPlayers:    array[0..2] of string = ('Never', 'Dynamic', 'Always');
   IDuelRatio:     array[0..9] of string = ('normal', '10%', '20%', '30%', '40%', '50%', '60%', '70%', '80%', '90%');
 
-  IJoypad:        array[0..1] of string = ('Off', 'On');
-  ILPT:           array[0..2] of string = ('Off', 'LCD', 'Lights');
-
   IChannel:       array[0..6] of string = ('Off', '1', '2', '3', '4', '5', '6');
 
 implementation
@@ -613,17 +604,6 @@ begin
   for Pet := 0 to High(IDuelRatio) do
     if Tekst = IDuelRatio[Pet] then Ini.DuelRatio := Pet;
 
-  // Joypad
-  Tekst := IniFile.ReadString('Controller',    'Joypad',   IJoypad[0]);
-  for Pet := 0 to High(IJoypad) do
-    if Tekst = IJoypad[Pet] then Ini.Joypad := Pet;
-
-  // LCD
-  Tekst := IniFile.ReadString('Devices',    'LPT',   ILPT[0]);
-  for Pet := 0 to High(ILPT) do
-    if Tekst = ILPT[Pet] then Ini.LPT := Pet;
-
-
   // SongPath
   if (Params.SongPath <> '') then
     SongPath := IncludeTrailingPathDelimiter(Params.SongPath)
@@ -851,10 +831,6 @@ begin
     Tekst := IDuelRatio[Ini.DuelRatio];
     IniFile.WriteString('Advanced', 'DuelRatio', Tekst);
 
-    // Joypad
-    Tekst := IJoypad[Ini.Joypad];
-    IniFile.WriteString('Controller',    'Joypad',    Tekst);
-
     IniFile.Free;
   end;
 end;
-- 
cgit v1.2.3