发新话题
打印

[提问] 求助一个弄了好久没弄出来的效果

求助一个弄了好久没弄出来的效果

复制内容到剪贴板
代码:
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的方式触发失败,至今没解决,希望知道的帮忙解决下啊。截图在我另一个帖子有发过的。

TOP

回复 阁楼 的帖子

剛想想 因該是寫的順序 跟對象錯亂  我讀到後面已經分不出哪個參數是哪個參數bbs.mocwww.com' [6 m  g& B% ^: X/ s* F
本來想說可以用 全域變數驗證 可是我在上班 沒辦法測試XD
  i; T& q1 o2 {0 o4 B魔力私服,最新魔力宝贝私服技术交流—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# J7 v; e: K  t. C0 J5 |( D/ e* q
你看這樣 可不可以
* ~$ M1 J, w3 |+ n% D, a9 g% a* t—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
- U0 A- n2 _2 x4 K魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表大概看一下,不能實際測試=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 编辑 ]

TOP

这种需要加一个临时表来存储( a5 U0 n& Z: a

+ ~% d% b: Y" @1 `" }妖城在线论坛否则Char.JoinParty(CharIndex,_tome);函数会反复触发组队事件。
妖城欢迎您!

TOP

复制内容到剪贴板
代码:
--组队事件
--_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
妖城欢迎您!

TOP

这样就可以了。新建立一个NPC,用来触发弹窗事件。魔力私服,最新魔力宝贝私服技术交流) x" ~7 u: R' x2 @
bbs.mocwww.com. r5 J- L) |4 q& @
然后加一个临时表,用来缓存对象实例
妖城欢迎您!

TOP

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

TOP

我昨天在完善踢人的那個LUA="""=  跟你一樣的情況
' d, q# V7 o0 o6 l# {bbs.mocwww.com& Y7 \/ a7 @) P; v4 B
結果發現 你每多一個確認框  
/ I" ?7 s! k6 R2 l) l魔力私服,最新魔力宝贝私服技术交流所以你就要多一個判斷 是不是 跟一開始的人相同
! N) l( e# C! k2 N- E2 C—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! q/ W8 k5 s( g' W
不然在確認界面 "還沒按下 按鈕前" 會有一堆變數 一堆可能性 會產生BUG
, l  i. {3 B/ p% y; c9 X$ o妖城在线论坛
" D& n% @6 ~; S魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表越多視窗 越多判斷-..-

TOP

随便写的,没怎么测试。。
- G8 }; d6 c$ d1 S% |魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
; D8 z. r( f5 p! u9 G) _- k( L7 X妖城在线论坛试试看吧,架构还是你之前的,我只是做出来效果而已。bbs.mocwww.com+ T( x' E$ H* {; D

  U# {+ Y" L, X; 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
酱油师师范..

有事找请联系QQ:296050842,注明来意.

TOP

数据要一层一层的传递,如通过 _seqno 来判断。。
9 V' v. L4 }. C& R4 t魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
$ v5 {% \/ y7 B6 x$ Rbbs.mocwww.com很多种方式的,完全看你怎么来做。
9 U) W; m  K* n$ A) s魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
) x3 b( U1 X6 Z, }3 l妖城在线论坛框架多并不代表一定会出现BUG,还是看实现思路。
7 A0 ?# g4 D' M5 V7 Q" T  g( D—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート妖城在线论坛. \7 U) ]) E+ @+ M
引用:
原帖由 jeff10363 于 2016-4-29 13:16 发表
1 I$ G5 I* U0 a魔力私服,最新魔力宝贝私服技术交流我昨天在完善踢人的那個LUA="""=  跟你一樣的情況妖城在线论坛) ?+ O" A$ U9 r* W1 J7 c$ v

+ A: i# y2 e  N8 h# Hbbs.mocwww.com結果發現 你每多一個確認框  
( i8 q0 F8 z" K; f5 s( G: U所以你就要多一個判斷 是不是 跟一開始的人相同妖城在线论坛, L- p: P% N% e" W3 D
妖城在线论坛" C8 m4 w  v3 e8 }5 Q
不然在確認界面 "還沒按下 按鈕前" 會有一堆變數 一堆可能性 會產生BUG魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表+ {5 d- w& q/ y% n4 q2 F3 ^
妖城在线论坛% W" z! p' l3 b3 Z. a* Z1 q
越多 ...
酱油师师范..

有事找请联系QQ:296050842,注明来意.

TOP

利用 WindowBuffer, 在tagChar_player_work里& B9 O; B! m! J9 m% _, W( i
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート+ m, _# r. \, Z) ]
魔力默认也是采用的WindowBuffer来缓存临时数据。魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, j" d9 X; @% k5 q& t
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' `$ V& E& \# B9 E
引用:
原帖由 易凡 于 2016-4-28 13:44 发表
5 F1 d) D1 l4 K/ u- b% ?- H4 L; o—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート这样就可以了。新建立一个NPC,用来触发弹窗事件。
9 @2 u# L5 r2 D魔力私服,最新魔力宝贝私服技术交流
/ K& B- c( |  y. W- j* @8 d) _) Kbbs.mocwww.com然后加一个临时表,用来缓存对象实例
酱油师师范..

有事找请联系QQ:296050842,注明来意.

TOP

引用:
原帖由 ﹎▓ヾ僤莼べ 于 2016-4-29 22:43 发表
) E2 h+ b1 V9 @6 E# Z$ C利用 WindowBuffer, 在tagChar_player_work里
( y( ^/ G6 [! n妖城在线论坛魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表5 Z0 H9 q% f; m; U' \7 L% T" d
魔力默认也是采用的WindowBuffer来缓存临时数据。
4 m! V$ O; ?) c. b魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
% O) `6 Z' }6 {; g) |+ fbbs.mocwww.com
bbs.mocwww.com; K, {) I" i% V
魔力默认也是采用的WindowBuffer来缓存临时数据?你真逗,缓冲寄存器就缓冲寄存器嘛
* u' |! Q7 w. u& E/ L1 I( G8 S妖城在线论坛魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& S0 e- ?1 ]( J1 i7 K2 y
[ 本帖最后由 HookSend 于 2016-4-30 11:51 编辑 ]

TOP

魔力本身确实用WindowBuffer缓存的
3 N! C! [: K' Q- d' O魔力私服,最新魔力宝贝私服技术交流
' Y8 d9 Y7 {! B! ]1 ~4 A妖城在线论坛我台服引擎那边,lua的所有选择宠物和道具的位置缓存也都用这个。
" V+ t* n: t+ @! e4 f# ~: D妖城在线论坛
/ V% n: A1 J0 v, u( ^# T1 ]8 s+ I魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表星夜说的并无错。。。。。。
! `' L9 w& \0 ^9 ?# C魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ N$ d+ e3 U# B/ @- @  g' k, s
好好沟通交流。。。。不要太暴躁。。。
妖城欢迎您!

TOP

发新话题