orochi0531

复制内容到剪贴板

代码:

NL.RegPartyEvent(nil,"MyPartyEvent");
--Delegate.RegInit("Mypart_Init");

function MyPartyEvent(CharIndex, TargetCharIndex, Type)
        Char.SetWindowTalkedEvent(nil, "MypartM_WindowTalked", CharIndex);
        if(Type==0)then
                local msg = "\\n\\n"..Char.GetData(CharIndex,%对象_名字%).." 申请加入您的队伍。\\n\\n是否同意其入队申请呢？\\n\\n同意入队请选择『是』，拒绝入队请选择『否』。\\n"
                local addpartymsg = NLG.ShowWindowTalked(TargetCharIndex,CharIndex,%窗口_信息框%,%按钮_是否%,1,msg);
                --MypartM_sg(Mypart_index, TargetCharIndex);
                --MypartM_WindowTalked(CharIndex, TargetCharIndex,1,%按钮_否%,msg);
                return 0;
        end
        return 1;
end


-- function MypartM_sg(_NpcIndex,_PlayerIndex)


                -- local msg = "\\n\\n"..Char.GetData(_PlayerIndex,%对象_名字%).." 申请加入您的队伍。\\n\\n是否同意其入队申请呢？\\n\\n同意入队请选择『是』，拒绝入队请选择『否』。\\n"
                -- local addpartymsg = NLG.ShowWindowTalked(_PlayerIndex,_NpcIndex,%窗口_信息框%,%按钮_是否%,1,msg);
                -- return;
-- end


function MypartM_WindowTalked(_me,_tome,_seqno,_select,_data)
        --NLG.SystemMessage(_me,_select);
        if(tonumber(_seqno)==1 and tonumber(_select)==%按钮_否% and _data~="")then
                NLG.SystemMessage(_me,"队长拒绝了您的入队申请！");
                return;
        end
        --Char.JoinParty(_me,_tome);

        return;
end

-- function initmypart_Init(index)
        -- return 1;
-- end

-- function Mypart_create()
        -- if (Mypart_index == nil) then
                -- Mypart_index = NL.CreateNpc(nil, "initmypart_Init");
                -- Char.SetData(Mypart_index,%对象_形象%,10414);
                -- Char.SetData(Mypart_index,%对象_原形%,10414);
                -- Char.SetData(Mypart_index,%对象_X%,18);
                -- Char.SetData(Mypart_index,%对象_Y%,1);
                -- Char.SetData(Mypart_index,%对象_地图%,777);
                -- Char.SetData(Mypart_index,%对象_方向%,4);
                -- Char.SetData(Mypart_index,%对象_名字%,"组队离队NPC");
                -- NLG.UpChar(Mypart_index);
                ----Char.SetTalkedEvent(nil, "MypartM_sg", Mypart_index);
                -- Char.SetWindowTalkedEvent(nil, "MypartM_WindowTalked", Mypart_index);
        -- end
-- end
-- function Mypart_Init()
        -- Mypart_create();
       
-- end

就是点组队后，队长会弹出是否同意组队的对话框，但是，我弄了好久没解决如何触发队长的选择，用npc的方式触发失败，至今没解决，希望知道的帮忙解决下啊。截图在我另一个帖子有发过的。

jeff10363

剛想想 因該是寫的順序 跟對象錯亂  我讀到後面已經分不出哪個參數是哪個參數
5 [2 T! {! A/ u2 n& E# c. X本來想說可以用 全域變數驗證 可是我在上班 沒辦法測試XD
! v1 g! n6 B+ r魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表妖城在线论坛6 b+ ^  Y" U* U& o  ^' W
你看這樣 可不可以妖城在线论坛0 o" y: e. q& _6 K3 [  o2 u$ G
魔力私服,最新魔力宝贝私服技术交流1 z. V6 {& P# K
大概看一下，不能實際測試=A=

复制内容到剪贴板

代码:

---產生組隊處發    自己  對方  自己鍵值



function MyPartyEvent(CharIndex, TargetCharIndex, Type)

--如果自己傳達 +入組隊
        if(Type==0)then


--讓對方執行NPC窗口
----------------NPC窗口 (NPC本體,觸發者)
                MypartM_sg(Mypart_index,TargetCharIndex);
                return 0;
        end
        return 1;
end



--NPC窗口   抓出NPC本身.觸發者  這邊觸發者 變成 被要求組隊的那個人
function MypartM_sg(_NpcIndex,_PlayerIndex)

                local msg = "\\n\\n"..Char.GetData(CharIndex,%对象_名字%).." 申请加入您的队伍。\\n\\n是否同意其入队申请呢？\\n\\n同意入队请选择『是』，拒绝入队请选择『否』。\\n"


                NLG.ShowWindowTalked(_PlayerIndex,_NpcIndex,%窗口_信息框%,%按钮_是否%,1,msg);

end




--NPC AI行為模式  (_NpcIndex,_PlayerIndex,_SeqNo,_Select,_data)



--這裡怪怪的~~~ _me 因該為NPC本身吧,   CharIndex為最初觸發者 要求組隊的人 不知道可不可傳達到這裡

function MypartM_WindowTalked(_me,_tome,_seqno,_select,_data)

--窗口
        if(tonumber(_seqno)==1 and tonumber(_select)==%按钮_否% and _data~="")then
                --NLG.SystemMessage(_me,"队长拒绝了您的入队申请！"); <--對象好像不正確

                NLG.SystemMessage(CharIndex,"队长拒绝了您的入队申请！");--CharIndex
                return;
        end


        Char.JoinParty(CharIndex,_tome);

        return;
end

[ 本帖最后由 jeff10363 于 2016-4-28 11:00 编辑 ]

易凡

这种需要加一个临时表来存储
9 d: O3 D7 J) W/ j$ ^魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
" @. m, Q* w) s1 N& z魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表否则Char.JoinParty(CharIndex,_tome);函数会反复触发组队事件。

易凡

复制内容到剪贴板

代码:

--组队事件
--_player：主动组队的玩家
--_toplayer：被组队的玩家
--_type：0:加入组队，1:离开组队

tbl_party_check = {};

function RPartyEvent(_player,_toplayer,_type)
        if (tbl_party_check[Char.GetData(_player,%对象_账号%)] ~= nil) then
                if (tbl_party_check[Char.GetData(_player,%对象_账号%)] == _toplayer) then
                        tbl_party_check[Char.GetData(_player,%对象_账号%)] = nil;
                        return 1;
                end
        end
        if (_type==0) then
                local msg = "\\n\\n"..Char.GetData(_player,%对象_名字%).." 申请加入您的队伍。\\n\\n是否同意其入队申请呢？\\n\\n同意入队请选择『是』，拒绝入队请选择『否』。\\n";
                tbl_party_check[Char.GetData(_toplayer,%对象_账号%)] = _player;
                NLG.ShowWindowTalked(_toplayer,tbl_npc["id69"],%窗口_信息框%,%按钮_是否%,1,msg);
                return 0;
        end
        return 1;
end

复制内容到剪贴板

代码:

--测试——TestNpc_id69——Lua脚本
function TestNpc_id69_Talked(_npc,_player)
        return;
end

function TestNpc_id69_WTalked(_npc,_player,_seqno,_select,_data)
        local _checkplayer = tbl_party_check[Char.GetData(_player,%对象_账号%)];
        if (tonumber(_seqno)==1) then
                if (tonumber(_select) == %按钮_是%) then
                        tbl_party_check[Char.GetData(_checkplayer,%对象_账号%)] = _player;
                        Char.JoinParty(_checkplayer,_player);
                else
                        NLG.SystemMessage(_checkplayer,"队长拒绝了你的组队申请");
                end
                return;
        end
        return;
end

易凡

这样就可以了。新建立一个NPC，用来触发弹窗事件。
% r, t+ x3 G$ |9 B; M. B  }" q魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表bbs.mocwww.com3 x6 d( K- P# F; F
然后加一个临时表，用来缓存对象实例

orochi0531

测试了下，组队部分弹出对话框后，队长这边没点同意的情况下，这个队长点别人组队的话，会直接组进去

jeff10363

我昨天在完善踢人的那個LUA="""=  跟你一樣的情況魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表% i1 a% ?3 t0 H) i1 c& W  o

! I" m! h% d& R& ]結果發現 你每多一個確認框  + t, ~" g2 O" K! }/ y" V
所以你就要多一個判斷 是不是 跟一開始的人相同
# i( `3 B9 w! ^: M- u—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表- o; X0 T: W0 L( R
不然在確認界面 "還沒按下 按鈕前" 會有一堆變數 一堆可能性 會產生BUG
- Z. n. D& `8 W* y4 n* o8 {魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 t( A) n) k( f% N: u* `* C$ b
越多視窗 越多判斷-..-

﹎▓ヾ僤莼べ

随便写的，没怎么测试。。魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( ]# _3 |3 Y8 X; s( |

9 x# H( I9 c6 A! B# i2 [+ ?—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート试试看吧，架构还是你之前的，我只是做出来效果而已。bbs.mocwww.com1 }/ m  _3 m) U- r3 ~, M

2 o9 c! e3 t# K; d—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート另外，我不建议在人物身上挂任何的callback..(如loop,会跟宠邮的loop产生冲突)

复制内容到剪贴板

代码:

NL.RegPartyEvent(nil,"OnPlayerJoinParty");
Delegate.RegInit("PartyManager_Init");

function OnPlayerJoinParty( _index, _target, _type)
    if _type == 0 then
                local ConfirmMessage = "\\n\\n"..Char.GetData(_index, 2000).." 申请加入您的队伍。\\n\\n是否同意其入队申请呢？\\n\\n同意入队请选择『是』，拒绝入队请选择『否』。\\n"
                if NLG.ShowWindowTalked( _target, m_PartyManager, 0, 12, _index, ConfirmMessage) < 0 then
                        return 1;        --异常处理机制(如果没法给队长发送消息..)
                end
                return 0;
    end
    return 1;
end

function OnPartyManagerWindowTalked( _me, _tome, _seqno, _select, _data)
        if not _seqno then        --索引异常(一般不会出现)
                return;
        end

        local PartyMode = Char.GetData( _tome, 386); --%对象_组队模式%
        if PartyMode > 1 then        --组队状态异常( 0 is none, 1 is leader)
                return;
        end
               
        if( _select == 8) then
                NLG.SystemMessage( _seqno,"队长拒绝了您的入队申请！");
        else
                Char.JoinParty( _seqno, _tome);
        end
       
        return;
end

function PartyManager_Init()
    if (m_PartyManager == nil) then
                m_PartyManager = NormalCreate( 0, 99, 33, 777, 4, "PartManager");
                if( VaildChar(m_PartyManager) == true) then
                        Char.SetWindowTalkedEvent(nil, "OnPartyManagerWindowTalked", m_PartyManager);
                end
        end
end

﹎▓ヾ僤莼べ

数据要一层一层的传递，如通过 _seqno 来判断。。% X7 W& V7 S6 e

/ E# n8 H8 d$ Kbbs.mocwww.com很多种方式的，完全看你怎么来做。魔力私服,最新魔力宝贝私服技术交流( Z7 D) p1 E* h+ H
& F5 R! W4 W" J  L( Q; v6 I! e
框架多并不代表一定会出现BUG，还是看实现思路。
& u3 u' O: n3 \0 M  F1 f妖城在线论坛9 X/ R1 f# b4 D! s" U! K

引用:

原帖由 jeff10363 于 2016-4-29 13:16 发表
% @3 U2 N8 ^! u1 `6 W5 m$ b—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート我昨天在完善踢人的那個LUA="""=  跟你一樣的情況
- q# t+ d$ X  X. z# u2 n/ V& D魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
' D" x3 W* p5 q( Z, i2 [bbs.mocwww.com結果發現 你每多一個確認框  bbs.mocwww.com# i% `' J* X. V' i$ A
所以你就要多一個判斷 是不是 跟一開始的人相同魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 |8 U" w% @2 a: @: q
, u/ u: B& i% k5 S' _9 u+ R9 H
不然在確認界面 "還沒按下 按鈕前" 會有一堆變數 一堆可能性 會產生BUG
9 ]$ x, K9 ^! e) v8 L+ S1 D魔力私服,最新魔力宝贝私服技术交流
% M0 i& E8 C& a- D: Y8 Dbbs.mocwww.com越多 ...

﹎▓ヾ僤莼べ

利用 WindowBuffer, 在tagChar_player_work里' Q: J; N( t. K9 O! i
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, n( Z& k* J0 y
魔力默认也是采用的WindowBuffer来缓存临时数据。
! R# o5 D; T; I3 m1 ^! _! R
( H) H& @9 o, |' Y4 r/ Hbbs.mocwww.com

引用:

原帖由 易凡 于 2016-4-28 13:44 发表
& R6 m! X8 |* O& j) U—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート这样就可以了。新建立一个NPC，用来触发弹窗事件。bbs.mocwww.com6 Z' O$ C3 v4 U$ m) \

: {% R1 P0 {1 _- a2 T" Z; F1 V魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表然后加一个临时表，用来缓存对象实例

nijiechao

引用:

原帖由 ﹎▓ヾ僤莼べ 于 2016-4-29 22:43 发表
' t. W7 h0 I9 c! S( t魔力私服,最新魔力宝贝私服技术交流利用 WindowBuffer, 在tagChar_player_work里
. ~5 G+ s- y6 P妖城在线论坛妖城在线论坛( u5 K6 g; ]: f; u8 E: e
魔力默认也是采用的WindowBuffer来缓存临时数据。
# k) D' m/ Y9 T+ c6 [, N* ?bbs.mocwww.com
; ?" k1 a/ ^2 X& k—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート

. M. T7 G5 [+ Y  M+ B) V魔力私服,最新魔力宝贝私服技术交流魔力默认也是采用的WindowBuffer来缓存临时数据？你真逗，缓冲寄存器就缓冲寄存器嘛魔力私服,最新魔力宝贝私服技术交流) }5 R8 b, e) Q; B4 \
9 I  f8 l. i- N: T
[ 本帖最后由 HookSend 于 2016-4-30 11:51 编辑 ]

易凡

魔力本身确实用WindowBuffer缓存的
: P. I/ C9 I  [5 T+ I妖城在线论坛bbs.mocwww.com) K; h8 c" G! ?
我台服引擎那边，lua的所有选择宠物和道具的位置缓存也都用这个。魔力私服,最新魔力宝贝私服技术交流; d9 ]  X  h" g1 F  o

; e+ j$ _; c: p7 p" |" W; g1 N魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表星夜说的并无错。。。。。。bbs.mocwww.com# z( j7 ^5 t/ s2 y, a0 o  Z

1 p, r, J7 T! d4 a, J0 Z# e+ xbbs.mocwww.com好好沟通交流。。。。不要太暴躁。。。