用ABLUA写一个宠物锁

2019-11-06 10:17:33 石器战报 zdoo

直接看代码即可,注释都有,主要功能就是让宠物绑定再身上防止被盗,虽然很鸡肋。

C
function petlock(itemindex, charaindex, toindex, haveitemindex)
	--循环开始0~4为宠物栏位置1-5
	for i = 0, 4 do
		--toindex设定为宠物索引,这里是获取人物身上宠物的全部索引		if toindex == char.getCharPet(charaindex, i) then			--检查身上第(i+1)个位置宠物是否存在			if char.check(toindex) == 1 then				--取宠物的名字
				petname = char.getChar(toindex, "名字")
				--系统提示,为何要把提示放在前面是因为宠物上锁是要给名字加*符号,提示是会提示名字的				--如果放在后面,则会把*符号显示出来				char.TalkToCli(charaindex, -1, "成功为" .. char.getChar(toindex, "名字") .. "上锁!", "黄色")
				--把带有*符号和名字一起重新写入到名字里				char.setChar(toindex, "名字", "*"..petname)
				--更新客户端的字符显示,即更新宠物名字,让客户端显示修改后的名字				char.sendStatusString(charaindex, "K" .. i)
				--删除该道具,当然如果你不需要删除可屏蔽这句话				char.DelItem(charaindex, haveitemindex)
				--这里返回是必须的,如果不进行返回,系统会直接提示到下面的话				return
			end
		end
	end	char.TalkToCli(charaindex, -1, "该物品只能给宠物使用!", "红色")end



function main()
	item.addLUAListFunction( "ITEM_PETLOCK", "petlock", "")end


最近发表
友情链接
标签列表