采用ABLUA写简单的石器NPC用于重叠战斗

2019-11-06 10:48 石器战报 石器

重叠事件的LUA貌似没有写过,战斗类活动最常用,给大家一个简单的例子。

C
--NPC重叠事件函数(NPC索引, 玩家索引)function Overlap(meindex, toindex)
	--创建战斗接口(接触索引,被接触索引, 战斗怪物数组)
	battleindex = battle.CreateVsEnemy(toindex, meindex, enemytable)end--创建NPC函数
function Create(name, metamo, floorid, x, y, dir)
	index = npc.CreateNpc(name, metamo, floorid, x, y, dir)
	if char.check(index) == 1 then		--让NPC拥有重叠事件。		char.setFunctionPointer(index, "重叠事件", "Overlap", "")
	end
end

function data()
	--这里定义下怪物数组(数组内有10个怪物ID可以设定,-1表示不出现)
	enemytable = {1610, 1609, 1611, 1612, -1, -1, -1, -1, -1, -1}end

function main()
	data()
	Create("石器", 100000, 2000, 50, 50, 6)end