发新话题
打印

[魔力私服分享] 【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

【脚本解说】
" g# h& K4 H& s魔力私服,最新魔力宝贝私服技术交流—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. E+ c2 R0 u6 F. ^: _
if (M_PetCalc_Ptr == nil) then  --如果该NPC变量没有任何内容(没被创建),则开始执行以下语句
# \# [" Y: D8 j% R, v魔力私服,最新魔力宝贝私服技术交流        M_PetCalc_Ptr = NL.CreateNpc("./data/lua/test/PetCalc.lua", "PetCalc_Init");  --创建NPC,并设置对应的初始化函数
6 R6 y/ [3 J3 |) ^9 i" p妖城在线论坛        NLG.UpChar(M_PetCalc_Ptr);  --更新该NPC0 L) H- u' }* _
end  --if配套的结束语end
$ T9 N3 d. F  c3 a  z3 n9 xbbs.mocwww.com
  _7 z) i6 F3 R6 K+ s8 \7 a8 n4 L魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表cgex.so会在启动时自动加载init.lua这个文件,因此,在init.lua里加入上述语句,就能在服务器启动时自动创建NPC。
3 g9 ^5 t, B$ w5 C- n9 m4 K$ B% r; d# \% i. U# `  Z
【分解说明】
3 m' f9 m, d) }8 ]/ N2 N: s" Z5 [变量:一个具体数值、文本、函数,或者其他实体对象的存储空间。操作变量,就能直接对其实际的对象操作。妖城在线论坛! o/ ~- j) Q3 O1 Z: k

% _7 @$ q" F1 I0 x  Sbbs.mocwww.comM_PetCalc_Ptr:这是一个全局变量,用于保存NPC的指针(每个NPC创建时都会分配一个指针),由于指针是一个不固定的数字,不好记忆,不便于操作,因此我们用了一个变量去存储它、代替它,往后只要看到这个变量,立马就只能这个就是算档NPC的指针了。
6 |6 w2 [* D7 U. D( ]5 M9 G—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートbbs.mocwww.com. n. O7 a( |5 d/ N7 N
NL.CreateNpc:这是一个cgex的接口函数,意思是NL这个函数库下面的一个叫CreateNpc的接口函数,根据lua.chm白皮书的说明,此函数有2个参数,1为创建NPC时调用的lua文件,2为创建NPC时调用的函数(初始化函数)。
8 ^' Z7 m, e( F6 r8 F魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* Q; V& W) r+ {0 k; x4 z
NLG.UpChar:这是刷新NPC的接口函数,通过lua创建、修改的NPC,并不能马上生效,必须通过NLG.UpChar接口,让服务器把新的NPC信息发送给玩家,这样玩家才能看到新的NPC,否则玩家看到的依然是修改前的模样(客户端没更新数据)。魔力私服,最新魔力宝贝私服技术交流: {: y' y4 S, N; X# d

0 [7 C3 \$ y+ w. I—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート【补充说明】妖城在线论坛; }0 O: [: K3 X- F
变量:
, L" P: [7 g* d' Y—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート很多人对指针变量这一概念不清楚,我在这里详细说明一下。
  B5 h; x( f$ ^bbs.mocwww.com变量,有点类似于给一个物体(对象)命名,是你为一个实际的东西取的一个便于记忆、便于操作的新名字。魔力私服,最新魔力宝贝私服技术交流9 C  `5 i4 G6 Y( C/ L# m
例如,你有一个朋友叫“张家明”,你给他起了一个外号叫“小明”,那么只要你一说“小明”,那么你的朋友都明白你说的是“张家明”,就算你忘记了那个朋友的全名,只记得他叫“小明”,大家也知道你说的是谁。8 i9 P; A" |  w' ]. G8 R
同理,你有一个算档NPC,它的指针为107,你设置了一个变量M_PetCalc_Ptr去存储它,那么就算你不知道算档NPC的指针是多少,只要你一说M_PetCalc_Ptr,系统就知道你所指的是算档NPC。bbs.mocwww.com6 @7 i: f. Y9 k6 S/ P$ R

5 q1 e! M+ T; [7 \2 {0 C% z+ x妖城在线论坛局部变量:
/ U6 w: U: p. d妖城在线论坛以刚才的“小明”为例,全中国那么多人的外号都叫“小明”,那你怎么区分?这时就需要区分变量的适用范围。
: r0 z- J$ v) F- l6 n1 J# }1 wbbs.mocwww.com你就要跟这个小圈子里的朋友约定好,在这个小圈子内“小明”这个外号特指“张家明”,但是离开这个小圈子就不是了。魔力私服,最新魔力宝贝私服技术交流; Z3 T* d, Q7 U0 I7 ?4 j
这种就是局部变量,只在特定的范围内有效,并且能在多个地方重复使用。妖城在线论坛, ^! w2 `( V6 h6 R

( R; }+ s$ s9 s0 w: u全局变量:( _, U* u3 b. o$ \! S
全局变量,在整个服务器里通用(任何地方都能使用),不存在意义分歧的变量。
2 l) p& P( k+ m5 ^8 F0 e—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート例如,“中国”这个简称,就是一个全局变量,必定是代表“中华人民共和国”,并且全国人民都知道,没有其他不同的含义,绝对不会混淆,绝对不会有意义分歧。—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, t6 \* I# ~) x9 u

3 d0 L6 e% K  p妖城在线论坛[ 本帖最后由 Duckyの復活 于 2014-1-6 08:52 编辑 ]

TOP

function PetCalc_Init( _MeIndex )    --由系统传递过来的参数_MeIndex,标识此NPC—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート6 E- {' O7 B/ X! e
        Char.SetData(_MeIndex, %对像_形象%, 101020);        --设置NPC外形
4 h# s0 b6 l0 y) A* E—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート        Char.SetData(_MeIndex, %对像_原形%, 101020);        --设置NPC外形bbs.mocwww.com- t) q/ w- o6 Q  Z9 W
        Char.SetData(_MeIndex, %对像_地图类型%, 0);        --设置NPC所在地图类型(普通地图为0)—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  F; q  I1 j. {/ P" @7 ^* ?7 a
        Char.SetData(_MeIndex, %对像_地图%, 999);        --设置NPC所在地图编号
2 P7 Q& ~, U. L& ], Y7 {魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表        Char.SetData(_MeIndex, %对像_X%, 9);                        --设置NPC所在地图X坐标
- E' f. a: {5 W( f( j魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表        Char.SetData(_MeIndex, %对像_Y%, 8);                        --设置NPC所在地图Y坐标
8 J+ ]/ z" w4 E) k4 n魔力私服,最新魔力宝贝私服技术交流        Char.SetData(_MeIndex, %对像_方向%, 6);                --设置NPC方向,0为左上,1为上,2为右上,以此类推(顺时针旋转)妖城在线论坛1 e' i1 T) R5 X" }6 E7 y( x
        Char.SetData(_MeIndex, %对像_原名%, "会算档的大地鼠");                --设置NPC名称
& _1 w3 B8 \9 H0 ~4 C        if (Char.SetTalkedEvent(nil, "PetCalc_Talked", _MeIndex) < 0) then                --注册NPC的TalkedEvent事件,并获取返回值,如果范围值小于0,则提示错误。魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 \. `4 i9 U+ v) b9 F. S  V
                print("PetCalc_Talked 注册事件失败。");                        --注册失败时,发送一个后台信息
/ m  o0 W" x) }. M2 r, ~—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート                return false;
0 N# X8 K3 U& o3 V) \魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表        end
) [) O2 [/ `0 x3 E6 E+ D" vbbs.mocwww.com        return true;
: L# c2 H& p, v4 @3 Mend
. E5 c, |5 Y' _8 f( }妖城在线论坛妖城在线论坛2 j; [& a$ q% {. l% }! Z8 X' s
这一段是初始化NPC函数(就是在CreateNpc里面写的第二个参数"PetCalc_Init"),用于设置NPC的基本属性。
3 |6 a( ~: ^/ ~9 C& D2 cbbs.mocwww.com意思为把这个NPC设定为101020这个图档造型,并放置在0,999,9,8这个地图位置,将其命名为"会算档的大地鼠",最后给这个NPC设置一个TalkedEvent事件(对其说话就触发的事件)。
$ I+ b( w0 X3 J( M- |" d4 O# ^, h! y4 N
" w) K: @* u6 ^. M4 v, N魔力私服,最新魔力宝贝私服技术交流【分解说明】魔力私服,最新魔力宝贝私服技术交流9 _) z3 A) b0 {8 f
常量:一种特殊的变量,由系统提供,内容固定、不能修改。
: ]) }5 J8 O  @( H妖城在线论坛        用于方便用户记忆一些固定而又及其复杂、繁多的数字、文字等等。妖城在线论坛* n; }( @1 L  Q. b
函数(Function):函数分为两种,有主动函数和被动函数。
  h, s0 Q/ ^7 X/ H& I妖城在线论坛参数(Arg):函数括号后面填写的选项、参数(在被动函数里被称作传递参数、传参),用于表达该函数需要操作的对象、方法等等。1 y- ]! `! ?; x
主动函数:必须由玩家主动去执行(例如:print("注册失败")这类函数),否则不会有任何效果。其参数由用户自己填入。
+ k8 q- O1 b" _: E—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート被动函数:把函数名写入某个接口里面(例如PetCalc_Init就写在NL.CreateNpc里面),等待系统在符合条件的状态下自动调用。其参数由系统按照特定格式自动填写,用户在处理函数过程中,可以把系统提供的参数提取出来使用。
7 U. x4 U# |6 P6 Abbs.mocwww.com
1 b& Y# e. w) R( n0 a0 H( C- o—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート_MeIndex:这个是NPC指针的存储变量,由于PetCalc_Init是被动函数,其参数由系统提供,—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 s% K& c! g' d* }1 H
%对像_形象%:这是常量的一种,代表玩家或NPC"形象"这个属性,其数值固定为1。bbs.mocwww.com3 v2 B# \/ Q# c9 ~
Char.SetData:这是Char函数库的SetData接口,用于修改目标的各种详细属性(适用于玩家、宠物、NPC),参数由3个,1为操作对象的指针,2为操作属性栏目的编号(多用常量来代替,也可直接填写数值序号),3为需要操作的具体数值。
  U' u# ^4 b! z5 E! \3 t—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートChar.SetTalkedEvent:这是Char函数库的SetTalkedEvent事件设置接口,用于设置该NPC触发了此事件后,需要执行的函数名字。这里设置了NPC对话事件,当玩家与NPC对话时,就触发一个叫"PetCalc_Talked"的函数。bbs.mocwww.com3 N) Y: z& d* ^7 g" X- y+ N) w9 V
bbs.mocwww.com5 n& S3 C  g' T- \" K6 Q9 Q( H
【补充说明】
. `- a0 C: i, ?  N3 S7 O% s魔力私服,最新魔力宝贝私服技术交流事件(Event):由系统内部预先设置好的条件(陷阱)组成,一旦达到预设条件(陷阱),就会触发该事件。魔力私服,最新魔力宝贝私服技术交流4 R4 X& ]: v: J- k3 |( o' C
魔力Lua的事件有很多种,NPC的事件有:对话事件(TalkEvent)、踩踏事件(PostOver)、移动事件(WalkPost)、定时循环事件(Loop)等等(详见chm白皮书)。
- r, O8 g2 E, g- D  O5 ^bbs.mocwww.com玩家事件:说话事件(TalkEvent)、登入登出事件(LoginEvent、LogoutEvent)、切图事件(WarpEvent)、战斗开始结束事件(BattleStartEvent、BattleOverEvent)等等(详见lua.chm白皮书)。—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- e& ~0 h1 \' q4 v
合理的使用事件是非常重要的,用户必须清晰的知道,在什么条件状况下,应该做什么事。魔力私服,最新魔力宝贝私服技术交流, T- A* k! w* ?3 x. a- C
例如算档NPC,使用对话事件(TalkEvent)就最为合理。要是使用了移动事件(WalkPost)就变成走一步算一次档,要是使用了定时循环事件(Loop)就变成每秒钟都算一次档,这些都是不合理的。
) c2 M' o1 n! P  q% a& u, C
5 r8 @' l8 ~7 n% {3 m) h5 z: h. {' g+ D[ 本帖最后由 Duckyの復活 于 2014-1-6 09:00 编辑 ]

TOP

function PetCalc_Talked(_MeIndex, _PlayerIndex)
# C2 @: h7 t7 t; q" L5 W& _! z- W—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート        local buf = PetCalc_ShowCalc(_PlayerIndex);       --调用PetCalc_ShowCalc自定义函数,计算出算档结果,并保存在buf变量
; `9 O5 L' Z9 tbbs.mocwww.com        NLG.ShowWindowTalked(_PlayerIndex, 0, 1, 0, buf, _MeIndex);        --利用NLG.ShowWindowTalked把算档结果用窗口形式显示给玩家看
- w' G9 q7 _6 R7 ]" K魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表        return ;魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* Y8 e! k) `- |6 J( K, [2 N
end魔力私服,最新魔力宝贝私服技术交流" {6 W% Y( O) ~, `

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

TOP

发新话题