请问，一键鉴定这样写鉴定全部道具 每次都会把20个物品栏检测一遍，哪里需要改变？
local Count = 0
, i7 M! b# B; } U) _4 I( o for ItemSlot = 8,27 do
4 h" y% y# J8 X, B7 H# s/ R魔力私服,最新魔力宝贝私服技术交流 local ItemIndex = Char.GetItemIndex(player, ItemSlot)
% Q) m5 K/ j" p local money = Char.GetData(Player,%对象_金币%);
8 v8 r# W, I& Z# B% C4 c' {—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート if Item.GetData(ItemIndex, 63)==0 then
+ y7 ~& i1 A3 H' ]3 ]- vbbs.mocwww.com local djdj = Item.GetData(ItemIndex,%道具_等级%);
4 a" G, Z- j9 r- }" j5 ~0 abbs.mocwww.com local kcmb = djdj*0;妖城在线论坛6 u7 ~4 I' j- K; @/ _
if money < kcmb then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 T! A/ G( U R* E; v6 z1 G
NLG.SystemMessage(player,"[系统] 您身上的魔币不够");妖城在线论坛9 Y/ V1 d8 @5 Q# V4 j' r
return;妖城在线论坛* h8 K* ~8 x; ~& e$ M
end, a, Q1 S; h4 ^" Z2 b1 W/ x- M0 N
Count = Count + 1) ~! B$ t3 J" H; u }: c
Item.SetData(ItemIndex, 63, 1)
b# T1 K2 ~, f( }' p( ubbs.mocwww.com NLG.TalkToCli(player,-1,"[个人] 你身上的 " .. Item.GetData(ItemIndex, %道具_鉴前名%) .. "已鉴定为 " .. Item.GetData(ItemIndex, %道具_名字%),%颜色_青色%,%字体_小%)魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表8 Q2 ?: {8 I' _$ F+ }* T
Item.UpItem(player, ItemSlot);
1 ?) _( t% W* P0 L妖城在线论坛 end魔力私服,最新魔力宝贝私服技术交流) z4 i, L, V. a( a6 E1 \" k
end
5 }7 d. t# U0 _6 W0 D3 t( _& ^bbs.mocwww.com if Count==0 thenbbs.mocwww.com: o. k8 A! S7 @
NLG.TalkToCli(player,-1,"[系统] 您身上没有需要鉴定的物品。",%颜色_青色%,%字体_小%);
5 P" }# J O' s7 e; G/ A3 _ d return;
8 m) K6 S3 m9 Y3 m% J5 x: Z魔力私服,最新魔力宝贝私服技术交流 end—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ w& s) t9 M" B( `# Q$ e0 | N/ z7 j
return 0
