improve money in arena

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

game/modules/tome/class/generator/actor/Arena.lua

@@ -207,6 +207,7 @@ _M.bosses = {
 	finish = function ()
 		local Chat = require "engine.Chat"
 		local chat = Chat.new("arena", {name="Victory!!"}, game.player)
+		game.player:incMoney(35)
 		chat:invoke("ryal-defeat")
 	end
 	},
@@ -220,6 +221,7 @@ _M.bosses = {
 	finish = function ()
 		local Chat = require "engine.Chat"
 		local chat = Chat.new("arena", {name="Victory!!"}, game.player)
+		game.player:incMoney(50)
 		chat:invoke("fryjia-defeat")
 	end
 	},
@@ -233,7 +235,9 @@ _M.bosses = {
 	finish = function ()
 		local Chat = require "engine.Chat"
 		local chat = Chat.new("arena", {name="Victory!!"}, game.player)
+		game.player:incMoney(70)
 		chat:invoke("riala-defeat")
+
 	end
 	},
 	{ name = "ARENA_BOSS_VALFREN", display = "Valfren the Rampage", chat = "arena_boss_valfren",
@@ -250,6 +254,7 @@ _M.bosses = {
 		game.level.map:setObscure(1*0.6, 1*0.6, 1*0.6, 1)
 		local Chat = require "engine.Chat"
 		local chat = Chat.new("arena", {name="Victory!!"}, game.player)
+		game.player:incMoney(90)
 		chat:invoke("valfren-defeat")
 	end
 	},
@@ -333,7 +338,7 @@ function _M:generateMiniboss(e)
 			self.on_added  = nil
 		end
 		if m.on_die then m.on_die_orig = m.on_die end
-		m.on_die = function (self)
+z		m.on_die = function (self)
 			if self.on_die_orig then self.on_die_orig(self) end
 			game.level.arena.danger = game.level.arena.danger - self.arenaPower
 			game.level.arena.bonus = game.level.arena.bonus + self.arenaScore

game/modules/tome/data/general/stores/basic.lua

@@ -509,7 +509,7 @@ newEntity{
 	name = "gladiator's wares",
 	display = '*', colors=colors.BLACK,
 	store = {
-		purse = 100,
+		purse = 1,
 		nb_fill = 64,
 		empty_before_restock = false,
 		filters = {
@@ -542,6 +542,8 @@ newEntity{
 			{type="charm", subtype="totem", id=true, tome_drops="boss"},
 			{type="charm", subtype="wand", id=true, tome_drops="boss"},
 			{type="scroll", subtype="infusion", id=true},
+			{type="scroll", subtype="infusion", id=true},
+			{type="scroll", subtype="rune", id=true},
 			{type="scroll", subtype="rune", id=true},
 			{type="jewelry", id=true, tome_drops="store"},
 			{type="jewelry", id=true, tome_drops="boss"},

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

@@ -397,6 +397,7 @@ return {
 				local expAward = (dangerBonus + scoreBonus + clearBonus + rankBonus) * game.level.arena.bonusMultiplier
 				local x, y = game.level.map:getTileToScreen(game.player.x, game.player.y)
 				game.player:gainExp(expAward)
+				game.player:incMoney(scoreBonus)
 				game.level.arena.score = game.level.arena.score + game.level.arena.bonus
 				game.flyers:add(x, y, 90, 0, -1, "Round Clear! +"..expAward.." EXP!", { 2, 57, 185 }, true)
 				game.log(col.."Wave clear!")