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

相关文件3个：
- c, n% U- Y6 Z4 X: v7 g" Z: c
+ p# i! s+ o* A" Ntgs1000\Script 目录下的 传送员.txt      需修改的文件
" y! B: @$ v( J  u
tgs1000\Help 目录下的 传送员.txt         需修改的文件
, \: i! i/ |0 y
3 ?2 B& i/ p* w- [7 m- J+ ytgs1000\Init 目录下的 map.sbd            参照地图代码（不需修改）

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

5 v; i* H* o/ c! ~) q" T" r# O2 dif aStr = 'close' then begin exit;

end;

( K2 c5 {# E! E% [- a$ e5 \if aStr = 'goroom then begin

7 J6 q( D4 j8 j2 Qprint ('mapregen 32');

Name := callfunc ('getsendername');

Str := 'movespace ' + Name;
: a8 j4 O" M) U' Z; L) ~
" I  a) l3 K+ @: rStr := Str + ' user 32 23 18';

5 u! ?6 O$ X$ x5 U4 Wprint (Str);

exit;
  c% I% y% [: E# n3 [" _
( t, b  h8 K7 cend;

这段代码是传送到太极密室的可以修改以上几个地方：

/ v1 H6 M+ i5 i6 U( Sif aStr = 'goroom' then begin
: d' u* Z) n( {) K; o
' K2 d+ S! \9 D; Z4 bprint ('mapregen 32');

Str := Str + ' user 32 23 18';
& P; [3 ~6 n$ B! l
. D, ~6 w5 g9 o1 s  s% ^2 a- Z, wgoroom 可以参照Help 目录下的 传送员.txt 里的代码，两边都要一样的值

# T8 Q- X( z, Qprint ('mapregen 32');   32 是地图代码 ，可tgs1000\Init 目录下的 map.sbd 看地图代码修改
3 \4 |; A- z5 K7 n, G
, F' i- H( D2 lStr := Str + ' user 32 23 18'; 前面数字32是地图代码， 23 18 是传送去的坐标

; [- u: d9 Y; H2 J; {6 Y: ]  Mtgs1000\Help 目录下的 传送员.txt  
, `/ Q) z3 H% p. y
<command send='close'>关闭</command>
<command send="goroom">太极密室</command>
<command send="goshamu">黄金沙漠</command>
+ t8 b! L- e6 N8 ?. i4 l<command send="goshigu">帝王石谷</command>
' l! p1 }# X8 h7 Q" p: I' |& h7 K
6 P) s- _9 J9 y5 ]这里自己可任意添加，和tgs1000\Script 目录下的 传送员.txt 文件相对应。

# l0 M7 c  v& y0 `: ]3 A
经本人测试，不能在同一个地图传送。如果传送员在长城以南这个地图（代码1），里面添加传送点如果有地图代码1，传送员就会出错。如有不足请大家补充，谢谢！

  ?% [7 F7 k7 M: v7 w