All pastes #817685 Raw Edit

Miscellany

public text v1 · immutable
·published 2007-12-15 20:20 UTC
rendered paste body
Global lua:Byte Ptr = luaL_newstate() 

luaopen_math(lua) 

lua_register(lua, "Particle", LuaCreateParticle) 

Function LuaCreateParticle(llua:Byte Ptr) 

	Local x:Float = String.FromCString(lua_tostring(llua, 1)).ToFloat() 
	Local y:Float = String.FromCString(lua_tostring(llua, 2)).ToFloat() 
	Local w:Float = String.FromCString(lua_tostring(llua, 3)).ToFloat() 
	Local h:Float = String.FromCString(lua_tostring(llua, 4)).ToFloat() 
	
	Local r:Float = String.FromCString(lua_tostring(llua, 5)).ToFloat() 
	Local g:Float = String.FromCString(lua_tostring(llua, 6)).ToFloat() 
	Local b:Float = String.FromCString(lua_tostring(llua, 7)).ToFloat() 
	
	Local image:TImage = DefaultSprite

	Try
		image = LoadImage(String.FromCString(lua_tostring(llua, 8)) 
	Catch
	End Try
	
	Local p:Particle = Particle.Create(x, y, w, h, r, g, b, image) 

End Function

lua_dofile(lua, "test.lua")