请问，一键鉴定这样写鉴定全部道具 每次都会把20个物品栏检测一遍，哪里需要改变？
local Count = 0
0 M& t/ A- G! @* K for ItemSlot = 8,27 do魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 {" R- b" n% r7 |5 ~
local ItemIndex = Char.GetItemIndex(player, ItemSlot)魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表% o7 X/ c! V8 @0 y+ u
local money = Char.GetData(Player,%对象_金币%);
( F4 z' W& c8 [* `2 m8 ^+ @% e* J妖城在线论坛 if Item.GetData(ItemIndex, 63)==0 then
& j- c: \% T7 t魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表 local djdj = Item.GetData(ItemIndex,%道具_等级%);8 l! W W' s3 @8 M. P3 m
local kcmb = djdj*0;
! D; Y2 v2 O4 V3 F! _. o0 T if money < kcmb then魔力私服,最新魔力宝贝私服技术交流8 u/ T7 {6 z* d7 ~( L# I- a1 L
NLG.SystemMessage(player,"[系统] 您身上的魔币不够");魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ g, ]. d# v; c+ E3 m% |
return;妖城在线论坛& z9 t. `0 G$ ~& _* Q1 ~* a8 x
end
7 L" X( n. Z$ D7 }妖城在线论坛 Count = Count + 1—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート* v5 J# E$ L% A/ O$ R
Item.SetData(ItemIndex, 63, 1)6 W1 \# L. t4 u: z
NLG.TalkToCli(player,-1,"[个人] 你身上的 " .. Item.GetData(ItemIndex, %道具_鉴前名%) .. "已鉴定为 " .. Item.GetData(ItemIndex, %道具_名字%),%颜色_青色%,%字体_小%)
s' @: O: o8 H I* n! ^妖城在线论坛 Item.UpItem(player, ItemSlot);
# M$ g$ ^1 O+ n2 X3 y, `! R' ~—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート end
/ K9 j2 X: l! a7 G) s: F/ Fbbs.mocwww.com endbbs.mocwww.com5 s! C' p( \+ r7 j# g
if Count==0 then魔力私服,最新魔力宝贝私服技术交流. i& }% d, S( P' T" e
NLG.TalkToCli(player,-1,"[系统] 您身上没有需要鉴定的物品。",%颜色_青色%,%字体_小%);—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& b; u; U" { x' N& Y. t
return;bbs.mocwww.com$ \$ R' w: y& V6 i) C& f
endbbs.mocwww.com& @! x8 @* M/ z" ~ h5 ]$ J- R
return 0
