Global SEObject:ScriptEngine = New ScriptEngine
Main()

Function Main()
	
	 'hier steht mehr aber das is ja egal
	


	
	
	
	' Run the script
	If (Not SEObject.RunScriptFile(\"test.txt\")) Then
		Print \"Error: \" + SEObject.GetLastErrorString()
	Else
		Print \"Script loaded\" 'wird angezeigt
	End If

	LuaMCall(\"Initialize\",[\"nix\"])


  ' LuaCall(\"Initialize\")
	

	
	
	

	Return
End Function


Function LuaMCall(func$,param$[])

	SEObject.BeginLUAFunctionCall()
	
	
	For Local i:Byte=0 To (Len param$)-1
		Print param$[i]
		SEObject.AddStringParameter(param$[i])
	
	
	Next
	
	'alles ok bis hierhin
	
	
	
	If (Not SEObject.CallFunction(func$, False)) Then 'bing fehler
		Print \"Error calling function: \" + SEObject.GetLastErrorString()
	Else
		Print \":)\"
	End If
	
	Return 
End Function