-- This Script will reset your scene, so save before running it.
resetMaxFile #noPrompt
s = sphere ()
spaz = s.pos.controller

-- Function Definition
fn AddKeysFromFile ctrl file =
(
local f = openFile file
t=0
while (not eof f) do
(
local x = addNewKey ctrl t
local a = [readValue f,readValue f,readValue f]
x.value = a
t += 10
)
close f
)

-- EVALUATE FUNCTION
AddKeysFromFile spaz "infiniti.dat"