发新话题
打印

[魔力私服分享] 【Lua教程】GE宠物算档器Lua脚本详细解说(原始lua框架)

【Lua教程】GE宠物算档器Lua脚本详细解说(原始lua框架)

PetCalc.lua
复制内容到剪贴板
代码:
----------------------------------------------------------------------
--名称:宠物算档器
--说明:计算宠物档数,修改宠物档数等等
--
--GMSV Lua QQ群:14583019
--By Duckyの復活 (QQ:462363)
--In 2012.12.28
----------------------------------------------------------------------

function PetCalc_Init( _MeIndex )
        Char.SetData(_MeIndex, 1, 101020);
        Char.SetData(_MeIndex, 2, 101020);
        Char.SetData(_MeIndex, 3, 0);
        Char.SetData(_MeIndex, 4, 999);
        Char.SetData(_MeIndex, 5, 9);
        Char.SetData(_MeIndex, 6, 8);
        Char.SetData(_MeIndex, 7, 6);
        Char.SetData(_MeIndex, 2000, "会算档的大地鼠");

        if (Char.SetTalkedEvent(nil, "PetCalc_Talked", _MeIndex) < 0) then
                print("PetCalc_Talked 注册事件失败。");
                return false;
        end
        return true;
end

function PetCalc_Talked( _MeIndex, _PlayerIndex)
        local buf = PetCalc_ShowCalc(_PlayerIndex);
        NLG.ShowWindowTalked(_PlayerIndex, 0, 1, 0, buf, _MeIndex);
        return ;
end

function PetCalc_ShowCalc(_PlayerIndex)
        local buf = "\n          【宠物算档】\n\n";
        buf = buf .. "   名称  体力 力量 强度 敏捷 魔法 档"
        for i = 0, 4 do
                local PetIndex = Char.GetPetIndex(_PlayerIndex, i)
                if(PetIndex >=0) then
                        local buf1 = Char.GetData(PetIndex, %对像_原名%)
                        local buf2 = Pet.GetArtRank(PetIndex, %宠档_体成%) .. "/" .. Pet.FullArtRank(PetIndex, %宠档_体成%)
                        local buf3 = Pet.GetArtRank(PetIndex, %宠档_力成%) .. "/" .. Pet.FullArtRank(PetIndex, %宠档_力成%)
                        local buf4 = Pet.GetArtRank(PetIndex, %宠档_强成%) .. "/" .. Pet.FullArtRank(PetIndex, %宠档_强成%)
                        local buf5 = Pet.GetArtRank(PetIndex, %宠档_速成%) .. "/" .. Pet.FullArtRank(PetIndex, %宠档_速成%)
                        local buf6 = Pet.GetArtRank(PetIndex, %宠档_魔成%) .. "/" .. Pet.FullArtRank(PetIndex, %宠档_魔成%)
                        local buf7 = Pet.GetArtRank(PetIndex, %宠档_体成%) + Pet.GetArtRank(PetIndex, %宠档_力成%) +
                                Pet.GetArtRank(PetIndex, %宠档_强成%) + Pet.GetArtRank(PetIndex, %宠档_速成%) +
                                Pet.GetArtRank(PetIndex, %宠档_魔成%) - Pet.FullArtRank(PetIndex, %宠档_体成%) -
                                Pet.FullArtRank(PetIndex, %宠档_力成%) - Pet.FullArtRank(PetIndex, %宠档_强成%) -
                                Pet.FullArtRank(PetIndex, %宠档_速成%) -         Pet.FullArtRank(PetIndex, %宠档_魔成%)
                        buf = buf .. string.format("%12.12s",buf1) .. string.format("%6.6s",buf2) ..
                                string.format("%6.6s",buf3) .. string.format("%6.6s",buf4) ..
                                string.format("%6.6s",buf5) .. string.format("%6.6s",buf6) ..
                                string.format("%4.3s",buf7)
                else
                        buf = buf .. string.format("%12.12s","无宠物") .. "\n"
                end
        end
        return buf
end
[ 本帖最后由 Duckyの復活 于 2014-1-6 09:53 编辑 ]
已隐退,不搞任何魔力有关的项目,如有其它私服项目请联系!
答应过会把以前的脚本丢妖城,言出必行!

TOP

init.lua
复制内容到剪贴板
代码:
if (M_PetCalc_Ptr == nil) then
        M_PetCalc_Ptr = NL.CreateNpc("./data/lua/test/PetCalc.lua", "PetCalc_Init");
        NLG.UpChar(M_PetCalc_Ptr);
end
[ 本帖最后由 Duckyの復活 于 2014-1-6 08:38 编辑 ]

TOP

【脚本解说】
6 ]- X  p6 f, B—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
5 q0 q% _& A9 s% J& ]! c2 i: mif (M_PetCalc_Ptr == nil) then  --如果该NPC变量没有任何内容(没被创建),则开始执行以下语句
3 E; M: p& t( u/ E) Ebbs.mocwww.com        M_PetCalc_Ptr = NL.CreateNpc("./data/lua/test/PetCalc.lua", "PetCalc_Init");  --创建NPC,并设置对应的初始化函数—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' d2 h8 U+ Q5 C0 P* Y5 E9 F
        NLG.UpChar(M_PetCalc_Ptr);  --更新该NPC
$ K7 k3 O( H4 O+ l$ O: T—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートend  --if配套的结束语end
6 ~. o* H+ L- z/ u! W! ubbs.mocwww.com
8 p0 h4 B0 J' E; o妖城在线论坛cgex.so会在启动时自动加载init.lua这个文件,因此,在init.lua里加入上述语句,就能在服务器启动时自动创建NPC。
; E4 i8 ?2 S7 C妖城在线论坛
6 X" x9 W% x5 H# D0 p; e& i( `5 v【分解说明】魔力私服,最新魔力宝贝私服技术交流' r5 r$ J" M* ~3 t1 n
变量:一个具体数值、文本、函数,或者其他实体对象的存储空间。操作变量,就能直接对其实际的对象操作。
  n# ]) Q8 `  b! J- L% g—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
! Y5 d" M/ m& P( Cbbs.mocwww.comM_PetCalc_Ptr:这是一个全局变量,用于保存NPC的指针(每个NPC创建时都会分配一个指针),由于指针是一个不固定的数字,不好记忆,不便于操作,因此我们用了一个变量去存储它、代替它,往后只要看到这个变量,立马就只能这个就是算档NPC的指针了。
1 T9 k+ [# F# W" f% k1 m" k& D% J  ]! _8 [1 D8 ?
NL.CreateNpc:这是一个cgex的接口函数,意思是NL这个函数库下面的一个叫CreateNpc的接口函数,根据lua.chm白皮书的说明,此函数有2个参数,1为创建NPC时调用的lua文件,2为创建NPC时调用的函数(初始化函数)。魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" f3 y8 W9 M  I: F

3 k+ z. S  y: z' J. w  n魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表NLG.UpChar:这是刷新NPC的接口函数,通过lua创建、修改的NPC,并不能马上生效,必须通过NLG.UpChar接口,让服务器把新的NPC信息发送给玩家,这样玩家才能看到新的NPC,否则玩家看到的依然是修改前的模样(客户端没更新数据)。" h* ?$ K, W" f. V
1 V' u1 M/ _1 d8 }, [  a
【补充说明】
8 [% @" P1 ^  M; i& ]4 \% bbbs.mocwww.com变量:
" l8 y0 N/ T3 M/ F( x  I" T3 P—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート很多人对指针变量这一概念不清楚,我在这里详细说明一下。魔力私服,最新魔力宝贝私服技术交流1 w" `  ?" K1 E' k
变量,有点类似于给一个物体(对象)命名,是你为一个实际的东西取的一个便于记忆、便于操作的新名字。& Z! ~( ?6 F4 v
例如,你有一个朋友叫“张家明”,你给他起了一个外号叫“小明”,那么只要你一说“小明”,那么你的朋友都明白你说的是“张家明”,就算你忘记了那个朋友的全名,只记得他叫“小明”,大家也知道你说的是谁。4 f  f' Z& {/ y6 t* A! o: K9 Y
同理,你有一个算档NPC,它的指针为107,你设置了一个变量M_PetCalc_Ptr去存储它,那么就算你不知道算档NPC的指针是多少,只要你一说M_PetCalc_Ptr,系统就知道你所指的是算档NPC。
1 d" \" T6 j9 r& a/ p) d魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
  k( `) u! c  F1 p& N妖城在线论坛局部变量:—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  R) O1 q, K4 x5 \. L! A" t# Q
以刚才的“小明”为例,全中国那么多人的外号都叫“小明”,那你怎么区分?这时就需要区分变量的适用范围。妖城在线论坛6 M1 v, R1 R  W& t% Z" F
你就要跟这个小圈子里的朋友约定好,在这个小圈子内“小明”这个外号特指“张家明”,但是离开这个小圈子就不是了。魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ T* {/ L, O- s. n+ f
这种就是局部变量,只在特定的范围内有效,并且能在多个地方重复使用。
. ~1 u4 ^6 U2 I) j# u$ Z魔力私服,最新魔力宝贝私服技术交流
, P, V! A& p  dbbs.mocwww.com全局变量:bbs.mocwww.com& @6 i$ s- h; {. }, ~) i
全局变量,在整个服务器里通用(任何地方都能使用),不存在意义分歧的变量。! N* {9 d4 s+ }7 x: j
例如,“中国”这个简称,就是一个全局变量,必定是代表“中华人民共和国”,并且全国人民都知道,没有其他不同的含义,绝对不会混淆,绝对不会有意义分歧。
9 _! v9 i; ?4 y妖城在线论坛魔力私服,最新魔力宝贝私服技术交流' O9 R% C7 X7 a5 @" E4 g/ ~! d
[ 本帖最后由 Duckyの復活 于 2014-1-6 08:52 编辑 ]

TOP

function PetCalc_Init( _MeIndex )    --由系统传递过来的参数_MeIndex,标识此NPCbbs.mocwww.com& f8 b# r6 N- s) I
        Char.SetData(_MeIndex, %对像_形象%, 101020);        --设置NPC外形$ F8 h' ~" p7 G* r) u# k# O
        Char.SetData(_MeIndex, %对像_原形%, 101020);        --设置NPC外形
1 H! Z. X' f' H  G. \—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート        Char.SetData(_MeIndex, %对像_地图类型%, 0);        --设置NPC所在地图类型(普通地图为0)
/ E7 Z' j6 m# `5 u魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表        Char.SetData(_MeIndex, %对像_地图%, 999);        --设置NPC所在地图编号
2 x/ Q! I" K! f# y2 k" d9 _7 W        Char.SetData(_MeIndex, %对像_X%, 9);                        --设置NPC所在地图X坐标妖城在线论坛3 g5 R6 R! v" x/ `8 I, p
        Char.SetData(_MeIndex, %对像_Y%, 8);                        --设置NPC所在地图Y坐标魔力私服,最新魔力宝贝私服技术交流! o9 ]- W: v% U2 ~+ Y2 _" x
        Char.SetData(_MeIndex, %对像_方向%, 6);                --设置NPC方向,0为左上,1为上,2为右上,以此类推(顺时针旋转)妖城在线论坛3 @" g  o* B0 m7 e8 J- M+ c. B
        Char.SetData(_MeIndex, %对像_原名%, "会算档的大地鼠");                --设置NPC名称魔力私服,最新魔力宝贝私服技术交流3 F- v" Y4 Y8 }+ d# P+ x
        if (Char.SetTalkedEvent(nil, "PetCalc_Talked", _MeIndex) < 0) then                --注册NPC的TalkedEvent事件,并获取返回值,如果范围值小于0,则提示错误。bbs.mocwww.com- c* C5 a% s( b- o
                print("PetCalc_Talked 注册事件失败。");                        --注册失败时,发送一个后台信息
8 ^! l3 _- j  M5 n. Q                return false;
; K+ e% R7 e* d- B# t  G魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表        end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 I4 k1 U2 N& k7 v
        return true;
6 N5 n1 g1 p6 k魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表end
4 ^5 i. J% T2 s# I* \bbs.mocwww.combbs.mocwww.com! b+ x# S7 h0 R( X' ^) S
这一段是初始化NPC函数(就是在CreateNpc里面写的第二个参数"PetCalc_Init"),用于设置NPC的基本属性。bbs.mocwww.com! C6 h* U& L6 I
意思为把这个NPC设定为101020这个图档造型,并放置在0,999,9,8这个地图位置,将其命名为"会算档的大地鼠",最后给这个NPC设置一个TalkedEvent事件(对其说话就触发的事件)。魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  R& U5 G$ B- E; a& }" k# N
bbs.mocwww.com9 f. S+ n& V/ f; {2 K! `3 E8 B
【分解说明】魔力私服,最新魔力宝贝私服技术交流* K/ Y( G: t" \/ s
常量:一种特殊的变量,由系统提供,内容固定、不能修改。3 h& r, R5 B7 D4 U6 S
        用于方便用户记忆一些固定而又及其复杂、繁多的数字、文字等等。
: `) G8 C8 R/ fbbs.mocwww.com函数(Function):函数分为两种,有主动函数和被动函数。
8 _6 h/ e' M2 Y( \% J7 D$ Z  ?—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート参数(Arg):函数括号后面填写的选项、参数(在被动函数里被称作传递参数、传参),用于表达该函数需要操作的对象、方法等等。
4 q$ |: p8 ^. t. o: m: Q" Y+ gbbs.mocwww.com主动函数:必须由玩家主动去执行(例如:print("注册失败")这类函数),否则不会有任何效果。其参数由用户自己填入。
, A' f: R! R3 q- P2 O# [$ y被动函数:把函数名写入某个接口里面(例如PetCalc_Init就写在NL.CreateNpc里面),等待系统在符合条件的状态下自动调用。其参数由系统按照特定格式自动填写,用户在处理函数过程中,可以把系统提供的参数提取出来使用。
' W4 a; y9 V% V6 ^  h1 zbbs.mocwww.com
/ S& w: u! E" B0 f3 D9 x魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表_MeIndex:这个是NPC指针的存储变量,由于PetCalc_Init是被动函数,其参数由系统提供,/ f/ J5 e6 n# T8 ^( Q
%对像_形象%:这是常量的一种,代表玩家或NPC"形象"这个属性,其数值固定为1。
: i' d! M, E- R% P, C3 ?6 I妖城在线论坛Char.SetData:这是Char函数库的SetData接口,用于修改目标的各种详细属性(适用于玩家、宠物、NPC),参数由3个,1为操作对象的指针,2为操作属性栏目的编号(多用常量来代替,也可直接填写数值序号),3为需要操作的具体数值。魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表  v+ @- y  N7 X: h! g, {* u  c' y
Char.SetTalkedEvent:这是Char函数库的SetTalkedEvent事件设置接口,用于设置该NPC触发了此事件后,需要执行的函数名字。这里设置了NPC对话事件,当玩家与NPC对话时,就触发一个叫"PetCalc_Talked"的函数。魔力私服,最新魔力宝贝私服技术交流; p8 q* C# I, q) i3 E9 F1 t
妖城在线论坛' E8 v6 |) Y& u) d) I  c' i
【补充说明】
( W  g0 V- Q% u$ y" ^魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表事件(Event):由系统内部预先设置好的条件(陷阱)组成,一旦达到预设条件(陷阱),就会触发该事件。
. {) Z9 }9 U! }! ]) |妖城在线论坛魔力Lua的事件有很多种,NPC的事件有:对话事件(TalkEvent)、踩踏事件(PostOver)、移动事件(WalkPost)、定时循环事件(Loop)等等(详见chm白皮书)。
5 n4 Z8 t; v( s% h) \魔力私服,最新魔力宝贝私服技术交流玩家事件:说话事件(TalkEvent)、登入登出事件(LoginEvent、LogoutEvent)、切图事件(WarpEvent)、战斗开始结束事件(BattleStartEvent、BattleOverEvent)等等(详见lua.chm白皮书)。
, A4 g3 ~  l! e  j6 ^; ?妖城在线论坛合理的使用事件是非常重要的,用户必须清晰的知道,在什么条件状况下,应该做什么事。
5 f4 C: x" }3 Z0 j魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表例如算档NPC,使用对话事件(TalkEvent)就最为合理。要是使用了移动事件(WalkPost)就变成走一步算一次档,要是使用了定时循环事件(Loop)就变成每秒钟都算一次档,这些都是不合理的。: C) J+ n  m- z/ D8 L6 ^1 G4 c) Q

# X# s9 b9 a: D5 I魔力私服,最新魔力宝贝私服技术交流[ 本帖最后由 Duckyの復活 于 2014-1-6 09:00 编辑 ]

TOP

function PetCalc_Talked(_MeIndex, _PlayerIndex)
' [3 D0 a% Z0 O# Y, E) B- W* Q, K妖城在线论坛        local buf = PetCalc_ShowCalc(_PlayerIndex);       --调用PetCalc_ShowCalc自定义函数,计算出算档结果,并保存在buf变量
( y) t* x% {1 E8 q        NLG.ShowWindowTalked(_PlayerIndex, 0, 1, 0, buf, _MeIndex);        --利用NLG.ShowWindowTalked把算档结果用窗口形式显示给玩家看魔力私服,最新魔力宝贝私服技术交流3 U& f& O5 [" a' R
        return ;
3 k' M' i* B1 ?( e  N! Y妖城在线论坛end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ Y9 k9 h: {8 e8 z( S* r! k

3 T- N* s* Y! D0 o" s妖城在线论坛【分解说明】
) g& n6 P$ m( Z& o# [7 I妖城在线论坛PetCalc_Talked:一个自定义函数,由于在init时,被Char.SetTalkedEvent接口绑定为对话事件(TalkEvent),属于被动函数,因此只要有玩家与这个NPC对话,都必定会执行这个函数。
7 ~9 N' ~. S* Q% o% f" Q—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートPetCalc_ShowCalc:另一个自定义的函数,没有被事件绑定,属于主动函数,需要手动去调用。+ e; s/ e. l+ \
NLG.ShowWindowTalked:弹出对话框接口,在参数里可设置对话框类型(如文字框、输入框、贩卖框、购买框、选择框等等)、对话框内容。
3 ?1 s5 w5 b. ^/ k: {8 Z+ Q魔力私服,最新魔力宝贝私服技术交流妖城在线论坛" t4 N- t+ Z+ h) T, ^; N, C; c
【补充说明】魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表& a- b" K' ^6 d, {
绑定事件函数:此类函数属于被动函数,由各种事件绑定后,被动执行。此类函数的参数格式,必须严格按照白皮书上对应事件CallBack的格式填写。魔力私服,最新魔力宝贝私服技术交流" H) G$ u! c" x/ _2 _0 C' ]1 z
弹出对话框接口:根据白皮书说明,NLG.ShowWindowTalked共有6个参数,按顺序分别是:玩家指针、对话框类型、按钮类型、对话框序号、对话框内容、Npc指针—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# B: k/ ?( \: Q" x0 _5 K# r
对话框类型:魔力共有47种对话框类型,暂时已知的类型有:0-文本对话框,1-输入对话框,2-选择对话框,6-购买对话框,7-贩卖对话框,19-治疗对话框,20-鉴定对话框,
' F% [: Y3 H9 `魔力私服,最新魔力宝贝私服技术交流              21-留言板对话框,22-修理对话框,23-银行对话框bbs.mocwww.com  T5 y6 o9 u7 H. I$ u3 J6 V- y
              每种类型都有其自己特殊的data内容格式,格式可通过截取游戏封包并分析data内容方式获得。—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 b( G3 Y9 I3 ~5 c* ~
按钮类型:魔力共有7种按钮类型,分别是:0-没有,1-确定,2-取消,4-是,8-否,16-上一页,32-下一页
" s* k, P1 K5 B: J              各种按钮可混合使用,例如想“确定、取消、下一页”按钮一起使用,只需要输入1+2+32
) j, a3 T* `/ `; e# t—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
# x" R6 @. v7 H. m! t魔力私服,最新魔力宝贝私服技术交流[ 本帖最后由 Duckyの復活 于 2014-1-6 09:49 编辑 ]

TOP

发新话题