传送员的详细设置方法和相关修改

相关文件3个：
  L7 }( t) X: ^7 e% W2 T
tgs1000\Script 目录下的 传送员.txt      需修改的文件
! b: ?) x+ H2 K& ~
tgs1000\Help 目录下的 传送员.txt         需修改的文件
+ R$ \" G; _7 B! I3 d9 x
tgs1000\Init 目录下的 map.sbd            参照地图代码（不需修改）

tgs1000\Script 目录下的 传送员.txt
  D2 [) a5 }, u+ m  t! Y1 P/ E
if aStr = 'close' then begin exit;

0 R4 x5 q. o& U: l+ l% H. C" e1 vend;
+ {9 e7 u, l! k% W* `) p
if aStr = 'goroom then begin

0 r4 X0 n8 \( W. A' Y% Bprint ('mapregen 32');
: K( b8 e( k0 w
7 U" s2 T6 P! b1 y* G. mName := callfunc ('getsendername');
3 d1 K$ M+ T# O9 `5 J2 E
Str := 'movespace ' + Name;

' b9 U, t& o- FStr := Str + ' user 32 23 18';

9 Y9 C) I% R/ x  L0 E0 L2 O; r1 Kprint (Str);

$ K" G/ s- G5 t" n0 Zexit;

end;

- \' }) N; i+ ?; N! u% k这段代码是传送到太极密室的可以修改以上几个地方：

if aStr = 'goroom' then begin

% m) |, g1 n0 G; z0 jprint ('mapregen 32');

Str := Str + ' user 32 23 18';

( P, V" O& ]2 R$ G0 A( j  ]goroom 可以参照Help 目录下的 传送员.txt 里的代码，两边都要一样的值

5 R, i9 N+ v8 m+ M; D" Gprint ('mapregen 32');   32 是地图代码 ，可tgs1000\Init 目录下的 map.sbd 看地图代码修改
! {! j3 s2 m3 ~' b$ p1 n
9 J9 t1 `  Q$ H+ h4 J: S# I0 Q( xStr := Str + ' user 32 23 18'; 前面数字32是地图代码， 23 18 是传送去的坐标

tgs1000\Help 目录下的 传送员.txt  

  N3 p4 c: H( G7 s4 ?7 D6 ~0 u% F<command send='close'>关闭</command>
; I' S* X' A0 H9 Y% `4 \1 L9 {% s<command send="goroom">太极密室</command>
<command send="goshamu">黄金沙漠</command>
- k, s) Z  H0 @6 x) C/ J4 U<command send="goshigu">帝王石谷</command>
8 X5 i4 b: Y) P$ [8 c
这里自己可任意添加，和tgs1000\Script 目录下的 传送员.txt 文件相对应。
1 K# x! n  @8 b" ?
- L8 T( t/ T; T- _# h- s9 j
5 b, m( u. S$ q7 ?( q经本人测试，不能在同一个地图传送。如果传送员在长城以南这个地图（代码1），里面添加传送点如果有地图代码1，传送员就会出错。如有不足请大家补充，谢谢！