diff options
author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-08-27 15:26:05 +0000 |
---|---|---|
committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-08-27 15:26:05 +0000 |
commit | 2c87ea1040f8fc02fcadbf920d02685198a0c216 (patch) | |
tree | fda8cb97a4ebcae55701f30dc2e356f5fd609738 /Modis/SDK/ModiSDK.pas | |
parent | 50d173a828e75d2b8bc439c8b65bc8bb1127fe48 (diff) | |
download | usdx-2c87ea1040f8fc02fcadbf920d02685198a0c216.tar.gz usdx-2c87ea1040f8fc02fcadbf920d02685198a0c216.tar.xz usdx-2c87ea1040f8fc02fcadbf920d02685198a0c216.zip |
Artwork/Game/Modis/Tools changed to lower case
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1314 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Modis/SDK/ModiSDK.pas')
-rw-r--r-- | Modis/SDK/ModiSDK.pas | 156 |
1 files changed, 0 insertions, 156 deletions
diff --git a/Modis/SDK/ModiSDK.pas b/Modis/SDK/ModiSDK.pas deleted file mode 100644 index 76dcf8ea..00000000 --- a/Modis/SDK/ModiSDK.pas +++ /dev/null @@ -1,156 +0,0 @@ -unit ModiSDK; - -interface - -{$IFDEF FPC} - {$MODE Delphi} -{$ENDIF} - -{$I switches.inc} - -type //PluginInfo, for Init - TPluginInfo = record - //Info - Name : Array [0..32] of Char; //Modi to Register for the Plugin - Creator : Array [0..32] of Char; //Name of the Author - PluginDesc : Array [0..64] of Char; //Plugin Description - - //Plugin Typ, atm: 8 only for PartyMode Modi - Case Typ: byte of - 8: ( - //Options - LoadSong: boolean; //Whether or not a Song should be Loaded - //Only When Song is Loaded: - ShowNotes: boolean; //Whether the Note Lines should be displayed - LoadVideo: boolean; //Should the Video be loaded ? - LoadBack: boolean; //Should the Background be loaded ? - - ShowRateBar: boolean; //Whether the Bar that shows how good the player was sould be displayed - ShowRateBar_O: boolean; //Load from Ini whether the Bar should be Displayed - - EnLineBonus: boolean; //Whether LineBonus Should be enabled - EnLineBonus_O: boolean; //Load from Ini whether LineBonus Should be enabled - - BGShowFull: boolean; //Whether the Background or the Video should be shown Fullsize - BGShowFull_O: boolean; //Whether the Background or the Video should be shown Fullsize - - //Options -> everytime - ShowScore: boolean; //Whether or not the Score should be shown - ShowBars: boolean; //Whether the White Bars on Top and Bottom should be Drawn - TeamModeOnly: boolean; //If True the Plugin can only be Played in Team Mode - GetSoundData: boolean; //If True the RData Procedure is called when new SoundData is available - Dummy: boolean; //Should be Set to False... for Updateing Plugin Interface - - NumPlayers: Byte //Number of Available Players for Modi - //Set different Bits - //1 -> One Player - //2 -> Two Players - //4 -> Three Players - //8 -> Four Players - //16-> Six Players - //e.g. : 10 -> Playable with 2 and 4 Players - ); - - end; - - TPlayerInfo = record - NumPlayers: Byte; - Playerinfo: array[0..5] of record - Name: PChar; //Name of the Player - Score:Word; //Players Score - Bar: Byte; //Percentage of the SingBar filled - PosX: Real; //PosX of Players SingBar - PosY: Real; //PosY " - Enabled: Boolean; //Whether the Player could get Points - Percentage: Byte; //Percentage Shown on the Score Screen - end; - end; - - TTeamInfo = record - NumTeams: Byte; - Teaminfo: array[0..5] of record - Name: PChar; - Score: Word; - Joker: Byte; - CurPlayer: Byte; - NumPlayers: Byte; - Playerinfo: array[0..3] of record - Name: PChar; - TimesPlayed: Byte; - - end; - end; - end; - - TsmallTexture = record - TexNum: integer; - W: real; - H: real; - end; - - TSentences = record - Current: integer; // aktualna czesc utworu do rysowania - High: integer; - Number: integer; - Resolution: integer; - NotesGAP: integer; - TotalLength:integer; - Sentence: array of record - Start: integer; - StartNote: integer; - Lyric: string; - LyricWidth: real; - End_: integer; - BaseNote: integer; - HighNote: integer; - IlNut: integer; - TotalNotes: integer; - Note: array of record - Color: integer; - Start: integer; - Length: integer; - Tone: integer; - //Text: string; - FreeStyle: boolean; - Typ: integer; // zwykla nuta x1, zlota nuta x2 - end; - end; - end; - - DWORD = Longword; - HSTREAM = DWORD; - - TTextureType = ( - TEXTURE_TYPE_PLAIN, // Plain (alpha = 1) - TEXTURE_TYPE_TRANSPARENT, // Alpha is used - TEXTURE_TYPE_COLORIZED // Alpha is used; Hue of the HSV color-model will be replaced by a new value - ); - - //Routines to gave to the Plugin - fModi_LoadTex = function (const Name: PChar; Typ: TTextureType): TsmallTexture; stdcall; //Pointer to Texture Loader - //fModi_Translate = function (const Name, Translation: AChar): Integer; stdcall; //Pointer to Translator - fModi_Print = procedure (const Style, Size: Byte; const X, Y: Real; const Text: PChar); stdcall; //Procedure to Print Text //Now translated automatically - fModi_LoadSound = function (const Name: PChar): Cardinal; stdcall; //Procedure that loads a Custom Sound - pModi_PlaySound = procedure (const Index: Cardinal); stdcall; //Plays a Custom Sound - - TMethodRec = record - LoadTex: fModi_LoadTex; - Print: fModi_Print; - LoadSound: fModi_LoadSound; - PlaySound: pModi_PlaySound; - end; - //DLL Funktionen - //Gave the Plugins Info - pModi_PluginInfo = procedure (var Info: TPluginInfo); stdcall; - //Executed on Game Start //If True Game begins, else Failure - fModi_Init = function (const TeamInfo: TTeamInfo; var Playerinfo: TPlayerinfo; const Sentences: TSentences; const Methods: TMethodRec): boolean; stdcall; - //Executed everytime the Screen is Drawed //If False The Game finishes - fModi_Draw = function (var Playerinfo: TPlayerinfo; const CurSentence: Cardinal): boolean; stdcall; - //Is Executed on Finish, Returns the Playernum of the Winner - fModi_Finish = function (var Playerinfo: TPlayerinfo): byte; stdcall; - //Procedure called when new Sound Data is available - pModi_RData = procedure (handle: HSTREAM; buffer: Pointer; len: DWORD; user: DWORD); stdcall; - -implementation - -end. |