PS: Example of my Lua Function Calls inorder to gain access to DBPro and DLL Commands.
` DarkScript Commands
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"LoadScript" ,"S" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"LoadLibScript" ,"S" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptExecute" ,"S" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptCompileToLib" ,"SS" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptFunction" ,"S" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptFunctionInt" ,"LS" ,1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptFunctionFloat" ,"FS" ,1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptFunctionString" ,"SS" ,1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptIntVariable" ,"LS" ,1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptFloatVariable" ,"FS" ,1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptStringVariable" ,"SS" ,1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptSetIntVariable" ,"SLL",0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptSetFloatVariable" ,"SFL",0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptSetStringVariable","SSL",0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ScriptLoadDbpFunction" ,"SSL",0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"MakeFunctionThread" ,"S" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"DeleteThread" ,"L" ,0,0
` BlueGui 2 Commands
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"CreateButton" ,"LLLLLSLL",1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"GetEvent" ,"" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"EventSource" ,"L" ,1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"EventType" ,"L" ,1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"EventData" ,"L" ,1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"EventDataEx" ,"L" ,1,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ClearEvent" ,"" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"GadgetUnderMouse" ,"L" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"Message" ,"SS" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"MoveGadget" ,"LLL" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"ResizeGadget" ,"LLL" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"SetGadget" ,"LLLLL" ,0,0
Inc n,1 : LUA REGISTER FUNCTION GET PTR TO FUNCTION(n),"CreateGadgetFromWindow","LL" ,1,0
` Once completed adding new lua commands
Goto Start
Function Script_LOAD_SCRIPT(script_file$)
LOAD SCRIPT script_file
EndFunction
Function Script_LOAD_LIB_SCRIPT(lib_script_file$)
LOAD LIB SCRIPT lib_script_file
EndFunction
Function Script_SCRIPT_EXECUTE(script_command$)
SCRIPT EXECUTE script_command
EndFunction
Function Script_SCRIPT_COMPILE_TO_LIB(script_file_name$,_script_lib_name$)
SCRIPT COMPILE TO LIB script_file_name,_script_lib_name
EndFunction
Function Script_SCRIPT_FUNCTION(script_function_name$)
SCRIPT FUNCTION script_function_name
EndFunction
Function Script_SCRIPT_FUNCTION_INT(script_function_name$)
ReturnValue = SCRIPT FUNCTION INT(script_function_name)
EndFunction ReturnValue
Function Script_SCRIPT_FUNCTION_FLOAT(script_function_name$)
ReturnValue# = SCRIPT FUNCTION FLOAT(script_function_name)
EndFunction ReturnValue#
Function Script_SCRIPT_FUNCTION_STRING(script_function_name$)
ReturnValue$ = SCRIPT FUNCTION STRING(script_function_name)
EndFunction ReturnValue$
Function Script_SCRIPT_INT_VARIABLE(script_global_variable_name$)
ReturnValue = SCRIPT INT VARIABLE(script_global_variable_name)
EndFunction ReturnValue
Function Script_SCRIPT_FLOAT_VARIABLE(script_global_variable_name$)
ReturnValue# = SCRIPT FLOAT VARIABLE(script_global_variable_name)
EndFunction ReturnValue #
Function Script_SCRIPT_STRING_VARIABLE(script_global_variable_name$)
ReturnValue$ = SCRIPT STRING VARIABLE(script_global_variable_name)
EndFunction ReturnValue$
Everyone Be Cool, You, Be Cool.