请问,一键鉴定这样写鉴定全部道具 每次都会把20个物品栏检测一遍,哪里需要改变?
local Count = 0妖城在线论坛/ F* W e- j/ D" E
for ItemSlot = 8,27 do妖城在线论坛1 s/ T" ~8 r+ ^8 i" E) c; u
local ItemIndex = Char.GetItemIndex(player, ItemSlot)
Y3 D' I' p3 o. v1 O! W& R ?魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表 local money = Char.GetData(Player,%对象_金币%);妖城在线论坛; X( T w4 a2 V: U
if Item.GetData(ItemIndex, 63)==0 then妖城在线论坛/ I% ^& x T: ~9 s X: i
local djdj = Item.GetData(ItemIndex,%道具_等级%);
7 M7 k" r) ]# ]8 ]—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート local kcmb = djdj*0;* X' L$ F3 f$ g R) G6 n+ b
if money < kcmb then
+ P& ?4 A- i6 \" {5 F' R6 F0 l2 H妖城在线论坛 NLG.SystemMessage(player,"[系统] 您身上的魔币不够");
, z5 A3 |+ ]5 @4 X妖城在线论坛 return;
) W+ Y" [+ _# E—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート end
& h5 ?" q% e4 }' m, r/ f2 _7 Abbs.mocwww.com Count = Count + 1
3 U, P, u& w- ~5 A$ d7 l' S魔力私服,最新魔力宝贝私服技术交流 Item.SetData(ItemIndex, 63, 1)
( q$ O0 e7 T& v2 f d+ X. I/ k—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート NLG.TalkToCli(player,-1,"[个人] 你身上的 " .. Item.GetData(ItemIndex, %道具_鉴前名%) .. "已鉴定为 " .. Item.GetData(ItemIndex, %道具_名字%),%颜色_青色%,%字体_小%)
- ^$ e4 R4 P. R! T/ N) R8 p魔力私服,最新魔力宝贝私服技术交流 Item.UpItem(player, ItemSlot);妖城在线论坛7 c! X; |! \) q1 e
end
/ P' L% @5 n3 U8 Y—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート end
- V* _; S/ T3 A4 D! p7 K7 j+ i if Count==0 then
& m0 [3 _: t/ s1 h U3 M/ Vbbs.mocwww.com NLG.TalkToCli(player,-1,"[系统] 您身上没有需要鉴定的物品。",%颜色_青色%,%字体_小%);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表% Y- E* w4 }$ j; K- [0 z
return;魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表% I9 d# a% `/ y
end
- z9 V4 m: K ]" d0 w* X8 V5 f魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表 return 0