Datei / Ordner gelöscht

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@3 b956fd51-792f-4845-bead-9b4dfca2ff2c

7 files changed, 0 insertions, 644 deletions

diff --git a/Game/Code/UltraStar.RES b/Game/Code/UltraStar.RES
deleted file mode 100644
index fcaa4576..00000000
--- a/Game/Code/UltraStar.RES
+++ /dev/null
diff --git a/Game/Code/UltraStar.bdsproj b/Game/Code/UltraStar.bdsproj
deleted file mode 100644
index e11acf91..00000000
--- a/Game/Code/UltraStar.bdsproj
+++ /dev/null
@@ -1,168 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>

-<BorlandProject>

-  <PersonalityInfo>

-    <Option>

-      <Option Name="Personality">Delphi.Personality</Option>

-      <Option Name="ProjectType">VCLApplication</Option>

-      <Option Name="Version">1.0</Option>

-      <Option Name="GUID">{7B1672C4-0C19-46AC-846F-BFB7F7A093D8}</Option>

-    </Option>

-  </PersonalityInfo>

-  <Delphi.Personality>

-    <Source>

-      <Source Name="MainSource">UltraStar.dpr</Source>

-    </Source>

-    <FileVersion>

-      <FileVersion Name="Version">7.0</FileVersion>

-    </FileVersion>

-    <Compiler>

-      <Compiler Name="A">8</Compiler>

-      <Compiler Name="B">0</Compiler>

-      <Compiler Name="C">1</Compiler>

-      <Compiler Name="D">1</Compiler>

-      <Compiler Name="E">0</Compiler>

-      <Compiler Name="F">0</Compiler>

-      <Compiler Name="G">1</Compiler>

-      <Compiler Name="H">1</Compiler>

-      <Compiler Name="I">1</Compiler>

-      <Compiler Name="J">0</Compiler>

-      <Compiler Name="K">0</Compiler>

-      <Compiler Name="L">1</Compiler>

-      <Compiler Name="M">0</Compiler>

-      <Compiler Name="N">1</Compiler>

-      <Compiler Name="O">1</Compiler>

-      <Compiler Name="P">1</Compiler>

-      <Compiler Name="Q">0</Compiler>

-      <Compiler Name="R">0</Compiler>

-      <Compiler Name="S">0</Compiler>

-      <Compiler Name="T">0</Compiler>

-      <Compiler Name="U">0</Compiler>

-      <Compiler Name="V">1</Compiler>

-      <Compiler Name="W">0</Compiler>

-      <Compiler Name="X">1</Compiler>

-      <Compiler Name="Y">1</Compiler>

-      <Compiler Name="Z">1</Compiler>

-      <Compiler Name="ShowHints">True</Compiler>

-      <Compiler Name="ShowWarnings">False</Compiler>

-      <Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>

-      <Compiler Name="NamespacePrefix"></Compiler>

-      <Compiler Name="GenerateDocumentation">False</Compiler>

-      <Compiler Name="DefaultNamespace"></Compiler>

-      <Compiler Name="SymbolDeprecated">True</Compiler>

-      <Compiler Name="SymbolLibrary">True</Compiler>

-      <Compiler Name="SymbolPlatform">True</Compiler>

-      <Compiler Name="SymbolExperimental">True</Compiler>

-      <Compiler Name="UnitLibrary">True</Compiler>

-      <Compiler Name="UnitPlatform">True</Compiler>

-      <Compiler Name="UnitDeprecated">True</Compiler>

-      <Compiler Name="UnitExperimental">True</Compiler>

-      <Compiler Name="HResultCompat">True</Compiler>

-      <Compiler Name="HidingMember">True</Compiler>

-      <Compiler Name="HiddenVirtual">True</Compiler>

-      <Compiler Name="Garbage">True</Compiler>

-      <Compiler Name="BoundsError">True</Compiler>

-      <Compiler Name="ZeroNilCompat">True</Compiler>

-      <Compiler Name="StringConstTruncated">True</Compiler>

-      <Compiler Name="ForLoopVarVarPar">True</Compiler>

-      <Compiler Name="TypedConstVarPar">True</Compiler>

-      <Compiler Name="AsgToTypedConst">True</Compiler>

-      <Compiler Name="CaseLabelRange">True</Compiler>

-      <Compiler Name="ForVariable">True</Compiler>

-      <Compiler Name="ConstructingAbstract">True</Compiler>

-      <Compiler Name="ComparisonFalse">True</Compiler>

-      <Compiler Name="ComparisonTrue">True</Compiler>

-      <Compiler Name="ComparingSignedUnsigned">True</Compiler>

-      <Compiler Name="CombiningSignedUnsigned">True</Compiler>

-      <Compiler Name="UnsupportedConstruct">True</Compiler>

-      <Compiler Name="FileOpen">True</Compiler>

-      <Compiler Name="FileOpenUnitSrc">True</Compiler>

-      <Compiler Name="BadGlobalSymbol">True</Compiler>

-      <Compiler Name="DuplicateConstructorDestructor">True</Compiler>

-      <Compiler Name="InvalidDirective">True</Compiler>

-      <Compiler Name="PackageNoLink">True</Compiler>

-      <Compiler Name="PackageThreadVar">True</Compiler>

-      <Compiler Name="ImplicitImport">True</Compiler>

-      <Compiler Name="HPPEMITIgnored">True</Compiler>

-      <Compiler Name="NoRetVal">True</Compiler>

-      <Compiler Name="UseBeforeDef">True</Compiler>

-      <Compiler Name="ForLoopVarUndef">True</Compiler>

-      <Compiler Name="UnitNameMismatch">True</Compiler>

-      <Compiler Name="NoCFGFileFound">True</Compiler>

-      <Compiler Name="MessageDirective">True</Compiler>

-      <Compiler Name="ImplicitVariants">True</Compiler>

-      <Compiler Name="UnicodeToLocale">True</Compiler>

-      <Compiler Name="LocaleToUnicode">True</Compiler>

-      <Compiler Name="ImagebaseMultiple">True</Compiler>

-      <Compiler Name="SuspiciousTypecast">True</Compiler>

-      <Compiler Name="PrivatePropAccessor">True</Compiler>

-      <Compiler Name="UnsafeType">True</Compiler>

-      <Compiler Name="UnsafeCode">True</Compiler>

-      <Compiler Name="UnsafeCast">True</Compiler>

-      <Compiler Name="OptionTruncated">True</Compiler>

-      <Compiler Name="WideCharReduced">True</Compiler>

-      <Compiler Name="DuplicatesIgnored">True</Compiler>

-    </Compiler>

-    <Linker>

-      <Linker Name="MapFile">0</Linker>

-      <Linker Name="OutputObjs">0</Linker>

-      <Linker Name="ConsoleApp">1</Linker>

-      <Linker Name="DebugInfo">False</Linker>

-      <Linker Name="RemoteSymbols">False</Linker>

-      <Linker Name="GenerateDRC">False</Linker>

-      <Linker Name="MinStackSize">16384</Linker>

-      <Linker Name="MaxStackSize">1048576</Linker>

-      <Linker Name="ImageBase">4194304</Linker>

-      <Linker Name="ExeDescription"></Linker>

-    </Linker>

-    <Directories>

-      <Directories Name="OutputDir">E:\Projekte\Ultrastar</Directories>

-      <Directories Name="UnitOutputDir"></Directories>

-      <Directories Name="PackageDLLOutputDir"></Directories>

-      <Directories Name="PackageDCPOutputDir"></Directories>

-      <Directories Name="SearchPath">E:\Projekte\Ultrastar\Includes;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\smpeg\Pas;E:\Projekte\Ultrastar\Includes\midi</Directories>

-      <Directories Name="Packages">vcl;rtl;vclx;VclSmp;vclshlctrls;DelphiX_for6</Directories>

-      <Directories Name="Conditionals">TRANSLATE</Directories>

-      <Directories Name="DebugSourceDirs"></Directories>

-      <Directories Name="UsePackages">False</Directories>

-    </Directories>

-    <Parameters>

-      <Parameters Name="RunParams">-benchmark</Parameters>

-      <Parameters Name="HostApplication"></Parameters>

-      <Parameters Name="Launcher"></Parameters>

-      <Parameters Name="UseLauncher">False</Parameters>

-      <Parameters Name="DebugCWD"></Parameters>

-      <Parameters Name="RemoteHost"></Parameters>

-      <Parameters Name="RemotePath"></Parameters>

-      <Parameters Name="RemoteLauncher"></Parameters>

-      <Parameters Name="RemoteCWD"></Parameters>

-      <Parameters Name="RemoteDebug">False</Parameters>

-    </Parameters>

-    <VersionInfo>

-      <VersionInfo Name="IncludeVerInfo">False</VersionInfo>

-      <VersionInfo Name="AutoIncBuild">False</VersionInfo>

-      <VersionInfo Name="MajorVer">1</VersionInfo>

-      <VersionInfo Name="MinorVer">0</VersionInfo>

-      <VersionInfo Name="Release">0</VersionInfo>

-      <VersionInfo Name="Build">0</VersionInfo>

-      <VersionInfo Name="Debug">False</VersionInfo>

-      <VersionInfo Name="PreRelease">False</VersionInfo>

-      <VersionInfo Name="Special">False</VersionInfo>

-      <VersionInfo Name="Private">False</VersionInfo>

-      <VersionInfo Name="DLL">False</VersionInfo>

-      <VersionInfo Name="Locale">1045</VersionInfo>

-      <VersionInfo Name="CodePage">1250</VersionInfo>

-    </VersionInfo>

-    <VersionInfoKeys>

-      <VersionInfoKeys Name="CompanyName"></VersionInfoKeys>

-      <VersionInfoKeys Name="FileDescription"></VersionInfoKeys>

-      <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>

-      <VersionInfoKeys Name="InternalName"></VersionInfoKeys>

-      <VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>

-      <VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>

-      <VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>

-      <VersionInfoKeys Name="ProductName"></VersionInfoKeys>

-      <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>

-      <VersionInfoKeys Name="Comments"></VersionInfoKeys>

-    </VersionInfoKeys>

-  </Delphi.Personality>

-</BorlandProject>

diff --git a/Game/Code/UltraStar.bdsproj.local b/Game/Code/UltraStar.bdsproj.local
deleted file mode 100644
index d576f039..00000000
--- a/Game/Code/UltraStar.bdsproj.local
+++ /dev/null
@@ -1,2 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>

-<BorlandProject/>

diff --git a/Game/Code/UltraStar.cfg b/Game/Code/UltraStar.cfg
deleted file mode 100644
index 5ade3beb..00000000
--- a/Game/Code/UltraStar.cfg
+++ /dev/null
@@ -1,41 +0,0 @@
--$A8

--$B-

--$C+

--$D+

--$E-

--$F-

--$G+

--$H+

--$I+

--$J-

--$K-

--$L+

--$M-

--$N+

--$O+

--$P+

--$Q-

--$R-

--$S-

--$T-

--$U-

--$V+

--$W-

--$X+

--$YD

--$Z1

--cg

--AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;

--H+

--W-

--M

--$M16384,1048576

--K$00400000

--E"E:\Projekte\Ultrastar\Bin"

--LE"e:\programme\borland\delphi7\Projects\Bpl"

--LN"e:\programme\borland\delphi7\Projects\Bpl"

--U"E:\Projekte\Ultrastar\Includes\DelphiX\Source;E:\Projekte\Ultrastar\Includes;E:\Projekte\Ultrastar\Includes\midi;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Sound\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Net\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Mixer\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Image\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_ttf\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDLSpriteEngine\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SFont\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\smpeg\Pas;E:\Projekte\Ultrastar\Includes\Zlportio;E:\Projekte\Ultrastar\Includes\SQLite"

--O"E:\Projekte\Ultrastar\Includes\DelphiX\Source;E:\Projekte\Ultrastar\Includes;E:\Projekte\Ultrastar\Includes\midi;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Sound\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Net\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Mixer\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Image\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_ttf\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDLSpriteEngine\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SFont\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\smpeg\Pas;E:\Projekte\Ultrastar\Includes\Zlportio;E:\Projekte\Ultrastar\Includes\SQLite"

--I"E:\Projekte\Ultrastar\Includes\DelphiX\Source;E:\Projekte\Ultrastar\Includes;E:\Projekte\Ultrastar\Includes\midi;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Sound\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Net\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Mixer\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Image\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_ttf\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDLSpriteEngine\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SFont\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\smpeg\Pas;E:\Projekte\Ultrastar\Includes\Zlportio;E:\Projekte\Ultrastar\Includes\SQLite"

--R"E:\Projekte\Ultrastar\Includes\DelphiX\Source;E:\Projekte\Ultrastar\Includes;E:\Projekte\Ultrastar\Includes\midi;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Sound\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Net\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Mixer\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Image\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_ttf\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDLSpriteEngine\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SFont\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\smpeg\Pas;E:\Projekte\Ultrastar\Includes\Zlportio;E:\Projekte\Ultrastar\Includes\SQLite"

--DTRANSLATE

diff --git a/Game/Code/UltraStar.dof b/Game/Code/UltraStar.dof
deleted file mode 100644
index 174b4358..00000000
--- a/Game/Code/UltraStar.dof
+++ /dev/null
@@ -1,148 +0,0 @@
-[FileVersion]

-Version=7.0

-[Compiler]

-A=8

-B=0

-C=1

-D=1

-E=0

-F=0

-G=1

-H=1

-I=1

-J=0

-K=0

-L=1

-M=0

-N=1

-O=1

-P=1

-Q=0

-R=0

-S=0

-T=0

-U=0

-V=1

-W=0

-X=1

-Y=1

-Z=1

-ShowHints=1

-ShowWarnings=0

-UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;

-NamespacePrefix=

-SymbolDeprecated=1

-SymbolLibrary=1

-SymbolPlatform=1

-UnitLibrary=1

-UnitPlatform=1

-UnitDeprecated=1

-HResultCompat=1

-HidingMember=1

-HiddenVirtual=1

-Garbage=1

-BoundsError=1

-ZeroNilCompat=1

-StringConstTruncated=1

-ForLoopVarVarPar=1

-TypedConstVarPar=1

-AsgToTypedConst=1

-CaseLabelRange=1

-ForVariable=1

-ConstructingAbstract=1

-ComparisonFalse=1

-ComparisonTrue=1

-ComparingSignedUnsigned=1

-CombiningSignedUnsigned=1

-UnsupportedConstruct=1

-FileOpen=1

-FileOpenUnitSrc=1

-BadGlobalSymbol=1

-DuplicateConstructorDestructor=1

-InvalidDirective=1

-PackageNoLink=1

-PackageThreadVar=1

-ImplicitImport=1

-HPPEMITIgnored=1

-NoRetVal=1

-UseBeforeDef=1

-ForLoopVarUndef=1

-UnitNameMismatch=1

-NoCFGFileFound=1

-MessageDirective=1

-ImplicitVariants=1

-UnicodeToLocale=1

-LocaleToUnicode=1

-ImagebaseMultiple=1

-SuspiciousTypecast=1

-PrivatePropAccessor=1

-UnsafeType=1

-UnsafeCode=1

-UnsafeCast=1

-[Linker]

-MapFile=0

-OutputObjs=0

-ConsoleApp=1

-DebugInfo=0

-RemoteSymbols=0

-MinStackSize=16384

-MaxStackSize=1048576

-ImageBase=4194304

-ExeDescription=Karaoke Software with rating

-[Directories]

-OutputDir=E:\Projekte\Ultrastar\Bin

-UnitOutputDir=

-PackageDLLOutputDir=

-PackageDCPOutputDir=

-SearchPath=E:\Projekte\Ultrastar\Includes\DelphiX\Source;E:\Projekte\Ultrastar\Includes;E:\Projekte\Ultrastar\Includes\midi;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Sound\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Net\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Mixer\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Image\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_ttf\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDLSpriteEngine\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SFont\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\smpeg\Pas;E:\Projekte\Ultrastar\Includes\Zlportio;E:\Projekte\Ultrastar\Includes\SQLite

-Packages=vcl;rtl;vclx;VclSmp;vclshlctrls;DelphiX_for6

-Conditionals=TRANSLATE

-DebugSourceDirs=

-UsePackages=0

-[Parameters]

-RunParams=-benchmark

-HostApplication=

-Launcher=

-UseLauncher=0

-DebugCWD=

-[Version Info]

-IncludeVerInfo=0

-AutoIncBuild=0

-MajorVer=1

-MinorVer=0

-Release=0

-Build=0

-Debug=0

-PreRelease=0

-Special=0

-Private=0

-DLL=0

-Locale=1045

-CodePage=1250

-[Version Info Keys]

-CompanyName=

-FileDescription=

-FileVersion=1.0.0.0

-InternalName=

-LegalCopyright=

-LegalTrademarks=

-OriginalFilename=

-ProductName=

-ProductVersion=1.0.0.0

-Comments=

-[HistoryLists\hlConditionals]

-Count=2

-Item0=TRANSLATE

-Item1=OGL

-[HistoryLists\hlUnitAliases]

-Count=1

-Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;

-[HistoryLists\hlSearchPath]

-Count=2

-Item0=E:\Projekte\Ultrastar\Includes\DelphiX\Source;E:\Projekte\Ultrastar\Includes;E:\Projekte\Ultrastar\Includes\midi;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Sound\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Net\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Mixer\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Image\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_ttf\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDLSpriteEngine\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SFont\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\smpeg\Pas;E:\Projekte\Ultrastar\Includes\Zlportio;E:\Projekte\Ultrastar\Includes\SQLite

-Item1=E:\Projekte\Ultrastar\Includes\DelphiX\Source;E:\Projekte\Ultrastar\Includes;E:\Projekte\Ultrastar\Includes\midi;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Sound\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Net\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Mixer\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_Image\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDL_ttf\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SDLSpriteEngine\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\SFont\Pas;E:\Projekte\Ultrastar\Includes\JEDI-SDL\smpeg\Pas

-[HistoryLists\hlOutputDirectorry]

-Count=3

-Item0=E:\Projekte\Ultrastar\Bin

-Item1=E:\Projekte\Ultrastar

-Item2=C:\UltraStar\Bin

diff --git a/Game/Code/UltraStar.identcache2 b/Game/Code/UltraStar.identcache2
deleted file mode 100644
index a437aa7e..00000000
--- a/Game/Code/UltraStar.identcache2
+++ /dev/null
diff --git a/Game/Code/UltraStar.~dpr b/Game/Code/UltraStar.~dpr
deleted file mode 100644
index a27201e9..00000000
--- a/Game/Code/UltraStar.~dpr
+++ /dev/null
@@ -1,285 +0,0 @@
- program UltraStar;

-

-{$DEFINE TRANSLATE}

-//DEFINE THEMESAVE}

-

-{$R 'UltraStar.res' 'UltraStar.rc'}

-

-uses

-  {//Earlyer in Code Dir.. Now in SearchDir

-  DDKint in '..\ZLPortIO\ddkint.pas',

-  ZLPortIO in '..\ZLPortIO\zlportio.pas',

-  SQLiteTable3 in '..\SQLite\SQLiteTable3.pas',

-  SQLite3 in '..\SQLite\SQLite3.pas',}

-  Windows,

-  SDL,

-

-  //Menu Objects

-  UDisplay in 'Menu\UDisplay.pas',

-  UMenu in 'Menu\UMenu.pas',

-  UMenuStatic in 'Menu\UMenuStatic.pas',

-  UMenuText in 'Menu\UMenuText.pas',

-  UMenuButton in 'Menu\UMenuButton.pas',

-  UMenuInteract in 'Menu\UMenuInteract.pas',

-  UMenuSelect in 'Menu\UMenuSelect.pas',

-  UMenuSelectSlide in 'Menu\UMenuSelectSlide.pas',

-  UDrawTexture in 'Menu\UDrawTexture.pas',

-

-  //Classes

-  UGraphic in 'Classes\UGraphic.pas',

-  UTexture in 'Classes\UTexture.pas',

-  UMusic in 'Classes\UMusic.pas',

-  UPliki in 'Classes\UPliki.pas',

-  UMain in 'Classes\UMain.pas',

-  UDraw in 'Classes\UDraw.pas',

-  URecord in 'Classes\URecord.pas',

-  UTime in 'Classes\UTime.pas',

-  TextGL in 'Classes\TextGL.pas',

-  USongs in 'Classes\USongs.pas',

-  UIni in 'Classes\UIni.pas',

-  USmpeg in 'SMpeg\USmpeg.pas',

-  ULyrics in 'Classes\ULyrics.pas',

-  USkins in 'Classes\USkins.pas',

-  UThemes in 'Classes\UThemes.pas',

-  ULog in 'Classes\ULog.pas',

-  UJoystick in 'Classes\UJoystick.pas',

-  ULCD in 'Classes\ULCD.pas',

-  ULight in 'Classes\ULight.pas',

-  UScores in 'Classes\UScores.pas',

-  ULanguage in 'Classes\ULanguage.pas',

-  UCovers in 'Classes\UCovers.pas',

-  UCatCovers in 'Classes\UCatCovers.pas',

-  UFiles in 'Classes\UFiles.pas',

-  UGraphicClasses in 'Classes\UGraphicClasses.pas',

-  UDLLManager in 'Classes\UDLLManager.pas',

-  UParty in 'Classes\UParty.pas',

-

-  //Screens

-  UScreenLoading in 'Screens\UScreenLoading.pas',

-  UScreenWelcome in 'Screens\UScreenWelcome.pas',

-  UScreenMain in 'Screens\UScreenMain.pas',

-  UScreenName in 'Screens\UScreenName.pas',

-  UScreenLevel in 'Screens\UScreenLevel.pas',

-  UScreenSong in 'Screens\UScreenSong.pas',

-  UScreenSing in 'Screens\UScreenSing.pas',

-  UScreenScore in 'Screens\UScreenScore.pas',

-  UScreenOptions in 'Screens\UScreenOptions.pas',

-  UScreenOptionsGame in 'Screens\UScreenOptionsGame.pas',

-  UScreenOptionsGraphics in 'Screens\UScreenOptionsGraphics.pas',

-  UScreenOptionsSound in 'Screens\UScreenOptionsSound.pas',

-  UScreenOptionsLyrics in 'Screens\UScreenOptionsLyrics.pas',

-  UScreenOptionsThemes in 'Screens\UScreenOptionsThemes.pas',

-  UScreenOptionsRecord in 'Screens\UScreenOptionsRecord.pas',

-  UScreenEditSub in 'Screens\UScreenEditSub.pas',

-  UScreenEdit in 'Screens\UScreenEdit.pas',

-  UScreenEditConvert in 'Screens\UScreenEditConvert.pas',

-  UScreenEditHeader in 'Screens\UScreenEditHeader.pas',

-  UScreenOpen in 'Screens\UScreenOpen.pas',

-  UScreenTop5 in 'Screens\UScreenTop5.pas',

-  UScreenSongMenu in 'Screens\UScreenSongMenu.pas',

-  //PartyMode

-  UScreenSingModi in 'Screens\UScreenSingModi.pas',

-  UScreenPartyNewRound in 'Screens\UScreenPartyNewRound.pas',

-  UScreenPartyScore in 'Screens\UScreenPartyScore.pas',

-  UScreenPartyPlayer in 'Screens\UScreenPartyPlayer.pas',

-  UScreenPartyOptions in 'Screens\UScreenPartyOptions.pas',

-  UScreenPartyWin in 'Screens\UScreenPartyWin.pas',

-

-  //Modi SDK

-  ModiSDK in '..\..\Modis\SDK\ModiSDK.pas';

-

-const

-  Version = 'UltraStar Deluxe V 0.90 Beta';

-

-var

-  WndTitle: string;

-  hWnd: THandle;

-  I: Integer;

-

-begin

-  WndTitle := Version;

-

-  //Start more than One Time Prevention

-  hWnd:= FindWindow(nil, PChar(WndTitle));

-  //Programm already started

-  if (hWnd <> 0) then

-  begin

-    I := Messagebox(0, PChar('Another Instance of Ultrastar is already running. Contìnue ?'), PChar(WndTitle), MB_ICONWARNING or MB_YESNO);

-    if (I = IDYes) then

-    begin

-      I := 1;

-      repeat

-        Inc(I);

-        hWnd := FindWindow(nil, PChar(WndTitle + ' Instance ' + InttoStr(I)));

-      until (hWnd = 0);

-

-      WndTitle := WndTitle + ' Instance ' + InttoStr(I);

-    end

-    else

-      Exit;

-  end;

-

-

-

-  USTime := TTime.Create;

-

-  // Log + Benchmark

-  Log := TLog.Create;

-  Log.Title := WndTitle;

-  Log.BenchmarkStart(0);

-//  Log.LogError(IntToStr(DayOfTheYear(Date)));

-

-  // Language

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Initialize Paths', 'Initialization');        InitializePaths;

-  Log.LogStatus('Load Language', 'Initialization');           Language := TLanguage.Create;

-  //Add Const Values:

-    Language.AddConst('US_VERSION', Version);

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading Language', 1);

-

-  // SDL

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Initialize SDL', 'Initialization');

-  SDL_Init(SDL_INIT_VIDEO or SDL_INIT_AUDIO);

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Initializing SDL', 1);

-

-   // Skin

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Loading Skin List', 'Initialization');             Skin := TSkin.Create;

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading Skin List', 1);

-

-  //Log.LogBenchmark(inttostr(Skin.), 1);

-

-  // Sound Card List

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Loading Soundcard list', 'Initialization');

-  Recording := TRecord.Create;

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading Soundcard list', 1);

-

-  // Ini + Paths

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Load Ini', 'Initialization');                Ini := TIni.Create;

-                                                              Ini.Load;

-                                                              Language.ChangeLanguage(ILanguage[Ini.Language]);

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading Ini', 1);

-

-  // LCD

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Load LCD', 'Initialization');                LCD := TLCD.Create;

-  if Ini.LPT = 1 then begin

-//  LCD.HalfInterface := true;

-    LCD.Enable;

-    LCD.Clear;

-    LCD.WriteText(1, '  UltraStar    ');

-    LCD.WriteText(2, '  Loading...   ');

-  end;

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading LCD', 1);

-

-  // Light

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Load Light', 'Initialization');              Light := TLight.Create;

-  if Ini.LPT = 2 then begin

-    Light.Enable;

-//    Light.LightOne(0, 1000);

-  end;

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading Light', 1);

-

-  // Theme

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Load Themes', 'Initialization');             Theme := TTheme.Create('Themes\' + ITheme[Ini.Theme] + '.ini', Ini.Color);

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading Themes', 1);

-

-  // Covers Cache

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Creating Covers Cache', 'Initialization');   Covers := TCovers.Create;

-  Log.LogBenchmark('Loading Covers Cache Array', 1);

-  Log.BenchmarkStart(1);

-

-  // Category Covers

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Creating Category Covers Array', 'Initialization');

-  CatCovers:= TCatCovers.Create;

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading Category Covers Array', 1);

-

-  // Songs

-  //Log.BenchmarkStart(1);

-  Log.LogStatus('Creating Song Array', 'Initialization');     Songs := TSongs.Create;

-  Songs.LoadSongList;

-  Log.LogStatus('Creating 2nd Song Array', 'Initialization'); CatSongs := TCatSongs.Create;

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading Songs', 1);

-

-  // PluginManager

-  Log.BenchmarkStart(1);

-  Log.LogStatus('PluginManager', 'Initialization');

-  DLLMan := TDLLMan.Create;   //Load PluginList

-

-  Log.LogError(inttostr(Length(DLLMan.Plugins)) + ' Plugins Loaded');

-  

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading PluginManager', 1);

-

-  // Party Mode Manager

-  Log.BenchmarkStart(1);

-  Log.LogStatus('PartySession Manager', 'Initialization');

-  PartySession := TParty_Session.Create;   //Load PartySession

-  

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading PartySession Manager', 1);

-

-  // Graphics

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Initialize 3D', 'Initialization');           Initialize3D(WndTitle);

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Initializing 3D', 1);

-

-  // Sound

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Initialize Sound', 'Initialization');

-  Log.LogStatus('Creating Music', 'InitializeSound');         Music := TMusic.Create;

-  InitializeSound;

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Initializing Sound', 1);

-

-  // Score Saving System

-  Log.BenchmarkStart(1);

-  Log.LogStatus('Score DB System', 'Initialization');

-  InitScore('Scores.db');

-  Log.BenchmarkEnd(1);

-  Log.LogBenchmark('Loading Score DB System', 1);

-

-  // Joypad

-  if Ini.Joypad = 1 then begin

-    Log.BenchmarkStart(1);

-    Log.LogStatus('Initialize Joystick', 'Initialization');   Joy := TJoy.Create;

-    Log.BenchmarkEnd(1);

-    Log.LogBenchmark('Initializing Joystick', 1);

-  end;

-

-  Log.BenchmarkEnd(0);

-  Log.LogBenchmark('Loading Time', 0);

-

-

-//  Music.SetLoop(true);

-//  Music.SetVolume(50);

-//  Music.Open(SkinPath + 'Menu Music 3.mp3');

-//  Music.Play;

-  Log.LogStatus('Main Loop', 'Initialization');               MainLoop;

-

-//  sleep(3000);

-

-  // finish

-  if Ini.LPT = 1 then LCD.Clear;

-  if Ini.LPT = 2 then Light.TurnOff;

-

-  Log.Free;

-end.
\ No newline at end of file