BveTs Map 2.00: utf-8

#標識通りだと理論上分岐できないので勝手に決める
#具体的には、標識ではR=300だが、標識通りの長さでは、複線間隔3.5mまで分岐できない
#とりあえずR=284.375として、直線側で63mの長さで3.5m分岐とする

#$dist_sign = 1で、下りのとき駅東側(分岐するとき)
#$dist_sign = -1で、下りのとき駅西側(合流するとき)

$dist;
Curve.BeginTransition();
Curve.Begin(-284.375 * $dist_sign);
Track['ForShikama'].Position(1.75 - 1.75 * $dist_sign, 0, 284.375 * $dist_sign);
Track['dammy1'].Position(1.75 - 1.75 * $dist_sign - 5.0, 0, 284.375 * $dist_sign);

$dist + 284.375 * atan2(31.5, (284.375 - 1.75));
Curve.BeginTransition();
Curve.End();
Curve.BeginTransition();
Curve.Begin(284.375 * $dist_sign);
Track['ForShikama'].Position(1.75, 0, -284.375 * $dist_sign);
Track['dammy1'].Position(1.75 - 5.0, 0, -284.375 * $dist_sign);

$dist + 284.375 * 2 * atan2(31.5, (284.375 - 1.75));
Curve.BeginTransition();
Curve.End();
Track['ForShikama'].Position(1.75 + 1.75 * $dist_sign, 0, 0);
Track['dammy1'].Position(1.75 + 1.75 * $dist_sign - 5.0, 0, 0);

$Shikama = $Shikama + 284.375 * atan2(31.5, (284.375 - 1.75)) * 2 - 63;