发新话题
打印

[提问] 想用lua写个给裝備冠名的道具参数

想用lua写个给裝備冠名的道具参数

目前构思完成的道具参数能达到
3 U; w, J+ a% }! C8 R. C撷取该道具的名字、6维数值bbs.mocwww.com) K7 s$ P4 F6 ~: L/ O6 A
然后将名字(灌在原装备名字前)、6维数值,移转增加到装备上面bbs.mocwww.com- }& W3 o: x6 k  \2 C
会制造很多这种移转符咒道具魔力私服,最新魔力宝贝私服技术交流0 ~# L* d- B$ I8 ?* `
但每项装备只能使用一次移转符咒道具魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 k. h2 x$ ?9 G# s
bbs.mocwww.com3 s# t' e& M4 a  p" C: L
技术力不够,先试着写冠名的部分
% y' i& x6 U% _" i. @bbs.mocwww.com参考了强化、小喇叭、万能收纳bbs.mocwww.com9 z# T) L* Q/ w
还未进入游戏实测,不过猜应该有错误而直接使lua所有脚本启动失败—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート1 l; U) h2 G& `3 D/ X
贴上讨论版,求指点,先去实测试试魔力私服,最新魔力宝贝私服技术交流. u# A7 t# Z9 D0 U4 x. V0 [
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( c& u2 S# \( Z) V6 Y! Q0 R+ R
另问可以在原道具脚本内插入lua参数同时使用的方式吗
免费内容:
NL.RegItemString(nil,"Periapt","LUA_usePeriapt");魔力私服,最新魔力宝贝私服技术交流9 R) o; P1 o: v$ O, ~
fillNum=0;
1 p* z5 i- Q( e. m: f妖城在线论坛魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. V9 B& [& a( E' h& g" w- u
function Periapt(_meIndex,_toIndex,_itemslot)
( D( [7 x# [- g  v$ ?% g* t4 {魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表        local ItemIndex = Char.GetItemIndex(_meIndex,_itemslot);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  Y5 e/ G: }* I; x
        if(ItemIndex >= 0) then% R. v4 F' r$ c5 K
                if(Item.GetData(ItemIndex,2007) == "LUA_usePeriapt") then
0 S' m& L" Q3 `/ `—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート                        local itemid = Item.GetData(ItemIndex,%道具_ID%);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' S  y( T' m9 Y
                        if(Char.ItemNum(_meIndex,itemid)==0)then3 S: w9 x' @. Y
                                NLG.SystemMessage(_meIndex,"神马都木有发生哦!");
' e- a1 Q( h2 Y+ q7 [, Z魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表                                return;—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 p, z' A3 B! ^; e( N
                        end
) E1 ]$ H7 {% U$ F' _( v) F魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表                        if(Char.ItemNum(_meIndex,itemid)>0)then
3 \; F; g/ D7 m- Y1 X4 m  G) o妖城在线论坛                                fillNum = Char.ItemNum(_meIndex,itemid);妖城在线论坛  n( J, ]; C+ e4 a5 F7 R
                                if(fillNum>0)then
, c# i. q# s6 u—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート                                        local pItemID = Item.GetData(pItemIndex, %道具_ID%);$ U: ^* n' x# a* u0 X, r" D; v* ~
                                        local pItemName = Item.GetData(pItemIndex, %道具_名字%);
2 n) n& K  P% O2 r* H+ N1 \魔力私服,最新魔力宝贝私服技术交流                                        Item.SetData(pItemIndex, %道具_鉴前名%, pItemName);bbs.mocwww.com/ a3 b/ t5 l/ H
                                        setItemName(pItemIndex);魔力私服,最新魔力宝贝私服技术交流8 a) `6 W; y' A
                                        Char.DelItem(_meIndex,itemid);
) E3 Q  R4 C( c% L0 }) f—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート                                        NLG.SystemMessage(_meIndex,"[系统]附魔符已成功使用,道具获得罕见的未知能量!");
+ t# S# R2 b+ S# `0 T: ^bbs.mocwww.com                                end
2 ~2 f# \  Q& N魔力私服,最新魔力宝贝私服技术交流                        end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ }( t1 H* d& y) S$ e1 I
                        return;魔力私服,最新魔力宝贝私服技术交流  P0 E6 w1 p1 s. X- n# C
                end
6 x, v( c- c" f3 y1 K- F8 s! d—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート        end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ c% D' q0 Y* k1 m
end
7 G7 _3 B3 x8 b' t—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート" u; @& A; K( L
function setItemName( _ItemIndex , _Name)—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート0 T: A; @( @6 j) p0 q1 A! G. @
        local ItemName = Item.GetData(_ItemIndex, %道具_鉴前名%);
0 x2 |3 @" S( c+ Q—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート        local lockitemindex=Char.HaveItem(player,itemval);bbs.mocwww.com8 I4 n4 J% ]8 v
        if(lockitemindex~=-1)then魔力私服,最新魔力宝贝私服技术交流, B0 \, Z1 H% P1 m3 N) X
        ItemName = "Item.GetData(ItemIndex,%道具_鉴前名%)" .. ItemName
# v1 D% N+ X: Z, Z: i( C0 K- Q7 K        Item.SetData(_ItemIndex, %道具_名字%, ItemName);
/ C0 u+ R, F0 k& Y0 n4 P# z—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートend
. G% Q2 t3 m3 g+ ~! ~" C3 l7 b* d

' C" x9 N& b4 m; E( ~+ r7 U+ y[ 本帖最后由 xman 于 2019-2-13 23:17 编辑 ]

TOP

修正后版本(待测试)妖城在线论坛- k& ^/ C' W* c- b3 m# |, e
bbs.mocwww.com# u6 U, a! Q6 x5 P5 `# D
物品栏第一格是装备
0 V, K: G7 G2 {. F5 I+ l) ^魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表物品栏第二格是移转符咒道具
) N& j& ^5 d3 q6 }—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
2 r3 b2 J2 l3 s/ C1 rbbs.mocwww.com新名字= “符咒道具名字””装备名字”
$ y5 X% R- n5 C2 v1 `; J妖城在线论坛例如:残酷的水龙弓
5 s% l9 \4 S* G. r—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
: M  Z# F7 X+ {3 ^bbs.mocwww.com
/ |8 K8 r0 C3 r- X$ h
免费内容:
NL.RegItemString(nil,"Periapt","LUA_usePeriapt");—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% I" Z( E: z& @9 x; y) ^
bbs.mocwww.com. t! H9 G) U0 E8 b- A
function Periapt(player, pItemIndex, rItemIndex)魔力私服,最新魔力宝贝私服技术交流4 p" x9 _5 B8 I+ c, t1 j: P! R; k( t
        local pItemIndex = Char.GetItemIndex(player, 9);魔力私服,最新魔力宝贝私服技术交流/ a; m7 o8 q# J. H/ ^- l7 B% ]
        local pItemID = Item.GetData(pItemIndex, %道具_ID%);5 U7 }2 x7 S7 B3 d
        local rItemIndex = Char.GetItemIndex(player, 8);" H4 \  x! o1 O3 s- ^6 s( `& q9 y
        local rItemID = Item.GetData(rItemIndex, %道具_ID%);
3 [( H: A$ y+ P魔力私服,最新魔力宝贝私服技术交流        if(Char.ItemNum(player,pItemID)==0)then
& P0 ]. e+ {! G& t$ k魔力私服,最新魔力宝贝私服技术交流                NLG.SystemMessage(player,"[系统]神马都木有发生哦!");
7 Q7 O5 I% r3 g! X魔力私服,最新魔力宝贝私服技术交流                return;
3 N4 x# I7 R0 N* @魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表        end
8 l  {3 k8 Y: q3 {+ K魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表        if(Char.ItemNum(player,pItemID)>0)then
3 D3 \# D" x9 S3 q$ \6 ebbs.mocwww.com                setItemName(rItemIndex);
6 K( G9 p: E! g妖城在线论坛                Char.DelItem(player,pItemID,1);
3 w( M( J& |$ l/ y( R5 d: gbbs.mocwww.com                NLG.SystemMessage(player,"[系统]附魔符已成功使用,道具获得罕见的未知能量!");
6 P9 c% M+ L5 i" Q0 a0 z3 Z妖城在线论坛        end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% T) Y+ A0 w9 U5 l
end
6 e9 f6 X; c5 ~' s/ cbbs.mocwww.com
, Q- n7 v. X! H( @( m妖城在线论坛
* _; J9 S% g/ ^6 Q8 [魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表function setItemName(pItemIndex, rItemIndex)
6 D( b& V! E; @" n: Z—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート        local pItemName = Item.GetData(pItemIndex, %道具_名字%);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表% r; X" _, s, [
        local rItemName = Item.GetData(rItemIndex, %道具_名字%);bbs.mocwww.com# V: e' D  J) h$ E  d  Z  ^/ d) q# c
        NewName = pItemName .. rItemName;
7 V5 Y* O+ f% Y% B- f5 `  N- y魔力私服,最新魔力宝贝私服技术交流        Item.SetData(rItemIndex, %道具_名字%, NewName);, K( G5 S: K7 M: o& u7 l+ t
end
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート8 n7 n  ?( b, ~$ ~  V0 j

5 G1 d: h% X7 D& h魔力私服,最新魔力宝贝私服技术交流[ 本帖最后由 xman 于 2019-2-14 02:02 编辑 ]

TOP

这功能类似我写的符文、附魔. x6 P5 z) U& i- g3 R. ^

2 b5 {( B. P6 U$ i6 g魔力私服,最新魔力宝贝私服技术交流你这样写还需要增加一个标签,来记录是否已冠名,不然可以重复冠名了
已隐退,不搞任何魔力有关的项目,如有其它私服项目请联系!
答应过会把以前的脚本丢妖城,言出必行!

TOP

你不是退休了么?还逛妖城。。复活大爷。

TOP

回复 地板 的帖子

退休职工回来开民主生活会
已隐退,不搞任何魔力有关的项目,如有其它私服项目请联系!
答应过会把以前的脚本丢妖城,言出必行!

TOP

发新话题