LUA腳本隊長補魔30點、整理包包 GA0310可用

jeff10363

(同步發至妖城論壇)

最近回妖城又開始研究魔力=""= 之前不熟LUA 完全不敢碰

這幾天摸索了一下，到處爬文....拼命看GA函數庫
把內置戰鬥結束祝福腳本做了一些修改
高手就勿噴了><~~

一開始登出就失效不知道為啥...現在算可以運作了

測試 20160310 GA 可以運行

0_1460484574266_未命名777.jpg

目前成品=>
1.組滿5人時隊長會有補魔30點 (尚未增加戰鬥型態判定)
2.可以下開關指令不要聽到提示
3.可以整理包包

下方亂碼處是GBK变量，因為GA沒有出BIG5版但是我還是盡量繁體化
所以GBK变量必須要維持系統看的懂

////
另外我想請問一下>< 有哪個語法可以攔截講話的內容讓他執行LUA後攔截不要顯示出來

例如 /私聊某某某你好嗎四周的人都看的到這句話很奇怪

我想要輸入 /partoff 遊戲畫面不會顯示出來......../partoff

////

tbl_partPlayer = {};--建立函數
local part_on_key = "組隊提示開啟"; --開啟提示
local part_off_key = "組隊提示關閉"; --關閉提示

Delegate.RegDelLoginEvent("NewbieBlessLoginEvent");--登入事件
Delegate.RegDelAllOutEvent("NewbieBlessOutEvent");--登出事件
Delegate.RegDelDropEvent("NewbieBlessDropEvent");--掉線事件

Delegate.RegDelBattleOverEvent("NewbieBless_BattleOver"); --戰鬥事件
Delegate.RegDelTalkEvent("NewbieBlessTalkEvent");--說話事件

function new_NewbieBlessplayerobject(player)
local NewbieBlessplayer =
{
index = player;
isopen = true;
};
return NewbieBlessplayer;
end;

--角色登入
function NewbieBlessLoginEvent(player)
tbl_partPlayer[Playerkey(player)] = new_NewbieBlessplayerobject(player);
end;
--角色登出
function NewbieBlessOutEvent(player)
tbl_partPlayer[Playerkey(player)] = nil;
end;
--角色掉線
function NewbieBlessDropEvent(player)
tbl_partPlayer[Playerkey(player)] = nil;
end;

function NewbieBlessTalkEvent(player,msg)

    if(msg=="組隊提示開啟" or msg=="開啟組隊提示" or msg=="/parton") then
            NLG.SystemMessage(player,"組隊獎勵提示已經開啟。");
            tbl_partPlayer[Playerkey(player)].isopen = true;


    elseif(msg=="組隊提示關閉" or msg=="開啟組隊關閉" or msg=="/partoff") then
            NLG.SystemMessage(player,"組隊獎勵提示已經關閉。");
            tbl_partPlayer[Playerkey(player)].isopen = false;


    elseif(msg=="整理包包" or msg=="整理" or msg=="/item" and player ~= -1) then
            NLG.SystemMessage(player,"包包已經整理。");
           NLG.SortItem(player);
    return 0


    end;

end;

function NewbieBless_BattleOver(_battle,_BattleIndex,player)
local player = Battle.GetPlayer(_battle,0);

    if(player == -1) then

    return 0


    elseif(Char.PartyNum(Battle.GetPlayer(_battle,0)) >= 5) then

-- local player = Battle.GetPlayer(_battle,0);
Char.SetData(player,%勤砓_藹%,Char.GetData(player,%勤砓_藹%)+30);

                    if(tbl_partPlayer[Playerkey(player)].isopen == true)then
                    NLG.SystemMessage(player,"[隊長獎勵]"..Char.GetData(player,%勤砓_靡趼%).."回復了30點魔力");
                    end;

                    end;

end;

LUA腳本 隊長補魔30點、整理包包 GA0310可用 正在浏览

LUA腳本隊長補魔30點、整理包包 GA0310可用正在浏览