召唤队友lua 自行修改

ss88ss88

--[[
功能:在对话框输入"#召唤 角色名"召唤小伙伴到身边帮助战斗



                                                                                                                       
]]               

--注册事件
Delegate.RegDelTalkEvent("summonTalkEvent");
--初始化
Delegate.RegInit("summonObj_Init");

local _toPlayer
local _player

--主函数
function summonTalkEvent(player, msg, color, range, size)
       
        local toSumUser
        local toSumCdKey
        local username=Char.GetData(player,%对象_名字%);

        if (check_msg(msg, "#召唤")) then               
                -- 非战斗状态下
                if (Char.GetData(player, %对象_战斗状态%) ~= 0) then
                        NLG.SystemMessage(player, "请在非战斗状态下执行该操作!!")
                        return;
                end

                --是否存在物品拓展预留
               
                --地图屏蔽拓展预留

                --查询召唤对象信息
                local sql1
                local resset
                toSummonUser = string.sub(msg, 7);
                sql1="select CdKey from tbl_character c where c.Name='"..toSummonUser.."'"
                resset = SQL.Run(sql1)
                if(type(resset)=="table") then--如果返回结果是table类型的值
                        toSumCdKey=resset["0_0"]
                        _toPlayer=NLG.FindUser(toSumCdKey)
                else
                        NLG.SystemMessage(player, "用户不存在或不在线!!")
                        return
                end
               
                --判断对象是否战斗中
                if (Char.GetData(_toPlayer, %对象_战斗状态%) ~= 0) then
                        NLG.SystemMessage(player, "对方正在战斗中,不能召唤!!")
                        return;
                end
               
                --判断对象是否在队伍中
                if (Char.GetData(_toPlayer, %对象_组队模式%) ~= 0) then
                        NLG.SystemMessage(player, "对方正在其他队伍中,不能召唤!!")
                        return;
                end
                               
                --判断对象等级拓展预留
               
                --向召唤对象弹出确认框
                _player=player
                local Msg = NLG.c("\\n!!!"..username.."正在对你使用大召唤术!!!\\n!!!是否接受!!!")               
                NLG.ShowWindowTalked( _toPlayer, summonNPC , %窗口_选择框%, %按钮_是否%, 10086, Msg);
    end       
end
Summon.rar (1.46 KB, 下载次数: 0)

2019-11-13 07:31 上传

点击文件名下载附件
1

草狼lz

该lua慎用，比如一个玩家站在百人那里，就可以无限召唤其他小伙伴来领奖。转载的话，最好还是标注一下原作者比较好。该lua在妖城论坛可以直接下载，地址：http://bbs.mocwww.com/viewthread ... hlight=%D5%D9%BB%BD

草狼lz

--[[
功能:在对话框输入"#召唤 角色名"召唤小伙伴到身边帮助战斗

我的第一个脚本，感谢Duckyの復活的指点，GMSV_Lua讨论QQ群14583019

                                                                                                                        by 很美味的橙子                
]]               

以上为原版信息，内容一个字都没改。

ss88ss88

那我是不是要给你们放一些我自己做的,问题有些人值得我放出来才行,

草狼lz

ss88ss88 发表于 2019-11-14 23:46
那我是不是要给你们放一些我自己做的,问题有些人值得我放出来才行,

是不是自己做的无所谓，尊重一下原作者，删除人家作者再发布就没意思了吧

草狼lz

反正我也不稀罕你发啥玩意，爱发不发，真是理直气壮