自己写的,不能执行,不知道咋改啊
if msg == "/整理" or msg == "/r" then ----整理bbs.mocwww.com6 I [, @) C: A; k# {6 o/ U2 `
for ItemSlot = 8,27 do
' x- C$ X6 N8 w6 o8 J5 l9 N8 ~魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表 local ItemIndex = Char.GetItemIndex(player, ItemSlot);
6 y2 O" a# x+ j—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート local Count = 1;bbs.mocwww.com% \+ B7 a p0 W0 e G; W4 i: I; L
local ItemSlot1 = ItemSlot;
& _. o6 h5 }7 P3 F O5 _ if(Item.GetData(ItemIndex, %道具_最大堆叠数%) > 1) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ l( [8 R4 r) q! \& n" Y3 v5 d
local ItemID = Item.GetData(ItemIndex,%道具_ID%);魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# A( ~5 T* b3 [3 {8 O. q/ i
for ItemSlot1 = ItemSlot + Count,27 do
9 k7 z: w+ h. G2 `4 x/ ]2 u1 Obbs.mocwww.com Count = Count + 1;
: g/ X9 f* R( C魔力私服,最新魔力宝贝私服技术交流 ItemIndex = Char.GetItemIndex(player, ItemSlot1);
4 l6 j+ N$ c, D0 x- Q—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート if (Item.GetData(ItemIndex,%道具_ID%) == ItemID) then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート4 W" t+ @( `- b% v
Item.SetData(ItemIndex,Itemslot,ItemSlot1);
+ S0 U5 G4 b' h6 C# Hbbs.mocwww.com Item.UpItem(player, ItemSlot);
$ K. [" l8 u, t+ V0 v0 |8 vbbs.mocwww.com NLG.UpChar(player);
' L0 ?. _: @9 e! @/ Y妖城在线论坛 end魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, K, u$ \ V/ w) u& \+ U, S% h
return;魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, t0 f1 @' D5 K9 k! i+ v
end魔力私服,最新魔力宝贝私服技术交流1 c) z. t9 B" z2 b, }$ j
end" Z. H, [' g, o! X
return;bbs.mocwww.com F! v/ `- s" t: n4 L% c) l/ B
end
, s4 Q) x1 B, Y2 r—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート NLG.SystemMessage(PlayerIndex, "物品已自动整理!");
3 e& a6 b6 E9 k. ^( Qbbs.mocwww.com return;
3 Y0 g6 @& i( W u* g魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表 end