石器LUA战后事件

今天给大家讲解一下ABLUA里的战后事件，这里的战后时间仅针对和NPC战斗的战后事件。

先看一下下列代码：

function Talked(meindex, talkerindex , szMes, color )
	if npc.isFaceToFace(meindex, talkerindex) == 1 then 
lssproto.windows(talkerindex, "对话框", "确定|取消", 1, char.getWorkInt( meindex, "对象"), "是否要进行神奇的战后事件测试？")
	end
end
function WindowTalked ( meindex, talkerindex, seqno, select, data)
	if npc.isFaceToFace(meindex, talkerindex) == 1 then 
if select == 1 then
	        bosstable = {1610, -1, -1, -1, -1, -1, -1, -1, -1, -1}
battleindex = battle.CreateVsEnemy(talkerindex, meindex, bosstable)
end
	end
end--和NPC战斗结束事件(NPC索引， 战斗索引，胜负)function BattleOver(meindex, battleindex, iswin)
--iswin表示NPC的输赢，1为NPC输了，0为NPC赢里		if iswin == 1 then			--从0到4循环开始需要搜索位置			for i=0, 4 do
--这里玩家索引是通过战斗库的getCharOne来获取上方或者下方的索引				--battle.getCharOne中0表示下方，1则表示上方，i则表示位置数值范围0~4
charaindex = battle.getCharOne(battleindex, i, 0)
--检查索引是否存在				if char.check(charaindex) == 1 then					--这里就可以增加任意代码了，比如让赢的玩家随机得到一件物品					--做一个奖励的数组。
itemid = {21000,21002,21003}
--定义一个随机值
r = math.random(1, table.getn(itemid))
--得到物品(当道具栏满的时则无法得到)
char.Additem(charaindex, itemid[r])
--系统提示			        char.TalkToCli(charaindex, -1, "恭喜获得"..item.getNameFromNumber(itemid[r]), "青色")
end
end
end
end
function Create(name, metamo, floorid, x, y, dir)
	index = npc.CreateNpc(name, metamo, floorid, x, y, dir)
	if char.check(index) == 1 then		char.setFunctionPointer(index, "对话事件", "Talked", "")
char.setFunctionPointer(index, "窗口事件", "WindowTalked", "")
char.setFunctionPointer(index, "战后事件", "BattleOver", "")
	end
end
function main()
	Create("神奇战后事件", 100000, 2000, 50, 50, 4)end

我们重点看function BattleOver(meindex, battleindex, iswin)这个函数，代码中已经做了注释，相信很好理解。

在战后事件可以发挥自己的想象，增加道具，增加各种货币，或者再增加新的NPC等。