[讨论] 初级魔力lua解析

wangjun1127

妖精

Rank: 2 Rank: 2

UID: 24188
精华: 0
积分: 124
威望: 0 度

阁楼大中小发表于 2019-5-30 19:56 显示全部帖子

求助大神指点一下，GA能用的宠物技能学习卷放到CGMSV上就老提示宠物技能栏已满呢？？—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート7 m( M9 v1 Z: c3 E; ]: u" _

if _Select==2 or _Seqno==99999 then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 J( K: U# E1 i" |5 n* q; a
return魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* j2 J4 _/ ~  E. h! Y( `
end

if _Seqno==10 then7 G: l% _; i$ H5 f( P! J
--Get Session
SelectPetSlot[_PlayerIndex] = _Data-1
local tItemSlot = SelectItemSlot[_PlayerIndex]妖城在线论坛: a, o" l- n; T) _: G
local tPetSlot = SelectPetSlot[_PlayerIndex]
--Get Pet Data
local tPetIndex = Char.GetPet(_PlayerIndex, tPetSlot)bbs.mocwww.com5 I; I6 y9 w- o
if tPetIndex<0 then
return 0
end
local tPetName = Char.GetData(tPetIndex, %对象_名字%)bbs.mocwww.com3 _1 f$ C6 X$ E, d3 n' Z
local tPetID = Char.GetData(tPetIndex, 68)
local tPetLv = Char.GetData(tPetIndex, %对象_等级%)魔力私服,最新魔力宝贝私服技术交流3 }7 w$ J  L& ~: g, F$ Y
local tPetGetLv = Char.GetData(tPetIndex, %宠物_获取时等级%)
local tPetTechSlotMax = Char.GetData(tPetIndex, %宠物_技能栏%)—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 c; w# [) B7 z' L: D3 w0 T
--Get Item Data—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート0 N, j9 a, y" E5 @) ]) N
local tItemIndex = Char.GetItemIndex(_PlayerIndex, tItemSlot)
if tItemIndex<0 then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表6 N0 l6 B5 \* @, i6 }
return 0妖城在线论坛9 u- h$ v5 L$ ^/ I, O* x4 ^, h- C
end$ A+ {5 ~  P2 q, `3 }
local tItemName = Item.GetData(tItemIndex, %道具_名字%)妖城在线论坛. O1 j0 w% _2 z$ P1 H3 k
local tItemID = Item.GetData(tItemIndex, %道具_ID%)
local tTechType = Item.GetData(tItemIndex, %道具_特殊类型%) or 0妖城在线论坛2 r% \+ v/ n( }6 n& C8 V
local tTechID = Item.GetData(tItemIndex, %道具_子参一%) or 0
local tPreTechID = Item.GetData(tItemIndex, %道具_子参二%) or 0bbs.mocwww.com0 }1 e5 h3 r* K, V7 M. z* C
print("\n=================调试信息====================")
print("tItemID=" .. tItemID)
print("tItemName=" .. tItemName)
print("tTechType=" .. tTechType)
print("tTechID=" .. tTechID)魔力私服,最新魔力宝贝私服技术交流6 G& C3 P! i2 o# y" ^9 f6 y4 W( [
print("tPreTechID=" .. tPreTechID)- U5 p; k6 ~1 |' g8 |
print("NorPreTechID=" .. NorPreTechID)魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表' u) ~( X8 T& K: ?0 G
print("TechSlot=" .. #PetTechNpc_GetTechList(tPetIndex) .. "/" .. tPetTechSlotMax)
print("InTable=" .. PetTechNpc_GetTechPos(tPetIndex, tPreTechID)); W* n$ {1 I  Y6 X! X8 u8 O5 d4 T1 x/ `- }
--Check Type
if tTechType==1 then+ m. V9 F* h. p  {- Y! y  v1 O* u
if PetTechNpc_CheckInTable(SPetListA, tPetID)~=true then
NLG.SystemMessage(_PlayerIndex, "[错误] 你选择的宠物不满足以下学习条件：特定宠物")
return 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表: r/ J0 ^$ a; C' M: P, j
end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表- V9 q! `; N: E# n. L9 E+ S; ~
elseif tTechType==2 then
if PetTechNpc_CheckInTable(SPetListB, tPetID)~=true then* O, [' y( y- G( E
NLG.SystemMessage(_PlayerIndex, "[错误] 你选择的宠物不满足以下学习条件：特定宠物")
return 0
end
elseif tTechType==3 then魔力私服,最新魔力宝贝私服技术交流/ y, b9 a: }5 G: e, t/ _7 e4 L
if tPetGetLv>1 then
NLG.SystemMessage(_PlayerIndex, "[错误] 你选择的宠物不满足以下学习条件：非野生")bbs.mocwww.com# b2 }4 M3 V4 {
return 0
end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート- J" L) W. O3 [8 y7 _. w6 y
elseif tTechType==4 then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. T' ?) M$ z7 Z; Y" r9 i' U& g" B5 u
if tPetLv<PetMaxLevel then
NLG.SystemMessage(_PlayerIndex, "[错误] 你选择的宠物不满足以下学习条件：满级")魔力私服,最新魔力宝贝私服技术交流5 q# {. T% h9 m( D% @- K
return 0
end
end
--Check NorPreTechID
if tPreTechID==NorPreTechID and #PetTechNpc_GetTechList(tPetIndex)>=tPetTechSlotMax and PetTechNpc_GetTechPos(tPetIndex, tPreTechID)<0 then. y: h3 |& `* \8 W3 t0 ?
NLG.SystemMessage(_PlayerIndex, "[错误] 你选择的宠物不满足以下学习条件：请先学习【高阶技能栏】技能")魔力私服,最新魔力宝贝私服技术交流% f0 q5 v$ J( G
return 0魔力私服,最新魔力宝贝私服技术交流- A7 ^: `/ z+ v
end
--Check PreTech
if tPreTechID>0 and tPreTechID~=NorPreTechID then
if PetTechNpc_GetTechPos(tPetIndex, tPreTechID)<0 then
NLG.SystemMessage(_PlayerIndex, "[错误] 你选择的宠物不满足以下学习条件：前置技能")
return 0
end, N5 H" x0 j. e! b* _7 d
end
--Check Slot
if tPreTechID<=0 and #PetTechNpc_GetTechList(tPetIndex)>=tPetTechSlotMax then魔力私服,最新魔力宝贝私服技术交流9 Z& _: W% q7 g% {7 [2 @
NLG.SystemMessage(_PlayerIndex, "[错误] 你选择的宠物不满足以下学习条件：技能栏已满")—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 d2 V- b7 J; i" y6 F* p- N2 p9 `
return 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% o& l/ w" o8 E, E
end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) g  x# z/ X; i; U7 I4 M
--Del PreTech—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 [, V" l( b- X7 s' `2 n
if tPreTechID>0 then
local tPreTechPos = PetTechNpc_GetTechPos(tPetIndex, tPreTechID)
Pet.DelSkill(tPetIndex, tPreTechPos)魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 N8 q' D4 `" N( ^5 \
end
--Add Tech
local rt = Pet.AddSkill(tPetIndex, tTechID)
if rt~=1 then, Z& U& V$ W* U% N# L% |: F, J. {
NLG.SystemMessage(_PlayerIndex, "[错误] 未知原因错误")妖城在线论坛# v! _7 W7 A1 T* o5 v/ Z9 d8 O
return 0  H: f8 g% ?: Y0 z! U; T% I
end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 ?! D* n4 u# W5 K
--Del Item
Char.DelItem(_PlayerIndex, tItemID, 1)—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート6 ?% u: a/ Y. Z4 i& A, ~/ e( n" L
--Up Pet
Pet.UpPet(_PlayerIndex, tPetIndex)—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ g8 A% {+ Z. O! ^. H$ x4 D) b
NLG.SystemMessage(_PlayerIndex, "你的宠物" .. tPetName .. "学会了新技能。")
return 1
endbbs.mocwww.com, m' o, Q8 g3 M4 d
end1 p' u8 i  C9 Z" H, Q8 t" e' U1 `5 `& J
bbs.mocwww.com& r: Q4 g( S4 F; ~1 c6 R
--使用道具
NL.RegItemString(nil, "PetTechNpc_ItemUse", "LUA_usePetTech");
function PetTechNpc_ItemUse(_PlayerIndex, _ToPlayerIndex, _Slot)—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート2 g! x7 t0 T' t$ k
SelectItemSlot[_PlayerIndex] = _Slot
PetTechNpc_Talked( tbl_LuaNpcIndex["PetTechNpc"], _PlayerIndex, 1)
return 1
end

TOP

wangjun1127

妖精

Rank: 2 Rank: 2

UID: 24188
精华: 0
积分: 124
威望: 0 度

沙发大中小发表于 2019-6-9 07:04 显示全部帖子

提示lua道具被重复注册怎么处理啊？？？？

TOP

‹‹ 上一主题 | 下一主题 ››