游客您好
  • 点击联系客服

    在线时间: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 | 显示全部楼层 |阅读模式 打印 上一主题 下一主题
原理:进入流放地后自动删除物品栏内所有回城卷
. `% C5 k2 C$ `, e% R* g
: r) G& R9 G+ h1 K方法:
- Q3 l4 X6 ~, O' U- d: w. G  t5 W8 H' K
一、将"删除回城.txt"放到script文件夹,在Script.SDB中加入相应的编号,我这是135
7 X1 F1 K) u3 g8 G% }# c* C4 y* G5 Q
二、在流放地随便放个NPC Notice列加上script的编号135  坐标 58 78 要保证进去后就能看到& ~: Y' @/ L, O% Y, w( h

, v/ g( E  J+ ]0 o+ ~; O; L三、"删除回城.txt"中回城卷的名字根据各服务器情况修改! L9 X3 O8 \) ~! p) @( R+ C

9 @) `, ^3 I( B% K' s( r四、由于不能检测技能栏中的回城卷 所以回城卷要设置成不能放入技能栏 也就是在Item.sdb里设置回城卷的boNotSkill为TRUE
9 R$ h' ?8 ]  v0 N. ]( Z& l+ }0 P1 E' R2 {$ I8 d& d0 Q0 D
删除回城.txt
; U1 `6 e2 B* u6 u( r9 U
( ]& q$ T3 \. m. P* Z6 S) [& \unit 删除回城;. _, e$ n7 h' v/ K7 \
$ z' O, [% u4 [
interface' J5 d8 v0 ?6 J4 B# x  ^, Y" E
, i  M9 A2 I7 M; R
function  GetToken (aStr, aToken, aSep : String) : String;
! S; ?3 S' X& ]function  CompareStr (aStr1, aStr2 : String) : Boolean;. }% V8 m7 N* k) {
function  callfunc (aText: string): string;# w9 t0 c# O, _, R6 ]7 o
procedure print (aText: string);
) T% Z0 T, K; S% i& M7 t4 I! n8 Zfunction  Random (aScope: integer): integer;
9 w, T" t( E1 Kfunction  Length (aText: string): integer;4 }* g/ `0 T% x- H2 p/ W- s$ A
procedure Inc (aInt: integer);2 {0 D- F: a" V9 A* D) g5 }
procedure Dec (aInt: integer);
! u( j3 D: U/ t2 j7 w- efunction  StrToInt (astr: string): integer;2 I! u, ^4 ~0 A3 u
function  IntToStr (aInt: integer): string;6 {4 H+ w9 v) O
procedure exit;- _/ R- G5 [: W' c3 ^+ i

* s& G# w  Z3 C6 v' q2 k" Aprocedure OnCreate (aStr : String);
7 K2 ]5 O# [7 I  T  G' {7 L+ S6 D( ]5 K3 a) {$ w7 }* g
implementation5 k$ ^5 c1 E" q. A% p. |' d& B

& ^% }( {& v: p; ^procedure OnCreate (aStr : String);
' F/ t9 g5 @# G8 R! Z5 Xvar( E6 u: v. b* e2 A
   Str : String;
/ \5 H* c+ w. V3 X8 Q% r! j: {   iCount : String;1 \1 G& X7 ~" |% V2 K* @* \0 W3 @4 W
   GoBigMapItem : String = '回城卷';
1 b# H, R$ R5 B) h. ebegin- m2 c% d/ K# O
      Str := 'getsenderitemcountbyname ' + GoBigMapItem;. N, Z" Z! H/ b9 x
      iCount := callfunc (Str);
& w+ n9 r+ |. q      if iCount <> '0' then begin5 {# L% O% Y) n$ ~4 f% K8 B, a
         Str := 'getsenderitem ' + GoBigMapItem;
( l* i: h3 A; ?5 y# ~$ `         Str := Str + ':';: c: I2 w  P, ^" ^; ?
         Str := Str + iCount;
8 @; d, a1 D  @( y8 u. e         print (Str);
( O% T! b, l) r' _0 G* }9 L      end;. S' O& e+ s$ A3 z/ a
   exit;
1 E1 C9 z0 Z' D! d5 gend;( _0 g0 w0 p9 p; O2 p6 z1 f' ~  B

' _; [' {% c6 N5 \3 N" dend.

+ w, y- q4 V6 U. i/ Y
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

三千游戏官方客服

扫一扫二维码

添加qq客服

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