function addexp(id, exp)
     local paths={"gfx/level_up_x.png","gfx/level_up_d.png"}          --edit
      local positions={{s={320,40},e={320,170}},{s={320,240},e={320,240}}}                                                 --edit
      local rotations={{s=0,e=0},{s=0,e=200}}                                                                           --edit
      local scales={{s={1.0,1.0},e={0.5,0.5}},{s={0.8,0.8},e={0,0}}}                                        --edit     
     local dtime=4000                                                                                                  --edit 1500ms=1.5s
     PLAYERS[id].Experience = PLAYERS[id].Experience + exp
     local prevlevel = PLAYERS[id].Level
     while PLAYERS[id].Experience >= EXPTABLE[PLAYERS[id].Level+1] do
          PLAYERS[id].Level = PLAYERS[id].Level + 1
     end
     if prevlevel ~= PLAYERS[id].Level then
          parse('effect "colorsmoke" ' .. player(id, 'x') .. ' ' .. player(id, 'y') .. ' 0 64 0 128 255')
          message(id, "You have leveled up to level " .. PLAYERS[id].Level .. "!")
          parse("sv_sound2 " .. id .. " fun/Victory_Fanfare.ogg")
          imgids={image(paths[1],positions[1]["s"][1],positions[1]["s"][2],2,id),image(paths[2],positions[2]["s"][1],positions[2]["s"][2],2,id)}
            imagepos(imgids[1],positions[1]["s"][1],positions[1]["s"][2],rotations[1]["s"])
            imagepos(imgids[2],positions[2]["s"][1],positions[2]["s"][2],rotations[2]["s"])
            imagescale(imgids[1],scales[1]["s"][1],scales[1]["s"][2])
            imagescale(imgids[2],scales[2]["s"][1],scales[2]["s"][2])
          tween_move(imgids[1],dtime,positions[1]["e"][1],positions[1]["e"][2])
          tween_move(imgids[2],dtime,positions[2]["e"][1],positions[2]["e"][2])
            tween_rotate(imgids[1],dtime,rotations[1]["e"])
            tween_rotate(imgids[2],dtime,rotations[2]["e"])
            tween_scale(imgids[1],dtime,scales[1]["e"][1],scales[1]["e"][2])
            tween_scale(imgids[2],dtime,scales[2]["e"][1],scales[2]["e"][2])
          timer(dtime,"freeimage",imgids[1])
          timer(dtime,"freeimage",imgids[2])
     end
     updateHUD(id)
     return true
end