tweaked exp chart, later levels should be easier to gain

Ardhungol is no more fully lited and rememberd
Stats max is now 60/80


git-svn-id: http://svn.net-core.org/repos/t-engine4@820 51575b47-30f0-44d4-a5cc-537603b46e54

game/modules/tome/data/zones/ardhungol/zone.lua

@@ -22,11 +22,11 @@ return {
 	level_range = {25, 30},
 	level_scheme = "player",
 	max_level = 5,
---	decay = {300, 800},
+	decay = {300, 800},
 	actor_adjust_level = function(zone, level, e) return zone.base_level + e:getRankLevelAdjust() + level.level-1 + rng.range(-1,2) end,
 	width = 70, height = 70,
-	all_remembered = true,
-	all_lited = true,
+--	all_remembered = true,
+--	all_lited = true,
 	persistant = "zone",
 	-- Apply a greenish tint to all the map
 	color_shown = {0.3, 1, 0.5, 1},

game/modules/tome/dialogs/LevelupStatsDialog.lua

@@ -67,10 +67,10 @@ function _M:incStat(v)
 			self:simplePopup("Stat is at the maximum for your level", "You can not increase this stat further until next level!")
 			return
 		end
---		if self.actor:isStatMax(self.sel) or self.actor:getStat(self.sel) >= 60 then
---			self:simplePopup("Stat is at the maximum", "You can not increase this stat further!")
---			return
---		end
+		if self.actor:isStatMax(self.sel) or self.actor:getStat(self.sel) >= 60 then
+			self:simplePopup("Stat is at the maximum", "You can not increase this stat further!")
+			return
+		end
 	else
 		if self.actor_dup:getStat(self.sel, nil, nil, true) == self.actor:getStat(self.sel, nil, nil, true) then
 			self:simplePopup("Impossible", "You cannot take out more points!")

game/modules/tome/load.lua

@@ -90,6 +90,27 @@ ActorStats:defineStat("Luck",		"lck", 50, 1, 100, "Luck defines your character's
 
 -- Actor leveling, player is restricted to 50 but npcs can go higher
 ActorLevel:defineMaxLevel(nil)
+ActorLevel.exp_chart = function(level)
+	local exp = 10
+	local mult = 8
+	local min = 2
+	for i = 2, level do
+		exp = exp + level * mult
+		mult = util.bound(mult - 0.5, min, mult)
+	end
+	return math.ceil(exp)
+end
+--[[
+local tnb, tznb = 0, 0
+for i = 2, 50 do
+	local nb = math.ceil(ActorLevel.exp_chart(i) / i)
+	local znb = math.ceil(nb/25)
+	tnb = tnb + nb
+	tznb = tznb + znb
+	print("level", i, "::", ActorLevel.exp_chart(i), "must kill", nb, "actors of same level; which is about ", znb, "zone levels")
+end
+print("total", tnb, "::", tznb)
+]]
 
 -- Factions
 dofile("/data/factions.lua")