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

相关文件3个：

tgs1000\Script 目录下的 传送员.txt      需修改的文件
2 k3 ~% M" R2 e2 e$ I7 [# U% H) a6 L
9 r, Q! j: J+ c8 Ktgs1000\Help 目录下的 传送员.txt         需修改的文件
$ C' T2 D0 i! J+ H+ r. i
tgs1000\Init 目录下的 map.sbd            参照地图代码（不需修改）

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

2 s6 v  i: N) N1 \9 Eif aStr = 'close' then begin exit;
% F$ D# K* P0 p; U  M# R$ U! A; G
. y) W3 r- ~( z9 Q' ?8 H  D) yend;

if aStr = 'goroom then begin
& r2 H: V+ a' I5 W/ c
- V: h9 ^! F+ \print ('mapregen 32');
4 R0 r& k5 C+ C5 k4 j2 i! @, p
4 d+ w, B0 M5 N- iName := callfunc ('getsendername');

: g/ J+ i3 u% c9 j" qStr := 'movespace ' + Name;
# F0 k2 k0 ^2 g
Str := Str + ' user 32 23 18';

print (Str);

. X) t& G  f) w5 g* X8 Cexit;

$ e. _$ {$ ]) g+ gend;
% L0 }/ o  J0 \5 h
这段代码是传送到太极密室的可以修改以上几个地方：
) e3 s) r3 a+ Y- m, Q3 D
if aStr = 'goroom' then begin

  b. ]' G( w. k5 Q' @. S6 [print ('mapregen 32');
; A- I& D2 n+ Z8 C: X$ I8 M8 a
Str := Str + ' user 32 23 18';

7 {2 W7 {( O! M+ f" L, o. Q! V' Qgoroom 可以参照Help 目录下的 传送员.txt 里的代码，两边都要一样的值

print ('mapregen 32');   32 是地图代码 ，可tgs1000\Init 目录下的 map.sbd 看地图代码修改
( i/ P( ^! ^; S$ }
  o* B* A. ?8 E5 A6 `! sStr := Str + ' user 32 23 18'; 前面数字32是地图代码， 23 18 是传送去的坐标

! Y1 _# _! V- Y% B7 X, H3 Rtgs1000\Help 目录下的 传送员.txt  

<command send='close'>关闭</command>
+ S3 u1 t2 b& }4 P0 K2 L8 h% g9 ?; O<command send="goroom">太极密室</command>
! E/ B) d' K6 h<command send="goshamu">黄金沙漠</command>
* N% u% ~! o* j/ b<command send="goshigu">帝王石谷</command>
4 p. A" i" B! K0 i/ |! B/ u5 d
3 o# z4 u0 d# U9 c# z9 m0 g8 J- F这里自己可任意添加，和tgs1000\Script 目录下的 传送员.txt 文件相对应。


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