回城卷轴在流放地的BUG及解决方法

原理:进入流放地后自动删除物品栏内所有回城卷
方法:
一、将"删除回城.txt"放到script文件夹,在Script.SDB中加入相应的编号,我这是135
二、在流放地随便放个NPC Notice列加上script的编号135  坐标 58 78 要保证进去后就能看到
三、"删除回城.txt"中回城卷的名字根据各服务器情况修改
- @% G; s& J; {, v+ `四、由于不能检测技能栏中的回城卷 所以回城卷要设置成不能放入技能栏 也就是在Item.sdb里设置回城卷的boNotSkill为TRUE
删除回城.txt
6 q2 e; }: T2 m* g$ X5 r6 Iunit 删除回城;
( c5 t! D1 ~- l4 hinte**ce
1 ]! S5 |& k7 h" N' \+ [0 g! n9 Wfunction  GetToken (aStr, aToken, aSep : String) : String;
8 w; U6 y, I: B3 z  r9 {& m1 c/ sfunction  CompareStr (aStr1, aStr2 : String) : Boolean;
function  callfunc (aText: string): string;
: R+ w7 ^( `8 X7 y) t$ Jprocedure print (aText: string);
function  Random (aScope: integer): integer;
function  Length (aText: string): integer;
+ v9 {( h8 s: D, T1 O2 z# \9 R( tprocedure Inc (aInt: integer);
procedure Dec (aInt: integer);
function  StrToInt (astr: string): integer;
function  IntToStr (aInt: integer): string;
procedure exit;
: D" E. G) G  w$ fprocedure OnCreate (aStr : String);
implementation
procedure OnCreate (aStr : String);
; X7 \; B  W% X) W. Q. u* @3 J: l( Yvar
   Str : String;
% ~" l/ e) Z! F7 H( ]5 E   iCount : String;
   GoBigMapItem : String = '回城卷';
) p. D  y' s( N/ J+ e+ P% Vbegin
. P) g. g0 M2 E  e  P2 v* A" R7 P      Str := 'getsenderitemcountbyname ' + GoBigMapItem;
      iCount := callfunc (Str);
+ }2 D, Q* P3 S1 X  M0 Y) a      if iCount <> '0' then begin
0 M- h1 ]! z* U         Str := 'getsenderitem ' + GoBigMapItem;
: d. Z0 J& m( q" l         Str := Str + ':';
         Str := Str + iCount;
* [- L" v# o( U+ K' u2 M, n( X         print (Str);
      end;
   exit;
# `0 h3 ?* b& ~9 p' U% lend;
end.

' s. A& G* b/ m" V+ a