自己写的，不能执行，不知道咋改啊
if msg == "/整理" or msg == "/r" then ----整理bbs.mocwww.com) N0 H+ V+ ~2 F) r
for ItemSlot = 8,27 do—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート* v; i! _9 H1 w1 e Z+ s* \
local ItemIndex = Char.GetItemIndex(player, ItemSlot); V+ }; b' ~1 a+ R0 l4 [
local Count = 1;
% i: p1 X/ @5 P _& Ibbs.mocwww.com local ItemSlot1 = ItemSlot;魔力私服,最新魔力宝贝私服技术交流& W% Q2 b* f4 Q* I r( X, X
if(Item.GetData(ItemIndex, %道具_最大堆叠数%) > 1) then
2 ]; N( g9 @. d4 N+ o8 ? local ItemID = Item.GetData(ItemIndex,%道具_ID%);
* A6 p( Y& a' O' ^+ @魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表 for ItemSlot1 = ItemSlot + Count,27 do
8 F5 H9 \+ [% n, V3 _* ]( j1 |—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート Count = Count + 1;
7 `8 b+ C9 @+ X, m妖城在线论坛 ItemIndex = Char.GetItemIndex(player, ItemSlot1);
5 Y) j2 P6 i) |* Q: S—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート if (Item.GetData(ItemIndex,%道具_ID%) == ItemID) then+ `5 Z- j/ R( I
Item.SetData(ItemIndex,Itemslot,ItemSlot1);
5 C& K2 Z# Z8 ^# K1 X妖城在线论坛 Item.UpItem(player, ItemSlot);bbs.mocwww.com8 F" @0 v$ ^6 w1 l
NLG.UpChar(player);魔力私服,最新魔力宝贝私服技术交流; ?+ y( |) _; {' X; `3 p0 G- H
end
7 o# l& E9 T% j) j/ p, abbs.mocwww.com return;魔力私服,最新魔力宝贝私服技术交流3 e& [+ h( x! d' H
end" V+ b# T4 Z# Y+ Y4 t7 b# d. b/ d
end
: @$ ~& B# D- a. s魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表 return;
: N3 v4 W- k* l* J& {) @7 D& d—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート end8 h2 n$ ^1 @# L( T* ]# r
NLG.SystemMessage(PlayerIndex, "物品已自动整理！");
% R* T0 B' f5 K5 G Q' H魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表 return;
3 X/ D) A. Z- b( a7 m2 n' a6 d$ e—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート end
