Some changes mode on ModiSDK and Depending Files(Plugin Loader, Party SingScreen and Plugins)

Changes make the Pluginsystem more extendable with backwards compatibility in further Versions.

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

1 files changed, 4 insertions, 2 deletions

diff --git a/Modis/5000Points/Until5000.dpr b/Modis/5000Points/Until5000.dpr
index 8d66eb5f..b826d212 100644
--- a/Modis/5000Points/Until5000.dpr
+++ b/Modis/5000Points/Until5000.dpr
@@ -7,12 +7,14 @@ uses
 procedure PluginInfo (var Info: TPluginInfo); stdcall;

 begin

   Info.Name    := 'PLUGIN_UNTIL5000_NAME';

-  Info.NumPlayers := 31;

 

   Info.Creator    := 'Whiteshark';

   Info.PluginDesc := 'PLUGIN_UNTIL5000_DESC';

 

+  //Set to Party Modi Plugin

+  Info.Typ := 8;

 

+  Info.NumPlayers := 31;

   //Options

   Info.LoadSong := True;  //Whether or not a Song should be Loaded

   //Only When Song is Loaded:

@@ -38,7 +40,7 @@ begin
 end;

 

 //Executed on Game Start //If True Game begins, else Failure

-function Init (const TeamInfo: TTeamInfo; var Playerinfo: TPlayerinfo; const Sentences: TSentences; const LoadTex: fModi_LoadTex; const Print: fModi_Print; LoadSound: fModi_LoadSound; PlaySound: fModi_PlaySound): boolean; stdcall;

+function Init (const TeamInfo: TTeamInfo; var Playerinfo: TPlayerinfo; const Sentences: TSentences; const Methods: TMethodRec): boolean; stdcall;

 begin

 Result := True;

 end;