mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-21 08:45:06 -05:00
Some changes :-)
git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@62 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
parent
c477793560
commit
0c380b49ec
0
Plugins/Embedded_SMART.dll → Plugins/libsmart.dll
Executable file → Normal file
0
Plugins/Embedded_SMART.dll → Plugins/libsmart.dll
Executable file → Normal file
9
Tests/PS/plugintest.txt
Normal file
9
Tests/PS/plugintest.txt
Normal file
@ -0,0 +1,9 @@
|
||||
program new;
|
||||
|
||||
{.LoadDLL libsmart}
|
||||
|
||||
|
||||
begin
|
||||
SmartSetup('http://world19.runescape.com/', 'plugin.js?param=o0,a1,m0', 765, 503);
|
||||
Wait(5000);
|
||||
end.
|
@ -1,14 +1,14 @@
|
||||
{$IFDEF CPU386 }
|
||||
PSScript.Defines.Add ('CPU386');
|
||||
{$ENDIF }
|
||||
PSScript.Defines.Add ('MUFASA');
|
||||
PSScript.Defines.Add ('COGAT');
|
||||
PSScript.Defines.Add ('RAYMONDPOWNS');
|
||||
{$IFDEF MSWINDOWS }
|
||||
PSScript.Defines.Add ('MSWINDOWS');
|
||||
PSScript.Defines.Add ('WIN32');
|
||||
PSScript.Defines.Add ('WINDOWS');
|
||||
{$ENDIF }
|
||||
{$IFDEF LINUX }
|
||||
PSScript.Defines.Add ('LINUX');
|
||||
{$ENDIF }
|
||||
{$IFDEF CPU386 }
|
||||
PSScript.Defines.Add('CPU386');
|
||||
{$ENDIF }
|
||||
PSScript.Defines.Add('MUFASA');
|
||||
PSScript.Defines.Add('COGAT');
|
||||
PSScript.Defines.Add('RAYMONDPOWNS');
|
||||
{$IFDEF MSWINDOWS }
|
||||
PSScript.Defines.Add('MSWINDOWS');
|
||||
PSScript.Defines.Add('WIN32');
|
||||
PSScript.Defines.Add('WINDOWS');
|
||||
{$ENDIF }
|
||||
{$IFDEF LINUX }
|
||||
PSScript.Defines.Add('LINUX');
|
||||
{$ENDIF }
|
||||
|
@ -124,7 +124,9 @@ var
|
||||
PlugExt: String = {$IFDEF LINUX}'.so';{$ELSE}'.dll';{$ENDIF}
|
||||
begin
|
||||
ii := -1;
|
||||
Result := -1;
|
||||
result := -1;
|
||||
if PluginDirs.Count = 0 then
|
||||
Exit;
|
||||
ValidateDirs;
|
||||
PluginName := ExtractFileNameWithoutExt(PluginName);
|
||||
for i := 0 to PluginDirs.Count - 1 do
|
||||
@ -134,6 +136,8 @@ begin
|
||||
Raise Exception.CreateFmt('Plugin(%s) has been found multiple times',[PluginName]);
|
||||
ii := i;
|
||||
end;
|
||||
if ii = -1 then
|
||||
raise Exception.CreateFMT('Plugins(%s) has not been found',[PluginName]);
|
||||
for i := 0 to PluginLen - 1 do
|
||||
if Plugins[i].filename = (PluginDirs.Strings[ii] + PluginName + PlugExt) then
|
||||
Exit(i);
|
||||
|
Loading…
Reference in New Issue
Block a user