local  bksound = 0

  local  Distance = 200;   

  local  vol = 100;

    

function machinery_main(e)

    PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;

    PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;

    PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;   

    PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));



    vol = Distance - PlayerDist;

    if vol < 0 then

       	vol = 0;

    end

    if vol > 100 then

    	vol = 100;

    end

       

    if PlayerDist < Distance and bksound == 0 then

        LoopSound(e,0);

        bksound = 1;

    end



    if bksound == 1 then

       -- SetSoundVolume(vol); function not working!

    end



    if PlayerDist > Distance and bksound == 1 then

    	StopSound(e,0);

    	bksound = 0;

    end

end

-- LUA Script - precede every function and global member with lowercase name of script + '_main'

-- Player Collects Health





-- Test code for forum sound problem...

-- I suspect that this variable is not treated as local as we would think..

-- local bksound = 0;



-- I am no LUA expert - in fact reloaded is my first encounter with LUA

-- so using my first diagnosis that this is not local to just one entity...  

-- I am going to give each entity its own bksound variable...



-- declare bksound = {}; to use as array...

  local  bksound = {};

     

function health_jc_main(e)



  -- just moved these here as they are realy constants 

  -- so should have no effect where ever they are..

  local  Distance = 200;   

  local  vol = 100;

  

  -- important check for nil - or we will get the fatel nil error..

  -- setup bksound[e] for our entity [e]

  if bksound[e] == nil then

     bksound[e] = 0;

  end



    PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;

    PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;

    PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;   

    PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));

 

    vol = Distance - PlayerDist;

    if vol < 0 then

        vol = 0;

    end

    if vol > 100 then

        vol = 100;

    end

    

    -- make sure we use our bksound[e] variable     

    if PlayerDist < Distance and bksound[e] == 0 then

        LoopSound(e,0);

        -- again the new bksound[e]

        bksound[e] = 1;

    end

    

    -- and here too... bksound[e]

    if bksound[e] == 1 then

       -- SetSoundVolume(vol); function not working!

    end

 

   -- and here bksound[e]

    if PlayerDist > Distance and bksound[e] == 1 then

        StopSound(e,0);

        -- and last bksound[e]

        bksound[e] = 0;

    end

    

    -- added prompt to show variables to help debug..

    Prompt("PlayerDist " .. PlayerDist .. " e " .. e .. " bksound[e] " .. bksound[e]);

end



-- just rem out the original health code..

--[[

function health_main(e)

 PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;

 PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;

 PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;

 PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));

 if PlayerDist < 80 then

   PlaySound(e,0);

   AddPlayerHealth(e);

   Destroy(e);

 end

end

--]]

-- Lua quick test
-- Hope this works...

function my_memory_is_going_main(e)
    -- remember your name
    Prompt("Your Name is J_C"); 
end

vol = Distance - PlayerDist;

vol = Distance - PlayerDist;

vol = (Distance - PlayerDist) + 50;

function health_jc_init(e)
  bksound[e] = 0;
end