-- LUA Script - precede every function and global member with lowercase name of script + '_main'
local U = require "scriptbank\\utillib"
local Q = require "scriptbank\\quatlib"

local rad = math.rad

local de_test_list = {}

function de_test_init( e )
	Include( "utillib.lua" )
	de_test_list[ e ] = nil
end

function de_test_main( e )
	local de = de_test_list[ e ] 
	
	if de == nil then
		de_test_list[ e ] = { state = 'init', timer = math.huge }
		return
	end
	
	if de.state == 'init' then
		-- register for dynamic entities
		if DE_Register == nil then return end
		
		DE_Register( e, 'BarsGreen', { xo = 0, yo = 23, zo = -1 } )
		DE_Register( e, 'Panel8',    { xo = 0, yo = 23, zo = -1 } )

		de.state = 'show1'
		return
	end
	
	if de.state == 'show1' then 
		DE_Show( e, 'BarsGreen' )
		DE_Hide( e, 'Panel8' )
		
		de.state = 'idle1'
		de.timer = g_Time + 3000
		
	elseif de.state == 'show2' then
		DE_Hide( e, 'BarsGreen' )
		DE_Show( e, 'Panel8' )
		
		de.state = 'idle2'
		de.timer = g_Time + 3000
		
	else
		if g_Time > de.timer then
			if de.state == 'idle1' then
				de.state = 'show2'
				
			elseif de.state == 'idle2' then
				de.state = 'show1'
			end
		end
	end
	
	local Ent = g_Entity[e]
		
	local quat = Q.FromEuler(rad(Ent.anglex), rad(Ent.angley), rad(Ent.anglez))

	DE_Update( e, Ent.x, Ent.y, Ent.z, quat ) 
	
end