请选择 进入手机版 | 继续访问电脑版
 
查看: 393|回复: 0

战神引擎叠加物品简单防刷教程

[复制链接]

28

主题

28

帖子

1588

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1588

最佳新人活跃会员热心会员推广达人宣传达人灌水之王突出贡献优秀版主荣誉管理论坛元老

发表于 2020-8-20 23:20:01 | 显示全部楼层 |阅读模式
→★我爱游戏频道★←
教程名称战神引擎叠加物品简单防刷教程
教程链接打开链接
提 取 码
↓↓↓★图片内容★↓↓↓
——能双击的物品——
直接说就是战神引擎自带的BUG能双击使用的物品拆分0个出来然后无限使用成负数个,
使用后小退上线负数就会变成叠加的最大数999(具体数字看数据设置多大)
这个的防止方法基本就是把数据库的这个叠加物品做成不不能叠加,
修改方法就是:数据库取消物品的叠加打开数据库找到mir3库,在stditems表里面,
我们找到可以叠加物品的,在stdmode字段设置为0shape字段也设置为0DuraMax这个是持久字段设置为1
如果我们需要这个物品叠加使用可以写成仓库脚本比如这样的:
QQ截图20200820230341.png

  a7 i" O1 w5 z6 T) i( M' z2 l
——不能双击的材料物品——
不能使用的材料物品想刷的话基本就是拆分成0个,
然后找清除垃圾NPC清除这个0个的材料然后小退登录这个物品数量就会变成能叠加的最大数量999(具体数字看数据设置多大)
修改方法就是:材料需要的多做成不可叠加有点不好操作,不过你也可以做成仓库脚本使用,
不过最最简单的方法就是既需要用到清理垃圾的NPC我们就在这个NPC做个限制就可以了!
具体代码如下
  1. program mir2;0 D% H% L. v* ^3 Q) F. M

  2. 6 h0 S! e9 q% i/ b7 F& ]1 I
  3. procedure _exit; 8 N* F4 u% Z  _$ E3 q* ~' N* y
  4. begin
    2 x: _5 F2 p8 f
  5.     This_NPC.CloseDialog(This_Player);
    + l& H; ?) f5 |6 v% r2 b) Z
  6.     exit;) [7 D$ t+ [$ o
  7. end;; Z3 X3 l$ B! W
  8.   L, `4 _- i- G- P) v9 T' i
  9. Procedure _DestoryItem;7 v0 R  N" p3 D5 A+ e
  10. begin
    $ @1 N" w8 D5 \
  11.    This_NPC.NpcDialog(This_Player,
    6 M) b+ ^( l+ v- _7 b1 n
  12.    '把需要销毁的东西放进去就行啦!\ \'+: l! e" P. k* C& x3 s% b
  13.    '|请注意,物品销毁后将<消失/c=red>,无法找回,请<谨慎操作/c=red>!\'+
    % A/ l2 g7 I* V6 p9 o' f0 j$ b- C  k
  14.    '|部分物品无法销毁。'+0 F" {/ z( p- f0 T
  15.    '|{cmd}<开始销毁/@DestoryItem_1>                '
    % L* b; z0 |! d& ^; Q* Q
  16.    );. d! H  Q$ c, R0 P/ b
  17. end; ' x5 w  [; l% `9 e' R( u+ D
  18. Procedure _DestoryItem_1;& `5 {5 h8 v$ o, @9 `5 e$ G
  19. begin
      t9 u' F$ i, M; z  _2 b  n
  20.    This_NPC.Click_CommitItem(This_Player,1,'待销毁道具:'); + n. K- x3 h1 T- K) L
  21. end;   K0 N/ Q& k; D
  22. //-------------删除道具--------------------
    4 R+ M! t8 g3 b
  23. function NotDestroy(iName : string):boolean;6 h; [1 |5 e" V. d- i( A! E
  24. begin  r. |, V: c( D! z; e4 U9 ^
  25.     result := true;) T" ?6 @; n( B6 s' l3 I& A
  26.     case iName of% E* S% W1 P- m) m
  27.         '魔血石(小)' : result := false;
    2 F% ?  v& B8 d
  28.         '魔血石(中)' : result := false;& }1 v( q9 `* E) Z" }
  29.         '魔血石(大)' : result := false;0 u7 o- l0 J* s3 q8 Q
  30.         '魔血石(小)(绑)' : result := false;
    5 B, U! \- {) y4 f2 R3 @7 M1 Y
  31.         '魔血石(中)(绑)' : result := false;0 [, p, t# n' H6 s* W
  32.         '魔血石(大)(绑)' : result := false;
    + G' D) y% z* e( v1 e, K% g
  33.         '气血石(小)' : result := false;6 e# c% d3 Q& d) R8 `5 M: z' f& A7 [
  34.         '气血石(中)' : result := false;9 C. A8 p, K$ m+ I) w2 J
  35.         '气血石(大)' : result := false;
    ; y8 O3 G; ^! z1 i$ B. M& n1 {
  36.         '气血石(小)(绑)' : result := false;
    ! q6 ~: F$ [4 H0 L8 _2 r2 D
  37.         '气血石(中)(绑)' : result := false;, B0 H* ]" v& p7 n$ [3 b' n- {
  38.         '气血石(大)(绑)' : result := false;
    5 q8 `5 I- n% t- N' t$ u' o% K7 P
  39.         '幻魔石(小)' : result := false;
    ) L' d: c0 t3 |0 i. ^. x
  40.         '幻魔石(中)' : result := false;
    . k2 f2 d" h' E2 N# c
  41.         '幻魔石(大)' : result := false;
    ( g1 p% H8 Q: D* g' f6 D- |# U
  42.         '幻魔石(小)(绑)' : result := false;: d7 ?! Z$ o" L1 R
  43.         '幻魔石(中)(绑)' : result := false;
    / H* v" r" W+ C! w+ w  p2 d
  44.         '幻魔石(大)(绑)' : result := false;
    ( `$ t2 y0 p# ~5 S% g3 z' T
  45.         4 u6 g& p+ |+ Q
  46.     end;
    . w& E1 B$ L! R5 @% t9 ?
  47. end;* w/ i$ I8 w  C: s3 r
  48. procedure CommitItem(AType:word);
    9 d. M' r' z2 \* c6 G" f
  49. var bkxh : string ;% o0 E5 V  @, i
  50. begin
    4 D6 b) C" b1 [0 s! }
  51. bkxh := This_Item.ItemName;2 R3 W4 L1 h9 x+ u
  52. if (bkxh <> '金刚石' ) and (bkxh <> '书页' ) then    // 这里添加修改不可销毁的物品
    . \$ q! o# ?9 W/ {
  53. begin' S! G+ r; l# g; {2 q2 }+ g
  54.     if NotDestroy(This_Item.ItemName) then 3 X, ?3 a2 m( A" O( v7 H! `
  55.     begin& V  v* l# S; l& O9 i2 A
  56.     This_Player.TakeByClientID(This_Item.ClientItemID);$ n( Q- H7 N# Y9 K
  57.     This_Player.NotifyClientCommitItem(1,'');
    + |  ?" G# g) v6 H
  58.     This_Player.PlayerNotice(''+This_Item.ItemName+'已销毁。',2);
    ; w0 m' [' l: n1 W! \
  59.     end else 4 S5 m! A$ n! J6 h) z5 M0 \
  60.     This_Player.NotifyClientCommitItem(0,'该物品不可销毁,请投入可销毁的物品!');
    7 W+ f; }# i6 D4 r
  61. end+ @8 Y8 Y* b1 [4 m( g
  62. else
    - ^( b+ j4 H& |  L
  63. This_Player.NotifyClientCommitItem(0,'该物品不可销毁,请投入可销毁的物品!');
      A: Y) v1 U& ]) G7 h9 b5 i* R
  64.          ; j$ x- F: i9 ]2 f/ z8 E/ g
  65. end;; h, X3 E: L8 F: }3 K
  66. //------# R3 K/ K- ~; ^  L* O+ d5 t7 T
  67. begin
    - K2 G5 ^! \" W0 W7 h
  68.     This_NPC.NpcDialog(This_Player,
    4 u, ~& @5 s$ J9 i7 g" Q
  69. +'我可以把你不用的物品销毁\'/ w5 ~$ l1 I/ E% Z  U. N$ k
  70. +'请慎重考虑哦!'
    / B* Q; a6 D! Q* y' Y* m3 U
  71.     +'|{cmd}<物品销毁/@DestoryItem>\'
    3 d" V$ N2 e6 V; a) f
  72.     );
    - B# T& w/ |9 Y1 p8 W8 b# S) b" b7 ?
  73. end.
复制代码
* x! H3 b( F: ~& b  i
if (bkxh <> '金刚石' ) and (bkxh <> '书页' ) and (bkxh <> '物品名称' ) then // 这里添加修改不可销毁的物品
直接在后台添加你叠加的材料物品,这样就无法销毁也就拆分的0就一直是0个!

+ B* [* f" v5 h. F
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

抵制不良游戏,拒绝盗版游戏。注意自我保护,谨防受骗上当。适度游戏益脑,沉迷游戏伤身。合理安排时间,享受健康生活。

Powered by Discuz! X3.4    技术支持:DZFUNS

663工作室   Copyright 2013 © 我爱游戏频道 , All Rights Reserved