Nyerk

Code: Select all

tab =
{
  494.29, 819.13, 199.43,
  494.29, 819.13, 198.44,
  490.89, 821.24, 198.44,
  490.89, 821.24, 197.44,
  487.50, 823.37, 197.44,
  483.53, 822.89, 197.44,
  482.53, 823.76, 197.44,
  481.86, 830.70, 197.44,
  480.50, 834.47, 197.44,
  479.65, 838.37, 197.44,
  479.58, 842.37, 197.44,
  479.99, 846.35, 197.44,
  480.55, 850.31, 197.44,
  480.89, 854.30, 197.44,
  481.50, 858.25, 197.44, 
  480.07, 859.65, 197.44,
  482.12, 863.08, 197.44,
  484.28, 866.45, 197.44,
  486.44, 869.81, 197.44,
  488.04, 873.48, 197.44,
  489.95, 877.00, 197.44,
  493.15, 879.39, 197.44,
  496.14, 882.05, 197.44,
  499.22, 884.60, 197.44,
  502.17, 887.30, 197.44,
  505.81, 888.95, 197.44,
  509.55, 890.37, 197.44,
  513.36, 891.60, 197.44,
  517.05, 893.14, 197.44,
  520.97, 893.94, 197.44,
  524.97, 893.92, 197.44,
  528.97, 893.85, 197.44,
  532.95, 894.21, 197.44,
  536.93, 893.76, 197.44,
  540.85, 892.96, 197.44, 
  544.67, 891.77, 197.44,
  548.28, 890.06, 197.44,
  551.99, 888.56, 197.44,
  555.45, 886.55, 197.44,
  558.70, 884.23, 197.44,
  561.62, 881.49, 197.44,
  564.61, 878.83, 197.44,
  567.24, 875.81, 197.44,
  569.26, 872.37, 197.44,
  571.20, 868.86, 197.44,
  573.13, 865.36, 197.44,
  575.02, 861.84, 197.44,
  575.71, 857.90, 197.44,
  576.25, 853.93, 197.44,
  577.03, 850.01, 197.44,
  577.73, 846.07, 197.44,
  578.04, 842.08, 197.44,
  578.04, 842.08, 198.44,
  578.04, 842.08, 199.44
}

local Plr = Player:GetPosition();
local delay_SEC = 0.75; local tick_MS = 0
local tab_ENDTRACE = false
local FlagPause = true

local tab_MAX = 54
local tab_COUNT = 1

function OnLoad()
  Register ( "PauseProgram","P", "Control");
  Write ("Press <Ctrl+P> to Start/Pause program.")
end

function PauseProgram()
  if (FlagPause==false)
    then
    FlagPause=true
    tick_MS = Time() + delay_SEC * 1000
  else
    FlagPause=false
  end
end

function ftab_ReadData(idx)
	id = (idx - 1) * 3
	Plr.X = tab [id + 1]
	Plr.Y = tab [id + 2]
	Plr.Z = tab [id + 3]
end

function Info()
	Write ("id: " ..tab_COUNT.. " MoveTo: " ..Plr.X.. ", " ..Plr.Y.. ", " ..Plr.Z)
end

function OnFrame()
	if (tick_MS > Time()) or (tab_ENDTRACE==true) or (FlagPause==true)
		then
		return true;
	end
	if tab_COUNT > tab_MAX
		then
		tab_ENDTRACE = true
		return true
	end

	ftab_ReadData (tab_COUNT)
	Info()
	Player:SetPosition (Plr)
	tab_COUNT = tab_COUNT + 1
	tick_MS = Time() + delay_SEC * 1000
end

function Attack ( Entity, Range, Stunned)
	return Class:Attack ( Entity, Range, Stunned);
end

function Heal (CombatEnabled)
	return Class:Heal (CombatEnabled);
end

function Pause()
	return Class:Pause()
end