Single-state Lua

[Josh]

I have something else wrong here...

[Josh]

I've got it working now. Here's what it looks like:

require("scripts/class")

local class=CreateClass(...)

function class:InitDialog(grid)
self.super:InitDialog(grid)
group=grid:AddGroup("Light")
group:AddProperty("Resolution",PROPERTY_CHOICE,"256,512,1024,2048")
group:AddProperty("linearoffset",PROPERTY_VEC3,"0,1,2","Linear offset" )
group:AddProperty("shadowdistance",PROPERTY_VEC3,"","Shadow distance" )
group:AddProperty("Range",PROPERTY_FLOAT)
group:Expand(1)		
end

function class:Spawn(model)
local object=self.super:Spawn(model)
object.model:SetKey("resolution","2")
object.light=CreateDirectionalLight(object.model)		

function object:SetKey(key,value)
	if key=="resolution" then
		if value=="0" then
			self.light:SetShadowmapSize(256)
		elseif value=="1" then
			self.light:SetShadowmapSize(512)
		elseif value=="2" then
			self.light:SetShadowmapSize(1024)
		elseif value=="3" then
			self.light:SetShadowmapSize(2048)
		end
	elseif key=="range" then
		self.light:SetRange(value)
	elseif key=="shadowdistance" then
		local offset=string.Explode(value,",")
		x=tonumber(offset[1])
		y=tonumber(offset[2])
		z=tonumber(offset[3])
		if x==nil then x=0 end
		if y==nil then y=0 end
		if z==nil then z=0 end
		self.light:SetShadowDistance(x,0)
		self.light:SetShadowDistance(y,1)
		self.light:SetShadowDistance(z,2)	
	elseif key=="linearoffset" then
		local offset=string.Explode(value,",")
		x=tonumber(offset[1])
		y=tonumber(offset[2])
		z=tonumber(offset[3])
		if x==nil then x=0 end
		if y==nil then y=0 end
		if z==nil then z=0 end
		self.light:SetShadowOffset(x,1.0,0)
		self.light:SetShadowOffset(y,1.0,1)
		self.light:SetShadowOffset(z,1.0,2)
	else
		return self.super:SetKey(key,value)
	end
end

function object:GetKey(key,value)
	if key=="linearoffset" then
		return self.light:GetShadowOffset(0,0)..","..self.light:GetShadowOffset(0,1)..","..self.light:GetShadowOffset(0,2)
	elseif key=="shadowdistance" then
		return self.light:GetShadowDistance(0)..","..self.light:GetShadowDistance(1)..","..self.light:GetShadowDistance(2)
	elseif key=="range" then
		return self.light:GetRange()
	elseif key=="shadowresolution" then
		resolution=self.light:GetShadowmapSize()
		if resolution==256 then
			return 0
		elseif resolution==512 then
			return 1
		elseif resolution==1024 then
			return 2	
		elseif resolution==2048 then
			return 3
		else
			return -1
		end
	else
		return self.super:GetKey(key,value)
	end
end

function object:Kill(model)
	if self.light~=nil then
		self.light:Free()
		self.light=nil
	end
	self.super:Kill()
end

return object
end

[macklebee]

what is "super"? Is that something inherent to lua or something you created in the class?

[Josh]

It's like calling base_whatever().

[TylerH]

This seems reasonable.