Zemekkys now correctly takes the money he is given, and the amount has been reduced to 100

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

game/modules/tome/data/chats/zemekkys.lua

@@ -25,12 +25,14 @@ local function remove_materials(npc, player)
 	local athame_o, athame_item, athame_inven_id = player:findInAllInventories("Blood-Runed Athame")
 	player:removeObject(athame_inven_id, athame_item, true)
 	athame_o:removed()
+
+	player:incMoney(-100)
 end
 
 local function check_materials(npc, player)
 	local gem_o, gem_item, gem_inven_id = player:findInAllInventories("Resonating Diamond")
 	local athame_o, athame_item, athame_inven_id = player:findInAllInventories("Blood-Runed Athame")
-	return gem_o and athame_o and player.money >= 200
+	return gem_o and athame_o and player.money >= 100
 end
 
 -----------------------------------------------------------------