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

原理:进入流放地后自动删除物品栏内所有回城卷
9 f. P5 m1 @, O( x方法:
一、将"删除回城.txt"放到script文件夹,在Script.SDB中加入相应的编号,我这是135
+ _2 E( J$ A- j二、在流放地随便放个NPC Notice列加上script的编号135  坐标 58 78 要保证进去后就能看到
三、"删除回城.txt"中回城卷的名字根据各服务器情况修改
7 c$ b# n% G8 R四、由于不能检测技能栏中的回城卷 所以回城卷要设置成不能放入技能栏 也就是在Item.sdb里设置回城卷的boNotSkill为TRUE
- a- ]0 D2 S5 d) F1 B删除回城.txt
$ q! T  y7 X3 Junit 删除回城;
3 G' Z+ R+ W5 `( x- j, sinte**ce
function  GetToken (aStr, aToken, aSep : String) : String;
function  CompareStr (aStr1, aStr2 : String) : Boolean;
function  callfunc (aText: string): string;
procedure print (aText: string);
function  Random (aScope: integer): integer;
& `( h' h( n$ [& I8 c$ ufunction  Length (aText: string): integer;
; q6 W1 y0 r; a: n& J! gprocedure Inc (aInt: integer);
procedure Dec (aInt: integer);
function  StrToInt (astr: string): integer;
function  IntToStr (aInt: integer): string;
- L. f. j, M6 x% W" c5 a- jprocedure exit;
procedure OnCreate (aStr : String);
6 h# \  V" U, d% {implementation
* [4 I2 W. M) U6 J) l1 X& Yprocedure OnCreate (aStr : String);
0 Y5 K- i9 E; Y$ yvar
   Str : String;
   iCount : String;
1 g% S- ^2 m& d' w+ ]& s   GoBigMapItem : String = '回城卷';
begin
  P( R( e. p( U7 _8 n+ M/ J      Str := 'getsenderitemcountbyname ' + GoBigMapItem;
: t  l, r" s; w$ b6 r  f      iCount := callfunc (Str);
/ v7 w. {) l% r3 w2 |* q      if iCount <> '0' then begin
+ x  {% M- J; Q7 \         Str := 'getsenderitem ' + GoBigMapItem;
. `- w( |9 V  s# }         Str := Str + ':';
5 A5 g1 l) X, _0 N0 x6 `1 x         Str := Str + iCount;
         print (Str);
# W1 L' B; B% J. w1 _' C5 T! [2 u      end;
+ L4 r1 h: ^, S+ z7 P8 l4 ^3 R   exit;
4 w4 p8 F& S+ G9 F9 \0 q5 p# c* Qend;
# r$ o) g/ K0 B4 D+ U1 ?end.