搜索
LUA

LUA

本版块未设置版块简介!请后台版块编辑添加。
  •  帖子: 115
  •  讨论: 115
  •  关注: 0

skillitem.lua--技能道具

GP 发表于 2025-5-10 03:13:00 | 显示全部楼层 |阅读模式
215 0
local skillgold = 5000 --支付费用
local skilltab = {}
--skilltab [itemid] = skillid  道具对应的技能编号
skilltab[50275] = 67 -- 洁净魔法
skilltab[50276] = 61 -- 补血魔法
skilltab[50277] = 62 -- 强力补血魔法
skilltab[50278] = 64 -- 恢复魔法
skilltab[50279] = 65 -- 强力恢复魔法
skilltab[50280] = 96 -- 暗杀
skilltab[51061] = 66 -- 超强恢复魔法
skilltab[51062] = 63 -- 超强补血魔法
skilltab[79651] = 72 -- 偷窃
skilltab[79652] = 94 -- 混乱攻击
skilltab[79653] = 44 -- 超强中毒魔法
skilltab[79654] = 45 -- 超强昏睡魔法
skilltab[79655] = 46 -- 超强石化魔法
skilltab[79656] = 47 -- 超强酒醉魔法
skilltab[79657] = 48 -- 超强混乱魔法
skilltab[79658] = 49 -- 超强遗忘魔法

Global_Reg.RegItemUseEvent ("skill_item");--创建一个所有玩家双击道具栏物品就会触发的Lua函数。

function skill_item(player, Itemindex)
        local itemid = Item.GetData(Itemindex, %道具_ID%);
--                                NLG.SystemMessage(player,"双击有效,itemid="..itemid..",类型="..type(itemid)..",")
        if skilltab[itemid] then
                local gold = Char.GetData(player,53)--判断魔币
                if gold >= skillgold then --若魔币够
                        local a = Char.addSkill(player, skilltab[itemid])--添加技能函数
                        if  a >= 0 then--a>0 为成功
                                        Char.SetData(player,53,gold-skillgold)
                                        NLG.DelItem(player, itemid, 1)
                                        NLG.UpChar(player)
                                        NLG.SystemMessage(player,"学习技能成功,扣取"..skillgold.."魔币")
                        elseif(a == -1)then --失败
                                NLG.SystemMessage(player,"学习失败");
                                return 1
                        elseif(a == -2)then --已学过
                                NLG.SystemMessage(player,"学习失败,此技能已学习过");
                                return 1
                        elseif(a == -3)then --技能栏不足
                                NLG.SystemMessage(player,"学习失败,技能栏不足");
                                return 1
                        elseif(a == -4)then --职业不能学习
                                NLG.SystemMessage(player,"学习失败,此职业不能学习此技能");
                                return 1
                        end
                else
                        NLG.SystemMessage(player,"学习失败,学习该技能需要"..skillgold.."魔币") --不够魔币
                        return 1
                end
        end
        return 0--通过
end

回复

使用道具 举报

全部评论

暂无评论,期待您打破宁静

TA的帖子
相关帖子
  • admin 2025-5-12

    宠物魔法技能陨石魔法Ⅰ: 教导人宠物技能店的蒙普学习费用500 学习地点法兰城旅馆(10 ...

  • admin 2025-5-12

    状态攻击技能毒性攻击Ⅰ 教导人宠物技能店的恰姆学习费用150 学习地点芙蕾雅圣拉鲁卡 ...

  • admin 2025-5-12

    抗毒性Ⅰ 教导人宠物技能店的恰姆学习费用100 学习地点芙蕾雅圣拉鲁卡村,赛谢利亚酒 ...

  • admin 2025-5-12

    宠物座骑技能人宠合击ATK: 教导人辛巴学习费用5000 学习地点雪拉威森塔83楼(281.107) ...

  • admin 2025-5-12

    起始地点法兰城的竞技场的贝贝(34.36)头目战╳ 必要条件---必要等级Lv1 职业限定---建 ...

  • admin 2025-5-12

    1.与里谢里雅堡的H1N1防疫宣传员(28,77)说话,取得"防疫小口罩"。 图例物品名称等级种 ...

  • admin 2025-5-12

    魅惑的哈密瓜无取得宠物「哈密瓜公主」╳╳○ 起始地点魔法大学头目战╳ 必要条件--- ...

  • admin 2025-5-12

    起始地点法兰城的里谢里雅堡头目战○ 必要条件---必要等级--- 职业限定---建议等级--- ...

  • admin 2025-5-12

    起始地点法兰城的里谢里雅堡头目战○ 必要条件---必要等级--- 职业限定---建议等级--- ...

  • admin 2025-5-12

    起始地点法兰城的冒险者旅馆头目战○ 必要条件---必要等级--- 职业限定---建议等级LV8 ...

发布 联系QQ