
标题: [提问] 求助一个弄了好久没弄出来的效果 [打印本页]
作者: orochi0531 时间: 2016-4-28 09:58 标题: 求助一个弄了好久没弄出来的效果
复制内容到剪贴板
代码:
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 时间: 2016-4-28 10:30 标题: 回复 阁楼 的帖子
剛想想 因該是寫的順序 跟對象錯亂 我讀到後面已經分不出哪個參數是哪個參數—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, X- q4 G# f4 _( g& \
本來想說可以用 全域變數驗證 可是我在上班 沒辦法測試XD魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表7 q: c# C. L$ S# J! J
$ Y9 ` T5 P/ P8 F2 @
你看這樣 可不可以魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" u) C* m) I7 I+ {2 o4 U% G: p( K
' a+ v- a) h) {6 H% A魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,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 编辑 ]
作者: 易凡 时间: 2016-4-28 13:23
这种需要加一个临时表来存储魔力私服,最新魔力宝贝私服技术交流! a6 Z8 ^5 p: H8 e& \0 m
o! H0 {2 \- p魔力私服,最新魔力宝贝私服技术交流否则Char.JoinParty(CharIndex,_tome);函数会反复触发组队事件。
作者: 易凡 时间: 2016-4-28 13:43
复制内容到剪贴板
代码:
--组队事件
--_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
作者: 易凡 时间: 2016-4-28 13:44
这样就可以了。新建立一个NPC,用来触发弹窗事件。/ P4 {' e: Z& k+ ]6 r9 z
& V( @' V8 b) a1 [9 u妖城在线论坛然后加一个临时表,用来缓存对象实例
作者: orochi0531 时间: 2016-4-29 11:12
测试了下,组队部分弹出对话框后,队长这边没点同意的情况下,这个队长点别人组队的话,会直接组进去
作者: jeff10363 时间: 2016-4-29 13:16
我昨天在完善踢人的那個LUA="""= 跟你一樣的情況
7 Q' I/ w% R) _+ A1 w7 C/ R2 W魔力私服,最新魔力宝贝私服技术交流—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# @) k6 H7 A, b
結果發現 你每多一個確認框
# p A" ?- }# \# Q4 c4 u0 K. E魔力私服,最新魔力宝贝私服技术交流所以你就要多一個判斷 是不是 跟一開始的人相同
+ N* h0 h! f$ s" w. D: g—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
3 q& k2 d U$ e3 K$ p魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表不然在確認界面 "還沒按下 按鈕前" 會有一堆變數 一堆可能性 會產生BUG2 m: h; A+ w. Q% F7 e
S1 [( D$ u3 ~越多視窗 越多判斷-..-
作者: ﹎▓ヾ僤莼べ 时间: 2016-4-29 22:39
随便写的,没怎么测试。。
; ?! k+ q) }1 U' Y妖城在线论坛
' g4 H3 ^6 Z, g/ j6 M5 C7 g2 [试试看吧,架构还是你之前的,我只是做出来效果而已。bbs.mocwww.com4 ~' V2 d! g2 z) O! n9 @% S' c4 [( Q/ a
魔力私服,最新魔力宝贝私服技术交流% E1 j( P$ q) h3 s
另外,我不建议在人物身上挂任何的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
作者: ﹎▓ヾ僤莼べ 时间: 2016-4-29 22:41
数据要一层一层的传递,如通过 _seqno 来判断。。
' Y9 G& ?( J6 I8 b) q妖城在线论坛
6 k# Z5 c2 E8 `; {很多种方式的,完全看你怎么来做。魔力私服,最新魔力宝贝私服技术交流+ g3 C6 K* Z8 J/ X) u
bbs.mocwww.com* x {7 p. ]! @5 Q' W
框架多并不代表一定会出现BUG,还是看实现思路。bbs.mocwww.com& V& g4 Z8 e8 @" C: f+ m
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表; x' @1 [0 V% l8 x引用:
原帖由 jeff10363 于 2016-4-29 13:16 发表
魔力私服,最新魔力宝贝私服技术交流 h& d9 U7 |5 F" s8 [
我昨天在完善踢人的那個LUA="""= 跟你一樣的情況魔力私服,最新魔力宝贝私服技术交流! U8 N6 ]! \4 \ C4 r
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% P0 j2 K2 t3 @# q$ s' T; Q! T: A
結果發現 你每多一個確認框 5 D5 q4 g# W+ o9 x8 }3 @
所以你就要多一個判斷 是不是 跟一開始的人相同妖城在线论坛0 R) j& N8 ^, O, d. S( u; O' Q9 s
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ _4 ]0 G: L3 p' T, B6 D# P. L; M
不然在確認界面 "還沒按下 按鈕前" 會有一堆變數 一堆可能性 會產生BUG
$ s) }* Z* ~& F3 g) _8 U妖城在线论坛: ]% V3 c. f7 H( E) v r& e
越多 ...
作者: ﹎▓ヾ僤莼べ 时间: 2016-4-29 22:43
利用 WindowBuffer, 在tagChar_player_work里
$ x7 @( m+ C. c! k! z2 G" _# h8 C—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. D) c# e& _& f' O- T. U3 p y" P
魔力默认也是采用的WindowBuffer来缓存临时数据。
; ^8 Q! W% O3 k7 R! ^3 X9 n: Ibbs.mocwww.com
3 M4 @6 @6 Z7 V+ d gbbs.mocwww.com引用:
原帖由 易凡 于 2016-4-28 13:44 发表
魔力私服,最新魔力宝贝私服技术交流/ U7 r7 Z" u! E Z! L1 p3 Q9 m
这样就可以了。新建立一个NPC,用来触发弹窗事件。魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ {( j+ j5 U8 }& o/ k
+ _+ j0 f- y- f" N+ `+ Nbbs.mocwww.com然后加一个临时表,用来缓存对象实例
作者: nijiechao 时间: 2016-4-29 22:55
引用:
原帖由 ﹎▓ヾ僤莼べ 于 2016-4-29 22:43 发表
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート8 K9 S" A- F' S1 E b! {
利用 WindowBuffer, 在tagChar_player_work里—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# W4 w: o" z8 z5 o- @
bbs.mocwww.com% o* E# I; b( u! l% p* t
魔力默认也是采用的WindowBuffer来缓存临时数据。
2 o: ^2 d" Y/ Y S" `3 o. G魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
6 y" \; F% P" @. e: j. U/ [
7 D& Q; e6 s8 k5 J魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表魔力默认也是采用的WindowBuffer来缓存临时数据?你真逗,缓冲寄存器就缓冲寄存器嘛
. k8 a. [9 j5 V3 O1 t
9 z( R4 K& ^/ ~: K[ 本帖最后由 HookSend 于 2016-4-30 11:51 编辑 ]
作者: 易凡 时间: 2016-4-29 23:44
魔力本身确实用WindowBuffer缓存的—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート7 `3 e: G7 H. a" \9 H
8 b4 W+ W5 r* N4 c% z2 o) B' n
我台服引擎那边,lua的所有选择宠物和道具的位置缓存也都用这个。
; A A9 S- ~) D) j" A魔力私服,最新魔力宝贝私服技术交流
0 t7 h+ V) W! M7 X- h$ h星夜说的并无错。。。。。。魔力私服,最新魔力宝贝私服技术交流9 x/ o9 t3 K! D7 s
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 h# K, C0 d) o
好好沟通交流。。。。不要太暴躁。。。
欢迎光临 妖城在线论坛 (http://bbs.mocwww.com/) |
Powered by Discuz! 6.0.0 |