游客您好
  • 点击联系客服

    在线时间:8:30-18:00

    客服微信

    Wkr-3000y-kf

    电子邮件

    3000y@wenkeruan.com
  • 手机版

    随时掌握游戏动态

  • 扫一扫二维码

    添加微信客服

Lv.7 版主
8号会员,9活跃值,2022.09.01 加入
  • 127发帖
  • 123主题
  • 0关注
  • 0粉丝
这个人很懒,什么也没有留下。
独家推荐 更多>

[游戏设置] 进入流放地后自动删除物品栏内所有回城卷

[复制链接]
异仟年认证商人 发表于 2022-9-5 17:39:14 | 显示全部楼层 |阅读模式 打印 上一主题 下一主题
原理:进入流放地后自动删除物品栏内所有回城卷
& M8 x, c) \& x
4 m- s- l% H9 _+ T4 l4 B方法:4 x, e3 u3 p( @4 E" i
8 Z- @( {; O8 C0 G1 h
一、将"删除回城.txt"放到script文件夹,在Script.SDB中加入相应的编号,我这是135$ V. p% C% o8 P; Q: x! g

: D" o& g$ c. G/ X/ _) P9 i二、在流放地随便放个NPC Notice列加上script的编号135  坐标 58 78 要保证进去后就能看到; e% [9 u7 g2 a0 B
- D1 \; Q: u% O& P. k9 ^
三、"删除回城.txt"中回城卷的名字根据各服务器情况修改
  J* N& w+ p! d) E! h0 X: @1 o" D& `( z( P3 W& ]& O  p( {
四、由于不能检测技能栏中的回城卷 所以回城卷要设置成不能放入技能栏 也就是在Item.sdb里设置回城卷的boNotSkill为TRUE1 |9 o7 d9 u% P3 [
$ F! V5 p4 [% g) H
删除回城.txt- c! E. i& q. a

! j7 H4 `1 J8 T8 `9 R( U0 eunit 删除回城;
, G- L3 U+ x* S- S- i- Y8 H% I$ p
interface
4 k+ x) Z( C2 u8 o9 b' {  m- {+ {, g, q9 E
function  GetToken (aStr, aToken, aSep : String) : String;3 t- D$ W8 D" C' t. \
function  CompareStr (aStr1, aStr2 : String) : Boolean;
5 W0 U8 P, J: T, }+ efunction  callfunc (aText: string): string;  E0 V$ K. v5 M* F
procedure print (aText: string);
! R9 e, G- ~1 `; `function  Random (aScope: integer): integer;
) t  A/ O8 c; Q1 |# z* T+ ~- l* Nfunction  Length (aText: string): integer;+ G8 R$ n! D( i
procedure Inc (aInt: integer);
0 l5 p' i) Z( J+ _4 g, sprocedure Dec (aInt: integer);
1 n3 C' d3 U! p9 ?5 f1 Lfunction  StrToInt (astr: string): integer;
* D% i) c) h8 ^( o  afunction  IntToStr (aInt: integer): string;+ r# @& g& ?$ g/ B7 t0 X3 h
procedure exit;
, Y. t5 O  b/ U; @* @+ b* h& W
1 X* U9 n) T" @/ z$ Yprocedure OnCreate (aStr : String);
9 A" V0 r( B. u, h4 v
9 A' k7 p2 G( I9 @0 aimplementation0 \6 r1 h' i& f, \% V1 H
. A; @# ]7 {/ K( N- H# ~+ l
procedure OnCreate (aStr : String);
/ g3 Q/ J1 ]3 p: R5 M+ Vvar. P3 |5 D! E, u' T; Q% ~$ p
   Str : String;: e% k  e6 _$ g3 R  Y
   iCount : String;
* {0 g4 B$ h& q7 Z" L; W& z/ L   GoBigMapItem : String = '回城卷';
) `) B' d  T, c* r6 ~: lbegin* e' d+ D2 y2 j- z  @7 _
      Str := 'getsenderitemcountbyname ' + GoBigMapItem;* x6 M, V. c8 [1 ~! f1 d; ^' o
      iCount := callfunc (Str);3 e& u4 w% G+ k5 f
      if iCount <> '0' then begin3 q% Y; H6 Y$ l% @" p8 k, J
         Str := 'getsenderitem ' + GoBigMapItem;  T$ o, Q  C& J2 b
         Str := Str + ':';
& s  M- [" y5 }6 M0 b# N& N4 S         Str := Str + iCount;  p9 _. h( T; K0 w; A# W
         print (Str);
) I; d0 f2 Z+ e" d      end;% e/ r9 d9 w( l
   exit;9 P' I) G* s$ U4 d
end;
" ]3 ^5 |, A. s! r5 _5 D8 @! O0 g% b# ]& A- U' ?
end.
: ~9 `' H( Z8 W  t* `2 S  I  y) e
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

三千游戏官方客服

扫一扫二维码

添加qq客服

Powered by Discuz!X3.4 ©2001-2013 Comsenz Inc.闽公网安备 35099902000100号增值电信业务经营许可证 闽B2-20220593 闽ICP备2023014375号