分享一个练级给予奖励的lua

kissinger

还不如到级别直接给奖励

xiaosan628

感谢分享哈

a110549

379911235 发表于 2023-6-14 16:18
不行 一点NPC就退游戏

看看报错是什么，数据库文件导入了吗？

a110549

kissinger 发表于 2023-6-15 13:48
还不如到级别直接给奖励

做这个是区分直升80的玩家和练级的玩家

kissinger

a110549 发表于 2023-6-21 09:20
做这个是区分直升80的玩家和练级的玩家

一样可以区分啊,注册升级的钩子内判定等级就行,直接升级就跳过了前面奖励.

18丝

kissinger 发表于 2023-6-15 13:48
还不如到级别直接给奖励

有没有这种呢？

kissinger

18丝 发表于 2023-7-12 02:34
有没有这种呢？

类似这样,需要奖励的级别从低到高,每级别完成用return跳过后面判断

local function shengji(event, player, Level)
        player:CastSpell(player, 26636, true)        --艾露恩的蜡烛
        player:CastSpell(player, 26298, true)                --烟花发射器
        RandomYanHua = math.random(1, 6) + 26332
        player:CastSpell(player, RandomYanHua, true)        --随机6种烟花庆祝
        local newlv        = Level + 1   --升级后的等级
        if player:GetItemByEntry(DoubleRequire) and player:GetItemByEntry(DoubleRequire):IsEquipped() then
                player:SendBroadcastMessage("恭喜你升级了，装备变身法袍奖励5倍经验但没有升级金币")       
        else
                player:ModifyMoney(200*newlv)
                player:SendBroadcastMessage("恭喜你升级了，奖励当前等级2%的金币")
        end
        if newlv == 20 then               
                player:LearnSpell(33388)        --学会坐骑
                player:LearnSpell(10790)        --送1只60速度的老虎
                if not player:IsGM() then       
                        SendWorldMessage("|cFFFF0000[系统公告]|r恭喜"..GetPlayerInfo(player).."升到"..newlv.."级，注意到宠物栏领取坐骑...")
                end
                return
        end

        if (newlv == 70) then
                if not player:IsGM() then
                        SendWorldMessage("|cFFFF0000[系统公告]|r恭喜"..GetPlayerInfo(player).."满级！")       
                        player:SendBroadcastMessage("送你部分英雄本钥匙和基础装备，记得去邮箱内领取！")
                end

                --player:ModifyMoney(100000)
                if player:IsAlliance() then
                        player:AddItem(30622,1)          --焰铸钥匙 联盟
                else
                        player:AddItem(30637,1)          --焰铸钥匙 部落
                end
                player:AddItem(30623,1)                 --水库钥匙
                player:AddItem(30633,1)                --奥金尼钥匙
                player:AddItem(30634,1)                --星船钥匙
                player:AddItem(30635,1)                --时光之钥
                if (player:GetClass() == 1) then                  --战士
                        SendMail("满级奖励","请收下您的满级奖励！",player:GetGUIDLow(),0,61,0,0,0,29011,1)
                        --SendMail("满级奖励","请收下您的满级奖励！",player:GetGUIDLow(),0,61,0,0,0,29012,1)
                        SendMail("满级奖励","请收下您的满级奖励！",player:GetGUIDLow(),0,61,0,0,0,29015,1)
                        --SendMail("满级奖励","请收下您的满级奖励！",player:GetGUIDLow(),0,61,0,0,0,29016,1)
                        SendMail("满级奖励","请收下您的满级奖励！",player:GetGUIDLow(),0,61,0,0,0,29017,1)
                        return               
                end

        end

        if ((newlv % 10) == 0) and (not player:IsGM()) and player:GetGuildName()==nil then
                SendWorldMessage("|cFFFF0000[系统公告]|r恭喜"..GetPlayerInfo(player).."升到"..newlv.."级！萌新么么哒还没有工会...")
        end
end  

--PLAYER_EVENT_ON_LevelUp
RegisterPlayerEvent(13, shengji)                 --升级               

18丝

kissinger 发表于 2023-7-12 09:46
类似这样,需要奖励的级别从低到高,每级别完成用return跳过后面判断

local function shengji(event, play ...

我买了一个 发现 没效果 不会改 尴尬了，兄弟你发这个能直接使用嘛

kissinger

18丝 发表于 2023-7-12 13:38
我买了一个 发现 没效果 不会改 尴尬了，兄弟你发这个能直接使用嘛

GetPlayerInfo(player) 有依赖函数,这部分要加入前面


local DoubleRequire = 38310

local TEAM_ALLIANCE = 0
local TEAM_HORDE = 1

local ClassName = 1
local Classcolor = 2

local ClassInfo={--职业表
        [1]        = {"战士", "FFC79C6E"},
        [2]        = {"骑士", "FFF58CBA"},
        [3]        = {"猎人", "FFABD473"},
        [4]        = {"盗贼", "FFFFF569"},
        [5]        = {"牧师", "FFFFFFFF"},
        [6] = {"死骑", "FFC41F3B"},
        [7]        = {"萨满", "FF0070DE"},
        [8]        = {"法师", "FF69CCF0"},
        [9]        = {"术士", "FF9482C9"},
        [11]= {"小德", "FFFF7d0A"},
}

local function GetPlayerInfo(player)--得到玩家信息
        local Pclass        = ClassInfo[player:GetClass()][ClassName] or "? ? ?"                 --得到职业
        local Pcolor        = ClassInfo[player:GetClass()][Classcolor] or "FF00FF00"        --职业颜色
        local Pname                = player:GetName()
        local Pteam                = ""
        local team = player:GetTeam()
        if(team == TEAM_ALLIANCE)then
                Pteam                = "|cFF0070d0联盟|r"
        elseif(team == TEAM_HORDE)then
                Pteam                = "|cFFF000A0部落|r"
        end
        return string.format("%s%s[|c%s|Hplayer:%s|h%s|h|r]",Pteam,Pclass,Pcolor,Pname,Pname)
end

18丝

kissinger 发表于 2023-7-12 13:42
GetPlayerInfo(player) 有依赖函数,这部分要加入前面

兄弟 你这个可以直接用！厉害了，比我买的都合适，非常感谢啊，就复制粘贴就行了。你编辑一下 收几DKP 我去点