Auxbox XP

Moderator: EUO Moderators

User avatar
Rumper
Post in swahili or SHUT THE FUCK UP!
Posts: 217
Joined: Sun Jan 25, 2015 11:49 pm

Auxbox XP

Post by Rumper »

Hello

This post is to share an auxbox code NOT made by me but some unknown programmer.
Basically it shows you banked xp and corresponding lvl.

Code: Select all

req_xp = {}
req_xp[1] = 0 -- fixed XP value
req_xp[2] = 200 -- fixed XP value
req_xp[26] = 93000 -- fixed XP value

for i=3,25 do -- adds XP for lvl 3 to 25 to array
  req_xp[i] = math.floor(req_xp[i-1]+1.2*(req_xp[i-1]-req_xp[i-2]))
end

for i=27,1000 do -- adds XP for lvl 27 to 1000 to array
  req_xp[i] = req_xp[i-1]+(i-26)*1000*4+15000
end

if me.xp >= req_xp[1000] then
   current_level = 1000
else
   for i = 1,999 do -- getting current player level based on array 
      if req_xp[i] <= me.xp 
      and req_xp[i + 1] > me.xp 
      then
         current_level = i
         break
      end
   end
end

function auxbox_xp()
	if me.xp >= req_xp[1000] then
   current_level = 1000
else
   for i = 1,999 do -- getting current player level based on array 
      if req_xp[i] <= me.xp 
      and req_xp[i + 1] > me.xp 
      then
         current_level = i
         break
      end
   end
end
   if current_level <= 1000 then
      local xptolvl_float = ((me.xp - req_xp[current_level]))/(req_xp[current_level+1]-req_xp[current_level]) -- % needed for next level
      local lvl_float = current_level + me.remort_level * 75 + xptolvl_float -- combines actual lvl with the % needed for next lvl

       -- checks if player leveled or remorted
      if xptolvl_float >= 1 or xptolvl_float < 0 then
         for i = 1,999 do
            if req_xp[i] <= me.xp 
            and req_xp[i + 1] > me.xp 
            then
               current_level = i
               break
            end
         end
      end
      
      
      auxbox_prop_line("Level" ,string.format("%f",lvl_float))
      --auxbox_prop_line("Time" ,string.format("%02.f:%02.f:%02.f:%02.f", session_d, session_h, session_m, session_s))
  
      auxbox_prop_line("Current XP", string.format("%d", me.xp))
      auxbox_prop_line("Before Level", string.format("%d", xptolvl))
      auxbox_prop_line("XP/s" ,string.format("%d", xps))
      auxbox_prop_line("XP/min" ,string.format("%d", xpmin))
  
   end
end
User avatar
Keighn
Stop posting already --;
Posts: 5509
Joined: Sat Jun 26, 2004 10:13 am
Location: Hey.... pssttt Back in Orgeon

Re: Auxbox XP

Post by Keighn »

No screenshot? :cry:
User avatar
Keighn
Stop posting already --;
Posts: 5509
Joined: Sat Jun 26, 2004 10:13 am
Location: Hey.... pssttt Back in Orgeon

Re: Auxbox XP

Post by Keighn »

I'm friggin horrible at auxbox. I have to copy/paste from others and try to fit but it often doesn't work. Currently, I've dropped most of the item listing (kept just a few like arrows/bullets/shards/orange pots)

Looking at what comes with the game I want real world time, session time, last few hits gives, last few hits taken, dps, str/dex/ ratio

Not sure what else: All I could piece up badly was: this:

Code: Select all

auxbox_next_line = 0
    session_time = 0
    sessionstart = os.time()
   function auxbox()
      d:auxbox_clear();
     auxbox_next_line = 0
      auxbox_real_world_time()
     auxbox_blank_line()
      auxbox_xp()
     auxbox_blank_line()
      auxbox_last_few()
     auxbox_blank_line()
     Items_Left()
    end

    function auxbox_prop_line(prop_name, prop_val)
      local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
      auxbox_next_line = auxbox_next_line + 1
      d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))
    end

    function auxbox_blank_line()
      auxbox_next_line = auxbox_next_line + 1
    end

    function auxbox_real_world_time()
      auxbox_prop_line("Real World Time:", string.format(os.date("%I:%M%p")))
    end

    session_start_xp = me.xp -- var to calculate xp gain per session
    session_start_age = me.age -- var to calculate time played per session
    session_time = 0
    current_level = 0

    -- beginning of XP-array
    req_xp = {}
    req_xp[1] = 0 -- fixed XP value
    req_xp[2] = 200 -- fixed XP value
    req_xp[26] = 93000 -- fixed XP value

    for i=3,25 do -- adds XP for lvl 3 to 25 to array
      req_xp[i] = math.floor(req_xp[i-1]+1.2*(req_xp[i-1]-req_xp[i-2]))
    end

    for i=27,1000 do -- adds XP for lvl 27 to 1000 to array
      req_xp[i] = req_xp[i-1]+(i-26)*1000*4+15000
    end

    if me.xp >= req_xp[1000] then
      current_level = 1000
    else
        for i = 1,999 do -- getting current player level based on array
            if req_xp[i] <= me.xp
             and req_xp[i + 1] > me.xp
            then
              current_level = i
              break
            end
        end
    end

    -- end of XP-array

    function auxbox_xp()
        if current_level <= 1000 then
          local xptolvl_float = ((me.xp - req_xp[current_level]))/(req_xp[current_level+1]-req_xp[current_level]) -- % needed for next level
          local lvl_float = current_level + me.remort_level * 75 + xptolvl_float -- combines actual lvl with the % needed for next lvl

          -- checks if player leveled or remorted
            if xptolvl_float >= 1 or xptolvl_float < 0 then
              for i = 1,999 do
                if req_xp[i] <= me.xp
                 and req_xp[i + 1] > me.xp
                then
                  current_level = i
                  break
                end
            end
        end
          
        if os.difftime(os.time(), session_start) > session_time then -- just to reduce the script to every second
          session_time = os.difftime(os.time(), session_start)
          session_d_float = session_time / 60 / 60 / 24
          session_d = math.floor(session_d_float)
          session_h = math.floor((session_d_float - session_d)*24)
          session_m = math.floor(((session_d_float - session_d)*24 - session_h) * 60)
          session_s = math.floor((((session_d_float - session_d)*24 - session_h) * 60 - session_m) * 60)

          xpgain = me.xp - session_start_xp 
          xps = xpgain/session_time

            if me.age-session_start_age > 0  then
              xpmin = xpgain/(me.age-session_start_age)
            else
              xpmin = 0
            end

          xptolvl = req_xp[current_level + 1] - me.xp
          xpto1k = req_xp[1000] - me.xp

            if xps > 0 then
              timetolvl = xptolvl / xps
              timeto1k = xpto1k / xps
            else
              timetolvl = 0
              timeto1k = 0
            end

          timetolvl_d_float = timetolvl / 60 / 60 / 24
          timetolvl_d = math.floor(timetolvl_d_float)
          timetolvl_h = math.floor((timetolvl_d_float - timetolvl_d)*24)
          timetolvl_m = math.floor(((timetolvl_d_float - timetolvl_d)*24 - timetolvl_h) * 60)
          timetolvl_s = math.floor((((timetolvl_d_float - timetolvl_d)*24 - timetolvl_h) * 60 - timetolvl_m) * 60)

          timeto1k_d_float = timeto1k / 60 / 60 / 24
          timeto1k_d = math.floor(timeto1k_d_float)
          timeto1k_h = math.floor((timeto1k_d_float - timeto1k_d)*24)
          timeto1k_m = math.floor(((timeto1k_d_float - timeto1k_d)*24 - timeto1k_h) * 60)
          timeto1k_s = math.floor((((timeto1k_d_float - timeto1k_d)*24 - timeto1k_h) * 60 - timeto1k_m) * 60)
        end
          auxbox_prop_line("XP to Level:", string.format("%d", xptolvl))
          --auxbox_prop_line("XP per Minute:" ,string.format("%d", xpmin))
          --auxbox_prop_line("Time to Level:" ,string.format("%02.f:%02.f:%02.f:%02.f", timetolvl_d, timetolvl_h, timetolvl_m, timetolvl_s))
    end
end


   last_session_seconds = 0
   last_5_dpst = { g_dpst, g_dpst, g_dpst, g_dpst }  
   last_5_dtpst = { g_dtpst, g_dtpst, g_dtpst, g_dtpst }
   last_dpst = g_dpst
   last_dtpst = g_dtpst
   recent_dmg = { 0, 0, 0, 0, }
   recent_dmgt = { 0, 0, 0, 0, }
   function auxbox_last_few()
      local session_seconds = os.time() - sessionstart
   
      if session_seconds > last_session_seconds then
        last_session_seconds = session_seconds
        last_5_dpst[4] = last_5_dpst[3]
        last_5_dpst[3] = last_5_dpst[2]
        last_5_dpst[2] = last_5_dpst[1]  
        last_5_dpst[1] = g_dpst

        last_5_dpst[4] = last_5_dpst[3]
        last_5_dpst[3] = last_5_dpst[2]
        last_5_dpst[2] = last_5_dpst[1]  
        last_5_dpst[1] = g_dtpst   
      end
   
      if last_dpst ~= g_dpst then
        recent_dmg[4] = recent_dmg[3]
        recent_dmg[3] = recent_dmg[2]
        recent_dmg[2] = recent_dmg[1]
        recent_dmg[1] = g_dpst - last_dpst
        last_dpst = g_dpst
      end
      if last_dtpst ~= g_dtpst then
        table.remove(recent_dmgt, 4)
        table.insert(recent_dmgt, 1, g_dtpst - last_dtpst)
        last_dtpst = g_dtpst
      end
      auxbox_prop_line("Last Few Hits:", "")
      auxbox_prop_line(string.format("%d  %d  %d  %d",recent_dmg[4], recent_dmg[3], recent_dmg[2], recent_dmg[1]))
      auxbox_prop_line("Last 4 hits taken:")
      auxbox_prop_line(string.format("%d  %d  %d  %d",recent_dmgt[4], recent_dmgt[3], recent_dmgt[2], recent_dmgt[1]))
    end
   
    function auxbox_prop_line(prop_name, prop_val)
      local pvl=0
      if prop_name==nil then prop_name="" end
      if prop_val==nil then prop_val="" end
      local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
      auxbox_next_line = auxbox_next_line + 1
      d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))

function Items_Left()
         auxbox_prop_line("Items Left")
         auxbox_prop_line("Orange Potions:", items:get_qty_basecode(355))
         auxbox_prop_line("Arrows:", items:get_qty_basecode(296))
         auxbox_prop_line("Bullets:", items:get_qty_basecode(1294))
         auxbox_prop_line("Soul Shards:", items:get_qty_basecode(1283))
        end
    end
I need it to also do these:
this:
something made quickly so I didn't have to calculate what stats to do all the time on my fighter

stra = me:get_str()
dexa = me:get_dex()
strengthaa = (stra/(stra+dexa)*100)
dexteritya = (dexa/(stra+dexa)*100)

auxbox_prop_line("Strength %:", math.floor(strengthaa) )
auxbox_prop_line("Dexterity %:", math.floor(dexteritya) )

or
LordM Code:

Code: Select all


session_start = os.time() - 1
function auxbox()
d:auxbox_clear();
auxbox_next_line = 0
LM_auxbox_strdex_ratio()
auxbox_blank_line()
end

function auxbox_prop_line(prop_name, prop_val)
local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
auxbox_next_line = auxbox_next_line + 1
d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))
end

function auxbox_blank_line()
auxbox_next_line = auxbox_next_line + 1
end

function LM_auxbox_strdex_ratio()
local strpct = (me:get_str()/(me:get_str()+me:get_dex())*100)
local dexpct = (me:get_dex()/(me:get_str()+me:get_dex())*100)
auxbox_prop_line("Str : Dex", string.format("%.2f : %.2f",strpct,dexpct))
end


Chedich Code:

Code: Select all


session_start = os.time() - 1
function auxbox()
d:auxbox_clear();
auxbox_next_line = 0
ched_strdex_ratio()
auxbox_blank_line()
end

function auxbox_prop_line(prop_name, prop_val)
local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
auxbox_next_line = auxbox_next_line + 1
d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))
end

function auxbox_blank_line()
auxbox_next_line = auxbox_next_line + 1
end

function ched_strdex_ratio()
local str = string.format("%.1f", (me:get_str()/(me:get_str()+me:get_dex()))*100)
local dex = 100-str
auxbox_prop_line("STR/DEX:", str.."%/"..dex.."%")
end

The more I look at this the more of a headache I get.... can't seem to get session time back on either.
User avatar
Rumper
Post in swahili or SHUT THE FUCK UP!
Posts: 217
Joined: Sun Jan 25, 2015 11:49 pm

Re: Auxbox XP

Post by Rumper »

Would you like something like this?

Image
User avatar
Rumper
Post in swahili or SHUT THE FUCK UP!
Posts: 217
Joined: Sun Jan 25, 2015 11:49 pm

Re: Auxbox XP OUTDATED

Post by Rumper »

!OUTDATED!
Here is the code for it:
Just replace all of your LUA script with it, don't forget to make a backup!

Code: Select all

-- Start
auxbox_next_line = 0
session_time = 0
sessionstart = os.time()
--- Damage Per Second -- original script proveded by LordMortiferus
last_session_seconds = 0
last_4_dpst = { g_dpst, g_dpst, g_dpst, g_dpst }
last_4_dtpst = { g_dtpst, g_dtpst, g_dtpst, g_dtpst }
last_dpst = g_dpst
recent_dmg = { 0, 0, 0, 0 }
auxbox_next_line = 0
old_build = {me:get_float_str(),
           me:get_float_dex(),
          me:get_float_intel(),
             wl:get_full_name(me.weapon),
             wl:get_full_name(me.shield),
          wl:get_full_name(me.armour),
          wl:get_full_name(me.boots),
          wl:get_full_name(me.gloves),
          wl:get_full_name(me.hat),
          wl:get_full_name(me.trousers),
          wl:get_full_name(me.ring1),
          wl:get_full_name(me.ring2),
          wl:get_full_name(me.amulet),
          wl:get_full_name(me.sigil1),
          wl:get_full_name(me.sigil2),
          wl:get_full_name(me.sigil3)}
-- End of initialising

-- XP calculation array
for i=3,25 do -- adds XP for lvl 3 to 25 to array
  req_xp[i] = math.floor(req_xp[i-1]+1.2*(req_xp[i-1]-req_xp[i-2]))
end
for i=27,1000 do -- adds XP for lvl 27 to 1000 to array
  req_xp[i] = req_xp[i-1]+(i-26)*1000*4+15000
end

if me.xp >= req_xp[1000] then
   current_level = 1000
else
   for i = 1,999 do -- getting current player level based on array 
      if req_xp[i] <= me.xp 
      and req_xp[i + 1] > me.xp 
      then
         current_level = i
         break
      end
   end
end
-- End of initialising
function auxbox()
	   
	  local w=d:auxbox_get_width()
	  local h=d:auxbox_get_height()
	 
	  d:auxbox_clear()
	  auxbox_next_line = 0 
	  if not d:ok_to_draw_play_window() then return; end
		  
	  local cd=d:get_curr_display()
	  local mode=d:get_statbox_mode()
	  local lineNr=0
	  auxboxfunctionlist()
	   
		  
	end

-- Real World Time - Duncan (PD) / Zen (Reg) / Brentoboy (forums)
function auxbox_time()

	auxbox_prop_line("Real World Time:", string.format(os.date("%I:%M%p")))
	
 
  
   if os.difftime(os.time(), sessionstart) > session_time then -- just to reduce the script to every second
  
    session_time = os.difftime(os.time(), sessionstart)
    session_d_float = session_time / 60 / 60 / 24
    session_d = math.floor(session_d_float)
    session_h = math.floor((session_d_float - session_d)*24)
    session_m = math.floor(((session_d_float - session_d)*24 - session_h) * 60)
    session_s = math.floor((((session_d_float - session_d)*24 - session_h) * 60 - session_m) * 60)
  end    
  
   if session_d~=nil then
     auxbox_prop_line("Session time:", string.format("%02.f:%02.f:%02.f:%02.f", session_d, session_h, session_m, session_s))	
   end 
end


function auxbox_f5_message()
	auxbox_prop_line("Press Alt-F5 to Reset", "")
end

function auxbox_prop_line(prop_name, prop_val)
  
  local pvl=0
  if prop_name==nil then prop_name="" end
  if prop_val==nil then prop_val="" end
  local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
	auxbox_next_line = auxbox_next_line + 1
	d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))
end

function auxbox_blank_line()
	auxbox_next_line = auxbox_next_line + 1
end

function auxbox_ability_binds() 
	local cnt=0			
	for i=10,17 do
		if me.spell_binds[i]~=-1 then
	   auxbox_prop_line(shiftkeys[i-9],spells:get_full_spell_name(me.spell_binds[i]))
	   cnt=cnt+1
	  end
  end
  return cnt
end

function auxboxfunctionlist()
  auxbox_lm_dpscalc () -- has to be called always
  d:auxbox_clear();
  auxbox_next_line = 0
  auxbox_time()
  auxbox_blank_line()
  LM_auxbox_strdex()
  auxbox_blank_line()
  auxbox_lm_time()           -- Total Time :       00:00:00
  auxbox_lm_hits()           -- Total Hits :            XXX
  auxbox_lm_kills()          -- Total Kills:            XXX
  auxbox_lm_xp_gained()      -- XP gained  :            XXX  
  auxbox_lm_xppm()           -- XP/min     :            XXX
  auxbox_lm_dmg()            -- Total dmg  :            XXX
  auxbox_lm_dps()            -- Dps from total Values:  XXX 
  auxbox_blank_line()
  auxbox_lm_last4dmg()       -- dmg :    XXX  XXX  XXX  XXX
  auxbox_blank_line()
  auxbox_lm_last4xp()        -- xp  :    XXX  XXX  XXX  XXX
  auxbox_xp()
  auxbox_blank_line()
  
  
end

function auxbox_prop_line(prop_name, prop_val)
  local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
  auxbox_next_line = auxbox_next_line + 1
  d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))
end

function auxbox_blank_line()
  auxbox_next_line = auxbox_next_line + 1
end

function auxbox_lm_dpscalc ()

 local new_build = {me:get_float_str(),
                    me:get_float_dex(),
                 me:get_float_intel(),
                    wl:get_full_name(me.weapon),
                    wl:get_full_name(me.shield),
                 wl:get_full_name(me.armour),
                 wl:get_full_name(me.boots),
                 wl:get_full_name(me.gloves),
                 wl:get_full_name(me.hat),
                 wl:get_full_name(me.trousers),
                 wl:get_full_name(me.ring1),
                 wl:get_full_name(me.ring2),
                 wl:get_full_name(me.amulet),
                 wl:get_full_name(me.sigil1),
                 wl:get_full_name(me.sigil2),
                 wl:get_full_name(me.sigil3)}
   
    for i=1,#old_build do
        if old_build[i] ~= new_build[i] then
        
       table.remove (old_build, i)
         table.insert (old_build, i, new_build[i])
          for i,v in pairs(lm_dmg_log) do
             lm_dmg_log[i]=nil
           end
            for i,v in pairs(lm_dmgtime_log) do
             lm_dmgtime_log[i]=nil
           end
         for i,v in pairs(lm_xp_log) do
             lm_dmg_log[i]=nil
           end
            for i,v in pairs(lm_xptime_log) do
             lm_dmgtime_log[i]=nil
           end
       lm_hit_count = 0
       lm_kill_count = 0
      end  
    end

   if lm_hit_count == 0 then
     lm_hunt_start = os.clock()
    lm_last_killtime = os.clock()
    lm_dmg_start = g_dpst
    lm_xp_start = me.xp
   end
 lm_hunt_time = os.clock() - lm_hunt_start  
 lm_total_dmg = g_dpst - lm_dmg_start
 lm_xp_gained = me.xp - lm_xp_start 
   
   local lm_dmgtime_dif
   local lm_dmg_dif
   if lm_last_dpst ~= g_dpst then
       if lm_hit_count >= 1 then
          lm_dmgtime_dif = os.clock() - lm_last_hittime
         lm_dmg_dif = g_dpst - lm_last_dpst        
        
       --if lm_dmgtime_dif > (me:get_weapon_delay() / 1000) * 0.5 then
              if lm_dmgtime_dif < (me:get_weapon_delay() / 1000) * 1.5 then 
               table.insert(lm_dmgtime_log, 1, lm_dmgtime_dif)
             table.insert(lm_dmg_log, 1, lm_dmg_dif)
               end
           --end
        end
    lm_last_hittime = os.clock()
    lm_last_dpst = g_dpst
    lm_hit_count = lm_hit_count + 1
   end
    
   local lm_xptime_dif
   local lm_xp_dif
   if lm_last_xp ~= me.xp and lm_hit_count >= 1 then
     lm_kill_count = lm_kill_count + 1
    
    lm_xptime_dif = os.clock() - lm_last_killtime
    table.insert(lm_xptime_log, 1, lm_xptime_dif)
    lm_last_killtime = os.clock()
    
    lm_xp_dif = me.xp - lm_last_xp
    table.insert(lm_xp_log, 1, lm_xp_dif)
    lm_last_xp = me.xp   
    end    
 
 local temp_lm_dmgtime_log={} -- for median time
 local lm_dmgtime_count = 0
  lm_max_hps = -math.huge -- for max time
  lm_min_hps = math.huge -- for min time
  lm_dmgtime_sum = 0
  
    if lm_dmgtime_log[1] ~= nil then
        for i,v in pairs(lm_dmgtime_log) do
            if type(v) == 'number' then
             lm_dmgtime_sum = lm_dmgtime_sum + v
             lm_dmgtime_count = lm_dmgtime_count + 1
          table.insert(temp_lm_dmgtime_log, v) -- for median time
          lm_min_hps = 1 / (math.max(lm_max_hps, v)) 
             lm_max_hps = 1 / (math.min(lm_min_hps, v)) 
               if lm_dmgtime_count >= 500 then
              table.remove(lm_dmgtime_log, 500)
                 end
            end
        end
     lm_mean_hps = 1 / ((lm_dmgtime_sum / lm_dmgtime_count))
     else
     lm_mean_hps = 0
    lm_max_hps = 0
    lm_min_hps = 0
    end
   
 -- standard deviation time
 local dmgtime_vm
 local lm_dmgtime_sum_sd = 0
 local lm_dmgtime_count_sd = 0
    if lm_dmgtime_log[2] ~= nil then
        for i,v in pairs(lm_dmgtime_log) do
            if type(v) == 'number' then
             dmgtime_vm = v - lm_mean_hps
             lm_dmgtime_sum_sd = lm_dmgtime_sum_sd + (dmgtime_vm * dmgtime_vm)
             lm_dmgtime_count_sd = lm_dmgtime_count_sd + 1
            end
        end
    lm_sd_hps = 1 / (math.sqrt(lm_dmgtime_sum_sd / (lm_dmgtime_count_sd-1)))
   else
    lm_sd_hps = 0
 end
 
 -- median time
    if temp_lm_dmgtime_log[50] ~= nil then
     table.sort(temp_lm_dmgtime_log)
     asterisk = " "
     -- If we have an even number of table elements or odd.
        if math.fmod(#temp_lm_dmgtime_log,2) == 0 then
         -- return mean value of middle two elements
         lm_median_hps = 1 / ((temp_lm_dmgtime_log[#temp_lm_dmgtime_log/2] + temp_lm_dmgtime_log[(#temp_lm_dmgtime_log/2)+1]) / 2)
         else
         -- return middle element
         lm_median_hps = 1 / (temp_lm_dmgtime_log[math.ceil(#temp_lm_dmgtime_log/2)])
        end
     else
        if wl:is_weapon(me.shield)==true then
        lm_median_hps = 1 / ((me:get_weapon_delay()/1000)) * 1.6
      else
         lm_median_hps = 1 / (me:get_weapon_delay()/1000)
      end
    asterisk = "!"
    end
   
 -- mean/max/min damage 
 local temp_lm_dmg_log={} -- for median dmg
  lm_dmg_sum = 0
  lm_dmg_count = 0
  lm_max_dmg = -math.huge -- for max dmg
  lm_min_dmg = math.huge -- for min dmg
 
    if lm_dmg_log[1] ~= nil then
        for i,v in pairs(lm_dmg_log) do
            if type(v) == 'number' then
             lm_dmg_sum = lm_dmg_sum + v
             lm_dmg_count = lm_dmg_count + 1
          table.insert(temp_lm_dmg_log, v) -- for median dmg
          lm_max_dmg = math.max(lm_max_dmg, v) 
             lm_min_dmg = math.min(lm_min_dmg, v) 
               if lm_dmg_count >= 500 then
              table.remove(lm_dmg_log, 500)
                 end
            end
        end
     lm_mean_dmg = (lm_dmg_sum / lm_dmg_count)
    else
     lm_mean_dmg = 0
    lm_max_dmg = 0
    lm_min_dmg = 0
    end
   
 -- mean dps
 lm_mean_dps = lm_mean_dmg * lm_median_hps
  
 -- standard deviation damage
 local vm
 local sum_sd = 0
 local count_sd = 0
    if lm_dmg_log[2] ~= nil then
        for i,v in pairs(lm_dmg_log) do
            if type(v) == 'number' then
             vm = v - lm_mean_dmg
             sum_sd = sum_sd + (vm * vm)
             count_sd = count_sd + 1
            end
        end
     lm_sd_dmg = math.sqrt(sum_sd / (count_sd-1))
     else
    lm_sd_dmg = 0
   end

 -- standard deviation dps
 lm_sd_dps = lm_sd_dmg * lm_median_hps
  
 -- median damage
    if temp_lm_dmg_log[1] ~= nil then
     table.sort(temp_lm_dmg_log)

     -- If we have an even number of table elements or odd.
        if math.fmod(#temp_lm_dmg_log,2) == 0 then
         -- return mean value of middle two elements
         lm_median_dmg = ( temp_lm_dmg_log[#temp_lm_dmg_log/2] + temp_lm_dmg_log[(#temp_lm_dmg_log/2)+1] ) / 2
         else
         -- return middle element
         lm_median_dmg = temp_lm_dmg_log[math.ceil(#temp_lm_dmg_log/2)]
        end
     else
     lm_median_dmg = 0
    end
  
 -- median dps  
 lm_median_dps = lm_median_dmg * lm_median_hps
  
 -- min dps
 lm_min_dps = lm_min_dmg * lm_median_hps
  
 -- max dps
 lm_max_dps = lm_max_dmg * lm_median_hps
--------------------------------------------------------------------------------

 local temp_lm_xptime_log={} -- for median time
 local lm_xptime_count = 0
  lm_max_kpm = -math.huge -- for max time
  lm_min_kpm = math.huge -- for min time
  lm_xptime_sum = 0
  
    if lm_xptime_log[1] ~= nil then
        for i,v in pairs(lm_xptime_log) do
            if type(v) == 'number' then
             lm_xptime_sum = lm_xptime_sum + v
             lm_xptime_count = lm_xptime_count + 1
          table.insert(temp_lm_xptime_log, v) -- for median time
          lm_min_kpm = 1 / (math.max(lm_max_kpm, v)) 
             lm_max_kpm = 1 / (math.min(lm_min_kpm, v)) 
               if lm_xptime_count >= 500 then
              table.remove(lm_xptime_log, 500)
                 end
            end
        end
     lm_mean_kpm = (1 / ((lm_xptime_sum / lm_xptime_count))) * 60
     else
     lm_mean_kpm = 0
    lm_max_kpm = 0
    lm_min_kpm = 0
    end
   
 -- standard deviation time
 local xptime_vm
 local lm_xptime_sum_sd = 0
 local lm_xptime_count_sd = 0
    if lm_xptime_log[2] ~= nil then
        for i,v in pairs(lm_xptime_log) do
            if type(v) == 'number' then
             xptime_vm = v - lm_mean_kpm
             lm_xptime_sum_sd = lm_xptime_sum_sd + (xptime_vm * xptime_vm)
             lm_xptime_count_sd = lm_xptime_count_sd + 1
            end
        end
    lm_sd_kpm = (1 / (math.sqrt(lm_xptime_sum_sd / (lm_xptime_count_sd-1)))) * 60
   else
    lm_sd_kpm = 0
 end
 
 -- median time
    if temp_lm_xptime_log[2] ~= nil then
     table.sort(temp_lm_xptime_log)
     -- If we have an even number of table elements or odd.
        if math.fmod(#temp_lm_xptime_log,2) == 0 then
         -- return mean value of middle two elements
         lm_median_kpm = (1 / ((temp_lm_xptime_log[#temp_lm_xptime_log/2] + temp_lm_xptime_log[(#temp_lm_xptime_log/2)+1]) / 2)) * 60
         else
         -- return middle element
         lm_median_kpm = (1 / (temp_lm_xptime_log[math.ceil(#temp_lm_xptime_log/2)])) * 60
        end
     else
    lm_median_kpm = 0
   end
   
 -- mean/max/min xp
 local temp_lm_xp_log={} -- for median xp
  lm_xp_sum = 0
  lm_xp_count = 0
  lm_max_xp = -math.huge -- for max xp
  lm_min_xp = math.huge -- for min xp
 
    if lm_xp_log[1] ~= nil then
        for i,v in pairs(lm_xp_log) do
            if type(v) == 'number' then
             lm_xp_sum = lm_xp_sum + v
             lm_xp_count = lm_xp_count + 1
          table.insert(temp_lm_xp_log, v) -- for median xp
          lm_max_xp = math.max(lm_max_xp, v) 
             lm_min_xp = math.min(lm_min_xp, v) 
               if lm_xp_count >= 500 then
              table.remove(lm_xp_log, 500)
                 end
            end
        end
     lm_mean_xp = (lm_xp_sum / lm_xp_count)
    else
     lm_mean_xp = 0
    lm_max_xp = 0
    lm_min_xp = 0
    end
   
 -- mean, min, max kpm
 lm_mean_xps = lm_mean_xp * (lm_median_kpm / 60)
 lm_min_xps = lm_min_xp * (lm_median_kpm / 60)
 lm_max_xps = lm_max_xp * (lm_median_kpm / 60)
  
 -- standard deviation xp
 local xpvm
 local xpsum_sd = 0
 local xpcount_sd = 0
    if lm_xp_log[2] ~= nil then
        for i,v in pairs(lm_xp_log) do
            if type(v) == 'number' then
             xpvm = v - lm_mean_xp
             xpsum_sd = xpsum_sd + (xpvm * xpvm)
             xpcount_sd = xpcount_sd + 1
            end
        end
     lm_sd_xp = math.sqrt(xpsum_sd / (xpcount_sd-1))
     else
    lm_sd_xp = 0
   end

 -- standard deviation kpm
 lm_sd_xps = lm_sd_xp * (lm_median_kpm / 60)
  
 -- median xp
    if temp_lm_xp_log[1] ~= nil then
     table.sort(temp_lm_xp_log)

     -- If we have an even number of table elements or odd.
        if math.fmod(#temp_lm_xp_log,2) == 0 then
         -- return mean value of middle two elements
         lm_median_xp = ( temp_lm_xp_log[#temp_lm_xp_log/2] + temp_lm_xp_log[(#temp_lm_xp_log/2)+1] ) / 2
         else
         -- return middle element
         lm_median_xp = temp_lm_xp_log[math.ceil(#temp_lm_xp_log/2)]
        end
     else
     lm_median_xp = 0
    end
  
 -- median kpm  
 lm_median_xps = lm_median_xp * (lm_median_kpm / 60)
       
end

function auxbox_lm_hits()
 auxbox_prop_line("Total Hits  :", string.format("%d",lm_hit_count))
end

function auxbox_lm_time()
 h = math.floor(lm_hunt_time / 60 / 60)
 m = math.floor((lm_hunt_time / 60 / 60 - h) * 60)
 s = math.floor(((lm_hunt_time / 60 / 60 - h) * 60 - m) * 60)
 --ms = ((((lm_hunt_time / 60 / 60 - h) * 60 - m) * 60) - s) * 1000
 auxbox_prop_line("Total Time  :", string.format("%02.f:%02.f:%02.f", h, m, s))
end

function auxbox_lm_dmg()
 auxbox_prop_line("Total Dmg   :", string.format("%d",lm_total_dmg))
end

function auxbox_lm_dps()
 auxbox_prop_line("Total Dps   :", string.format("%d",lm_total_dmg/lm_hunt_time))
end

function auxbox_lm_mean_dmg()
 auxbox_prop_line("Mean :", string.format("%4.f  dmg %4.f%s dps", lm_mean_dmg, lm_mean_dps, asterisk))
end

function auxbox_lm_sd_dmg()
 auxbox_prop_line("Sd   :", string.format("%4.f  dmg %4.f%s dps", lm_sd_dmg, lm_sd_dps, asterisk))
end

function auxbox_lm_median_dmg()
 auxbox_prop_line("Med  :", string.format("%4.f  dmg %4.f%s dps", lm_median_dmg, lm_median_dps, asterisk))
end

function auxbox_lm_minmax_dmg()
 auxbox_prop_line("Min  :", string.format("%4.f  dmg %4.f%s dps", lm_min_dmg, lm_min_dps, asterisk))
 auxbox_prop_line("Max  :", string.format("%4.f  dmg %4.f%s dps", lm_max_dmg, lm_max_dps, asterisk))
end

function auxbox_lm_last4dmg()
 local hit1, hit2, hit3, hit4
 if lm_dmg_log[1] ~= nill then hit1 = lm_dmg_log[1] else hit1 = 0 end
 if lm_dmg_log[2] ~= nill then hit2 = lm_dmg_log[2] else hit2 = 0 end
 if lm_dmg_log[3] ~= nill then hit3 = lm_dmg_log[3] else hit3 = 0 end
 if lm_dmg_log[4] ~= nill then hit4 = lm_dmg_log[4] else hit4 = 0 end
 auxbox_prop_line("dmg  :", string.format("%4.f %4.f %4.f %4.f", hit4, hit3, hit2, hit1))
end

function auxbox_lm_mean_hps()
 auxbox_prop_line("Mean :", string.format("%.2f  hps", lm_mean_hps))
end

function auxbox_lm_sd_hps()
 auxbox_prop_line("Sd   :", string.format("%.2f  hps", lm_sd_hps))
end

function auxbox_lm_median_hps()
 auxbox_prop_line("Med  :", string.format("%.2f%s hps", lm_median_hps, asterisk))
end

function auxbox_lm_minmax_hps()
 auxbox_prop_line("Min  :", string.format("%4.2f  hps", lm_min_hps))
 auxbox_prop_line("Max  :", string.format("%4.2f  hps", lm_max_hps))
end

function auxbox_lm_last4hps()
 local hit1, hit2, hit3, hit4
 if lm_dmgtime_log[1] ~= nill then hit1 = 1 / lm_dmgtime_log[1] else hit1 = 0 end
 if lm_dmgtime_log[2] ~= nill then hit2 = 1 / lm_dmgtime_log[2] else hit2 = 0 end
 if lm_dmgtime_log[3] ~= nill then hit3 = 1 / lm_dmgtime_log[3] else hit3 = 0 end
 if lm_dmgtime_log[4] ~= nill then hit4 = 1 / lm_dmgtime_log[4] else hit4 = 0 end
 auxbox_prop_line("hps  :", string.format("%4.2f %4.2f %4.2f %4.2f", hit4, hit3, hit2, hit1))
end

function auxbox_lm_kills()
 auxbox_prop_line("Total Kills :", string.format("%d", lm_kill_count))
end

function auxbox_lm_xp_gained()
 auxbox_prop_line("Total XP    :", string.format("%d", lm_xp_gained))
end

function auxbox_lm_xpps()
 auxbox_prop_line("Total XP/s  :", string.format("%d", lm_xp_gained / lm_hunt_time))
end 

function auxbox_lm_xppm()
 auxbox_prop_line("Total XP/min:", string.format("%d", lm_xp_gained / lm_hunt_time * 60))
end 

function auxbox_lm_mean_xp()
 auxbox_prop_line("Mean :", string.format("%4.f   xp %4.f  xps", lm_mean_xp, lm_mean_xps))
end

function auxbox_lm_sd_xp()
 auxbox_prop_line("Sd   :", string.format("%4.f   xp %4.f  xps", lm_sd_xp, lm_sd_xps))
end

function auxbox_lm_median_xp()
 auxbox_prop_line("Med  :", string.format("%4.f   xp %4.f  xps", lm_median_xp, lm_median_xps))
end

function auxbox_lm_minmax_xp()
 auxbox_prop_line("Min  :", string.format("%4.f   xp %4.f  xps", lm_min_xp, lm_min_xps))
 auxbox_prop_line("Max  :", string.format("%4.f   xp %4.f  xps", lm_max_xp, lm_max_xps))
end

function auxbox_lm_last4xp()
 local kill1, kill2, kill3, kill4
 if lm_xp_log[1] ~= nill then kill1 = lm_xp_log[1] else kill1 = 0 end
 if lm_xp_log[2] ~= nill then kill2 = lm_xp_log[2] else kill2 = 0 end
 if lm_xp_log[3] ~= nill then kill3 = lm_xp_log[3] else kill3 = 0 end
 if lm_xp_log[4] ~= nill then kill4 = lm_xp_log[4] else kill4 = 0 end
 auxbox_prop_line("xp   :", string.format("%4.f %4.f %4.f %4.f", kill4, kill3, kill2, kill1))
end

function auxbox_lm_mean_kpm()
 auxbox_prop_line("Mean :", string.format("%d  kpm", lm_mean_kpm))
end

function auxbox_lm_sd_kpm()
 auxbox_prop_line("Sd   :", string.format("%d  kpm", lm_sd_kpm))
end

function auxbox_lm_median_kpm()
 auxbox_prop_line("Med  :", string.format("%d  kpm", lm_median_kpm))
end

function auxbox_lm_minmax_kpm()
 auxbox_prop_line("Min  :", string.format("%d  kpm", lm_min_kpm))
 auxbox_prop_line("Max  :", string.format("%d  kpm", lm_max_kpm))
end

function auxbox_lm_last4kpm()
 local kill1, hit2, hit3, hit4
 if lm_xptime_log[1] ~= nill then kill1 = 1 / lm_xptime_log[1] * 60 else kill1 = 0 end
 if lm_xptime_log[2] ~= nill then kill2 = 1 / lm_xptime_log[2] * 60 else kill2 = 0 end
 if lm_xptime_log[3] ~= nill then kill3 = 1 / lm_xptime_log[3] * 60 else kill3 = 0 end
 if lm_xptime_log[4] ~= nill then kill4 = 1 / lm_xptime_log[4] * 60 else kill4 = 0 end
 auxbox_prop_line("kpm  :", string.format("%4.0f %4.0f %4.0f %4.0f", kill4, kill3, kill2, kill1))
end

function auxbox_xp()
	if me.xp >= req_xp[1000] then
   current_level = 1000
else
   for i = 1,999 do -- getting current player level based on array 
      if req_xp[i] <= me.xp 
      and req_xp[i + 1] > me.xp 
      then
         current_level = i
         break
      end
   end
end
   if current_level <= 1000 then
      local xptolvl_float = ((me.xp - req_xp[current_level]))/(req_xp[current_level+1]-req_xp[current_level]) -- % needed for next level
      local lvl_float = current_level + me.remort_level * 75 + xptolvl_float -- combines actual lvl with the % needed for next lvl

       -- checks if player leveled or remorted
      if xptolvl_float >= 1 or xptolvl_float < 0 then
         for i = 1,999 do
            if req_xp[i] <= me.xp 
            and req_xp[i + 1] > me.xp 
            then
               current_level = i
               break
            end
         end
      end
      
      
      auxbox_prop_line("Level" ,string.format("%f",lvl_float))
      --auxbox_prop_line("Time" ,string.format("%02.f:%02.f:%02.f:%02.f", session_d, session_h, session_m, session_s))
  
      auxbox_prop_line("Current XP", string.format("%d", me.xp))
      auxbox_prop_line("Before Level", string.format("%d", xptolvl))
      auxbox_prop_line("XP/s" ,string.format("%d", xps))
      auxbox_prop_line("XP/min" ,string.format("%d", xpmin))
  
   end
end
--  Code by LordM
function LM_auxbox_strdex()
	local strpct = (me:get_str()/(me:get_str()+me:get_dex())*100)
	local dexpct = (me:get_dex()/(me:get_str()+me:get_dex())*100)
	auxbox_prop_line("Str : Dex", string.format("%.2f : %.2f",strpct,dexpct))
end
-- End
Last edited by Rumper on Sat Sep 03, 2016 7:16 pm, edited 1 time in total.
User avatar
Keighn
Stop posting already --;
Posts: 5509
Joined: Sat Jun 26, 2004 10:13 am
Location: Hey.... pssttt Back in Orgeon

Re: Auxbox XP

Post by Keighn »

That's a great bit of code: AS I said in-game just missing last few hits received from mobs:




mydps=0
mydtps=0
auxboxcnt=0

function auxbox()

local w=d:auxbox_get_width()
local h=d:auxbox_get_height()



d:auxbox_clear();


mydps=(mydps*auxboxcnt)+g_dps
mydtps=(mydtps*auxboxcnt)+g_dtps
auxboxcnt=auxboxcnt+1
mydps=mydps/auxboxcnt
mydtps=mydtps/auxboxcnt


d:auxbox_set_line(0,string.format("cur dps=%d",g_dps))
d:auxbox_set_line(1,string.format("avg dps=%d", mydps))

d:auxbox_set_line(2,string.format("cur dtps=%d",g_dtps))
d:auxbox_set_line(3,string.format("avg dtps=%d", mydtps))

d:auxbox_set_line(5,"Alt-F5 to reset")


end
You do not have the required permissions to view the files attached to this post.
User avatar
Keighn
Stop posting already --;
Posts: 5509
Joined: Sat Jun 26, 2004 10:13 am
Location: Hey.... pssttt Back in Orgeon

Re: Auxbox XP

Post by Keighn »

GAH. That text was under 1.lua

the other one is here: (under auxbox.lua)


auxbox_next_line = 0
session_time = 0
sessionstart = os.time()
function auxbox()
d:auxbox_clear();
auxbox_next_line = 0
auxbox_real_world_time()
auxbox_blank_line()
auxbox_xp()
auxbox_last_few()
auxbox_blank_line()
Items_Left()
end

function auxbox_prop_line(prop_name, prop_val)
local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
auxbox_next_line = auxbox_next_line + 1
d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))
end

function auxbox_blank_line()
auxbox_next_line = auxbox_next_line + 1
end

function auxbox_real_world_time()
auxbox_prop_line("Real World Time:", string.format(os.date("%I:%M%p")))
end

session_start_xp = me.xp -- var to calculate xp gain per session
session_start_age = me.age -- var to calculate time played per session
session_time = 0
current_level = 0

-- beginning of XP-array
req_xp = {}
req_xp[1] = 0 -- fixed XP value
req_xp[2] = 200 -- fixed XP value
req_xp[26] = 93000 -- fixed XP value

for i=3,25 do -- adds XP for lvl 3 to 25 to array
req_xp = math.floor(req_xp[i-1]+1.2*(req_xp[i-1]-req_xp[i-2]))
end

for i=27,1000 do -- adds XP for lvl 27 to 1000 to array
req_xp = req_xp[i-1]+(i-26)*1000*4+15000
end

if me.xp >= req_xp[1000] then
current_level = 1000
else
for i = 1,999 do -- getting current player level based on array
if req_xp <= me.xp
and req_xp[i + 1] > me.xp
then
current_level = i
break
end
end
end

-- end of XP-array

function auxbox_xp()
if current_level <= 1000 then
local xptolvl_float = ((me.xp - req_xp[current_level]))/(req_xp[current_level+1]-req_xp[current_level]) -- % needed for next level
local lvl_float = current_level + me.remort_level * 75 + xptolvl_float -- combines actual lvl with the % needed for next lvl

-- checks if player leveled or remorted
if xptolvl_float >= 1 or xptolvl_float < 0 then
for i = 1,999 do
if req_xp <= me.xp
and req_xp[i + 1] > me.xp
then
current_level = i
break
end
end
end

if os.difftime(os.time(), session_start) > session_time then -- just to reduce the script to every second
session_time = os.difftime(os.time(), session_start)
session_d_float = session_time / 60 / 60 / 24
session_d = math.floor(session_d_float)
session_h = math.floor((session_d_float - session_d)*24)
session_m = math.floor(((session_d_float - session_d)*24 - session_h) * 60)
session_s = math.floor((((session_d_float - session_d)*24 - session_h) * 60 - session_m) * 60)

xpgain = me.xp - session_start_xp
xps = xpgain/session_time

if me.age-session_start_age > 0 then
xpmin = xpgain/(me.age-session_start_age)
else
xpmin = 0
end

xptolvl = req_xp[current_level + 1] - me.xp
xpto1k = req_xp[1000] - me.xp

if xps > 0 then
timetolvl = xptolvl / xps
timeto1k = xpto1k / xps
else
timetolvl = 0
timeto1k = 0
end

timetolvl_d_float = timetolvl / 60 / 60 / 24
timetolvl_d = math.floor(timetolvl_d_float)
timetolvl_h = math.floor((timetolvl_d_float - timetolvl_d)*24)
timetolvl_m = math.floor(((timetolvl_d_float - timetolvl_d)*24 - timetolvl_h) * 60)
timetolvl_s = math.floor((((timetolvl_d_float - timetolvl_d)*24 - timetolvl_h) * 60 - timetolvl_m) * 60)

timeto1k_d_float = timeto1k / 60 / 60 / 24
timeto1k_d = math.floor(timeto1k_d_float)
timeto1k_h = math.floor((timeto1k_d_float - timeto1k_d)*24)
timeto1k_m = math.floor(((timeto1k_d_float - timeto1k_d)*24 - timeto1k_h) * 60)
timeto1k_s = math.floor((((timeto1k_d_float - timeto1k_d)*24 - timeto1k_h) * 60 - timeto1k_m) * 60)
end
auxbox_prop_line("XP to Level:", string.format("%d", xptolvl))
--auxbox_prop_line("XP per Minute:" ,string.format("%d", xpmin))
--auxbox_prop_line("Time to Level:" ,string.format("%02.f:%02.f:%02.f:%02.f", timetolvl_d, timetolvl_h, timetolvl_m, timetolvl_s))
end
end


last_session_seconds = 0
last_5_dpst = { g_dpst, g_dpst, g_dpst, g_dpst }
last_5_dtpst = { g_dtpst, g_dtpst, g_dtpst, g_dtpst }
last_dpst = g_dpst
last_dtpst = g_dtpst
recent_dmg = { 0, 0, 0, 0, }
recent_dmgt = { 0, 0, 0, 0, }
function auxbox_last_few()
local session_seconds = os.time() - sessionstart

if session_seconds > last_session_seconds then
last_session_seconds = session_seconds
last_5_dpst[4] = last_5_dpst[3]
last_5_dpst[3] = last_5_dpst[2]
last_5_dpst[2] = last_5_dpst[1]
last_5_dpst[1] = g_dpst

last_5_dpst[4] = last_5_dpst[3]
last_5_dpst[3] = last_5_dpst[2]
last_5_dpst[2] = last_5_dpst[1]
last_5_dpst[1] = g_dtpst
end

if last_dpst ~= g_dpst then
recent_dmg[4] = recent_dmg[3]
recent_dmg[3] = recent_dmg[2]
recent_dmg[2] = recent_dmg[1]
recent_dmg[1] = g_dpst - last_dpst
last_dpst = g_dpst
end
if last_dtpst ~= g_dtpst then
table.remove(recent_dmgt, 4)
table.insert(recent_dmgt, 1, g_dtpst - last_dtpst)
last_dtpst = g_dtpst
end
auxbox_prop_line("Last Few Hits:", "")
auxbox_prop_line(string.format("%d %d %d %d",recent_dmg[4], recent_dmg[3], recent_dmg[2], recent_dmg[1]))
auxbox_prop_line("Last 4 hits taken:")
auxbox_prop_line(string.format("%d %d %d %d",recent_dmgt[4], recent_dmgt[3], recent_dmgt[2], recent_dmgt[1]))
end

function auxbox_prop_line(prop_name, prop_val)
local pvl=0
if prop_name==nil then prop_name="" end
if prop_val==nil then prop_val="" end
local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
auxbox_next_line = auxbox_next_line + 1
d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))

function Items_Left()
auxbox_prop_line("Items Left")
auxbox_prop_line("Mega Yellow:", items:get_qty_basecode(363))
auxbox_prop_line("Other Yellow Potions:", items:get_qty_basecode(260))
auxbox_prop_line("Mega Blue Potions:", items:get_qty_basecode(364))
auxbox_prop_line("Blue Potions:", items:get_qty_basecode(261))
auxbox_prop_line("Purple Potions:", items:get_qty_basecode(360))
auxbox_prop_line("Brown Potions:", items:get_qty_basecode(358))
--auxbox_prop_line("Khaki Potions:", items:get_qty_basecode(380))
auxbox_prop_line("White Potions:", items:get_qty_basecode(354))
--auxbox_prop_line("Cyan Potions:", items:get_qty_basecode(356))
auxbox_prop_line("Orange Potions:", items:get_qty_basecode(355))
auxbox_prop_line("Omelettes:", items:get_qty_basecode(1380))
auxbox_prop_line("Dragon Rations:", items:get_qty_basecode(1399))
--auxbox_prop_line("Greater Health:", items:get_qty_basecode(12))
auxbox_prop_line("Scroll of Health:", items:get_qty_basecode(1298)) --should use make_code(1298,0,15,3)
auxbox_prop_line("Scroll of Protection:", items:get_qty_basecode(1297))
auxbox_prop_line("Sanct Lor:", items:get_qty(make_code(286,0,0,18)))
auxbox_prop_line("Black Potions:", items:get_qty_basecode(352))
auxbox_prop_line("Kal Ort Por:", items:get_qty(make_code(286,0,0,13)))
auxbox_prop_line("Town Portal:", items:get_qty_basecode(293))
auxbox_prop_line("Bandages:", items:get_qty_basecode(375))
auxbox_prop_line("Arrows:", items:get_qty_basecode(296))
auxbox_prop_line("Bullets:", items:get_qty_basecode(1294))
auxbox_prop_line("Soul Shards:", items:get_qty_basecode(1283))
end
end
ZUPS!!!!
User avatar
Rumper
Post in swahili or SHUT THE FUCK UP!
Posts: 217
Joined: Sun Jan 25, 2015 11:49 pm

Re: Auxbox XP

Post by Rumper »

So far just add these:

function LM_auxbox_strdex()
local strpct = (me:get_str()/(me:get_str()+me:get_dex())*100)
local dexpct = (me:get_dex()/(me:get_str()+me:get_dex())*100)
auxbox_prop_line("Str : Dex", string.format("%.2f : %.2f",strpct,dexpct))
end

function auxbox_dps()
dps = Totaldamage / (os.time() - sessionstart)
auxbox_prop_line("DPS: ", string.format("%d",dps))
end

I'm trying to make the one I got "compatible" xD
User avatar
Rumper
Post in swahili or SHUT THE FUCK UP!
Posts: 217
Joined: Sun Jan 25, 2015 11:49 pm

Re: Auxbox XP OUTDATED

Post by Rumper »

!OUTDATED!
This one has all your needs except there's some useless code in it, preparing to remove it someday later!

Here's a screenie of auxbox
Image

Code: Select all


auxbox_next_line = 0
session_time = 0
sessionstart = os.time()


shiftkeys={"Shift","Alt","Ctrl+Shift","Shift+Alt","Ctrl+Alt","Ctrl+Alt+Shift","RMB","Ctrl+RMB"}


function auxbox()
	   
	  local w=d:auxbox_get_width()
	  local h=d:auxbox_get_height()
	 
	  d:auxbox_clear()
	  auxbox_next_line = 0 
	  if not d:ok_to_draw_play_window() then return; end
		  
	  local cd=d:get_curr_display()
	  local mode=d:get_statbox_mode()
	  local lineNr=0
	  
	  if cd==1 then
	  
		if mode==SELECT_ABILITY then
			auxbox_prop_line("Hit F-key to bind currently")
			auxbox_prop_line("selected spell")
			auxbox_blank_line()
			auxbox_ability_binds()
		else
	  
		  local txta=explode("\n", filterTextLines)
		  local autofilter=options:get(OPT_INV_START_WITH_SEARCH)
		  if autofilter then
			auxbox_prop_line("Hit CTRL + following keys")
		  else
			auxbox_prop_line("Hit the following keys")
		  end
				auxbox_prop_line("to filter item types:")
				auxbox_blank_line()
			for i=1,#txta do
			 auxbox_prop_line(txta[i])
			end
			auxbox_blank_line()
			if autofilter then
				auxbox_prop_line("Seach by typing ...")
			else
			auxbox_prop_line("Search with /")
			end
			if mode==SELECT_READY then
				auxbox_prop_line("Press ENTER to equip")
			elseif mode==SELECT_BUY then  		
				auxbox_prop_line("Press ENTER to buy")
			elseif mode==SELECT_BANK then
				auxbox_prop_line("Press ENTER to transfer one")
				auxbox_prop_line("Press Shift+ENTER for 10")
				auxbox_prop_line("Press TAB for whole stack")
			end
		  end
		
	  else
				
				auxboxfunc()
				--auxbox_damage_per_second()
				--auxbox_blank_line()
							
				auxbox_prop_line("Spell & ability binds:")
		  local cnt=auxbox_ability_binds()
			  if cnt==0 then 
				auxbox_prop_line("None!")
				auxbox_blank_line()
				auxbox_prop_line("Hit shift-c then F keys")
				auxbox_prop_line("to bind.") 
			  end
			  auxbox_blank_line()		  
			  auxbox_prop_line("Forums: forums.swut.net")
			  auxbox_prop_line("Manual: euotopia.com/manual")
			  
			  if d:numlock() then
				auxbox_blank_line()
				auxbox_prop_line("Please turn numlock off!")
			  end
			  auxbox_blank_line()
			  auxbox_prop_line("F12 for main menu.")
			  --auxbox_blank_line()
				--auxbox_f5_message()			  		 
	  end
	   
		  
	end


-- Real World Time - Duncan (PD) / Zen (Reg) / Brentoboy (forums)
function auxbox_time()

	auxbox_prop_line("Real World Time:", string.format(os.date("%I:%M%p")))
	
 
  
   if os.difftime(os.time(), sessionstart) > session_time then -- just to reduce the script to every second
  
    session_time = os.difftime(os.time(), sessionstart)
    session_d_float = session_time / 60 / 60 / 24
    session_d = math.floor(session_d_float)
    session_h = math.floor((session_d_float - session_d)*24)
    session_m = math.floor(((session_d_float - session_d)*24 - session_h) * 60)
    session_s = math.floor((((session_d_float - session_d)*24 - session_h) * 60 - session_m) * 60)
  end    
  
   if session_d~=nil then
     auxbox_prop_line("Session time:", string.format("%02.f:%02.f:%02.f:%02.f", session_d, session_h, session_m, session_s))	
   end 
end


function auxbox_f5_message()
	auxbox_prop_line("Press Alt-F5 to Reset", "")
end

function auxbox_prop_line(prop_name, prop_val)
  
  local pvl=0
  if prop_name==nil then prop_name="" end
  if prop_val==nil then prop_val="" end
  local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
	auxbox_next_line = auxbox_next_line + 1
	d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))
end

function auxbox_blank_line()
	auxbox_next_line = auxbox_next_line + 1
end

function auxbox_ability_binds() 
	local cnt=0			
	for i=10,17 do
		if me.spell_binds[i]~=-1 then
	   auxbox_prop_line(shiftkeys[i-9],spells:get_full_spell_name(me.spell_binds[i]))
	   cnt=cnt+1
	  end
  end
  return cnt
end


function auxboxfunc()
  auxbox_lm_dpscalc () -- has to be called always
  d:auxbox_clear();
  auxbox_next_line = 0
  auxbox_time()
  auxbox_blank_line()
	
  auxbox_strdex()
  auxbox_blank_line()
  auxbox_lm_time()           -- Total Time :       00:00:00
  auxbox_lm_hits()           -- Total Hits :            XXX
  auxbox_lm_kills()          -- Total Kills:            XXX
  auxbox_lm_xp_gained()      -- XP gained  :            XXX  
  auxbox_lm_xppm()           -- XP/min     :            XXX
  auxbox_lm_dmg()      -- Total dmg  :            XXX
    auxbox_blank_line()
  auxbox_lm_dps()            -- Dps from total Values:  XXX 
  auxbox_blank_line()
  auxbox_lm_last4dmg()       -- dmg :    XXX  XXX  XXX  XXX
  auxbox_blank_line()
   auxbox_lm_last4dmgt()
   auxbox_blank_line()
  auxbox_lm_last4xp()        -- xp  :    XXX  XXX  XXX  XXX
  auxbox_xp()
auxbox_blank_line()
 
  Items_Left()
end



old_build = {me:get_float_str(),
           me:get_float_dex(),
          me:get_float_intel(),
             wl:get_full_name(me.weapon),
             wl:get_full_name(me.shield),
          wl:get_full_name(me.armour),
          wl:get_full_name(me.boots),
          wl:get_full_name(me.gloves),
          wl:get_full_name(me.hat),
          wl:get_full_name(me.trousers),
          wl:get_full_name(me.ring1),
          wl:get_full_name(me.ring2),
          wl:get_full_name(me.amulet),
          wl:get_full_name(me.sigil1),
          wl:get_full_name(me.sigil2),
          wl:get_full_name(me.sigil3)}

lm_last_dpst = g_dpst       
lm_dmg_log = {}
lm_dmgtime_log = {}
lm_hit_count = 0
lm_last_xp = me.xp
lm_xp_log = {}
lm_xptime_log = {}
lm_kill_count = 0
lm_dmgt_log = {}
lm_last_dtpst = g_dtpst

function auxbox_lm_dpscalc ()

 local new_build = {me:get_float_str(),
                    me:get_float_dex(),
                 me:get_float_intel(),
                    wl:get_full_name(me.weapon),
                    wl:get_full_name(me.shield),
                 wl:get_full_name(me.armour),
                 wl:get_full_name(me.boots),
                 wl:get_full_name(me.gloves),
                 wl:get_full_name(me.hat),
                 wl:get_full_name(me.trousers),
                 wl:get_full_name(me.ring1),
                 wl:get_full_name(me.ring2),
                 wl:get_full_name(me.amulet),
                 wl:get_full_name(me.sigil1),
                 wl:get_full_name(me.sigil2),
                 wl:get_full_name(me.sigil3)}
   
    for i=1,#old_build do
        if old_build[i] ~= new_build[i] then
        
			table.remove (old_build, i)
			table.insert (old_build, i, new_build[i])
			for i,v in pairs(lm_dmg_log) do
				lm_dmg_log[i]=nil
			end
			for i,v in pairs(lm_dmgtime_log) do
				lm_dmgtime_log[i]=nil
			end
			for i,v in pairs(lm_xp_log) do
				lm_dmg_log[i]=nil
			end
			for i,v in pairs(lm_xptime_log) do
				lm_dmgtime_log[i]=nil
			end
			for i,v in pairs(lm_dmgt_log) do
				lm_dmgt_log[i]=nil
			end
			lm_hit_count = 0
			lm_kill_count = 0
      end  
    end

   if lm_hit_count == 0 then
     lm_hunt_start = os.clock()
    lm_last_killtime = os.clock()
    lm_dmg_start = g_dpst
    lm_xp_start = me.xp
	lm_dmgt_start = g_dtpst
   end
 lm_hunt_time = os.clock() - lm_hunt_start  
 lm_total_dmg = g_dpst - lm_dmg_start
 lm_xp_gained = me.xp - lm_xp_start
	lm_total_dmgt = g_dtpst - lm_dmgt_start
   
   local lm_dmgtime_dif
   local lm_dmg_dif
   if lm_last_dpst ~= g_dpst then
       if lm_hit_count >= 1 then
          lm_dmgtime_dif = os.clock() - lm_last_hittime
         lm_dmg_dif = g_dpst - lm_last_dpst        
        
       --if lm_dmgtime_dif > (me:get_weapon_delay() / 1000) * 0.5 then
              if lm_dmgtime_dif < (me:get_weapon_delay() / 1000) * 1.5 then 
               table.insert(lm_dmgtime_log, 1, lm_dmgtime_dif)
             table.insert(lm_dmg_log, 1, lm_dmg_dif)
               end
           --end
        end
	
    lm_last_hittime = os.clock()
    lm_last_dpst = g_dpst
    lm_hit_count = lm_hit_count + 1
   end
   if lm_last_dtpst ~= g_dtpst then
		lm_dmgt_dif = g_dtpst - lm_last_dtpst
	table.insert(lm_dmgt_log, 1, lm_dmgt_dif)
	lm_last_dtpst = g_dtpst
	end
    
   local lm_xptime_dif
   local lm_xp_dif
   if lm_last_xp ~= me.xp and lm_hit_count >= 1 then
     lm_kill_count = lm_kill_count + 1
    
    lm_xptime_dif = os.clock() - lm_last_killtime
    table.insert(lm_xptime_log, 1, lm_xptime_dif)
    lm_last_killtime = os.clock()
    
    lm_xp_dif = me.xp - lm_last_xp
    table.insert(lm_xp_log, 1, lm_xp_dif)
    lm_last_xp = me.xp   
    end    
 
 local temp_lm_dmgtime_log={} -- for median time
 local lm_dmgtime_count = 0
  lm_max_hps = -math.huge -- for max time
  lm_min_hps = math.huge -- for min time
  lm_dmgtime_sum = 0
  
    if lm_dmgtime_log[1] ~= nil then
        for i,v in pairs(lm_dmgtime_log) do
            if type(v) == 'number' then
             lm_dmgtime_sum = lm_dmgtime_sum + v
             lm_dmgtime_count = lm_dmgtime_count + 1
          table.insert(temp_lm_dmgtime_log, v) -- for median time
          lm_min_hps = 1 / (math.max(lm_max_hps, v)) 
             lm_max_hps = 1 / (math.min(lm_min_hps, v)) 
               if lm_dmgtime_count >= 500 then
              table.remove(lm_dmgtime_log, 500)
                 end
            end
        end
     lm_mean_hps = 1 / ((lm_dmgtime_sum / lm_dmgtime_count))
     else
     lm_mean_hps = 0
    lm_max_hps = 0
    lm_min_hps = 0
    end
   
 -- standard deviation time
 local dmgtime_vm
 local lm_dmgtime_sum_sd = 0
 local lm_dmgtime_count_sd = 0
    if lm_dmgtime_log[2] ~= nil then
        for i,v in pairs(lm_dmgtime_log) do
            if type(v) == 'number' then
             dmgtime_vm = v - lm_mean_hps
             lm_dmgtime_sum_sd = lm_dmgtime_sum_sd + (dmgtime_vm * dmgtime_vm)
             lm_dmgtime_count_sd = lm_dmgtime_count_sd + 1
            end
        end
    lm_sd_hps = 1 / (math.sqrt(lm_dmgtime_sum_sd / (lm_dmgtime_count_sd-1)))
   else
    lm_sd_hps = 0
 end
 
 -- median time
    if temp_lm_dmgtime_log[50] ~= nil then
     table.sort(temp_lm_dmgtime_log)
     asterisk = " "
     -- If we have an even number of table elements or odd.
        if math.fmod(#temp_lm_dmgtime_log,2) == 0 then
         -- return mean value of middle two elements
         lm_median_hps = 1 / ((temp_lm_dmgtime_log[#temp_lm_dmgtime_log/2] + temp_lm_dmgtime_log[(#temp_lm_dmgtime_log/2)+1]) / 2)
         else
         -- return middle element
         lm_median_hps = 1 / (temp_lm_dmgtime_log[math.ceil(#temp_lm_dmgtime_log/2)])
        end
     else
        if wl:is_weapon(me.shield)==true then
        lm_median_hps = 1 / ((me:get_weapon_delay()/1000)) * 1.6
      else
         lm_median_hps = 1 / (me:get_weapon_delay()/1000)
      end
    asterisk = "!"
    end
   
 -- mean/max/min damage 
 local temp_lm_dmg_log={} -- for median dmg
  lm_dmg_sum = 0
  lm_dmg_count = 0
  lm_max_dmg = -math.huge -- for max dmg
  lm_min_dmg = math.huge -- for min dmg
 
    if lm_dmg_log[1] ~= nil then
        for i,v in pairs(lm_dmg_log) do
            if type(v) == 'number' then
             lm_dmg_sum = lm_dmg_sum + v
             lm_dmg_count = lm_dmg_count + 1
          table.insert(temp_lm_dmg_log, v) -- for median dmg
          lm_max_dmg = math.max(lm_max_dmg, v) 
             lm_min_dmg = math.min(lm_min_dmg, v) 
               if lm_dmg_count >= 500 then
              table.remove(lm_dmg_log, 500)
                 end
            end
        end
     lm_mean_dmg = (lm_dmg_sum / lm_dmg_count)
    else
     lm_mean_dmg = 0
    lm_max_dmg = 0
    lm_min_dmg = 0
    end
   
 -- mean dps
 lm_mean_dps = lm_mean_dmg * lm_median_hps
  
 -- standard deviation damage
 local vm
 local sum_sd = 0
 local count_sd = 0
    if lm_dmg_log[2] ~= nil then
        for i,v in pairs(lm_dmg_log) do
            if type(v) == 'number' then
             vm = v - lm_mean_dmg
             sum_sd = sum_sd + (vm * vm)
             count_sd = count_sd + 1
            end
        end
     lm_sd_dmg = math.sqrt(sum_sd / (count_sd-1))
     else
    lm_sd_dmg = 0
   end

 -- standard deviation dps
 lm_sd_dps = lm_sd_dmg * lm_median_hps
  
 -- median damage
    if temp_lm_dmg_log[1] ~= nil then
     table.sort(temp_lm_dmg_log)

     -- If we have an even number of table elements or odd.
        if math.fmod(#temp_lm_dmg_log,2) == 0 then
         -- return mean value of middle two elements
         lm_median_dmg = ( temp_lm_dmg_log[#temp_lm_dmg_log/2] + temp_lm_dmg_log[(#temp_lm_dmg_log/2)+1] ) / 2
         else
         -- return middle element
         lm_median_dmg = temp_lm_dmg_log[math.ceil(#temp_lm_dmg_log/2)]
        end
     else
     lm_median_dmg = 0
    end
  
 -- median dps  
 lm_median_dps = lm_median_dmg * lm_median_hps
  
 -- min dps
 lm_min_dps = lm_min_dmg * lm_median_hps
  
 -- max dps
 lm_max_dps = lm_max_dmg * lm_median_hps
--------------------------------------------------------------------------------

 local temp_lm_xptime_log={} -- for median time
 local lm_xptime_count = 0
  lm_max_kpm = -math.huge -- for max time
  lm_min_kpm = math.huge -- for min time
  lm_xptime_sum = 0
  
    if lm_xptime_log[1] ~= nil then
        for i,v in pairs(lm_xptime_log) do
            if type(v) == 'number' then
             lm_xptime_sum = lm_xptime_sum + v
             lm_xptime_count = lm_xptime_count + 1
          table.insert(temp_lm_xptime_log, v) -- for median time
          lm_min_kpm = 1 / (math.max(lm_max_kpm, v)) 
             lm_max_kpm = 1 / (math.min(lm_min_kpm, v)) 
               if lm_xptime_count >= 500 then
              table.remove(lm_xptime_log, 500)
                 end
            end
        end
     lm_mean_kpm = (1 / ((lm_xptime_sum / lm_xptime_count))) * 60
     else
     lm_mean_kpm = 0
    lm_max_kpm = 0
    lm_min_kpm = 0
    end
   
 -- standard deviation time
 local xptime_vm
 local lm_xptime_sum_sd = 0
 local lm_xptime_count_sd = 0
    if lm_xptime_log[2] ~= nil then
        for i,v in pairs(lm_xptime_log) do
            if type(v) == 'number' then
             xptime_vm = v - lm_mean_kpm
             lm_xptime_sum_sd = lm_xptime_sum_sd + (xptime_vm * xptime_vm)
             lm_xptime_count_sd = lm_xptime_count_sd + 1
            end
        end
    lm_sd_kpm = (1 / (math.sqrt(lm_xptime_sum_sd / (lm_xptime_count_sd-1)))) * 60
   else
    lm_sd_kpm = 0
 end
 
 -- median time
    if temp_lm_xptime_log[2] ~= nil then
     table.sort(temp_lm_xptime_log)
     -- If we have an even number of table elements or odd.
        if math.fmod(#temp_lm_xptime_log,2) == 0 then
         -- return mean value of middle two elements
         lm_median_kpm = (1 / ((temp_lm_xptime_log[#temp_lm_xptime_log/2] + temp_lm_xptime_log[(#temp_lm_xptime_log/2)+1]) / 2)) * 60
         else
         -- return middle element
         lm_median_kpm = (1 / (temp_lm_xptime_log[math.ceil(#temp_lm_xptime_log/2)])) * 60
        end
     else
    lm_median_kpm = 0
   end
   
 -- mean/max/min xp
 local temp_lm_xp_log={} -- for median xp
  lm_xp_sum = 0
  lm_xp_count = 0
  lm_max_xp = -math.huge -- for max xp
  lm_min_xp = math.huge -- for min xp
 
    if lm_xp_log[1] ~= nil then
        for i,v in pairs(lm_xp_log) do
            if type(v) == 'number' then
             lm_xp_sum = lm_xp_sum + v
             lm_xp_count = lm_xp_count + 1
          table.insert(temp_lm_xp_log, v) -- for median xp
          lm_max_xp = math.max(lm_max_xp, v) 
             lm_min_xp = math.min(lm_min_xp, v) 
               if lm_xp_count >= 500 then
              table.remove(lm_xp_log, 500)
                 end
            end
        end
     lm_mean_xp = (lm_xp_sum / lm_xp_count)
    else
     lm_mean_xp = 0
    lm_max_xp = 0
    lm_min_xp = 0
    end
   
 -- mean, min, max kpm
 lm_mean_xps = lm_mean_xp * (lm_median_kpm / 60)
 lm_min_xps = lm_min_xp * (lm_median_kpm / 60)
 lm_max_xps = lm_max_xp * (lm_median_kpm / 60)
  
 -- standard deviation xp
 local xpvm
 local xpsum_sd = 0
 local xpcount_sd = 0
    if lm_xp_log[2] ~= nil then
        for i,v in pairs(lm_xp_log) do
            if type(v) == 'number' then
             xpvm = v - lm_mean_xp
             xpsum_sd = xpsum_sd + (xpvm * xpvm)
             xpcount_sd = xpcount_sd + 1
            end
        end
     lm_sd_xp = math.sqrt(xpsum_sd / (xpcount_sd-1))
     else
    lm_sd_xp = 0
   end

 -- standard deviation kpm
 lm_sd_xps = lm_sd_xp * (lm_median_kpm / 60)
  
 -- median xp
    if temp_lm_xp_log[1] ~= nil then
     table.sort(temp_lm_xp_log)

     -- If we have an even number of table elements or odd.
        if math.fmod(#temp_lm_xp_log,2) == 0 then
         -- return mean value of middle two elements
         lm_median_xp = ( temp_lm_xp_log[#temp_lm_xp_log/2] + temp_lm_xp_log[(#temp_lm_xp_log/2)+1] ) / 2
         else
         -- return middle element
         lm_median_xp = temp_lm_xp_log[math.ceil(#temp_lm_xp_log/2)]
        end
     else
     lm_median_xp = 0
    end
  
 -- median kpm  
 lm_median_xps = lm_median_xp * (lm_median_kpm / 60)
       
end

function auxbox_lm_hits()
 auxbox_prop_line("Total Hits  :", string.format("%d",lm_hit_count))
end

function auxbox_lm_time()
 h = math.floor(lm_hunt_time / 60 / 60)
 m = math.floor((lm_hunt_time / 60 / 60 - h) * 60)
 s = math.floor(((lm_hunt_time / 60 / 60 - h) * 60 - m) * 60)
 --ms = ((((lm_hunt_time / 60 / 60 - h) * 60 - m) * 60) - s) * 1000
 auxbox_prop_line("Total Time  :", string.format("%02.f:%02.f:%02.f", h, m, s))
end

function auxbox_lm_dmg()
 auxbox_prop_line("Total Dmg   :", string.format("%d",lm_total_dmg))
end

function auxbox_lm_dps()
 auxbox_prop_line("Total Dps   :", string.format("%d",lm_total_dmg/lm_hunt_time))
end

function auxbox_lm_mean_dmg()
 auxbox_prop_line("Mean :", string.format("%4.f  dmg %4.f%s dps", lm_mean_dmg, lm_mean_dps, asterisk))
end

function auxbox_lm_sd_dmg()
 auxbox_prop_line("Sd   :", string.format("%4.f  dmg %4.f%s dps", lm_sd_dmg, lm_sd_dps, asterisk))
end

function auxbox_lm_median_dmg()
 auxbox_prop_line("Med  :", string.format("%4.f  dmg %4.f%s dps", lm_median_dmg, lm_median_dps, asterisk))
end

function auxbox_lm_minmax_dmg()
 auxbox_prop_line("Min  :", string.format("%4.f  dmg %4.f%s dps", lm_min_dmg, lm_min_dps, asterisk))
 auxbox_prop_line("Max  :", string.format("%4.f  dmg %4.f%s dps", lm_max_dmg, lm_max_dps, asterisk))
end

function auxbox_lm_last4dmg()
 local hit1, hit2, hit3, hit4
 if lm_dmg_log[1] ~= nill then hit1 = lm_dmg_log[1] else hit1 = 0 end
 if lm_dmg_log[2] ~= nill then hit2 = lm_dmg_log[2] else hit2 = 0 end
 if lm_dmg_log[3] ~= nill then hit3 = lm_dmg_log[3] else hit3 = 0 end
 if lm_dmg_log[4] ~= nill then hit4 = lm_dmg_log[4] else hit4 = 0 end
 auxbox_prop_line("dmg  :", string.format("%4.f %4.f %4.f %4.f", hit4, hit3, hit2, hit1))
end

function auxbox_lm_last4dmgt()
 local hit1, hit2, hit3, hit4
 if lm_dmgt_log[1] ~= nill then hit1 = lm_dmgt_log[1] else hit1 = 0 end
 if lm_dmgt_log[2] ~= nill then hit2 = lm_dmgt_log[2] else hit2 = 0 end
 if lm_dmgt_log[3] ~= nill then hit3 = lm_dmgt_log[3] else hit3 = 0 end
 if lm_dmgt_log[4] ~= nill then hit4 = lm_dmgt_log[4] else hit4 = 0 end
 auxbox_prop_line("dmgt :", string.format("%4.f %4.f %4.f %4.f", hit4, hit3, hit2, hit1))
end

function auxbox_lm_mean_hps()
 auxbox_prop_line("Mean :", string.format("%.2f  hps", lm_mean_hps))
end

function auxbox_lm_sd_hps()
 auxbox_prop_line("Sd   :", string.format("%.2f  hps", lm_sd_hps))
end

function auxbox_lm_median_hps()
 auxbox_prop_line("Med  :", string.format("%.2f%s hps", lm_median_hps, asterisk))
end

function auxbox_lm_minmax_hps()
 auxbox_prop_line("Min  :", string.format("%4.2f  hps", lm_min_hps))
 auxbox_prop_line("Max  :", string.format("%4.2f  hps", lm_max_hps))
end

function auxbox_lm_last4hps()
 local hit1, hit2, hit3, hit4
 if lm_dmgtime_log[1] ~= nill then hit1 = 1 / lm_dmgtime_log[1] else hit1 = 0 end
 if lm_dmgtime_log[2] ~= nill then hit2 = 1 / lm_dmgtime_log[2] else hit2 = 0 end
 if lm_dmgtime_log[3] ~= nill then hit3 = 1 / lm_dmgtime_log[3] else hit3 = 0 end
 if lm_dmgtime_log[4] ~= nill then hit4 = 1 / lm_dmgtime_log[4] else hit4 = 0 end
 auxbox_prop_line("hps  :", string.format("%4.2f %4.2f %4.2f %4.2f", hit4, hit3, hit2, hit1))
end

function auxbox_lm_kills()
 auxbox_prop_line("Total Kills :", string.format("%d", lm_kill_count))
end

function auxbox_lm_xp_gained()
 auxbox_prop_line("Total XP    :", string.format("%d", lm_xp_gained))
end

function auxbox_lm_xpps()
 auxbox_prop_line("Total XP/s  :", string.format("%d", lm_xp_gained / lm_hunt_time))
end 

function auxbox_lm_xppm()
 auxbox_prop_line("Total XP/min:", string.format("%d", lm_xp_gained / lm_hunt_time * 60))
end 

function auxbox_lm_mean_xp()
 auxbox_prop_line("Mean :", string.format("%4.f   xp %4.f  xps", lm_mean_xp, lm_mean_xps))
end

function auxbox_lm_sd_xp()
 auxbox_prop_line("Sd   :", string.format("%4.f   xp %4.f  xps", lm_sd_xp, lm_sd_xps))
end

function auxbox_lm_median_xp()
 auxbox_prop_line("Med  :", string.format("%4.f   xp %4.f  xps", lm_median_xp, lm_median_xps))
end

function auxbox_lm_minmax_xp()
 auxbox_prop_line("Min  :", string.format("%4.f   xp %4.f  xps", lm_min_xp, lm_min_xps))
 auxbox_prop_line("Max  :", string.format("%4.f   xp %4.f  xps", lm_max_xp, lm_max_xps))
end

function auxbox_lm_last4xp()
 local kill1, kill2, kill3, kill4
 if lm_xp_log[1] ~= nill then kill1 = lm_xp_log[1] else kill1 = 0 end
 if lm_xp_log[2] ~= nill then kill2 = lm_xp_log[2] else kill2 = 0 end
 if lm_xp_log[3] ~= nill then kill3 = lm_xp_log[3] else kill3 = 0 end
 if lm_xp_log[4] ~= nill then kill4 = lm_xp_log[4] else kill4 = 0 end
 auxbox_prop_line("xp   :", string.format("%4.f %4.f %4.f %4.f", kill4, kill3, kill2, kill1))
end

function auxbox_lm_mean_kpm()
 auxbox_prop_line("Mean :", string.format("%d  kpm", lm_mean_kpm))
end

function auxbox_lm_sd_kpm()
 auxbox_prop_line("Sd   :", string.format("%d  kpm", lm_sd_kpm))
end

function auxbox_lm_median_kpm()
 auxbox_prop_line("Med  :", string.format("%d  kpm", lm_median_kpm))
end

function auxbox_lm_minmax_kpm()
 auxbox_prop_line("Min  :", string.format("%d  kpm", lm_min_kpm))
 auxbox_prop_line("Max  :", string.format("%d  kpm", lm_max_kpm))
end

function auxbox_lm_last4kpm()
 local kill1, hit2, hit3, hit4
 if lm_xptime_log[1] ~= nill then kill1 = 1 / lm_xptime_log[1] * 60 else kill1 = 0 end
 if lm_xptime_log[2] ~= nill then kill2 = 1 / lm_xptime_log[2] * 60 else kill2 = 0 end
 if lm_xptime_log[3] ~= nill then kill3 = 1 / lm_xptime_log[3] * 60 else kill3 = 0 end
 if lm_xptime_log[4] ~= nill then kill4 = 1 / lm_xptime_log[4] * 60 else kill4 = 0 end
 auxbox_prop_line("kpm  :", string.format("%4.0f %4.0f %4.0f %4.0f", kill4, kill3, kill2, kill1))
end

req_xp = {}
req_xp[1] = 0 -- fixed XP value
req_xp[2] = 200 -- fixed XP value
req_xp[26] = 93000 -- fixed XP value

for i=3,25 do -- adds XP for lvl 3 to 25 to array
  req_xp[i] = math.floor(req_xp[i-1]+1.2*(req_xp[i-1]-req_xp[i-2]))
end

for i=27,1000 do -- adds XP for lvl 27 to 1000 to array
  req_xp[i] = req_xp[i-1]+(i-26)*1000*4+15000
end

if me.xp >= req_xp[1000] then
   current_level = 1000
else
   for i = 1,999 do -- getting current player level based on array 
      if req_xp[i] <= me.xp 
      and req_xp[i + 1] > me.xp 
      then
         current_level = i
         break
      end
   end
end

function auxbox_xp()
	if me.xp >= req_xp[1000] then
   current_level = 1000
else
   for i = 1,999 do -- getting current player level based on array 
      if req_xp[i] <= me.xp 
      and req_xp[i + 1] > me.xp 
      then
         current_level = i
         break
      end
   end
end
   if current_level <= 1000 then
      local xptolvl_float = ((me.xp - req_xp[current_level]))/(req_xp[current_level+1]-req_xp[current_level]) -- % needed for next level
      local lvl_float = current_level + me.remort_level * 75 + xptolvl_float -- combines actual lvl with the % needed for next lvl

       -- checks if player leveled or remorted
      if xptolvl_float >= 1 or xptolvl_float < 0 then
         for i = 1,999 do
            if req_xp[i] <= me.xp 
            and req_xp[i + 1] > me.xp 
            then
               current_level = i
               break
            end
         end
      end
      
      
      auxbox_prop_line("Level" ,string.format("%f",lvl_float))
      --auxbox_prop_line("Time" ,string.format("%02.f:%02.f:%02.f:%02.f", session_d, session_h, session_m, session_s))
  
      auxbox_prop_line("Current XP", string.format("%d", me.xp))
      auxbox_prop_line("Before Level", string.format("%d", xptolvl))
      auxbox_prop_line("XP/s" ,string.format("%d", xps))
      auxbox_prop_line("XP/min" ,string.format("%d", xpmin))
  
   end
end

function auxbox_strdex()
	local strpct = (me:get_str()/(me:get_str()+me:get_dex())*100)
	local dexpct = (me:get_dex()/(me:get_str()+me:get_dex())*100)
	auxbox_prop_line("Str : Dex", string.format("%.2f : %.2f",strpct,dexpct))
end

function Items_Left()
auxbox_prop_line("Items Left")
auxbox_prop_line("Mega Yellow:", items:get_qty_basecode(363))
auxbox_prop_line("Other Yellow Potions:", items:get_qty_basecode(260))
auxbox_prop_line("Mega Blue Potions:", items:get_qty_basecode(364))
auxbox_prop_line("Blue Potions:", items:get_qty_basecode(261))
auxbox_prop_line("Purple Potions:", items:get_qty_basecode(360))
auxbox_prop_line("Brown Potions:", items:get_qty_basecode(358))
--auxbox_prop_line("Khaki Potions:", items:get_qty_basecode(380))
auxbox_prop_line("White Potions:", items:get_qty_basecode(354))
--auxbox_prop_line("Cyan Potions:", items:get_qty_basecode(356))
auxbox_prop_line("Orange Potions:", items:get_qty_basecode(355))
auxbox_prop_line("Omelettes:", items:get_qty_basecode(1380))
auxbox_prop_line("Dragon Rations:", items:get_qty_basecode(1399))
--auxbox_prop_line("Greater Health:", items:get_qty_basecode(12))
auxbox_prop_line("Scroll of Health:", items:get_qty_basecode(1298)) --should use make_code(1298,0,15,3)
auxbox_prop_line("Scroll of Protection:", items:get_qty_basecode(1297))
auxbox_prop_line("Sanct Lor:", items:get_qty(make_code(286,0,0,18)))
auxbox_prop_line("Black Potions:", items:get_qty_basecode(352))
auxbox_prop_line("Kal Ort Por:", items:get_qty(make_code(286,0,0,13)))
auxbox_prop_line("Town Portal:", items:get_qty_basecode(293))
auxbox_prop_line("Bandages:", items:get_qty_basecode(375))
auxbox_prop_line("Arrows:", items:get_qty_basecode(296))
auxbox_prop_line("Bullets:", items:get_qty_basecode(1294))
auxbox_prop_line("Soul Shards:", items:get_qty_basecode(1283))
end
Last edited by Rumper on Sat Sep 03, 2016 7:16 pm, edited 1 time in total.
User avatar
Kynt
LAUGHING OUT LOUD LIKE A MORON
Posts: 61
Joined: Wed Feb 18, 2015 9:04 am

Re: Auxbox XP

Post by Kynt »

I like the one that tells you how much xp your last kill gave. Lets you know how delicious that heroic hybrid / 2x2 was :cool:

Would it be possible to make one that says how much xp you earned during the current session?
User avatar
Keighn
Stop posting already --;
Posts: 5509
Joined: Sat Jun 26, 2004 10:13 am
Location: Hey.... pssttt Back in Orgeon

Re: Auxbox XP

Post by Keighn »

I used to use all the items but find I don't use it much now. The raw data is far more valuable. xp, dps, damage taken, damage given, current clock time IRL, session time, etc... Total hits and stuff is kinda cool also.

I just need to not screw mine up all the time. Seems the harder I try the more it screws up. Yesterday was so bad I had nothing in the box. Took me forever to get it back to before. GOD I SUCK AT LANGUAGE AND CODING.
User avatar
Rumper
Post in swahili or SHUT THE FUCK UP!
Posts: 217
Joined: Sun Jan 25, 2015 11:49 pm

Re: Auxbox XP

Post by Rumper »

Here is my new modified code.

I am sorry but I deleted all comments by accident. Alot fo thanks go to LordMortiferus, CIAassasin, Ched and some unknown contributors.
All code with lm is made by Lord Mortiferus.

Screenshot:
Image

Code: Select all

-- Start
auxbox_next_line = 0
session_time = 0
sessionstart = os.time()
shiftkeys={"Shift","Alt","Ctrl+Shift","Shift+Alt","Ctrl+Alt","Ctrl+Alt+Shift","RMB","Ctrl+RMB"}
old_build = {	
	me:get_float_str(),
	me:get_float_dex(),
	me:get_float_intel(),
	wl:get_full_name(me.weapon),
	wl:get_full_name(me.shield),
	wl:get_full_name(me.armour),
	wl:get_full_name(me.boots),
	wl:get_full_name(me.gloves),
	wl:get_full_name(me.hat),
	wl:get_full_name(me.trousers),
	wl:get_full_name(me.ring1),
	wl:get_full_name(me.ring2),
	wl:get_full_name(me.amulet),
	wl:get_full_name(me.sigil1),
	wl:get_full_name(me.sigil2),
	wl:get_full_name(me.sigil3)
}
lm_last_dpst = g_dpst       
lm_dmg_log = {}
lm_hit_count = 0
lm_last_xp = me.xp
lm_xp_log = {}
lm_xptime_log = {}
lm_kill_count = 0
lm_dmgt_log = {}
lm_last_dtpst = g_dtpst
-- XP Array
req_xp = {}
req_xp[1] = 0 -- fixed XP value
req_xp[2] = 200 -- fixed XP value
req_xp[26] = 93000 -- fixed XP value

for i=3,25 do -- adds XP for lvl 3 to 25 to array
	req_xp[i] = math.floor(req_xp[i-1]+1.2*(req_xp[i-1]-req_xp[i-2]))
end
for i=27,1000 do -- adds XP for lvl 27 to 1000 to array
	req_xp[i] = req_xp[i-1]+(i-26)*1000*4+15000
end
if me.xp >= req_xp[1000] then
	current_level = 1000
else
	for i = 1,999 do -- getting current player level based on array 
		if req_xp[i] <= me.xp and req_xp[i + 1] > me.xp then
			current_level = i
			break
		end
	end
end	  
-- Instances
lm_instancemap_log = {}
lm_instance_list = { 
	[54] = "Mino Halls", 
	[55] = "Mino Halls", 
	[56] = "Mino Halls", 
	[57] = "Mino Halls", 
	[58] = "Mino Halls",
	[59] = "Mino Halls", 
	[60] = "Mino Halls", 
	[61] = "Mino Halls",
	[63] = "Mt. Pass", 
	[64] = "Mt. Pass", 
	[65] = "Mt. Pass", 
	[66] = "Mt. Pass",
	[67] = "Pendragon", 
	[68] = "Pendragon", 
	[69] = "Pendragon", 
	[70] = "Pendragon",
	[90] = "KToS",
	[110] = "Wiz Tower", 
	[111] = "Wiz Tower", 
	[112] = "Wiz Tower", 
	[113] = "Wiz Tower", 
	[114] = "Wiz Tower",
	[115] = "Wiz Tower", 
	[116] = "Wiz Tower", 
	[117] = "Wiz Tower",
	[120] = "Tangled", 
	[121] = "Tangled", 
	[122] = "Tangled", 
	[123] = "Tangled", 
	[124] = "Tangled",
	[125] = "Tangled", 
	[126] = "Tangled", 
	[127] = "Tangled", 
	[128] = "Tangled",
	[136] = "Cass Tower", 
	[137] = "Cass Tower",
	[175] = "Rivers End", 
	[176] = "Rivers End", 
	[177] = "Rivers End", 
	[178] = "Rivers End", 
	[179] = "Rivers End",
	[180] = "Rivers End",
	[182] = "VotT", 
	[183] = "VotT", 
	[184] = "VotT", 
	[185] = "VotT", 
	[186] = "VotT",
	[196] = "CoS",
	[230] = "Anathema", 
	[231] = "Anathema", 
	[232] = "Anathema", 
	[233] = "Anathema", 
	[234] = "Anathema",
	[235] = "Anathema", 
	[236] = "Anathema",
	[282] = "Blood Moor"
}
-- -- -- -- -- -- -- -- -- -- --
function auxbox()
	local w=d:auxbox_get_width()
	local h=d:auxbox_get_height()
	auxbox_lm_dpscalc()
	d:auxbox_clear();
	auxbox_next_line = 0
	auxboxfunc()
end

-- Real World Time - Duncan (PD) / Zen (Reg) / Brentoboy (forums)
function auxbox_time()
	auxbox_prop_line("Real World Time:", string.format(os.date("%I:%M%p")))
	if os.difftime(os.time(), sessionstart) > session_time then -- just to reduce the script to every second
		session_time = os.difftime(os.time(), sessionstart)
		session_d_float = session_time / 60 / 60 / 24
		session_d = math.floor(session_d_float)
		session_h = math.floor((session_d_float - session_d)*24)
		session_m = math.floor(((session_d_float - session_d)*24 - session_h) * 60)
		session_s = math.floor((((session_d_float - session_d)*24 - session_h) * 60 - session_m) * 60)
	end    
	if session_d~=nil then
		auxbox_prop_line("Session time:", string.format("%02.f:%02.f:%02.f:%02.f", session_d, session_h, session_m, session_s))	
	end 
end


function auxbox_prop_line(prop_name, prop_val)
	local pvl=0
	if prop_name==nil then prop_name="" end
	if prop_val==nil then prop_val="" end
	local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
	auxbox_next_line = auxbox_next_line + 1
	d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))
end


function auxbox_blank_line()
	auxbox_next_line = auxbox_next_line + 1
end


function auxboxfunc()
	auxbox_lm_dpscalc()
	d:auxbox_clear()
	auxbox_time()
	auxbox_blank_line()
	auxbox_strdex()
	auxbox_blank_line()
	auxbox_lm_time()
	auxbox_lm_hits()
	auxbox_lm_kills()
	auxbox_lm_dmg()
	auxbox_lm_dps()
	auxbox_lm_xp_gained()
	auxbox_lm_xppm()
	auxbox_xp()
	auxbox_blank_line()
	auxbox_lm_last4dmg()
	auxbox_blank_line()
	auxbox_lm_last4dmgt()
	auxbox_blank_line()
	auxbox_lm_last4xp()
	auxbox_blank_line()
	auxbox_lm_dynamic_instance_reset()
	auxbox_blank_line()
	-- auxbox_bound_item_basecodes()
	Items_Left()
end


function auxbox_lm_dpscalc ()
	local new_build = {	
		me:get_float_str(),
		me:get_float_dex(),
		me:get_float_intel(),
		wl:get_full_name(me.weapon),
		wl:get_full_name(me.shield),
		wl:get_full_name(me.armour),
		wl:get_full_name(me.boots),
		wl:get_full_name(me.gloves),
		wl:get_full_name(me.hat),
		wl:get_full_name(me.trousers),
		wl:get_full_name(me.ring1),
		wl:get_full_name(me.ring2),
		wl:get_full_name(me.amulet),
		wl:get_full_name(me.sigil1),
		wl:get_full_name(me.sigil2),
		wl:get_full_name(me.sigil3)
	}
	for i=1,#old_build do
        if old_build[i] ~= new_build[i] then
			table.remove (old_build, i)
			table.insert (old_build, i, new_build[i])
			for i,v in pairs(lm_dmg_log) do
				lm_dmg_log[i]=nil
			end
			for i,v in pairs(lm_dmgtime_log) do
				lm_dmgtime_log[i]=nil
			end
			for i,v in pairs(lm_xp_log) do
				lm_dmg_log[i]=nil
			end
			for i,v in pairs(lm_xptime_log) do
				lm_dmgtime_log[i]=nil
			end
			for i,v in pairs(lm_dmgt_log) do
				lm_dmgt_log[i]=nil
			end
			lm_hit_count = 0
			lm_kill_count = 0
		end  
    end
	if lm_hit_count == 0 then
		lm_hunt_start = os.clock()
		lm_last_killtime = os.clock()
		lm_dmg_start = g_dpst
		lm_xp_start = me.xp
		lm_dmgt_start = g_dtpst
	end
	lm_hunt_time = os.clock() - lm_hunt_start  
	lm_total_dmg = g_dpst - lm_dmg_start
	lm_xp_gained = me.xp - lm_xp_start
	lm_total_dmgt = g_dtpst - lm_dmgt_start
	local lm_dmg_dif
 	if lm_last_dpst ~= g_dpst then
		lm_dmg_dif = g_dpst - lm_last_dpst
		table.insert(lm_dmg_log, 1, lm_dmg_dif)
		lm_last_dpst = g_dpst
		lm_hit_count = lm_hit_count + 1
	end
	local lm_dmgt_dif
	if lm_last_dtpst ~= g_dtpst then
		lm_dmgt_dif = g_dtpst - lm_last_dtpst
		table.insert(lm_dmgt_log, 1, lm_dmgt_dif)
		lm_last_dtpst = g_dtpst
	end    
	local lm_xptime_dif
	local lm_xp_dif
	if lm_last_xp ~= me.xp and lm_hit_count >= 1 then
		lm_kill_count = lm_kill_count + 1
		lm_xptime_dif = os.clock() - lm_last_killtime
		table.insert(lm_xptime_log, 1, lm_xptime_dif)
		lm_last_killtime = os.clock()
		lm_xp_dif = me.xp - lm_last_xp
		table.insert(lm_xp_log, 1, lm_xp_dif)
		lm_last_xp = me.xp   
	end    
	local lm_xptime_count = 0
	lm_xptime_sum = 0  
    if lm_xptime_log[1] ~= nil then
        for i,v in pairs(lm_xptime_log) do
            if type(v) == 'number' then
				lm_xptime_sum = lm_xptime_sum + v
				lm_xptime_count = lm_xptime_count + 1
				if lm_xptime_count >= 500 then
					table.remove(lm_xptime_log, 500)
				end
			end
		end
    end
	local lm_xp_count = 0
	lm_xp_sum = 0
    if lm_xp_log[1] ~= nil then
        for i,v in pairs(lm_xp_log) do
            if type(v) == 'number' then
				lm_xp_sum = lm_xp_sum + v
				lm_xp_count = lm_xp_count + 1
				if lm_xp_count >= 500 then
					table.remove(lm_xp_log, 500)
				end
            end
        end
    end
end


function auxbox_lm_hits()
	auxbox_prop_line("Total Hits  :", string.format("%d",lm_hit_count))
end


function auxbox_lm_time()
	h = math.floor(lm_hunt_time / 60 / 60)
	m = math.floor((lm_hunt_time / 60 / 60 - h) * 60)
	s = math.floor(((lm_hunt_time / 60 / 60 - h) * 60 - m) * 60)
	auxbox_prop_line("Total Time  :", string.format("%02.f:%02.f:%02.f", h, m, s))
end


function auxbox_lm_dmg()
	auxbox_prop_line("Total Dmg   :", string.format("%d",lm_total_dmg))
end


function auxbox_lm_dps()
	if lm_hunt_time == 0 then
	auxbox_prop_line("Total Dps   :", 0)
	else
	auxbox_prop_line("Total Dps   :", string.format("%d", lm_total_dmg/lm_hunt_time))
	end
end


function auxbox_lm_last4dmg()
	local hit1, hit2, hit3, hit4
	if lm_dmg_log[1] ~= nill then hit1 = lm_dmg_log[1] else hit1 = 0 end
	if lm_dmg_log[2] ~= nill then hit2 = lm_dmg_log[2] else hit2 = 0 end
	if lm_dmg_log[3] ~= nill then hit3 = lm_dmg_log[3] else hit3 = 0 end
	if lm_dmg_log[4] ~= nill then hit4 = lm_dmg_log[4] else hit4 = 0 end
	auxbox_prop_line("Last Few Hits:", "")
	auxbox_prop_line(string.format("%4.f  %4.f  %4.f  %4.f", hit4, hit3, hit2, hit1))
end


function auxbox_lm_last4dmgt()
	local hit1, hit2, hit3, hit4
	if lm_dmgt_log[1] ~= nill then hit1 = lm_dmgt_log[1] else hit1 = 0 end
	if lm_dmgt_log[2] ~= nill then hit2 = lm_dmgt_log[2] else hit2 = 0 end
	if lm_dmgt_log[3] ~= nill then hit3 = lm_dmgt_log[3] else hit3 = 0 end
	if lm_dmgt_log[4] ~= nill then hit4 = lm_dmgt_log[4] else hit4 = 0 end
	auxbox_prop_line("Last 4 hits taken:")
	auxbox_prop_line(string.format("%4.f  %4.f  %4.f  %4.f", hit4, hit3, hit2, hit1))
end


function auxbox_lm_kills()
	auxbox_prop_line("Total Kills :", string.format("%d", lm_kill_count))
end


function auxbox_lm_xp_gained()
	auxbox_prop_line("Total XP    :", string.format("%d", lm_xp_gained))
end


function auxbox_lm_xppm()
	if lm_hunt_time == 0 then
		auxbox_prop_line("Total XP/min:", string.format("%d", 0))
	else
		auxbox_prop_line("Total XP/min:", string.format("%d", lm_xp_gained / lm_hunt_time * 60))
	end
end 


function auxbox_lm_last4xp()
	local kill1, kill2, kill3, kill4
	if lm_xp_log[1] ~= nill then kill1 = lm_xp_log[1] else kill1 = 0 end
	if lm_xp_log[2] ~= nill then kill2 = lm_xp_log[2] else kill2 = 0 end
	if lm_xp_log[3] ~= nill then kill3 = lm_xp_log[3] else kill3 = 0 end
	if lm_xp_log[4] ~= nill then kill4 = lm_xp_log[4] else kill4 = 0 end
	auxbox_prop_line("Last 4 kills:")
	auxbox_prop_line(string.format("%4.f  %4.f  %4.f  %4.f", kill4, kill3, kill2, kill1))
end


function auxbox_xp()
	if me.xp >= req_xp[1000] then
	current_level = 1000
	else
		for i = 1,999 do -- getting current player level based on array 
			if req_xp[i] <= me.xp and req_xp[i + 1] > me.xp then
				current_level = i
				break
			end
		end
	end
	if current_level <= 1000 then
		local xptolvl_float = ((me.xp - req_xp[current_level]))/(req_xp[current_level+1]-req_xp[current_level]) -- % needed for next level
		local lvl_float = current_level + me.remort_level * 75 + xptolvl_float -- combines actual lvl with the % needed for next lvl
		-- checks if player leveled or remorted
		if xptolvl_float >= 1 or xptolvl_float < 0 then
			for i = 1,999 do
				if req_xp[i] <= me.xp and req_xp[i + 1] > me.xp then
					current_level = i
					break
				end
			end
		end
		local xptolvl = req_xp[current_level+1] - me.xp
        auxbox_prop_line("Level" ,string.format("%f",lvl_float))
		auxbox_prop_line("Current XP", string.format("%d", me.xp))
		auxbox_prop_line("Before Level", string.format("%d", xptolvl))
	end
end


function auxbox_strdex()
	local strpct = (me:get_str()/(me:get_str()+me:get_dex())*100)
	local dexpct = (me:get_dex()/(me:get_str()+me:get_dex())*100)
	auxbox_prop_line("Str : Dex", string.format("%.2f : %.2f",strpct,dexpct))
end


function Items_Left()
	auxbox_prop_line("Items Left")
	auxbox_prop_line("Mega Yellows :        ", items:get_qty_basecode(363))
	auxbox_prop_line("Other Yellows:--------", items:get_qty_basecode(260))
	auxbox_prop_line("Purple Pots  :        ", items:get_qty_basecode(360))
	auxbox_prop_line("Omelettes    :--------", items:get_qty_basecode(1380))
	auxbox_prop_line("Dragon Rats  :        ", items:get_qty_basecode(1399))
	auxbox_prop_line("Greater      :--------", items:get_qty_basecode(12))
	auxbox_prop_line("Protect      :        ", items:get_qty_basecode(1297))
	auxbox_prop_line("Sanct Lor    :--------", items:get_qty(make_code(286,0,0,18)))
	auxbox_prop_line("Kal Ort Por  :        ", items:get_qty(make_code(286,0,0,13)))
	auxbox_prop_line("Town Portal  :--------", items:get_qty_basecode(293))
	auxbox_prop_line("Bandages     :        ", items:get_qty_basecode(375))
	auxbox_prop_line("Empty Flasks :--------", items:get_qty_basecode(335))
	auxbox_prop_line("Blank Scroll :        ", items:get_qty_basecode(1053))
	auxbox_prop_line("Beverages    :--------", items:get_qty_basecode(205))
	-- auxbox_prop_line("Mega Blue Potions:", items:get_qty_basecode(364))
	-- auxbox_prop_line("Blue Potions:", items:get_qty_basecode(261))
	-- auxbox_prop_line("Brown Potions:", items:get_qty_basecode(358))
	-- auxbox_prop_line("Khaki Potions:", items:get_qty_basecode(380))
	-- auxbox_prop_line("White Potions:", items:get_qty_basecode(354))
	-- auxbox_prop_line("Cyan Potions:", items:get_qty_basecode(356))
	-- auxbox_prop_line("Orange Potions:", items:get_qty_basecode(355))
	-- auxbox_prop_line("Scroll of Health:", items:get_qty_basecode(1298))
	-- auxbox_prop_line("Black Potions:", items:get_qty_basecode(352))
	-- auxbox_prop_line("Arrows:", items:get_qty_basecode(296))
	-- auxbox_prop_line("Bullets:", items:get_qty_basecode(1294))
	-- auxbox_prop_line("Soul Shards:", items:get_qty_basecode(1283))
	-- auxbox_prop_line("Clear Potions :", items:get_qty_basecode(359))
	-- auxbox_prop_line("Lime Potions:", items:get_qty_basecode(357))
	-- auxbox_prop_line("Green Potions:", items:get_qty_basecode(353))
	-- auxbox_prop_line("Black Potions:", items:get_qty_basecode(352))
	-- auxbox_prop_line("Black Pearl:", items:get_qty_basecode(326))
	-- auxbox_prop_line("Garlic :", items:get_qty_basecode(328))
	-- auxbox_prop_line("Ginseng :", items:get_qty_basecode(329))
	-- auxbox_prop_line("Nightshade:", items:get_qty_basecode(331))
    -- auxbox_prop_line("Refined Scroll Health:", items:get_qty_basecode(323))
    -- auxbox_prop_line("Uncurse Scroll", items:get_qty_basecode(315))
	-- auxbox_prop_line("Unweld Scroll", items:get_qty_basecode(314))
	-- auxbox_prop_line("Grappling Hook", items:get_qty_basecode(313))
	-- auxbox_prop_line("Red Potion", items:get_qty_basecode(263))
end


function auxbox_lm_dynamic_instance_reset()
   if cmap:get_level() ~= me.map_level and cmap:get_level() >= 0 then
		if lm_instance_list[cmap:get_level()] ~= nil then
			lm_parentmap = lm_instance_list[cmap:get_level()]
		else lm_parentmap = cmap:get_level()
		end
		lm_tempmap = me.map_level
		lm_instance_visited = 1
		lm_instance_exit = os.time()
   end 
   if cmap:get_level() == me.map_level and lm_instance_visited == 1 then
		lm_instance_visited = 0  
		lm_instancemap_log[lm_parentmap] = lm_instance_exit
   end
   local lm_instance_reset = 0
   for i, v in pairs(lm_instancemap_log) do
		lm_instance_reset = 600 - (os.time() - v) 
		local m = math.floor(lm_instance_reset / 60)
		local s = math.floor((lm_instance_reset / 60 - m) * 60) 
		auxbox_prop_line(string.format("%s resets in",i),string.format("%02.f:%02.f", m, s))     
		if lm_instance_reset <= 0 then
			lm_instancemap_log[i] = nil
		end
	end
end

-- Bound Item Quantities(modified to show basecodes)  - Duncan (PD) / Zen (Reg) / Brentoboy (forums)
function auxbox_bound_item_basecodes()
	local item
	local name
	for i = 1, 50 do   
		item = me.item_binds[i]
		name = wl:get_full_name(item)  
		if item and not wl:is_tool(item) and name ~= "NOTHING" then   
			auxbox_prop_line(name, get_base_code(item))
		end
	end
end
Last edited by Rumper on Wed Sep 07, 2016 4:03 am, edited 1 time in total.
User avatar
Keighn
Stop posting already --;
Posts: 5509
Joined: Sat Jun 26, 2004 10:13 am
Location: Hey.... pssttt Back in Orgeon

Re: Auxbox XP

Post by Keighn »

Here's what I can see:
You do not have the required permissions to view the files attached to this post.
Chedich
on lolpatrol
Posts: 254
Joined: Wed Jan 14, 2004 12:51 am

Re: Auxbox XP

Post by Chedich »

The size of your auxbox depends on what resolution you're running the game in.

As you guys still seem intered in auxbox scripts I've updated my script collection to include some scripts with color support. :whistle:
viewtopic.php?f=3&t=4983&p=82422#p82422
User avatar
Keighn
Stop posting already --;
Posts: 5509
Joined: Sat Jun 26, 2004 10:13 am
Location: Hey.... pssttt Back in Orgeon

Re: Auxbox XP

Post by Keighn »

Ah, I suspected. I'm on laptop 1366x768.

Color you say? Hmmm... think you could tweak this one... to colors. I'm sure either of you could.
ZUPS!!!!
User avatar
Rumper
Post in swahili or SHUT THE FUCK UP!
Posts: 217
Joined: Sun Jan 25, 2015 11:49 pm

Re: Auxbox XP

Post by Rumper »

Thanks Ched :)

i noticed some code I got is actually yours!
User avatar
Keighn
Stop posting already --;
Posts: 5509
Joined: Sat Jun 26, 2004 10:13 am
Location: Hey.... pssttt Back in Orgeon

Re: Auxbox XP

Post by Keighn »

Lately since I've been playing some 1ks this weekend; I noticed it isn't displaying the bottom data:

Last few hits
Last 4 taken
Last 4 kills
items:

Not sure why it does this on maxed out alts. Its annoying as those are the ones I like to see the damage. Alt f5 does nothing to fix it either.
User avatar
Rumper
Post in swahili or SHUT THE FUCK UP!
Posts: 217
Joined: Sun Jan 25, 2015 11:49 pm

Re: Auxbox XP

Post by Rumper »

Try replacing

auxbox_prop_line("Before Level:", string.format("%d", req_xp[current_level+1] - me.xp))

with
if me.lvl != 1000 then
auxbox_prop_line("Before Level:", string.format("%d", req_xp[current_level+1] - me.xp))
end
User avatar
Keighn
Stop posting already --;
Posts: 5509
Joined: Sat Jun 26, 2004 10:13 am
Location: Hey.... pssttt Back in Orgeon

Re: Auxbox XP

Post by Keighn »

Ain't working looks like this:

Code: Select all

-- Start
auxbox_next_line = 0
session_time = 0
sessionstart = os.time()
shiftkeys={"Shift","Alt","Ctrl+Shift","Shift+Alt","Ctrl+Alt","Ctrl+Alt+Shift","RMB","Ctrl+RMB"}
old_build = {   
   me:get_float_str(),
   me:get_float_dex(),
   me:get_float_intel(),
   wl:get_full_name(me.weapon),
   wl:get_full_name(me.shield),
   wl:get_full_name(me.armour),
   wl:get_full_name(me.boots),
   wl:get_full_name(me.gloves),
   wl:get_full_name(me.hat),
   wl:get_full_name(me.trousers),
   wl:get_full_name(me.ring1),
   wl:get_full_name(me.ring2),
   wl:get_full_name(me.amulet),
   wl:get_full_name(me.sigil1),
   wl:get_full_name(me.sigil2),
   wl:get_full_name(me.sigil3)
}
lm_last_dpst = g_dpst       
lm_dmg_log = {}
lm_hit_count = 0
lm_last_xp = me.xp
lm_xp_log = {}
lm_xptime_log = {}
lm_kill_count = 0
lm_dmgt_log = {}
lm_last_dtpst = g_dtpst
-- XP Array
req_xp = {}
req_xp[1] = 0 -- fixed XP value
req_xp[2] = 200 -- fixed XP value
req_xp[26] = 93000 -- fixed XP value

for i=3,25 do -- adds XP for lvl 3 to 25 to array
   req_xp[i] = math.floor(req_xp[i-1]+1.2*(req_xp[i-1]-req_xp[i-2]))
end
for i=27,1000 do -- adds XP for lvl 27 to 1000 to array
   req_xp[i] = req_xp[i-1]+(i-26)*1000*4+15000
end
if me.xp >= req_xp[1000] then
   current_level = 1000
else
   for i = 1,999 do -- getting current player level based on array 
      if req_xp[i] <= me.xp and req_xp[i + 1] > me.xp then
         current_level = i
         break
      end
   end
end     
-- Instances
lm_instancemap_log = {}
lm_instance_list = { 
   [54] = "Mino Halls", 
   [55] = "Mino Halls", 
   [56] = "Mino Halls", 
   [57] = "Mino Halls", 
   [58] = "Mino Halls",
   [59] = "Mino Halls", 
   [60] = "Mino Halls", 
   [61] = "Mino Halls",
   [63] = "Mt. Pass", 
   [64] = "Mt. Pass", 
   [65] = "Mt. Pass", 
   [66] = "Mt. Pass",
   [67] = "Pendragon", 
   [68] = "Pendragon", 
   [69] = "Pendragon", 
   [70] = "Pendragon",
   [90] = "KToS",
   [110] = "Wiz Tower", 
   [111] = "Wiz Tower", 
   [112] = "Wiz Tower", 
   [113] = "Wiz Tower", 
   [114] = "Wiz Tower",
   [115] = "Wiz Tower", 
   [116] = "Wiz Tower", 
   [117] = "Wiz Tower",
   [120] = "Tangled", 
   [121] = "Tangled", 
   [122] = "Tangled", 
   [123] = "Tangled", 
   [124] = "Tangled",
   [125] = "Tangled", 
   [126] = "Tangled", 
   [127] = "Tangled", 
   [128] = "Tangled",
   [136] = "Cass Tower", 
   [137] = "Cass Tower",
   [175] = "Rivers End", 
   [176] = "Rivers End", 
   [177] = "Rivers End", 
   [178] = "Rivers End", 
   [179] = "Rivers End",
   [180] = "Rivers End",
   [182] = "VotT", 
   [183] = "VotT", 
   [184] = "VotT", 
   [185] = "VotT", 
   [186] = "VotT",
   [196] = "CoS",
   [230] = "Anathema", 
   [231] = "Anathema", 
   [232] = "Anathema", 
   [233] = "Anathema", 
   [234] = "Anathema",
   [235] = "Anathema", 
   [236] = "Anathema",
   [282] = "Blood Moor"
}
-- -- -- -- -- -- -- -- -- -- --
function auxbox()
   local w=d:auxbox_get_width()
   local h=d:auxbox_get_height()
   auxbox_lm_dpscalc()
   d:auxbox_clear();
   auxbox_next_line = 0
   auxboxfunc()
end

-- Real World Time - Duncan (PD) / Zen (Reg) / Brentoboy (forums)
function auxbox_time()
   auxbox_prop_line("Real World Time:", string.format(os.date("%I:%M%p")))
   if os.difftime(os.time(), sessionstart) > session_time then -- just to reduce the script to every second
      session_time = os.difftime(os.time(), sessionstart)
      session_d_float = session_time / 60 / 60 / 24
      session_d = math.floor(session_d_float)
      session_h = math.floor((session_d_float - session_d)*24)
      session_m = math.floor(((session_d_float - session_d)*24 - session_h) * 60)
      session_s = math.floor((((session_d_float - session_d)*24 - session_h) * 60 - session_m) * 60)
   end    
   if session_d~=nil then
      auxbox_prop_line("Session time:", string.format("%02.f:%02.f:%02.f:%02.f", session_d, session_h, session_m, session_s))   
   end 
end


function auxbox_prop_line(prop_name, prop_val)
   local pvl=0
   if prop_name==nil then prop_name="" end
   if prop_val==nil then prop_val="" end
   local filler = string.rep(" ", 25 - string.len(prop_name) - string.len(prop_val))
   auxbox_next_line = auxbox_next_line + 1
   d:auxbox_set_line(auxbox_next_line, string.format("%s %s %s", prop_name, filler, prop_val))
end


function auxbox_blank_line()
   auxbox_next_line = auxbox_next_line + 1
end


function auxboxfunc()
   auxbox_lm_dpscalc()
   d:auxbox_clear()
   auxbox_time()
   auxbox_blank_line()
   auxbox_strdex()
   auxbox_blank_line()
   auxbox_lm_time()
   auxbox_lm_hits()
   auxbox_lm_kills()
   auxbox_lm_dmg()
   auxbox_lm_dps()
   auxbox_lm_xp_gained()
   auxbox_lm_xppm()
   auxbox_xp()
   auxbox_blank_line()
   auxbox_lm_last4dmg()
   auxbox_blank_line()
   auxbox_lm_last4dmgt()
   auxbox_blank_line()
   auxbox_lm_last4xp()
   auxbox_blank_line()
   auxbox_lm_dynamic_instance_reset()
   auxbox_blank_line()
   -- auxbox_bound_item_basecodes()
   Items_Left()
end


function auxbox_lm_dpscalc ()
   local new_build = {   
      me:get_float_str(),
      me:get_float_dex(),
      me:get_float_intel(),
      wl:get_full_name(me.weapon),
      wl:get_full_name(me.shield),
      wl:get_full_name(me.armour),
      wl:get_full_name(me.boots),
      wl:get_full_name(me.gloves),
      wl:get_full_name(me.hat),
      wl:get_full_name(me.trousers),
      wl:get_full_name(me.ring1),
      wl:get_full_name(me.ring2),
      wl:get_full_name(me.amulet),
      wl:get_full_name(me.sigil1),
      wl:get_full_name(me.sigil2),
      wl:get_full_name(me.sigil3)
   }
   for i=1,#old_build do
        if old_build[i] ~= new_build[i] then
         table.remove (old_build, i)
         table.insert (old_build, i, new_build[i])
         for i,v in pairs(lm_dmg_log) do
            lm_dmg_log[i]=nil
         end
         for i,v in pairs(lm_dmgtime_log) do
            lm_dmgtime_log[i]=nil
         end
         for i,v in pairs(lm_xp_log) do
            lm_dmg_log[i]=nil
         end
         for i,v in pairs(lm_xptime_log) do
            lm_dmgtime_log[i]=nil
         end
         for i,v in pairs(lm_dmgt_log) do
            lm_dmgt_log[i]=nil
         end
         lm_hit_count = 0
         lm_kill_count = 0
      end  
    end
   if lm_hit_count == 0 then
      lm_hunt_start = os.clock()
      lm_last_killtime = os.clock()
      lm_dmg_start = g_dpst
      lm_xp_start = me.xp
      lm_dmgt_start = g_dtpst
   end
   lm_hunt_time = os.clock() - lm_hunt_start  
   lm_total_dmg = g_dpst - lm_dmg_start
   lm_xp_gained = me.xp - lm_xp_start
   lm_total_dmgt = g_dtpst - lm_dmgt_start
   local lm_dmg_dif
    if lm_last_dpst ~= g_dpst then
      lm_dmg_dif = g_dpst - lm_last_dpst
      table.insert(lm_dmg_log, 1, lm_dmg_dif)
      lm_last_dpst = g_dpst
      lm_hit_count = lm_hit_count + 1
   end
   local lm_dmgt_dif
   if lm_last_dtpst ~= g_dtpst then
      lm_dmgt_dif = g_dtpst - lm_last_dtpst
      table.insert(lm_dmgt_log, 1, lm_dmgt_dif)
      lm_last_dtpst = g_dtpst
   end    
   local lm_xptime_dif
   local lm_xp_dif
   if lm_last_xp ~= me.xp and lm_hit_count >= 1 then
      lm_kill_count = lm_kill_count + 1
      lm_xptime_dif = os.clock() - lm_last_killtime
      table.insert(lm_xptime_log, 1, lm_xptime_dif)
      lm_last_killtime = os.clock()
      lm_xp_dif = me.xp - lm_last_xp
      table.insert(lm_xp_log, 1, lm_xp_dif)
      lm_last_xp = me.xp   
   end    
   local lm_xptime_count = 0
   lm_xptime_sum = 0  
    if lm_xptime_log[1] ~= nil then
        for i,v in pairs(lm_xptime_log) do
            if type(v) == 'number' then
            lm_xptime_sum = lm_xptime_sum + v
            lm_xptime_count = lm_xptime_count + 1
            if lm_xptime_count >= 500 then
               table.remove(lm_xptime_log, 500)
            end
         end
      end
    end
   local lm_xp_count = 0
   lm_xp_sum = 0
    if lm_xp_log[1] ~= nil then
        for i,v in pairs(lm_xp_log) do
            if type(v) == 'number' then
            lm_xp_sum = lm_xp_sum + v
            lm_xp_count = lm_xp_count + 1
            if lm_xp_count >= 500 then
               table.remove(lm_xp_log, 500)
            end
            end
        end
    end
end


function auxbox_lm_hits()
   if me.lvl != 1000 then
      auxbox_prop_line("Before Level:", string.format("%d", req_xp[current_level+1] - me.xp))
   end
end


function auxbox_lm_time()
   h = math.floor(lm_hunt_time / 60 / 60)
   m = math.floor((lm_hunt_time / 60 / 60 - h) * 60)
   s = math.floor(((lm_hunt_time / 60 / 60 - h) * 60 - m) * 60)
   auxbox_prop_line("Total Time  :", string.format("%02.f:%02.f:%02.f", h, m, s))
end


function auxbox_lm_dmg()
   auxbox_prop_line("Total Dmg   :", string.format("%d",lm_total_dmg))
end


function auxbox_lm_dps()
   if lm_hunt_time == 0 then
   auxbox_prop_line("Total Dps   :", 0)
   else
   auxbox_prop_line("Total Dps   :", string.format("%d", lm_total_dmg/lm_hunt_time))
   end
end


function auxbox_lm_last4dmg()
   local hit1, hit2, hit3, hit4
   if lm_dmg_log[1] ~= nill then hit1 = lm_dmg_log[1] else hit1 = 0 end
   if lm_dmg_log[2] ~= nill then hit2 = lm_dmg_log[2] else hit2 = 0 end
   if lm_dmg_log[3] ~= nill then hit3 = lm_dmg_log[3] else hit3 = 0 end
   if lm_dmg_log[4] ~= nill then hit4 = lm_dmg_log[4] else hit4 = 0 end
   auxbox_prop_line("Last Few Hits:", "")
   auxbox_prop_line(string.format("%4.f  %4.f  %4.f  %4.f", hit4, hit3, hit2, hit1))
end


function auxbox_lm_last4dmgt()
   local hit1, hit2, hit3, hit4
   if lm_dmgt_log[1] ~= nill then hit1 = lm_dmgt_log[1] else hit1 = 0 end
   if lm_dmgt_log[2] ~= nill then hit2 = lm_dmgt_log[2] else hit2 = 0 end
   if lm_dmgt_log[3] ~= nill then hit3 = lm_dmgt_log[3] else hit3 = 0 end
   if lm_dmgt_log[4] ~= nill then hit4 = lm_dmgt_log[4] else hit4 = 0 end
   auxbox_prop_line("Last 4 hits taken:")
   auxbox_prop_line(string.format("%4.f  %4.f  %4.f  %4.f", hit4, hit3, hit2, hit1))
end


function auxbox_lm_kills()
   auxbox_prop_line("Total Kills :", string.format("%d", lm_kill_count))
end


function auxbox_lm_xp_gained()
   auxbox_prop_line("Total XP    :", string.format("%d", lm_xp_gained))
end


function auxbox_lm_xppm()
   if lm_hunt_time == 0 then
      auxbox_prop_line("Total XP/min:", string.format("%d", 0))
   else
      auxbox_prop_line("Total XP/min:", string.format("%d", lm_xp_gained / lm_hunt_time * 60))
   end
end 


function auxbox_lm_last4xp()
   local kill1, kill2, kill3, kill4
   if lm_xp_log[1] ~= nill then kill1 = lm_xp_log[1] else kill1 = 0 end
   if lm_xp_log[2] ~= nill then kill2 = lm_xp_log[2] else kill2 = 0 end
   if lm_xp_log[3] ~= nill then kill3 = lm_xp_log[3] else kill3 = 0 end
   if lm_xp_log[4] ~= nill then kill4 = lm_xp_log[4] else kill4 = 0 end
   auxbox_prop_line("Last 4 kills:")
   auxbox_prop_line(string.format("%4.f  %4.f  %4.f  %4.f", kill4, kill3, kill2, kill1))
end


function auxbox_xp()
   if me.xp >= req_xp[1000] then
   current_level = 1000
   else
      for i = 1,999 do -- getting current player level based on array 
         if req_xp[i] <= me.xp and req_xp[i + 1] > me.xp then
            current_level = i
            break
         end
      end
   end
   if current_level <= 1000 then
      local xptolvl_float = ((me.xp - req_xp[current_level]))/(req_xp[current_level+1]-req_xp[current_level]) -- % needed for next level
      local lvl_float = current_level + me.remort_level * 75 + xptolvl_float -- combines actual lvl with the % needed for next lvl
      -- checks if player leveled or remorted
      if xptolvl_float >= 1 or xptolvl_float < 0 then
         for i = 1,999 do
            if req_xp[i] <= me.xp and req_xp[i + 1] > me.xp then
               current_level = i
               break
            end
         end
      end
      local xptolvl = req_xp[current_level+1] - me.xp
        auxbox_prop_line("Level" ,string.format("%f",lvl_float))
      auxbox_prop_line("Current XP", string.format("%d", me.xp))
      auxbox_prop_line("Before Level", string.format("%d", xptolvl))
   end
end


function auxbox_strdex()
   local strpct = (me:get_str()/(me:get_str()+me:get_dex())*100)
   local dexpct = (me:get_dex()/(me:get_str()+me:get_dex())*100)
   auxbox_prop_line("Str : Dex", string.format("%.2f : %.2f",strpct,dexpct))
end


function Items_Left()
   auxbox_prop_line("Items Left")
   auxbox_prop_line("Mega Yellows :        ", items:get_qty_basecode(363))
   auxbox_prop_line("Other Yellows:--------", items:get_qty_basecode(260))
   auxbox_prop_line("Purple Pots  :        ", items:get_qty_basecode(360))
   auxbox_prop_line("Omelettes    :--------", items:get_qty_basecode(1380))
   auxbox_prop_line("Dragon Rats  :        ", items:get_qty_basecode(1399))
   auxbox_prop_line("Greater      :--------", items:get_qty_basecode(12))
   auxbox_prop_line("Protect      :        ", items:get_qty_basecode(1297))
   auxbox_prop_line("Sanct Lor    :--------", items:get_qty(make_code(286,0,0,18)))
   auxbox_prop_line("Kal Ort Por  :        ", items:get_qty(make_code(286,0,0,13)))
   auxbox_prop_line("Town Portal  :--------", items:get_qty_basecode(293))
   auxbox_prop_line("Bandages     :        ", items:get_qty_basecode(375))
   auxbox_prop_line("Empty Flasks :--------", items:get_qty_basecode(335))
   auxbox_prop_line("Blank Scroll :        ", items:get_qty_basecode(1053))
   auxbox_prop_line("Beverages    :--------", items:get_qty_basecode(205))
   -- auxbox_prop_line("Mega Blue Potions:", items:get_qty_basecode(364))
   -- auxbox_prop_line("Blue Potions:", items:get_qty_basecode(261))
   -- auxbox_prop_line("Brown Potions:", items:get_qty_basecode(358))
   -- auxbox_prop_line("Khaki Potions:", items:get_qty_basecode(380))
   -- auxbox_prop_line("White Potions:", items:get_qty_basecode(354))
   -- auxbox_prop_line("Cyan Potions:", items:get_qty_basecode(356))
   -- auxbox_prop_line("Orange Potions:", items:get_qty_basecode(355))
   -- auxbox_prop_line("Scroll of Health:", items:get_qty_basecode(1298))
   -- auxbox_prop_line("Black Potions:", items:get_qty_basecode(352))
   -- auxbox_prop_line("Arrows:", items:get_qty_basecode(296))
   -- auxbox_prop_line("Bullets:", items:get_qty_basecode(1294))
   -- auxbox_prop_line("Soul Shards:", items:get_qty_basecode(1283))
   -- auxbox_prop_line("Clear Potions :", items:get_qty_basecode(359))
   -- auxbox_prop_line("Lime Potions:", items:get_qty_basecode(357))
   -- auxbox_prop_line("Green Potions:", items:get_qty_basecode(353))
   -- auxbox_prop_line("Black Potions:", items:get_qty_basecode(352))
   -- auxbox_prop_line("Black Pearl:", items:get_qty_basecode(326))
   -- auxbox_prop_line("Garlic :", items:get_qty_basecode(328))
   -- auxbox_prop_line("Ginseng :", items:get_qty_basecode(329))
   -- auxbox_prop_line("Nightshade:", items:get_qty_basecode(331))
    -- auxbox_prop_line("Refined Scroll Health:", items:get_qty_basecode(323))
    -- auxbox_prop_line("Uncurse Scroll", items:get_qty_basecode(315))
   -- auxbox_prop_line("Unweld Scroll", items:get_qty_basecode(314))
   -- auxbox_prop_line("Grappling Hook", items:get_qty_basecode(313))
   -- auxbox_prop_line("Red Potion", items:get_qty_basecode(263))
end


function auxbox_lm_dynamic_instance_reset()
   if cmap:get_level() ~= me.map_level and cmap:get_level() >= 0 then
      if lm_instance_list[cmap:get_level()] ~= nil then
         lm_parentmap = lm_instance_list[cmap:get_level()]
      else lm_parentmap = cmap:get_level()
      end
      lm_tempmap = me.map_level
      lm_instance_visited = 1
      lm_instance_exit = os.time()
   end 
   if cmap:get_level() == me.map_level and lm_instance_visited == 1 then
      lm_instance_visited = 0  
      lm_instancemap_log[lm_parentmap] = lm_instance_exit
   end
   local lm_instance_reset = 0
   for i, v in pairs(lm_instancemap_log) do
      lm_instance_reset = 600 - (os.time() - v) 
      local m = math.floor(lm_instance_reset / 60)
      local s = math.floor((lm_instance_reset / 60 - m) * 60) 
      auxbox_prop_line(string.format("%s resets in",i),string.format("%02.f:%02.f", m, s))     
      if lm_instance_reset <= 0 then
         lm_instancemap_log[i] = nil
      end
   end
end

-- Bound Item Quantities(modified to show basecodes)  - Duncan (PD) / Zen (Reg) / Brentoboy (forums)
function auxbox_bound_item_basecodes()
   local item
   local name
   for i = 1, 50 do   
      item = me.item_binds[i]
      name = wl:get_full_name(item)  
      if item and not wl:is_tool(item) and name ~= "NOTHING" then   
         auxbox_prop_line(name, get_base_code(item))
      end
   end
end
User avatar
Keighn
Stop posting already --;
Posts: 5509
Joined: Sat Jun 26, 2004 10:13 am
Location: Hey.... pssttt Back in Orgeon

Re: Auxbox XP

Post by Keighn »

So... yeah not working with 1ks
Post Reply