function GetTrackableX takes trackable tc, hashtable h returns real
     return LoadReal(h,GetHandleId(tc),0)
endfunction

function GetTrackableY takes trackable tc, hashtable h returns real
     return LoadReal(h,GetHandleId(tc),1)
endfunction

function GetTrackableZ takes trackable tc, hashtable h returns string
     return LoadReal(h,GetHandleId(tc),2)
endfunction

function GetTrackableFacing takes trackable tc, hashtable h returns real
     return LoadReal(h,GetHandleId(tc),3)
endfunction

function GetTrackablePath takes trackable tc, hashtable h returns string
     return LoadStr(h,GetHandleId(tc),4)
endfunction

function GetTrackableOwner takes trackable tc, hashtable h returns player
     return Player(LoadInteger(h,GetHandleId(tc),5))
endfunction

function NewTrackable takes string path, real x, real y, real z, real facing, player owner, hashtable h returns trackable
     local trackable tc
     local string invisible = ""
     local destructable d = CreateDestructableZ('OTip', x, y, z, 0.00, 1.00, 0 )
     if GetLocalPlayer() != owner then
         set path = invisible
     endif
     set tc = CreateTrackable(path, x, y, facing)
     call RemoveDestructable(d)
     set d = null
     call SaveReal(h,GetHandleId(tc),0,x)
     call SaveReal(h,GetHandleId(tc),1,y)
     call SaveReal(h,GetHandleId(tc),2,z)
     call SaveReal(h,GetHandleId(tc),3,facing)
     call SaveStr(h,GetHandleId(tc),4,path)
     call SaveInteger(h,GetHandleId(tc),5,GetPlayerId(owner))
     return tc
endfunction