LUA海天龙八部视频技术教程 第三集 :实战修改脚本内容制作一个调式工具

第三集:
视频联系雪舞获取
2023-10-17 12:23:01 视频被bilibili和谐了,联系Q784055837获取

完整笔记下载:
笔记实战修改脚本内容制作一个调式工具.7z (96.11 KB, 下载次数: 5, 售价: 2 金币)

2023-10-11 22:29 上传

点击文件名下载附件

完整笔记预览:
LuaGM.lua

--**********************************
-- 一个简单的调试工具
-- Lua海论坛bbs.luahai.com
--**********************************
-- 脚本号
x990000_g_ScriptId = 990000
--**********************************
--事件列表
--**********************************
function x990000_UpdateEventList( sceneId, selfId,targetId )
        BeginEvent(sceneId)
                AddText( sceneId, "    欢迎来到《Lu海天龙》游戏世界，我是Lua海使者段誉！" )
                --
                AddNumText( sceneId, x181000_g_scriptId, "人物等级+5", 1, 100)
                AddNumText( sceneId, x181000_g_scriptId, "人物等级-5", 1, 101)
                AddNumText( sceneId, x181000_g_scriptId, "增加元宝", 1, 102)
                AddNumText( sceneId, x181000_g_scriptId, "增加赠点", 1, 103)
                AddNumText( sceneId, x181000_g_scriptId, "增加经验", 1, 104)
                AddNumText( sceneId, x181000_g_scriptId, "技能冷却：游刃有余", 1, 105)
                AddNumText( sceneId, x181000_g_scriptId, "快捷清理", 1, 106)
        EndEvent(sceneId)
        DispatchEventList(sceneId,selfId,targetId)
end
--**********************************
--事件列表选中一项
--**********************************
function x990000_OnEventRequest( sceneId, selfId, targetId, eventId )

        local Key = GetNumText()
        
        if Key == 100 then
                local Leve = GetLevel( sceneId, selfId)
                SetLevel( sceneId, selfId, Leve+5)
                --x990000_NotifyTip( sceneId, selfId, "有反应"..Leve )
        end

        if Key == 101 then
                local Leve = GetLevel( sceneId, selfId)
                SetLevel( sceneId, selfId, Leve-5)
                --x990000_NotifyTip( sceneId, selfId, "有反应"..Leve )
        end

        if Key == 102 then
                local YBSL = YuanBao(sceneId,selfId,targetId,3)
                YuanBao(sceneId,selfId,targetId,1,YBSL+1000000)
                x990000_NotifyTip( sceneId, selfId, "恭喜你，增加元宝成功！" )
                LuaFnSendSpecificImpactToUnit(sceneId, selfId, selfId, selfId, 49,100 )
        end

        if Key == 103 then
                local ZDSL = ZengDian(sceneId,selfId,targetId,3)
                ZengDian(sceneId,selfId,targetId,1,ZDSL+1000000)
                x990000_NotifyTip( sceneId, selfId, "恭喜你，增加元宝成功！" )
                LuaFnSendSpecificImpactToUnit(sceneId, selfId, selfId, selfId, 49,100 )
        end

        if Key == 104 then
                AddExp(sceneId,selfId,5000000)
                x990000_NotifyTip( sceneId, selfId, "恭喜你，增加元宝成功！" )
                LuaFnSendSpecificImpactToUnit(sceneId, selfId, selfId, selfId, 49,100 )
        end

        if Key == 105 then
                LuaFnSendSpecificImpactToUnit(sceneId, selfId, selfId, selfId, 1330,100 )
                LuaFnSendSpecificImpactToUnit(sceneId, selfId, selfId, selfId, 49,100 )
                x990000_NotifyTip( sceneId, selfId, "技能冷却清空完毕。" )
        end

        if Key == 106 then
                BeginEvent(sceneId)
                        AddText( sceneId, "    欢迎来到《Lu海天龙》游戏世界，我是Lua海使者段誉！" )
                        AddNumText( sceneId, x181000_g_scriptId, "清理道具栏", 1, 888)
                        AddNumText( sceneId, x181000_g_scriptId, "清理材料栏", 1, 999)
                EndEvent(sceneId)
                DispatchEventList(sceneId,selfId,targetId)
        end
        --清理道具栏
        if Key == 888 then
                for i =0,29 do --0-29 = 从第0个格子数到0,29的中间正好是道具栏。
                        LuaFnEraseItem(sceneId,selfId,i)
                end
                LuaFnSendSpecificImpactToUnit(sceneId, selfId, selfId, selfId, 49,100 )
                x990000_NotifyTip( sceneId, selfId, "清理完毕。" )                
        end
        --清理材料栏
        if Key == 999 then
                for i =30,59 do --30-59 = 从第0个格子数到30,59的中间正好是材料栏。
                        LuaFnEraseItem(sceneId,selfId,i)
                end
                LuaFnSendSpecificImpactToUnit(sceneId, selfId, selfId, selfId, 49,100 )
                x990000_NotifyTip( sceneId, selfId, "清理完毕。" )                
        end
        
end
--**********************************
--事件交互入口
--**********************************
function x990000_OnDefaultEvent( sceneId, selfId,targetId )
        x990000_UpdateEventList( sceneId, selfId, targetId )
end
--**********************************
-- 屏幕中间信息提示
--**********************************
function x990000_NotifyTip( sceneId, selfId, Msg )
        BeginEvent( sceneId )
                AddText( sceneId, Msg )
        EndEvent( sceneId )
        DispatchMissionTips( sceneId, selfId )
end

第二课笔记.txt

前言：
课程由Lua论坛独家出品，非营利性，请勿购买上当受骗。
Lua海论坛地址：bbs.luahai.com
----------------------------------------------------------
初级教程目录
第二课：实战修改脚本内容制作一个调式工具
Buff文件：StandardImpact
文件位置：tlbb/Server/Config
函数
YuanBao(sceneId,selfId,targetId,1,10000)
ZengDian(sceneId,selfId,targetId,1,10000)
AddMoney
CostMoney
AddExp
GetExp
GetLevel
SetLevel
LuaFnSendSpecificImpactToUnit(sceneId, playerId, playerId, playerId, xx, 100 )
新增一条
LuaFnEraseItem  删除道具

录制x掉了，已经在脚本了加入了快速清空道具栏和材料栏的写法，可以参考，已留备注。