【战神引擎】修复物品叠加防刷又不影响叠加的使用的教程

china0396

战神的叠加物品可以通过背包拆了再用脚本清理垃圾回收让物品出现
战神引擎刷叠加物品主要是通过垃圾清理脚本将叠加物品 清理成负1值，

下线在上线叠加物品的负1值通过下线服务器刷新
1 q/ \- C( A' _$ v% p; o1 g  s. o6 e将会出现叠加物品的最大叠加值
别的方式还有就是祝福油 祝福油拆0后 将拆0 后的祝福油双击使用拆0后的祝福油变成负1值下线在上线
  d$ x- o4 [  l3 |8 B) ~祝福油的叠加 将祝福油153的叠加代码改0这样祝福油就不会叠加
其他叠加物品的方法会将脚本上传，我会备注脚本的运行原理

脚本如下：

[backcolor=var(--local-bg-color)]

procedure domain;
begin
) ^& W0 h& g  ^6 x6 P3 o- Y  This_Npc.NpcDialog(This_Player,
   '看来你需要我的帮助，\'+

   '如果你有不要的物品，我这里可以销毁\ \'+
   '|{cmd}<清理垃圾/@DestoryItem>\'+

   '|{cmd}<退出/@doexit>');
% A" C/ J7 f$ C  ?6 v3 C$ x8 aend;

Procedure _DestoryItem;
begin
+ }( e3 w" j; }+ Y   This_NPC.NpcDialog(This_Player,
   '把需要销毁的东西放进去就行啦！\ \'+
; |0 V3 B! J9 U: C8 ~3 `   '|请注意，物品销毁后将<消失/c=red>，无法找回，请<谨慎操作/c=red>！\'+
0 a* u3 A3 L" \& T/ C' }   '|部分物品无法销毁。'+
   '|{cmd}<开始销毁/@DestoryItem_1>    //脚本的开始的接口            '
' N  P; y$ ?7 n$ @, z   );
end;

Procedure _DestoryItem_1; //这里NPC弹出清理框
begin
/ o% e3 Z, G8 ^: J9 y% j; s' s2 V   This_NPC.Click_CommitItem(This_Player,1,'待销毁道具：');  
8 p* z4 T1 C3 e! I0 Cend;

//-------------删除道具--------------------

function NotDestroy(iName : string):boolean; //这里介绍下这是自定义函数接口
5 i. _6 R( ?! R  p2 Ebegin
0 ?1 g0 R) M, m/ ?    result := true;      //我们处理防刷的方式就在这里添加
5 ?/ }$ h; r3 Z2 T! F    case iName of
        '屠龙' : result := false;   //这段的意思是将物品（屠龙 ）  定义为假
6 Q& F1 w0 `" q       '这里添加叠加的物品名字' : result := false;
      '服务器里面刷什么物品就加什么名字在这里' : result := false;   
      '金刚石' : result := false;
" I/ Q0 B* [# g" W# {2 M& N      '书页' : result := false;
) @. R5 R4 i& |5 M     '祝福油' : result := false; //这里我将三样物品定义为假 false

    end;
end;

procedure CommitItem(AType:word);
! `/ U, n) F& {$ L  Hbegin
    if NotDestroy(This_Item.ItemName) then   //这里   NotDestroy 如果等于 清理框的物品名 定义为真 执行回收
) G) C0 a- q( ]6 ^% f0 B    begin         //刚刚我们定义了三样物品为假 FALSE  脚本执行到这的时候判断为假执行 end else
: l  ^/ H# p. v    This_Player.TakeByClientID(This_Item.ClientItemID);
2 ]/ @+ y2 c. W- {* S    This_Player.NotifyClientCommitItem(1,'');
    This_Player.PlayerNotice(''+This_Item.ItemName+'已销毁。',2);
: J: H, ~' u, r. z8 f3 b    end else
: g4 w8 C/ x* x    This_Player.NotifyClientCommitItem(0,'该物品不可销毁，请投入可销毁的物品！'); ;   //脚本执行这段  物品不在清理的范围内这样叠加物品就不能
8 Y* a1 H- m' R# E. v                                                                                                                                      //通过清理脚本来将拆0物品变成负1值  叠加问题得到解决
end;
//这种处理方式不影响叠加物品的使用而又成功的将叠加刷物品解决
//希望这个脚本能帮助广大的GM朋友  

Begin
2 c: G- p: V& s: g) g  o" _  domain;
, K# @+ T4 {9 O% u% E$ |- Wend.