--Adapted from Rolfy's Animated Night Vision Script.

local ntime = nil
local imagenumber = 0
local titan_sprites = {}
--change to however many different images you have
local max_images = 8
local delay = 200

function titan_init(e)
	for i = 1, max_images do
		titan_sprites[i] = CreateSprite(LoadImage ("scriptbank\\images\\Titan\\00" .. (i - 1) .. ".png"))
		SetSpriteSize     (titan_sprites[i], 100, 100)
		SetSpritePosition (titan_sprites[i], 200, 200)
		SetSpriteDepth    (titan_sprites[i], 100)
	end
end

function titan_main(e)

	if ntime == nil then
		ntime = g_Time + delay
		return
	end
	
	if g_Time > ntime then
		if imagenumber < max_images then
			imagenumber = imagenumber + 1
		else
			SetSpritePosition(titan_sprites[imagenumber], 200, 200)
			imagenumber = 1
		end
		
		SetSpritePosition(titan_sprites[imagenumber], 0, 0)
		if imagenumber > 1 then
			SetSpritePosition(titan_sprites[imagenumber - 1], 200, 200)
		end
		ntime = g_Time + delay
	end
end