TTFIL zsz_tk.ttt

   1  {FILELEVEL=1?
   2    $INCLUDE SINGLE.TTT
   3  }
   4
   5  $REQUIRE STREETDEF.TTT
   6  $REQUIRE TRAINDEF.TTT
   7  $REQUIRE POOLDEF2.TTT
   8
   9  $SECTION                                                                                                \
  10      NAME=FUK_ALL;                                                                                       \
  11      LC=1;
  12  #----------------------------------------------------------------------------
  13  #
  14  # 1600
  15  #
  16    $SECTION                                                                                              \
  17        NAME=FUK1600;                                                                                     \
  18        DIS=20; %SECFIN;%FOOTER(© fukayatanteijimusyo https://fukayoid.main.jp/trainkit.htm);
  19  #..........................................................................
  20  # 102
  21      $GROUP                                                                                              \
  22          NAME=FU102;                                                                                     \
  23          DX=1600; AB=13; BL=109; VM=HEAD;                                                                \
  24          BG=HIDAKAB:,-109;
  25        C=JRH_DC40_350;
  26        C=JRH_DC40_700L;
  27      $ENDGROUP
  28  #..........................................................................
  29  # 104
  30      $GROUP                                                                                              \
  31          NAME=FU104;                                                                                     \
  32          DX=1600; AB=113; BL=9; VM=HEAD;                                                                 \
  33          BG=(YOUTEIB:,-9;SIG_J4:0+1025,-5;TRBED41:..,^0);                                        \
  34          FG=SIG_J4R:0+200,-5;                                                                            \
  35          WP=(0+100,<TB:FG.SIGR; 0+1125,>TB:BG.SIGR);                                                     \
  36          ENV=[TB=<FG.SIGG,<BG.SIGR,>FG.SIGR,>BG.SIGG,3];
  37        AP=[D=L]                                                                                          \
  38            [C=JNR_D51HKDL,JNR_D51HKDL,JR_YO3500~OP,2*JR_G4,2*JR_G3,JR_TAKI3000A,                         \
  39            JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],                          \
  40            (<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_YO3500~OP]|                               \
  41            [D=R]                                                                                         \
  42            [C=JNR_D51HKD,JNR_D51HKD,JR_YO3500~OP,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),       \
  43            JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],JR_TAKI3000A,2*JR_G3,     \
  44            2*JR_G4,JR_YO3500~OP];
  45        C=JNR_KH22E,JNR_KH22F,JNR_KH22E;
  46        C=JR_KH23;
  47        C=<JRH_KH150A,JRH_DC40_700L;
  48        AP=[D=L]                                                                                          \
  49            [C=JR_C62_2HKDL,JR_C62_2HKDL,JR_SUHAFU44B,JR_SUHA45BL,JR_SUHA45BL,JR_SUHA45BL,JNR_SURO62DL,   \
  50            JR_SUHAFU44BL,JR_SUYU13N,JR_MANI60L~OP,JR_MANI60L~OP,JR_OYU10]|                               \
  51            [D=R]                                                                                         \
  52            [C=JNR_C62_2HKD,JNR_C62_2HKD,JR_OYU10,JR_MANI60L~OP,JR_MANI60L~OP,JR_SUYU13N,JR_SUHAFU44BL,   \
  53            JNR_SURO62DL,JR_SUHA45BL,JR_SUHA45BL,JR_SUHA45BL,JR_SUHAFU44B];
  54      $ENDGROUP
  55  #..........................................................................
  56  # 105
  57      $GROUP                                                                                              \
  58          NAME=FU105;                                                                                     \
  59          DX=1600; AB=83; BL=9; VM=HEAD;                                                                  \
  60          BG=(YAMUBETSUB:,-9;SIG_J4:0+1025,-5;TRBED20:..,^0);                                     \
  61          FG=(SIG_J4R:0+200,-5;YAMUBETSUF:,-9);                                                   \
  62          WP=(0+100,<TB:FG.SIGR; 0+1125,>TB:BG.SIGR);                                                     \
  63          ENV=[TB=<FG.SIGG,<BG.SIGR,>FG.SIGR,>BG.SIGG,3];
  64        C=JRH_DC54;
  65        C=<JRH_KH182NR1,JRH_KH182NR2,JRH_KH182NR3,JRH_KH182NR4,JRH_KH182NR5;
  66        C=<JNR_KH22E,JNR_KH22F;
  67        C=JRH_DE15_NOROKKO1L,(<JRH_NOR_3500,JRH_NOR_7000,JRH_NOR_42,JRH_NOR_51);
  68        C=JNR_KH22E;
  69      $ENDGROUP
  70  #..........................................................................
  71  # 201
  72      $GROUP                                                                                              \
  73          NAME=FU201;                                                                                     \
  74          DX=1600; AB=2; BL=120; VM=HEAD;                                                                 \
  75          BG=ICHINOTOB:,-120;                                                                     \
  76          FG=ICHINOTOF:,-120;
  77        AP=[D=L][C=JRE_C57C_180L,(<JRE_BAN1L,JRE_BAN2,JRE_BAN3,JRE_BAN4,JRE_BAN2,JRE_BAN3,JRE_BAN1)][V=4]| \
  78            [D=R][C=JRE_C57C_180,(<JRE_BAN1L,JRE_BAN2,JRE_BAN3,JRE_BAN4,JRE_BAN2,JRE_BAN3,JRE_BAN1)][V=5];
  79        C=<JNR_KH40_2000,JNR_KIHA58L,JNR_KH65A;
  80        C=JRE_KH100,JRE_KH100;
  81        C=JRE_DC40NGT,JRE_DC40NGT;
  82        C=JRE_DC40NGT;
  83      $ENDGROUP
  84  #..........................................................................
  85  # 202
  86      $SCENE                                                                                              \
  87          NAME=FU202;                                                                                     \
  88          DX=1600; DY=180; YDIR=U; VM=HEAD;                                                               \
  89          BG=KUROKAWAB;                                                                           \
  90          FG=KUROKAWAF;
  91        $PATH Y=111; LC=2;
  92          C=JR_ED75L1,JR_SUNI41AL,JR_SUHAFU12L,JR_OHA12,JR_OHA12,JR_OHAFU13,JR_OHA12,JR_OHA12,JR_OHA12,   \
  93              JR_OHA12,JR_SUHAFU12;                                                                       \
  94            D=L;
  95          C=JR_ED75L1,JR_SUHAFU42B1,JNR_SUHA43B1L,JR_SUHAFU42B1L,JR_SUHAFU42B1,JNR_SUHA43B2L,             \
  96              JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1L;                                                 \
  97            D=L;
  98          C=JR_ED75L1,JRF_ED75,18-23*(KOKI55|KOKIB),KOKIE;                                                \
  99            D=L;
 100          C=<JRE_715AL,JRE_715B,JRE_715C,JRE_715D;                                                        \
 101            D=L;
 102          C=<JRE_713AL,JRE_713B,JRE_713C;                                                                 \
 103            D=L;
 104        $ENDPATH
 105        $PATH Y=101; LC=2;
 106          C=<JRE_715AL,JRE_715B,JRE_715C,JRE_715D;                                                        \
 107            D=R;
 108          C=<JRE_713AL,JRE_713B,JRE_713C;                                                                 \
 109            D=R;
 110          C=JR_ED75~OP,JR_SUHAFU12,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHAFU13,JR_OHA12,JR_OHA12,      \
 111              JR_SUHAFU12L,JR_SUNI41AL;                                                                   \
 112            D=R;
 113          C=JR_ED75~OP,JR_SUHAFU42B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1,            \
 114              JR_SUHAFU42K1L,JNR_SUHA43K1L,JR_SUHAFU42K1;                                                 \
 115            D=R;
 116          C=JRF_ED75,JR_ED75~OP,18-23*(KOKI55|KOKIB),KOKIE;                                               \
 117            D=R;
 118        $ENDPATH
 119      $ENDSCENE
 120  #..........................................................................
 121  # 203
 122      $GROUP                                                                                              \
 123          NAME=FU203;                                                                                     \
 124          DX=1600; AB=63; BL=9; VM=HEAD;                                                                  \
 125          BG=(SASAGAWAB:,-9;SIG_J3:<0+1025,-5;TRBED43:..,^0);                                     \
 126          FG=(SIG_J3R:<0+200,-5;FL_J9:..,-5,0);                                                           \
 127          WP=(0+1125,>TB:BG.SIGR;0+100,<TB:FG.SIGR);                                                      \
 128          ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3];
 129        C=<JRE_485KIRA1L,JRE_485KIRA2,JRE_485KIRA3,JRE_485KIRA4;
 130        AP=[D=L]                                                                                          \
 131            [C=JNR_EF81D,JR_SUHAFU42K1,JR_SUHA45L,JR_SUHA45L,JR_SUHAFU42K1L,JR_SUHAFU44B,JNR_SUHA43B2L,   \
 132            JNR_SUHA43B1L,JR_SUHAFU44BL]|                                                                 \
 133            [D=R]                                                                                         \
 134            [C=JNR_EF81D,JR_SUHAFU44BL,JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU44B,JR_SUHAFU42K1L,           \
 135            JR_SUHA45L,JR_SUHA45L,JR_SUHAFU42K1];
 136        C=JRE_DC40NGT,JRE_DC40NGT;
 137        C=JRW_EF81_TWILIGHT,                                                                              \
 138            (<JRH_TES9L,JRH_TES8L,JRH_TES7L,JRH_TES6L,JRH_TES5L,JRH_TES5L,JRH_TES4L,JRH_TES3L,JRH_TES2,   \
 139            JRH_TES1);
 140        AP=[D=L][C=JRF_EF81,10*KOKIC,10*KOKIC]|[D=R][C=JRF_EF81,10*KOKI15,10*KOKIC];
 141        C=<JNR_TC481_0BAL,JNR_TS481_0BA,JNR_TS481_0BA,JNR_M484_0AA,JNR_M485AA,JNR_M484_0AA,JNR_M485AA,    \
 142            JNR_TD481A,JNR_M484_0AA,JNR_M485AA,JNR_M484_0AA,JNR_M485AA,JNR_TC481_0BA;
 143      $ENDGROUP
 144  #..........................................................................
 145  # 204
 146      $SCENE                                                                                              \
 147          NAME=FU204;                                                                                     \
 148          DX=1600; DY=180; YDIR=U; VM=HEAD;                                                               \
 149          BG=TAGOKURAB;                                                                           \
 150          FG=(FENCE_12B:0..439,19,100;FENCE_11A,FENCE_11B:0+445..100,16,0;SCENE_TAGOKURAM:,91);
 151        $PATH Y=25; LC=2;
 152          C=JNR_KH40_2000,JRE_KH48_0L,JRE_KH48_0;                                                         \
 153            D=L;
 154          M=STOP;                                                                                         \
 155            C=JRE_KH40TOHOKUL,JRE_KH40TOHOKUL;                                                            \
 156            D=R; P=<0+700;
 157          M=STOP;                                                                                         \
 158            C=JRE_KH40TOHOKUL,JRE_KH40TOHOKUL;                                                            \
 159            D=L; P=<0+1000;
 160          M=STOP;                                                                                         \
 161            C=JRE_KH48_0,JRE_KH48_0L,JNR_KH40_2000;                                                       \
 162            D=R; P=<0+700;
 163        $ENDPATH
 164        $PATH Y=124; LC=2;
 165          C=BIKE13|BIKE14|BIKE15|BIKE16|BIKE17|BIKE1,200,BIKE13|BIKE14|BIKE15|BIKE16|BIKE17|BIKE1;        \
 166            V=2;
 167          C=RENAULT_KIPPER3;                                                                              \
 168            V=6;
 169        $ENDPATH
 170      $ENDSCENE
 171  #..........................................................................
 172  # 205
 173      $GROUP                                                                                              \
 174          NAME=FU205;                                                                                     \
 175          DX=1600; AB=-7; BL=129; VM=HEAD;                                                                \
 176          BG=TADAMI1BG:,-129;
 177        C=$DIR(JR_C11325MOKAL,JR_C11325MOKA),3*JR_OHAFU33CK1;                                             \
 178          V=4;
 179        C=JRE_KH40TOHOKUL,JRE_KH40TOHOKUL,JRE_KH40TOHOKUL;
 180        C=<JNR_KIHA58L,JNR_KH65A;
 181      $ENDGROUP
 182  #..........................................................................
 183  # 206
 184      $GROUP                                                                                              \
 185          NAME=FU206;                                                                                     \
 186          DX=1600; BL=129; VM=HEAD;                                                                       \
 187          BG=TADAMI2BG:,-129;
 188        C=<JRE_KH47SYUTOKENL,JRE_KH47SYUTOKEN;
 189        C=<JNR_KH40_2000,JRE_KH40TOHOKUL,JRE_KH40TOHOKUL;
 190        C=<JRE_KH47SYUTOKENL,JRE_KH47SYUTOKEN,JRE_KH40TOHOKUL;
 191      $ENDGROUP
 192  #..........................................................................
 193  # 208
 194      $GROUP                                                                                              \
 195          NAME=FU208;                                                                                     \
 196          DX=1600; AB=75; BL=47; VM=HEAD;                                                                 \
 197          BG=TADAMI4B:,-47;                                                                       \
 198          FG=(BRIDGE_TADAMI4:<0+356,-13; HANDRAIL05A,HANDRAIL05B:0..0+363,-6,>>;                          \
 199          HANDRAIL05B,HANDRAIL05A:0+1132..100,-6,<<);
 200        C=<JRE_KH47SYUTOKENL,JRE_KH40TOHOKUL,JRE_KH40TOHOKUL;
 201        C=JNR_KH40_2000,JNR_KH40_2000;
 202        C=<JNR_KIHA58L,JNR_KIHA28,JNR_KIHA58A;
 203        C=$DIR(JR_C11325MOKAL,JR_C11325MOKA,),JR_YO3500~OP,                                               \
 204            (<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_YO3500~OP;                                \
 205          V=4;
 206      $ENDGROUP
 207  #..........................................................................
 208  # 247
 209      $GROUP                                                                                              \
 210          NAME=FU247;                                                                                     \
 211          DX=1600; AB=73; BL=49;                                                                          \
 212          BG=TAMAGAWA1B:,-49;                                                                     \
 213          FG=TAMAGAWA1F:,-49;
 214        C=<JRE_E3A1L,JRE_E3A2,JRE_E3A3,JRE_E3A4,JRE_E3A5,JRE_E3A6;                                        \
 215          V=13;
 216        C=<JRE_E3A1L,JRE_E3A2,JRE_E3A3,JRE_E3A4,JRE_E3A5,JRE_E3A6;                                        \
 217          V=13;
 218        C=<JRE_701_5000TCTL,JRE_701_5000MCT;                                                              \
 219          V=9;
 220        C=<JRE_E3A1L,JRE_E3A2,JRE_E3A3,JRE_E3A4,JRE_E3A5,JRE_E3A6;                                        \
 221          V=13;
 222        C=(<JRE_701_5000TCTL,JRE_701_5000MCT),(<JRE_701_5000TCTL,JRE_701_5000MCT);                        \
 223          V=9;
 224      $ENDGROUP
 225  #..........................................................................
 226  # 303
 227      $SCENE                                                                                              \
 228          NAME=FU303;                                                                                     \
 229          DX=1600; DY=139; YDIR=U; VM=HEAD;                                                               \
 230          BG=DOAIEKINOBORIB:,9;                                                                   \
 231          FG=SCENE_DOAIEKINOBORIF;
 232        $PATH Y=12; LC=2; ENV=[TB=SNOW,3];
 233          C=JNR_MC165CXL,JNR_M164_0CXL,JNR_TC165CX,JNR_TK164AL,JNR_MC165CXL,JNR_M164_0CXL,JNR_TC165CX,    \
 234              JNR_TS165CL,JNR_TS165CL,JNR_MC165CXL,JNR_M164_0CXL,JNR_TC165CX;                             \
 235            D=L;
 236          C=JRF_EF64_1009,JRF_EF64_1008,2*KOKI55,2*KOKI55,JR_TAKI1000JEL,JR_TAKI1000JL,JR_TAKI1000JL,     \
 237              JR_TAKI1000JL;                                                                              \
 238            D=L;
 239          M=STOP;                                                                                         \
 240            C=<JRE_TC115NIGATAL,JRE_MC115NIGATA;                                                          \
 241            D=L; P=<0+640;
 242        $ENDPATH
 243        $PATH Y=12; LC=2;
 244          M=STOP;                                                                                         \
 245            C=<JRE_TC115NIGATAL,JRE_MC115NIGATA;                                                          \
 246            D=R; P=<0+640;
 247          C=JNR_TC165CX,JNR_M164_0CXL,JNR_MC165CXL,JNR_TS165CL,JNR_TS165CL,JNR_TC165CX,JNR_M164_0CXL,     \
 248              JNR_MC165CXL,JNR_TK164AL,JNR_TC165CX,JNR_M164_0CXL,JNR_MC165CXL;                            \
 249            D=R;
 250          C=JRF_EF64_1008,JRF_EF64_1009,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JEL,         \
 251              2*KOKI55,2*KOKI55;                                                                          \
 252            D=R;
 253        $ENDPATH
 254      $ENDSCENE
 255  #..........................................................................
 256  # 304
 257      $GROUP                                                                                              \
 258          NAME=FU304;                                                                                     \
 259          DX=1600; AB=51; BL=21; VM=HEAD;                                                                 \
 260          BG=DOAIEKIB:,-21;                                                                       \
 261          FG=SIG_J3R:<0+20,-5;                                                                            \
 262          WP=0,<TB:FG.SIGR;                                                                               \
 263          ENV=[TB=FG.SIGG][D=L];
 264        M=STOP;                                                                                           \
 265          C=<JRE_TC115NIGATA2DL,JRE_M115NIGATA2DL,JRE_TCB115NIGATA2D;                                     \
 266          P=<0+400;
 267        C=<JRE_165S40MCDL,JRE_165S40M1DL,JRE_165S40TCD,JRE_165S40TCD,JRE_165S40MCDL,JRE_165S40M1DL,       \
 268            JRE_165S40TCD,JRE_165S40TBDL,JRE_165S40TGDL,JRE_165S40TGDL,JRE_165S40MCDL,JRE_165S40M1DL,     \
 269            JRE_165S40TCD;
 270        M=STOP;                                                                                           \
 271          C=<JRE_TC115NIGATADL,JRE_M115NIGATADL,JRE_TCB115NIGATAD;                                        \
 272          P=<0+400;
 273      $ENDGROUP
 274  #..........................................................................
 275  # 309
 276      $SCENE                                                                                              \
 277          NAME=FU309;                                                                                     \
 278          DX=1600; DY=130; YDIR=U; VM=CONT;                                                               \
 279          BG=SHIRAITOB;                                                                           \
 280          FG=SHIRAITOF;
 281        $PATH Y=40; LC=2;                                                                                 \
 282            FG=SIG_J4R:<0+5,-5;                                                                           \
 283            ENV=[TB=FG.SIGG];
 284          C=(<JRE_TC111SL,JRE_M113S,JRE_M112S,JRE_TC111S),                                                \
 285              (<JRE_TC111SL,JRE_M113S,JRE_M112S,JRE_T111S,JRE_M113S,JRE_M112S,JRE_TS113S,JRE_TS124S,      \
 286              JRE_M113S,JRE_M112S,JRE_TC111S);                                                            \
 287            D=L;
 288          C=JNR_TC165CXL,JNR_M165C,JNR_M164_0CXL,JNR_TC165CX,JNR_TC165CXL,JNR_M165C,JNR_M164_0CXL,        \
 289              JNR_TS165C,JNR_TS165C,JNR_M165C,JNR_M164_0CXL,JNR_TC165CX;                                  \
 290            D=L;
 291          C=JRW_TNWC285L,(<JRW_TNW285,JRW_MN285_200,JRW_TNWS285,JRW_MN285,JRW_TNW285_200),JRW_TNWC285,    \
 292              JRW_TNWC285L,(<JRW_TNW285,JRW_MN285_200,JRW_TNWS285,JRW_MN285,JRW_TNW285_200),JRW_TNWC285;  \
 293            D=L;
 294          C=(<JRE_TC111SL,JRE_M113S,JRE_M112S,JRE_TC111S),                                                \
 295              (<JRE_TC111SL,JRE_M113S,JRE_M112S,JRE_T111S,JRE_M113S,JRE_M112S,JRE_TS113S,JRE_TS112S,      \
 296              JRE_M113S,JRE_M112S,JRE_TC111S);                                                            \
 297            D=L;
 298          C=<JNR_TC210_0AL,JNR_T211_0AL,JNR_M211_0AL,JNR_M210_0AL,JNR_TC210_0A,JNR_TC210_0AL,             \
 299              JNR_T211_0AL,JNR_M211_0AL,JNR_M210_0AL,JNR_T211_0AL,JRE_TS210_1000AL,JRE_TS212_1000AL,      \
 300              JNR_M211_0AL,JNR_M210_0AL,JNR_TC210_0A;                                                     \
 301            D=L;
 302          C=JRF_EF200NL,2*KOKI23,KOKI_1[C1:C37_25B][C2:C37_25B][C3:C37_25B][C4:C37_25B][C5:C37_25B],      \
 303              3*KOKIC,8-12*(6:KOKI24|KOKI23|KOKI22|KOKI21|KOKI25),8-12*KOKI24;                            \
 304            D=L;
 305        $ENDPATH
 306        $PATH Y=40; LC=2;
 307          C=(<JRE_TC111SL,JRE_M113S,JRE_M112S,JRE_T111S,JRE_M113S,JRE_M112S,JRE_TS113S,JRE_TS112S,        \
 308              JRE_M113S,JRE_M112S,JRE_TC111S),(<JRE_TC111SL,JRE_M113S,JRE_M112S,JRE_TC111S);              \
 309            D=R;
 310          C=<JNR_TC210_0AL,JNR_T211_0AL,JNR_M211_0AL,JNR_M210_0AL,JNR_TC210_0A,JNR_TC210_0AL,             \
 311              JNR_T211_0AL,JNR_M211_0AL,JNR_M210_0AL,JNR_T211_0AL,JRE_TS210_1000AL,JRE_TS212_1000AL,      \
 312              JNR_M211_0AL,JNR_M210_0AL,JNR_TC210_0A;                                                     \
 313            D=R;
 314          C=JRF_EF200NL,8-12*KOKI24,8-12*(10:KOKI24|3:KOKI23|1:KOKI22),(KOKI16,KOKI21,KOKI23),            \
 315              KOKI_1[C1:C37_25B][C2:C37_25B][C3:C37_25B][C4:C37_25B][C5:C37_25B],2*KOKIC;                 \
 316            D=R;
 317          C=(<JRE_TC111SL,JRE_M113S,JRE_M112S,JRE_T111S,JRE_M113S,JRE_M112S,JRE_TS113S,JRE_TS124S,        \
 318              JRE_M113S,JRE_M112S,JRE_TC111S),(<JRE_TC111SL,JRE_M113S,JRE_M112S,JRE_TC111S);              \
 319            D=R;
 320          C=JNR_TC165CX,JNR_M164_0CXL,JNR_M165C,JNR_TS165C,JNR_TS165C,JNR_M164_0CXL,JNR_M165C,            \
 321              JNR_TC165CXL,JNR_TC165CX,JNR_M164_0CXL,JNR_M165C,JNR_TC165CXL;                              \
 322            D=R;
 323          C=JRW_TNWC285,(<JRW_TNW285,JRW_MN285_200,JRW_TNWS285,JRW_MN285,JRW_TNW285_200),JRW_TNWC285L,    \
 324              JRW_TNWC285,(<JRW_TNW285,JRW_MN285_200,JRW_TNWS285,JRW_MN285,JRW_TNW285_200),JRW_TNWC285L;  \
 325            D=R;
 326        $ENDPATH
 327      $ENDSCENE
 328  #..........................................................................
 329  # 313
 330      $SCENE                                                                                              \
 331          NAME=FU313;                                                                                     \
 332          DX=1600; DY=180; YDIR=U;                                                                        \
 333          BG=(SUMIDASOUBUB; FIREWORK1:0+600,40; FIREWORK2:0+400,50);                              \
 334          FG=SUMIDASOUBUF;                                                                        \
 335          BGC=#000;
 336        $PATH Y=44; LC=1;
 337          C=JRE_103TCS1DL,                                                                                \
 338              (<JRE_102MSD1,JRE_103MSD1,JRE_102TSD1,JRE_102MSD2,JRE_103MSD2,JRE_102TSD2,JRE_102MSD3,      \
 339              JRE_103MSD3),JRE_103TCS2D;                                                                  \
 340            D=L; TB=SCBG.CYCLE,10; TE=8,SCBG.IDLE;
 341        $ENDPATH
 342        $PATH Y=44; LC=2;
 343          C=JRE_103TCS2D,                                                                                 \
 344              (<JRE_102MSD1,JRE_103MSD1,JRE_102TSD1,JRE_102MSD2,JRE_103MSD2,JRE_102TSD2,JRE_102MSD3,      \
 345              JRE_103MSD3),JRE_103TCS1DL;                                                                 \
 346            D=R;
 347        $ENDPATH
 348      $ENDSCENE
 349  #..........................................................................
 350  # 314
 351      $SCENE                                                                                              \
 352          NAME=FU314;                                                                                     \
 353          DX=1600; DY=150; YDIR=U; VM=CONT;                                                               \
 354          BG=SUMIDASOUBU2B;                                                                       \
 355          FG=SUMIDASOUBU2F;
 356        $PATH Y=27; LC=2;
 357          C=JRE_TC209_500MAL,JRE_T209_500MAL,JRE_M209_500MBL,JRE_M208_500MAL,JRE_T209_500MAL,             \
 358              JRE_T209_500MAL,JRE_T209_500MAL,JRE_M209_500MBL,JRE_M208_500MAL,JRE_TC208_500MA;            \
 359            D=L;
 360          C=JRE_TC231_0ML,JRE_T231_0ML,JRE_M231_0ML,JRE_M230_0ML,JRE_T230_0ML,JRE_T231_0ML,JRE_T231_0ML,  \
 361              JRE_M231_0ML,JRE_M230_0ML,JRE_TC230_0M;                                                     \
 362            D=L;
 363        $ENDPATH
 364        $PATH Y=27; LC=2;
 365          C=JRE_TC230_0M,JRE_M230_0ML,JRE_M231_0ML,JRE_T231_0ML,JRE_T231_0ML,JRE_T230_0ML,JRE_M230_0ML,   \
 366              JRE_M231_0ML,JRE_T231_0ML,JRE_TC231_0ML;                                                    \
 367            D=R;
 368          C=JRE_TC208_500MA,JRE_M208_500MAL,JRE_M209_500MBL,JRE_T209_500MAL,JRE_T209_500MAL,              \
 369              JRE_T209_500MAL,JRE_M208_500MAL,JRE_M209_500MBL,JRE_T209_500MAL,JRE_TC209_500MAL;           \
 370            D=R;
 371        $ENDPATH
 372      $ENDSCENE
 373  #..........................................................................
 374  # 315
 375      $SCENE                                                                                              \
 376          NAME=FU315;                                                                                     \
 377          DX=1600; DY=180; YDIR=U;                                                                        \
 378          BG=SUMIDAJOBANB;                                                                        \
 379          FG=SUMIDAJOBANF;
 380        $PATH Y=39; LC=3;
 381          C=JRE_TC651_100C1L,JRE_M651_0CL,JRE_M650_0CL,JRE_TC650_0C1,JRE_TC651_0C1L,JRE_M651_0CL,         \
 382              JRE_M650_0CL,JRE_TS651_0C1L,JRE_M651_100CL,JRE_M650_100CL,JRE_TC650_0C1;                    \
 383            D=L;
 384          C=JRE_EF80,(8-11*KOKI55,KOKIE),9-12*KOKIA;                                                      \
 385            D=L;
 386          C=JRE_TCA103B1L,(<JRE_M103B1,JRE_M102B1),JRE_T103B1,JRE_TCB103B1,JRE_TCA103B1L,                 \
 387              (<JRE_M103B1,JRE_M102B1),JRE_T103B1,(<JRE_M103B1,JRE_M102B1),JRE_T103B1,                    \
 388              (<JRE_M103B1,JRE_M102B1),JRE_TCB103B1;                                                      \
 389            D=L;
 390          C=JRE_TC411_500ECL,JRE_M415_500ECL,JRE_M414_500ECL,JRE_T411_700EAL,JRE_M415_500ECL,             \
 391              JRE_M414_500ECL,JRE_TC411_500EC,JRE_TC411_500ECL,JRE_M415_500ECL,JRE_M414_500ECL,           \
 392              JRE_TC411_500EC,JRE_TC411_500ECL,JRE_M415_500ECL,JRE_M414_500ECL,JRE_TC411_500EC;           \
 393            D=L;
 394          C=JRE_TC411_319EAL,JRE_M415_10EAL,JRE_M414_10EAL,JRE_TC411_320EA,JRE_TC411_319EAL,              \
 395              JRE_M415_10EAL,JRE_M414_10EAL,JRE_TC411_320EA;                                              \
 396            D=L;
 397        $ENDPATH
 398        $PATH Y=39; LC=3;
 399          C=JRE_TCB103B1,(<JRE_M103B1,JRE_M102B1),JRE_T103B1,(<JRE_M103B1,JRE_M102B1),JRE_T103B1,         \
 400              (<JRE_M103B1,JRE_M102B1),JRE_TCA103B1L,JRE_TCB103B1,JRE_T103B1,(<JRE_M103B1,JRE_M102B1),    \
 401              JRE_TCA103B1L;                                                                              \
 402            D=R;
 403          C=JRE_TC411_500EC,JRE_M414_500ECL,JRE_M415_500ECL,JRE_TC411_500ECL,JRE_TC411_500EC,             \
 404              JRE_M414_500ECL,JRE_M415_500ECL,JRE_TC411_500ECL,JRE_TC411_500EC,JRE_M414_500ECL,           \
 405              JRE_M415_500ECL,JRE_T411_700EAL,JRE_M414_500ECL,JRE_M415_500ECL,JRE_TC411_500ECL;           \
 406            D=R;
 407          C=JRE_TC411_320EA,JRE_M414_10EAL,JRE_M415_10EAL,JRE_TC411_319EAL,JRE_TC411_320EA,               \
 408              JRE_M414_10EAL,JRE_M415_10EAL,JRE_TC411_319EAL;                                             \
 409            D=R;
 410          C=JRE_TC650_0C1,JRE_M650_100CL,JRE_M651_100CL,JRE_TS651_0C1L,JRE_M650_0CL,JRE_M651_0CL,         \
 411              JRE_TC651_0C1L,JRE_TC650_0C1,JRE_M650_0CL,JRE_M651_0CL,JRE_TC651_100C1L;                    \
 412            D=R;
 413          C=JRE_EF80,9-12*KOKIA,(8-11*KOKI55,KOKIE);                                                      \
 414            D=R;
 415        $ENDPATH
 416        $PATH Y=39; LC=2;                                                                                 \
 417            FG=SUMIDAJOBANM:,-39;
 418          C=TOKYO_TC03METL,TOKYO_M03MET,TOKYO_MP03MET,TOKYO_T03MET,TOKYO_T03MET,TOKYO_M03MET,             \
 419              TOKYO_MP03MET,TOKYO_TC03MET;                                                                \
 420            D=L; TB=10; TE=5;
 421        $ENDPATH
 422        $PATH Y=39; LC=2;
 423          C=TOKYO_TC03MET,TOKYO_MP03MET,TOKYO_M03MET,TOKYO_T03MET,TOKYO_T03MET,TOKYO_MP03MET,             \
 424              TOKYO_M03MET,TOKYO_TC03METL;                                                                \
 425            D=R; TB=15;
 426        $ENDPATH
 427      $ENDSCENE
 428  #..........................................................................
 429  # 320
 430      $SCENE                                                                                              \
 431          NAME=FU320;                                                                                     \
 432          DX=1600; DY=150; YDIR=U; VM=CONT;                                                               \
 433          BG=SHINKODAIRAB;                                                                        \
 434          FG=SHINKODAIRAF;
 435        $PATH Y=9; LC=2;                                                                                  \
 436            BG=(TRBED14:..,^0;SHINKODAIRAM:,-9);
 437          C=JRF_EF66_54,10-14*JR_KOKI200L~OP[C1:CT61][C3:CT61],;                                          \
 438            D=L;
 439          C=JRF_EF65_9N,SEIBU_WAFU1L,JR_TAKI1900A,JR_TAKI1900A,JR_TAKI1900A,JR_TAKI1900A,JR_TAKI1900A,    \
 440              JR_TAKI1900A,JR_TAKI1900A,J_TEKI_MITSUBISHI,J_TEKI_MITSUBISHI,CHI_TEKI,SEIBU_WAFU1;         \
 441            D=L;
 442          C=JRF_EH500_10[PDU],10*KOKIC,10*KOKIC;                                                          \
 443            D=L;
 444          M=OPEN;                                                                                         \
 445            C=JRE_TC205ML,(<JRE_M204ML,JRE_M205ML),(<JRE_M204ML,JRE_M205ML),(<JRE_M204ML,JRE_M205ML),     \
 446              JRE_TC205M;                                                                                 \
 447            D=L; P=>0+1000;
 448          C=JRF_EF200L~OP,8-12*KOKII,8-12*(6:KOKIF|KOKIC);                                                \
 449            D=L;
 450          C=JNR_EF81,(8-11*KOKI55,KOKIE),9-12*KOKIA;                                                      \
 451            D=L; P=<0+0;
 452        $ENDPATH
 453        $PATH Y=9; LC=2;                                                                                  \
 454            BG=SIG_J4:<0+1500,-5;
 455          M=STOP;                                                                                         \
 456            C=JRE_TC205M,(<JRE_M204ML,JRE_M205ML),(<JRE_M204ML,JRE_M205ML),(<JRE_M204ML,JRE_M205ML),      \
 457              JRE_TC205ML;                                                                                \
 458            D=R; P=>0+1000;
 459          C=JRF_EF200L~OP,8-12*KOKII,8-12*(6:KOKIF|KOKIC);                                                \
 460            D=R; P=<0+0;
 461          C=JNR_EF81,9-12*KOKIA,(8-11*KOKI55,KOKIE);                                                      \
 462            D=R; P=<0+0;
 463          C=JRF_EF66_54,10-14*JR_KOKI200L~OP[C1:CT61][C3:CT61];                                           \
 464            D=R;
 465          C=JRF_EF65_9N,SEIBU_WAFU1,CHI_TEKI,J_TEKI_MITSUBISHI,J_TEKI_MITSUBISHI,JR_TAKI1900A,            \
 466              JR_TAKI1900A,JR_TAKI1900A,JR_TAKI1900A,JR_TAKI1900A,JR_TAKI1900A,JR_TAKI1900A,SEIBU_WAFU1L; \
 467            D=R;
 468          C=JRF_EH500_10[PDU],10*KOKI15,10*KOKIC;                                                         \
 469            D=R;
 470        $ENDPATH
 471      $ENDSCENE
 472  #..........................................................................
 473  # 322
 474      $SCENE                                                                                              \
 475          NAME=FU322;                                                                                     \
 476          DX=1600; DY=150; YDIR=U;                                                                        \
 477          BG=NISHIOGIB:<0;                                                                        \
 478          FG=NISHIOGIF:<0;
 479        $PATH Y=58; LC=2;                                                                                 \
 480            BG=(TRBED14:..,^0;NISHIOGISTSOUBU:<0,-58);                                            \
 481            ENV=[D=L][M=STOP][P=>0+260][B=0.01][A=0.015];
 482          C=(<JRE_TC103_1200AL,JRE_M103_1200A,JRE_M103_1200B,JRE_M103_1200A,JRE_TC103_1200B),             \
 483              (<JRE_TC103_1200AL,JRE_M103_1200A,JRE_M103_1200B,JRE_M103_1200A,JRE_TC103_1200B);
 484          C=<TOKYO_CT2_0501,TOKYO_M2_0501,TOKYO_M1_0501,TOKYO_T1_0501,TOKYO_TC_0501,TOKYO_MC_0501,        \
 485              TOKYO_T2_0501,TOKYO_M2_0501,TOKYO_M1_0501,TOKYO_CT1_0501;
 486        $ENDPATH
 487        $PATH Y=58; LC=2; ENV=[D=R][M=OPEN][P=>0+280][B=0.01][A=0.015];
 488          C=<TOKYO_CT2_0501,TOKYO_M2_0501,TOKYO_M1_0501,TOKYO_T1_0501,TOKYO_TC_0501,TOKYO_MC_0501,        \
 489              TOKYO_T2_0501,TOKYO_M2_0501,TOKYO_M1_0501,TOKYO_CT1_0501;
 490          C=(<JRE_TC103_1200AL,JRE_M103_1200A,JRE_M103_1200B,JRE_M103_1200A,JRE_TC103_1200B),             \
 491              (<JRE_TC103_1200AL,JRE_M103_1200A,JRE_M103_1200B,JRE_M103_1200A,JRE_TC103_1200B);
 492        $ENDPATH
 493        $PATH Y=60; LC=2;                                                                                 \
 494            BG=NISHIOGISTCHUO:<0,-60;                                                             \
 495            ENV=[D=L][TE=10];
 496          C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),                                        \
 497              (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);
 498          C=JRE_TC230_0ML,JRE_M230_0M,JRE_M231_0M,JRE_T231_0M,JRE_T231_0M,JRE_T230_0M,JRE_M230_0M,        \
 499              JRE_M231_0M,JRE_T231_0M,JRE_TC231_0M;
 500          C=<JRE_TCE351_1000BL,JRE_ME350_1000B,JRE_ME351_1000B,JRE_TSE351_1000B,JRE_TE351_1000B,          \
 501              JRE_ME350_1100B,JRE_ME351_1100B,JRE_TCE351_1300B,JRE_TCE351_1200BL,JRE_ME350_1000B,         \
 502              JRE_ME351_1100B,JRE_TCE351_1100B;
 503          C=<JRE_TCE257_0AL,JRE_ME256_0A,JRE_ME257_100A,JRE_THSE257_0A,JRE_TE257_0A,JRE_ME257_1000A,      \
 504              JRE_ME256_0A,JRE_ME257_0A,JRE_TCE257_100A;
 505        $ENDPATH
 506        $PATH Y=60; LC=2; ENV=[D=R][TB=10];
 507          C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),                \
 508              (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);
 509          C=JRE_TC231_0M,JRE_T231_0M,JRE_M231_0M,JRE_M230_0M,JRE_T230_0M,JRE_T231_0M,JRE_T231_0M,         \
 510              JRE_M231_0M,JRE_M230_0M,JRE_TC230_0ML;
 511          C=<JRE_TCE351_1000BL,JRE_ME350_1000B,JRE_ME351_1000B,JRE_TSE351_1000B,JRE_TE351_1000B,          \
 512              JRE_ME350_1100B,JRE_ME351_1100B,JRE_TCE351_1300B,JRE_TCE351_1200BL,JRE_ME350_1000B,         \
 513              JRE_ME351_1100B,JRE_TCE351_1100B;
 514          C=<JRE_TCE257_0AL,JRE_ME256_0A,JRE_ME257_100A,JRE_THSE257_0A,JRE_TE257_0A,JRE_ME257_1000A,      \
 515              JRE_ME256_0A,JRE_ME257_0A,JRE_TCE257_100A;
 516        $ENDPATH
 517      $ENDSCENE
 518  #..........................................................................
 519  # 323
 520      $SCENE                                                                                              \
 521          NAME=FU323;                                                                                     \
 522          DX=1600; DY=180; YDIR=U; VM=INDEP;                                                              \
 523          BG=ARAKAWAKEIYOB;                                                                       \
 524          FG=ARAKAWAKEIYOF;
 525        $PATH Y=94; LC=2; ENV=[D=L][TE=12];
 526          C=JRE_TC205ML,(<JRE_M205M,JRE_M204M),(<JRE_M205M,JRE_M204M),(<JRE_M205M,JRE_M204M),JRE_TC205M;
 527          C=JRE_205TCKEIYOL,(<JRE_205M1KY,JRE_205M1KEIYO,JRE_205M2KEIYO),                                 \
 528              (<JRE_205M1KY,JRE_205M1KEIYO,JRE_205M2KEIYO),(<JRE_205M1KY,JRE_205M1KEIYO,JRE_205M2KEIYO),  \
 529              JRE_205TCKEIYO;
 530          C=<JRE_TCE256_500AL,JRE_ME257_1500A,JRE_ME256_500A,JRE_ME257_500A,JRE_TCE257_500A;
 531        $ENDPATH
 532        $PATH Y=94; LC=2; ENV=[D=R][TB=12];
 533          C=JRE_TC205M,(<JRE_M205M,JRE_M204M),(<JRE_M205M,JRE_M204M),(<JRE_M205M,JRE_M204M),JRE_TC205ML;
 534          C=JRE_205TCKEIYO,(<JRE_205M1KY,JRE_205M1KEIYO,JRE_205M2KEIYO),                                  \
 535              (<JRE_205M1KY,JRE_205M1KEIYO,JRE_205M2KEIYO),(<JRE_205M1KY,JRE_205M1KEIYO,JRE_205M2KEIYO),  \
 536              JRE_205TCKEIYOL;
 537          C=<JRE_TCE256_500AL,JRE_ME257_1500A,JRE_ME256_500A,JRE_ME257_500A,JRE_TCE257_500A;
 538        $ENDPATH
 539        $PATH Y=87; LC=1;                                                                                 \
 540            FG=ARAKAWAKEIYOM:,-87;
 541          M=FOLLOW;                                                                                       \
 542            C=12*J_TRKA;                                                                                  \
 543            D=L; V=3-6; FS=600;
 544        $ENDPATH
 545        $PATH Y=87; LC=1;
 546          M=FOLLOW;                                                                                       \
 547            C=12*J_TRKA;                                                                                  \
 548            D=R; V=3-6; FS=600;
 549        $ENDPATH
 550      $ENDSCENE
 551  #..........................................................................
 552  # 324
 553      $SCENE                                                                                              \
 554          NAME=FU324;                                                                                     \
 555          DX=1600; DY=150; YDIR=U;                                                                        \
 556          BG=TAPPIB;                                                                              \
 557          FG=TAPPIF;
 558        $PATH Y=33; LC=1;
 559          M=FOLLOW;                                                                                       \
 560            C=15*(5:J_STREET1|100|200|300);                                                               \
 561            D=L;
 562        $ENDPATH
 563        $PATH Y=95; LC=2;                                                                                 \
 564            BG=TAPPIM:,^55;
 565          C=<TAMA_1000AL,TAMA_1000B,TAMA_1000B,TAMA_1000C;                                                \
 566            D=L; TE=4;
 567        $ENDPATH
 568        $PATH Y=95; LC=2;
 569          C=<TAMA_1000AL,TAMA_1000B,TAMA_1000B,TAMA_1000C;                                                \
 570            D=R; TE=6;
 571        $ENDPATH
 572        $PATH Y=33; LC=1;
 573          M=FOLLOW;                                                                                       \
 574            C=15*(5:J_STREET1|100|200|300);                                                               \
 575            D=R;
 576        $ENDPATH
 577      $ENDSCENE
 578  #..........................................................................
 579  # 326
 580      $GROUP                                                                                              \
 581          NAME=FU326;                                                                                     \
 582          DX=1600; AB=35; BL=87; VM=CONT;                                                                 \
 583          BG=(AISAWA3B:,-87;SIG_J3:<0+116,-5);                                                    \
 584          FG=(SIG_J3R:<0+124,-5;AISAWA3F:,-87);                                                   \
 585          WP=(0+216,>TB:BG.SIGR;0+24,<TB:FG.SIGR);                                                        \
 586          ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3];
 587        AP=[D=L]                                                                                          \
 588            [C=JNR_D52L,JR_SUHAFU42K1,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L,JNR_SUHA43K1L,           \
 589            JR_SUHAFU42K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L][V=4]|                                            \
 590            [D=R]                                                                                         \
 591            [C=JNR_D52,JR_SUHAFU42K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L,          \
 592            JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1][V=4];
 593        AP=[D=L]                                                                                          \
 594            [C=JNR_D52L,JR_YO3500~OP,2*JR_G3,2*JR_G3,2*JR_G3,JR_TAKI3000A,JR_TAKI3000A,2*JR_G4,2*JR_G4,   \
 595            2*JR_G4,2*JR_G4,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),2*JR_G3,2*JR_G3,2*JR_G3,     \
 596            2*JR_G3,2*JR_G3,2*JR_G2,2*JR_G2,2*JR_G2,2*JR_G2,2*JR_G4,JR_YO3500~OP][V=4]|                   \
 597            [D=R]                                                                                         \
 598            [C=JNR_D52,JR_YO3500~OP,2*JR_G4,2*JR_G2,2*JR_G2,2*JR_G2,2*JR_G2,2*JR_G3,2*JR_G3,2*JR_G3,      \
 599            2*JR_G3,2*JR_G3,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),2*JR_G4,2*JR_G4,2*JR_G4,     \
 600            2*JR_G4,JR_TAKI3000A,JR_TAKI3000A,2*JR_G3,2*JR_G3,2*JR_G3,JR_YO3500~OP][V=4];
 601      $ENDGROUP
 602  #..........................................................................
 603  # 327
 604      $SCENE                                                                                              \
 605          NAME=FU327;                                                                                     \
 606          DX=1600; DY=180; YDIR=U; VM=INDEP;                                                              \
 607          BG=TONE1B;                                                                              \
 608          FG=TONE1F;
 609        $PATH Y=105; LC=2;                                                                                \
 610            BG=TONE1M:<0+0,^75;
 611          C=JR_EF58,JR_SUYU15L,JR_KAYA21B,JR_NARONE21_100B,JR_NARONE21_100B,JR_NAHANE20B,JR_NAHANE20B,    \
 612              JR_NAHANE20B,JR_NAHANEFU23B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANEFU22B;          \
 613            D=L;
 614          C=JRF_EF64_1008,JRF_EF64_1009,(8-11*KOKI55,KOKIE);                                              \
 615            D=L;
 616          C=(<JRE_MC165ECHL,JRE_M165ECHL,JRE_TC165ECH),(<JRE_MC165ECHL,JRE_M165ECHL,JRE_TC165ECH),        \
 617              (<JRE_MC165ECHL,JRE_M165ECHL,JRE_TC165ECH);                                                 \
 618            D=L;
 619          C=JNR_D51WRBL,JNR_D51WRBL,JR_OHAFU13L,JR_OHA12,JR_OHA12,JR_OHA12,JR_SUHAFU12;                   \
 620            D=L;
 621          C=JNR_EF64_1000COOL,JRW_SUHANEFU14L,JRW_SUHANE14_700,JRW_ORONE14_700,JRW_SUHANE14_750,          \
 622              JRW_SUHANEFU14,JRE_SUHANEFU14_0BL,JRW_SUHANE14_750,JRW_SUHANE14_750,JRW_SUHANE14_750,       \
 623              JNR_OHANE14_0CL,JNR_OHANE14_0CL,JRW_SUHANEFU14;                                             \
 624            D=L;
 625          C=JNR_MC115_0SJAL,JRE_M114_0SAAL,JRE_T115_0SAAL,JNR_TC115_0SJA;                                 \
 626            D=L;
 627        $ENDPATH
 628        $PATH Y=109; LC=2;
 629          C=JNR_D51WRB,JNR_D51WRB,JR_SUHAFU12,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHAFU13L;                     \
 630            D=R;
 631          C=JNR_EF64_1000COOL,JRW_SUHANEFU14,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JRW_SUHANE14_750,            \
 632              JRW_SUHANE14_750,JRW_SUHANE14_750,JRE_SUHANEFU14_0BL,JRW_SUHANEFU14,JRW_SUHANE14_750,       \
 633              JRW_ORONE14_700,JRW_SUHANE14_700,JRW_SUHANEFU14L;                                           \
 634            D=R;
 635          C=JNR_TC115_0SJA,JRE_T115_0SAAL,JRE_M114_0SAAL,JNR_MC115_0SJAL;                                 \
 636            D=R;
 637          C=JR_EF58,JR_NAHANEFU22B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANEFU23B,JR_NAHANE20B,    \
 638              JR_NAHANE20B,JR_NAHANE20B,JR_NARONE21_100B,JR_NARONE21_100B,JR_KAYA21B,JR_SUYU15L;          \
 639            D=R;
 640          C=JRF_EF64_1009,JRF_EF64_1008,9-12*KOKIB;                                                       \
 641            D=R;
 642          C=(<JRE_MC165ECHL,JRE_M165ECHL,JRE_TC165ECH),(<JRE_MC165ECHL,JRE_M165ECHL,JRE_TC165ECH),        \
 643              (<JRE_MC165ECHL,JRE_M165ECHL,JRE_TC165ECH);                                                 \
 644            D=R;
 645        $ENDPATH
 646      $ENDSCENE
 647  #..........................................................................
 648  # 328
 649      $SCENE                                                                                              \
 650          NAME=FU328;                                                                                     \
 651          DX=1600; DY=180; YDIR=U;                                                                        \
 652          BG=TONE3B;                                                                              \
 653          FG=TONE3F;
 654        $PATH Y=105; LC=2;                                                                                \
 655            BG=TONE3M:<0+0,^75;
 656          C=JNR_MC115_0SJAL,JRE_M114_0SAAL,JNR_TC115_0SJA;                                                \
 657            D=L;
 658          C=JRF_EF64_1015,JRF_EF64_1015,(8-11*KOKI55,KOKIE);                                              \
 659            D=L;
 660          C=JNR_TC165CXL,JNR_TS165C,JNR_M164_0CX,JNR_MC165CX,JNR_TC165CXL,JNR_M164_0CX,JNR_MC165CX;       \
 661            D=L;
 662          C=<JRE_TC106L,JRE_MC107;                                                                        \
 663            D=L;
 664          C=JNR_EF81D,JRE_OHANEFU24L,JRE_OHANE24,JRE_OHANE24,JRE_OHANE24_550L,JRE_OHANE24_550L,           \
 665              JRE_SURONE24_550L,JRE_OHANEFU24,JRE_OHANEFU24L,JRE_OHANE24,JRE_OHANE24,JRE_OHANE24,         \
 666              JRE_OHANEFU24,JRE_KAYA24;                                                                   \
 667            D=L;
 668        $ENDPATH
 669        $PATH Y=109; LC=2;
 670          C=<JRE_TC106L,JRE_MC107;                                                                        \
 671            D=R;
 672          C=JNR_EF81D,JRE_KAYA24,JRE_OHANEFU24,JRE_OHANE24,JRE_OHANE24,JRE_OHANE24,JRE_OHANEFU24L,        \
 673              JRE_OHANEFU24,JRE_SURONE24_550L,JRE_OHANE24_550L,JRE_OHANE24_550L,JRE_OHANE24,JRE_OHANE24,  \
 674              JRE_OHANEFU24L;                                                                             \
 675            D=R;
 676          C=JNR_TC115_0SJA,JRE_M114_0SAAL,JNR_MC115_0SJAL;                                                \
 677            D=R;
 678          C=JRF_EF64_1015,JRF_EF64_1015,9-12*KOKIA;                                                       \
 679            D=R;
 680          C=JNR_MC165CX,JNR_M164_0CX,JNR_TC165CXL,JNR_MC165CX,JNR_M164_0CX,JNR_TS165C,JNR_TC165CXL;       \
 681            D=R;
 682        $ENDPATH
 683      $ENDSCENE
 684  #..........................................................................
 685  # 329
 686      $GROUP                                                                                              \
 687          NAME=FU329;                                                                                     \
 688          LC=2; DX=1600; AB=18; BL=104; VM=HEAD;                                                          \
 689          BG=YUBISOLOOPB:,-104;                                                                   \
 690          FG=YUBISOLOOPF:,-104;
 691        C=JNR_TC181_0AA,JNR_MS181_0L,JNR_MS180_0,JNR_T180_0L,JNR_TD181_0L,JNR_M180_0L,JNR_M181_0L,        \
 692            JNR_M180_0L,JNR_M181_0L,JNR_TC181_0AAL;                                                       \
 693          D=R;
 694        C=<JRE_TC115NIGATA2L,JRE_M115NIGATA2L,JRE_TCB115NIGATA2;                                          \
 695          D=R;
 696        C=JNR_EF64_1000COOL,JNR_EF64_1000COOL,10*KOKIC;                                                   \
 697          D=R;
 698      $ENDGROUP
 699  #..........................................................................
 700  # 330
 701      $SCENE                                                                                              \
 702          NAME=FU330;                                                                                     \
 703          DX=1600; DY=180; YDIR=U;                                                                        \
 704          BG=SHIDOKAWAB;                                                                          \
 705          FG=(SHIDOKAWAF;PHOTOGRAPHER2L:<50+200,8);
 706        $PATH Y=17; LC=2;                                                                                 \
 707            BG=TRBED14:..,^0;                                                                             \
 708            FG=SIG_J3R:<0+100,-5;                                                                         \
 709            ENV=[TB=FG.SIGG];
 710          C=JNR_EF64_1000COOL,JRW_SUHANEFU14L,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,            \
 711              JNR_OHANE14_0CL,JRW_SUHANEFU14,JRE_SUHANEFU14_0BL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,          \
 712              JNR_OHANE14_0CL,JNR_ORONE14B,JRE_SUHANEFU14_0B;                                             \
 713            D=L;
 714          C=JRF_EF64_1008,JRF_EF64_1009,9-12*KOKIB;                                                       \
 715            D=L;
 716          C=JRE_TC185_200OOAL,JRE_TS185_200OOA,JRE_M184_200OOB,JRE_M185_200OOA,JRE_M184_200OOB,           \
 717              JRE_M185_200OOA,JRE_TC185_200OOB,JRE_TC185_200OOAL,JRE_TS185_200OOA,JRE_M184_200OOB,        \
 718              JRE_M185_200OOA,JRE_M184_200OOB,JRE_M185_200OOA,JRE_TC185_200OOB;                           \
 719            D=L;
 720          C=<JRE_TCE231_8000AL,JRE_TE231_3000AL,JRE_ME231_1000AL,JRE_ME230_1000AL,JRE_TCE231_6000A,       \
 721              JRE_TCE231_8500AL,JRE_ME231_3500BL,JRE_ME230_3500CL,JRE_TE231_1000AL,JRE_TE231_1000AL,      \
 722              JRE_TSE231_1000AL,JRE_TSE230_1000AL,JRE_ME231_1000AL,JRE_ME230_3500CL,JRE_TCE231_8000A;     \
 723            D=L;
 724          C=JRE_MC211_1000AL,JRE_M210_1000AL,JRE_T211_1000AL,JRE_T211_1000AL,JRE_TC210_1000A,             \
 725              JRE_MC211_1000AL,JRE_M210_1000AL,JRE_T211_1000AL,JRE_T211_1000AL,JRE_TC210_1000A,           \
 726              JRE_TS211_1000AL,JRE_TS212_1000AL,JRE_MC211_1000AL,JRE_M210_1000AL,JRE_TC210_1000A;         \
 727            D=L;
 728          C=JNR_EF55L,JR_MANI60L~OP,JR_SUHAFU42K1,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,              \
 729              JR_SUHAFU42K1L;                                                                             \
 730            D=L;
 731        $ENDPATH
 732        $PATH Y=17; LC=2;                                                                                 \
 733            BG=SIG_J3:<0+1500,-5;
 734          C=<JRE_TCE231_8000AL,JRE_TE231_3000AL,JRE_ME231_1000AL,JRE_ME230_1000AL,JRE_TCE231_6000A,       \
 735              JRE_TCE231_8500AL,JRE_ME231_3500BL,JRE_ME230_3500CL,JRE_TE231_1000AL,JRE_TE231_1000AL,      \
 736              JRE_TSE231_1000AL,JRE_TSE230_1000AL,JRE_ME231_1000AL,JRE_ME230_3500CL,JRE_TCE231_8000A;     \
 737            D=R;
 738          C=JRE_TC210_1000A,JRE_M210_1000AL,JRE_MC211_1000AL,JRE_TS212_1000AL,JRE_TS211_1000AL,           \
 739              JRE_TC210_1000A,JRE_T211_1000AL,JRE_T211_1000AL,JRE_M210_1000AL,JRE_MC211_1000AL,           \
 740              JRE_TC210_1000A,JRE_T211_1000AL,JRE_T211_1000AL,JRE_M210_1000AL,JRE_MC211_1000AL;           \
 741            D=R;
 742          C=JNR_EF55,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1,JR_MANI60L~OP; \
 743            D=R;
 744          C=JNR_EF64_1000COOL,JRE_SUHANEFU14_0B,JNR_ORONE14B,JNR_OHANE14_0CL,JNR_OHANE14_0CL,             \
 745              JRE_SUHANEFU14_0BL,JRW_SUHANEFU14,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,          \
 746              JNR_OHANE14_0CL,JNR_OHANE14_0CL,JRW_SUHANEFU14L;                                            \
 747            D=R;
 748          C=JRF_EF64_1009,JRF_EF64_1008,8-12*(6:KOKIF|KOKIC);                                             \
 749            D=R;
 750          C=JRE_TC185_200OOB,JRE_M185_200OOA,JRE_M184_200OOB,JRE_M185_200OOA,JRE_M184_200OOB,             \
 751              JRE_TS185_200OOA,JRE_TC185_200OOAL,JRE_TC185_200OOB,JRE_M185_200OOA,JRE_M184_200OOB,        \
 752              JRE_M185_200OOA,JRE_M184_200OOB,JRE_TS185_200OOA,JRE_TC185_200OOAL;                         \
 753            D=R;
 754        $ENDPATH
 755      $ENDSCENE
 756  #..........................................................................
 757  # 331
 758      $GROUP                                                                                              \
 759          NAME=FU331;                                                                                     \
 760          LC=3; DX=1600; AB=37; BL=35; VM=CONT;                                                           \
 761          BG=TARUSAWAB:,-35;                                                                      \
 762          FG=(SIG_J3R:<0+100,-5;TARUSAWAF:,-35);                                                  \
 763          WP=0+1,<TB:FG.SIGR;                                                                             \
 764          ENV=[TB=<FG.SIGG,>FG.SIGR,3];
 765        C=<JRE_TC106L,JRE_MC107;
 766        C=JR_EF15,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F;    \
 767          V=6;
 768        C=<JRE_TC185_200OOAL,JRE_M185_200OOAL,JRE_M184_200OOBL,JRE_M185_200OOAL,JRE_M184_200OOBL,         \
 769            JRE_TS185_200OOAL,JRE_TC185_200OOB;
 770        C=<JNR_MC157CL,JNR_M156CL,JNR_TS157CL,JNR_TS157CL,JNR_T157CL,JNR_M156CL,JNR_MC157C;
 771      $ENDGROUP
 772  #..........................................................................
 773  # 332
 774      $SCENE                                                                                              \
 775          NAME=FU332;                                                                                     \
 776          DX=1600; DY=150; YDIR=U; VM=INDEP;                                                              \
 777          BG=(FL_J9:..,4,5;MARUYAMAB0);                                                           \
 778          FG=FL_J9:..,4,0;
 779        $PATH Y=9; LC=2;                                                                                  \
 780            BG=TRBED44:..,^0;                                                                             \
 781            FG=SIG_J4R:<0+100,-5;                                                                         \
 782            ENV=[TB=FG.SIGG];
 783          C=(<JRE_TC189_500GSL,JRE_M188_0DGS,JRE_M189_0BGS,JRE_M188_0DGS,JRE_M189_0BGS,JRE_TS189_0GS,     \
 784              JRE_M188_0DGS,JRE_M189_0BGS,JRE_M188_0DGS,JRE_M189_0BGS,JRE_TC189_500GS),JR_EF63C,JR_EF63C; \
 785            D=L;
 786          C=JNR_TC165CXL,JNR_TS165C,JNR_M164_0CX,JNR_MC165CX,JNR_TC165CXL,JNR_M164_0CX,JNR_MC165CX,       \
 787              JR_EF63C,JR_EF63CN;                                                                         \
 788            D=L;
 789          C=JR_EF62C,JRH_SUHAFU14_550L,JRE_OHA14_0CL,JRE_OHA14_0CL,JRE_OHA14_0CL,JNR_OHAFU15_0B1,         \
 790              JNR_OHANE14_0CL,JNR_OHANE14_0CL,JRE_SUHANEFU14_0B,JR_EF63C,JR_EF63C;                        \
 791            D=L;
 792          C=(<JRE_TC115_1000HL,JRE_M114_1000H,JRE_MC115_1000H),JR_EF63C,JR_EF63C;                         \
 793            D=L;
 794          C=JR_EF63C,JR_EF63C,JR_EF63C,JR_EF63C;                                                          \
 795            D=L;
 796          C=(<JRE_TC165MONTEREYL,JRE_M164R_0MONTEREY,JRE_MC165MONTEREY),                                  \
 797              (<JRE_TC165MONTEREYL,JRE_M164R_0MONTEREY,JRE_MC165MONTEREY),JR_EF63CN,JR_EF63CN;            \
 798            D=L;
 799        $ENDPATH
 800        $PATH Y=9; LC=2;                                                                                  \
 801            BG=SIG_J4:<0+1200,-5;
 802          C=JR_EF63C,JR_EF63C,(<JRE_TC115_1000HL,JRE_M114_1000H,JRE_MC115_1000H);                         \
 803            D=R;
 804          C=JR_EF63C,JR_EF63C,JR_EF63C,JR_EF63C;                                                          \
 805            D=R;
 806          C=JR_EF63CN,JR_EF63CN,(<JRE_TC165MONTEREYL,JRE_M164R_0MONTEREY,JRE_MC165MONTEREY),              \
 807              (<JRE_TC165MONTEREYL,JRE_M164R_0MONTEREY,JRE_MC165MONTEREY);                                \
 808            D=R;
 809          C=JR_EF63C,JR_EF63C,                                                                            \
 810              (<JRE_TC189_500GSL,JRE_M188_0DGS,JRE_M189_0BGS,JRE_M188_0DGS,JRE_M189_0BGS,JRE_TS189_0GS,   \
 811              JRE_M188_0DGS,JRE_M189_0BGS,JRE_M188_0DGS,JRE_M189_0BGS,JRE_TC189_500GS);                   \
 812            D=R;
 813          C=JR_EF63CN,JR_EF63C,JNR_MC165CX,JNR_M164_0CX,JNR_TC165CXL,JNR_MC165CX,JNR_M164_0CX,            \
 814              JNR_TS165C,JNR_TC165CXL;                                                                    \
 815            D=R;
 816          C=JR_EF63C,JR_EF63C,JR_EF62C,JRE_SUHANEFU14_0B,JNR_OHANE14_0CL,JNR_OHANE14_0CL,                 \
 817              JNR_OHAFU15_0B1,JRE_OHA14_0CL,JRE_OHA14_0CL,JRE_OHA14_0CL,JRH_SUHAFU14_550L;                \
 818            D=R;
 819        $ENDPATH
 820      $ENDSCENE
 821  #..........................................................................
 822  # 338
 823      $GROUP                                                                                              \
 824          NAME=FU338;                                                                                     \
 825          DX=1600; AB=-11; BL=133;                                                                        \
 826          BG=IRUMAB:,-133;
 827        C=<JNR_KH35SL,JRE_KH38L,JNR_KH35S,JRE_KH38;
 828        C=JR_DD51_500F,JR_DD51_500F,JR_HOKI5700,JR_HOKI5700;
 829        AP=[D=L]                                                                                          \
 830            [C=JR_DD51_500F,JR_DD51_500F,JR_TAKI1900A,JR_HOKI5700,JR_HOKI5700,JR_HOKI5700,JR_HOKI5700,    \
 831            JR_TAKI1900A,JR_HOKI5700,JR_HOKI5700]|                                                        \
 832            [D=R]                                                                                         \
 833            [C=JR_DD51_500F,JR_DD51_500F,JR_HOKI5700,JR_HOKI5700,JR_HOKI5700,JR_TAKI1900A,JR_HOKI5700,    \
 834            JR_HOKI5700,JR_HOKI5700,JR_TAKI1900A];
 835        C=<JNR_KH35AL,JNR_KH35A,JNR_KH30A;
 836        C=<JRH_DC40_100,JNR_KH35SL,JNR_KH35S;
 837      $ENDGROUP
 838  #..........................................................................
 839  # 339  with another crossing
 840      $SCENE                                                                                              \
 841          NAME=FU339;                                                                                     \
 842          DX=1600; DY=130; YDIR=U; VM=INDEP;                                                              \
 843          BG=(TRBED45:<50-352,7;CROSS_J4B:<50-408,16; KANEKOSTB);                         \
 844          FG=(CROSS_J4F:<50-443,16; KANEKOSTF);                                                   \
 845          LG=XC:D1,U1,D2,U2:XDOWN,XUP;
 846        $PATH Y=21; LC=3; WP=50-500,<TE:U1; ENV=[M=STOP][P=<50][T=5,D1,5];
 847          C=JR_DD51_500F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F;                     \
 848            D=L;
 849          C=<JRE_TC205HACHIL,JRE_M205HACHI,JRE_M204HACHI,JRE_TC205HACHI;                                  \
 850            D=L;
 851          C=JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TAS,JRE_TC201_0TAA;                                    \
 852            D=L;
 853          C=JRE_TC103GL,JRE_M103G,JRE_M102G,JRE_TC103G;                                                   \
 854            D=L;
 855          C=JNR_KH35AL,JNR_KH35AL,JNR_KH35A;                                                              \
 856            D=L;
 857        $ENDPATH
 858        $PATH Y=21; LC=3; ENV=[TB=D2,5]; WP=50-280,>TE:U2;
 859          M=STOP;                                                                                         \
 860            C=JRE_TC103G,JRE_M102G,JRE_M103G,JRE_TC103GL;                                                 \
 861            D=R; P=<50+30;
 862          M=STOP;                                                                                         \
 863            C=JNR_KH35A,JNR_KH35AL,JNR_KH35AL;                                                            \
 864            D=R; P=<50+30;
 865          C=JR_DD51_500F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F;                     \
 866            D=R;
 867          M=STOP;                                                                                         \
 868            C=<JRE_TC205HACHIL,JRE_M205HACHI,JRE_M204HACHI,JRE_TC205HACHI;                                \
 869            D=R; P=<50+30;
 870          M=STOP;                                                                                         \
 871            C=JRE_TC201_0TAA,JRE_M201_0TAS,JRE_M200_0TA,JRE_TC200_0TAAL;                                  \
 872            D=R; P=<50+30;
 873        $ENDPATH
 874      $ENDSCENE
 875  #..........................................................................
 876  # 352
 877      $SCENE                                                                                              \
 878          NAME=FU352;                                                                                     \
 879          DX=1600; DY=150; YDIR=U; VM=INDEP;                                                              \
 880          BG=(FL_J9:..,4,317;TANZAWAB);                                                           \
 881          FG=FL_J9:..,4,0;
 882        $PATH Y=9; LC=2;                                                                                  \
 883            BG=TRBED44:..,^0;                                                                             \
 884            FG=SIG_J4R:<0+100,-5;                                                                         \
 885            ENV=[TB=FG.SIGG];
 886          C=JRE_TCA103B2L,JRE_M102B2,JRE_M103B2,JRE_T103GA,JRE_T103B2A,JRE_M102GL,JRE_MC103G;             \
 887            D=L;
 888          C=JRE_TC103GL,JRE_M102GL,JRE_MC103G,JRE_T103B2A,JRE_M102B2,JRE_M103B2,JRE_TCB103B2;             \
 889            D=L;
 890          C=JRE_TC103GL,JRE_M102B2,JRE_MC103B2,JRE_T103B2A,JRE_M102B2,JRE_M103B2,JRE_TCB103B2;            \
 891            D=L;
 892          C=JRE_TCA103B2L,JRE_M102B2,JRE_M103B2,JRE_T103B2,JRE_M102B2,JRE_M103B2,JRE_TCB103B2;            \
 893            D=L;
 894          C=JRE_TCA103B2L,(<JRE_M102B1L,JRE_M103B1L),JNR_T103C3,JRE_M102B2,JRE_M103B2,JRE_TCB103B2;       \
 895            D=L;
 896          C=JRE_TCA103B2L,(<JRE_M102B1L,JRE_M103B1L),JRE_T103GA,JRE_M102B2,JRE_M103B2,JRE_TCB103B2;       \
 897            D=L;
 898          C=JRE_TC103GL,JRE_M102GL,JRE_M103GL,JRE_T103GL,JRE_M102GL,JRE_M103GL,JRE_TC103G;                \
 899            D=L;
 900          C=<JNR_KUMORU145AL,JNR_KUMORU145A;                                                              \
 901            D=L;
 902          C=JRE_TC205L,JRE_T204YOKO,JRE_M204YOKO,JRE_M205YOKO,JRE_T205YOKO,JRE_M204YOKO,JRE_M205YOKO,     \
 903              JRE_TC205YOKO;                                                                              \
 904            D=L;
 905          C=JRE_TCA103B2L,JRE_M102B2,JRE_MC103B2,JRE_T103B2A,JRE_M102B2,JRE_M103B2,JRE_TCB103B2;          \
 906            D=L;
 907          C=JRE_TC103GL,JRE_M102B2,JRE_MC103B2,JRE_T103B2A,JRE_M102GL,JRE_M103GL,JRE_TCB103B2;            \
 908            D=L;
 909          C=JRE_TC103GL,JRE_M102B2,JRE_MC103B2,JRE_T103B2A,JRE_M102GL,JRE_M103GL,JRE_TC103G;              \
 910            D=L;
 911          C=JRE_TCA103B2L,JRE_M102B2,JRE_M103B2,JRE_T103GA,JRE_M102GL,JRE_M103GL,JRE_TC103G;              \
 912            D=L;
 913          C=JRE_TCA103B2L,JRE_M102GL,JRE_MC103G,JRE_T103B2A,JRE_T103B2,JRE_M102B2,JRE_MC103B2;            \
 914            D=L;
 915          C=JRE_TCA103B2L,JRE_M102B2,JRE_M103B2,JRE_T103B2,JRE_T103B2,JRE_M102GL,JRE_MC103G;              \
 916            D=L;
 917          C=JRE_TC103GL,JRE_M102B2,JRE_M103B2,JRE_T103GA,JRE_M102B2,JRE_M103B2,JRE_TC103G;                \
 918            D=L;
 919        $ENDPATH
 920        $PATH Y=9; LC=2;                                                                                  \
 921            BG=SIG_J4:<0+1500,-5;
 922          C=JRE_TC205YOKO,JRE_M205YOKO,JRE_M204YOKO,JRE_T205YOKO,JRE_M205YOKO,JRE_M204YOKO,JRE_T204YOKO,  \
 923              JRE_TC205L;                                                                                 \
 924            D=R;
 925          C=JRE_TCB103B2,JRE_M103B2,JRE_M102B2,JRE_T103B2A,JRE_MC103B2,JRE_M102B2,JRE_TCA103B2L;          \
 926            D=R;
 927          C=JRE_TCB103B2,JRE_M103GL,JRE_M102GL,JRE_T103B2A,JRE_MC103B2,JRE_M102B2,JRE_TC103GL;            \
 928            D=R;
 929          C=JRE_TC103G,JRE_M103GL,JRE_M102GL,JRE_T103B2A,JRE_MC103B2,JRE_M102B2,JRE_TC103GL;              \
 930            D=R;
 931          C=JRE_TC103G,JRE_M103GL,JRE_M102GL,JRE_T103GA,JRE_M103B2,JRE_M102B2,JRE_TCA103B2L;              \
 932            D=R;
 933          C=JRE_MC103B2,JRE_M102B2,JRE_T103B2,JRE_T103B2A,JRE_MC103G,JRE_M102GL,JRE_TCA103B2L;            \
 934            D=R;
 935          C=JRE_MC103G,JRE_M102GL,JRE_T103B2,JRE_T103B2,JRE_M103B2,JRE_M102B2,JRE_TCA103B2L;              \
 936            D=R;
 937          C=JRE_TC103G,JRE_M103B2,JRE_M102B2,JRE_T103GA,JRE_M103B2,JRE_M102B2,JRE_TC103GL;                \
 938            D=R;
 939          C=JRE_MC103G,JRE_M102GL,JRE_T103B2A,JRE_T103GA,JRE_M103B2,JRE_M102B2,JRE_TCA103B2L;             \
 940            D=R;
 941          C=JRE_TCB103B2,JRE_M103B2,JRE_M102B2,JRE_T103B2A,JRE_MC103G,JRE_M102GL,JRE_TC103GL;             \
 942            D=R;
 943          C=JRE_TCB103B2,JRE_M103B2,JRE_M102B2,JRE_T103B2A,JRE_MC103B2,JRE_M102B2,JRE_TC103GL;            \
 944            D=R;
 945          C=JRE_TCB103B2,JRE_M103B2,JRE_M102B2,JRE_T103B2,JRE_M103B2,JRE_M102B2,JRE_TCA103B2L;            \
 946            D=R;
 947          C=JRE_TCB103B2,JRE_M103B2,JRE_M102B2,JNR_T103C3,(<JRE_M102B1L,JRE_M103B1L),JRE_TCA103B2L;       \
 948            D=R;
 949          C=JRE_TCB103B2,JRE_M103B2,JRE_M102B2,JRE_T103GA,(<JRE_M102B1L,JRE_M103B1L),JRE_TCA103B2L;       \
 950            D=R;
 951          C=JRE_TC103G,JRE_M103GL,JRE_M102GL,JRE_T103GL,JRE_M103GL,JRE_M102GL,JRE_TC103GL;                \
 952            D=R;
 953          C=<JNR_KUMORU145AL,JNR_KUMORU145A;                                                              \
 954            D=R;
 955        $ENDPATH
 956      $ENDSCENE
 957  #..........................................................................
 958  # 402
 959      $SCENE                                                                                              \
 960          NAME=FU402;                                                                                     \
 961          DX=1600; DY=150; YDIR=U;                                                                        \
 962          BG=SCENE_A1005;                                                                                 \
 963          FG=KISEGAWABGF;
 964        $PATH Y=46; LC=2;                                                                                 \
 965            BG=TRBED14:..,^0;                                                                             \
 966            FG=SIG_J4R:<50-700,-5;                                                                        \
 967            TE=6;                                                                                         \
 968            ENV=[TB=FG.SIGG];
 969          C=JRC_TC372_0BL,JRC_T373_0B,JRC_MC373_0B,JRC_TC372_0BL,JRC_T373_0B,JRC_MC373_0B;                \
 970            D=L;
 971          C=(<JR_MC250AL[C1:C3008],JR_MC250B[C1:C3008]),                                                  \
 972              (JRF_T261A[C1:C3008][C3:C3008],JRF_T261B[C1:C3008][C3:C3008]),                              \
 973              (JRF_T261A[C1:C3008][C3:C3008],JRF_T261B[C1:C3008][C3:C3008]),                              \
 974              (JRF_T261A[C1:C3008][C3:C3008],JRF_T261B[C1:C3008][C3:C3008]),                              \
 975              (JRF_T261A[C1:C3008][C3:C3008],JRF_T261B[C1:C3008][C3:C3008]),                              \
 976              (JRF_T261A[C1:C3008][C3:C3008],JRF_T261B[C1:C3008][C3:C3008]),                              \
 977              (JRF_T261A[C1:C3008][C3:C3008],JRF_T261B[C1:C3008][C3:C3008]),                              \
 978              (JR_MC250BL[C1:C3008],JR_MC250A[C1:C3008]);                                                 \
 979            D=L;
 980          C=JR_EF58,JR_OYU10,JNR_OHANEFU12A,JNR_ORONE10B1L,JNR_ORONE10B1L,JNR_SUHANE16AL,JNR_SUHANE16AL,  \
 981              JNR_SUHANE16AL,JNR_OHANE12AL,JNR_OHANEFU12AL,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,     \
 982              JNR_SUHA43B2L,JR_SUHAFU42B1L;                                                               \
 983            D=L;
 984          C=<JRE_TC111SL,JRE_M112SL,JRE_M113S,JRE_TS124S1,JRE_TS113SL,JRE_M112SL,JRE_M113S,JRE_T111S,     \
 985              JRE_M112SL,JRE_M113S,JRE_TC111S;                                                            \
 986            D=L;
 987          C=<JNR_TC211_0AL,JNR_M210_0A,JNR_M211_0A,JRE_TS212_100A,JNR_TS211_0A,JNR_T211_0A,JNR_M210_0A,   \
 988              JNR_M211_0A,JNR_T211_0A,JNR_TC210_0A;                                                       \
 989            D=L;
 990          C=JRF_EF210,3*KOKIC,8-12*(10:KOKI24|3:KOKI23|1:KOKI22),3*KOKIC,8-12*KOKI24;                     \
 991            D=L;
 992        $ENDPATH
 993        $PATH Y=46; LC=2;                                                                                 \
 994            BG=SIG_J4:<50+700,-5;                                                                         \
 995            TB=6;
 996          C=<JRE_TC111SL,JRE_M112SL,JRE_M113S,JRE_TS124S1,JRE_TS113SL,JRE_M112SL,JRE_M113S,JRE_T111S,     \
 997              JRE_M112SL,JRE_M113S,JRE_TC111S;                                                            \
 998            D=R;
 999          C=<JNR_TC211_0AL,JNR_M210_0A,JNR_M211_0A,JRE_TS212_100A,JNR_TS211_0A,JNR_T211_0A,JNR_M210_0A,   \
1000              JNR_M211_0A,JNR_T211_0A,JNR_TC210_0A;                                                       \
1001            D=R;
1002          C=JRF_EF210,8-12*KOKI24,8-12*(6:KOKI24|KOKI23|KOKI22|KOKI21|KOKI25),3*KOKIC,3*KOKIC;            \
1003            D=R;
1004          C=JRC_MC373_0B,JRC_T373_0B,JRC_TC372_0BL,JRC_MC373_0B,JRC_T373_0B,JRC_TC372_0BL;                \
1005            D=R;
1006          C=(JR_MC250BL[C1:C31_01],JR_MC250A[C1:C31_01]),                                                 \
1007              (JRF_T261A[C1:C31_01][C3:C31_01],JRF_T261B[C1:C31_01][C3:C31_01]),                          \
1008              (JRF_T261A[C1:C31_01][C3:C31_01],JRF_T261B[C1:C31_01][C3:C31_01]),                          \
1009              (JRF_T261A[C1:C31_01][C3:C31_01],JRF_T261B[C1:C31_01][C3:C31_01]),                          \
1010              (JRF_T261A[C1:C31_01][C3:C31_01],JRF_T261B[C1:C31_01][C3:C31_01]),                          \
1011              (JRF_T261A[C1:C31_01][C3:C31_01],JRF_T261B[C1:C31_01][C3:C31_01]),                          \
1012              (JRF_T261A[C1:C31_01][C3:C31_01],JRF_T261B[C1:C31_01][C3:C31_01]),                          \
1013              (JR_MC250AL[C1:C31_01],JR_MC250B[C1:C31_01]);                                               \
1014            D=R;
1015          C=JR_EF58,JR_SUHAFU42B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,               \
1016              JNR_OHANEFU12AL,JNR_OHANE12AL,JNR_SUHANE16AL,JNR_SUHANE16AL,JNR_SUHANE16AL,JNR_ORONE10B1L,  \
1017              JNR_ORONE10B1L,JNR_OHANEFU12A,JR_OYU10;                                                     \
1018            D=R;
1019        $ENDPATH
1020      $ENDSCENE
1021  #..........................................................................
1022  # 403
1023      $SCENE                                                                                              \
1024          NAME=FU403;                                                                                     \
1025          DX=1600; DY=130; YDIR=U;                                                                        \
1026          BG=(ARIMAGAWAB:,3; SCENE_A1009:,9);                                                     \
1027          FG=ARIMAGAWAF:,3;
1028        $PATH Y=9; LC=3;                                                                                  \
1029            BG=TRBED14:..,^0;                                                                             \
1030            FG=SIG_J4R:<50-600,-5;                                                                        \
1031            ENV=[TB=FG.SIGG];
1032          C=JNR_EF81D,JR_SUNI41AL,JNR_ORONE10B1L,JNR_OHANEFU12A,JNR_SUHANE16AL,JNR_SUHANE16AL,            \
1033              JNR_SUHANE16AL,JNR_SUHANE16AL,JNR_SURO62DL,JNR_OHA47B1L,JNR_OHA47B2L,JNR_OHA47B1L,          \
1034              JNR_OHA47B2L,JR_SUHAFU42B1L;                                                                \
1035            D=L;
1036          C=JRW_EF81_TWILIGHT,                                                                            \
1037              (<JRH_TES9L,JRH_TES8L,JRH_TES7L,JRH_TES6L,JRH_TES5L,JRH_TES5L,JRH_TES4L,JRH_TES3L,          \
1038              JRH_TES2,JRH_TES1);                                                                         \
1039            D=L;
1040          C=JRF_EF510_1,(8-11*KOKI55,KOKIE),(8-11*KOKI55,KOKIE);                                          \
1041            D=L;
1042          C=JNR_TC481_0BAL,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_TS481_0BA,JNR_TD481A,  \
1043              JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_TC481_0BA;                          \
1044            D=L;
1045          M=STOP;                                                                                         \
1046            C=JRW_TC419_0JBL,JRW_M418_0JB,JRW_MC419_0JB;                                                  \
1047            D=L; P=<0+300;
1048          C=JNR_EF81D,JR_SUHAFU42B1,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JR_SUHAFU42B1L,             \
1049              JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1L;                                                 \
1050            D=L;
1051          M=STOP;                                                                                         \
1052            C=JNR_TC455AL,JNR_M454AA,JNR_MC455A;                                                          \
1053            D=L; P=<0+300;
1054        $ENDPATH
1055        $PATH Y=9; LC=3;                                                                                  \
1056            BG=SIG_J4:<50-700,-5;
1057          M=STOP;                                                                                         \
1058            C=JRW_MC419_0JB,JRW_M418_0JB,JRW_TC419_0JBL;                                                  \
1059            D=R; P=<0+700;
1060          C=JNR_EF81D,JR_SUHAFU42B1L,JNR_SUHA43B1L,JR_SUHAFU42B1,JR_SUHAFU42B1L,JNR_SUHA43B2L,            \
1061              JNR_SUHA43B1L,JNR_SUHA43B1L,JR_SUHAFU42B1;                                                  \
1062            D=R;
1063          M=STOP;                                                                                         \
1064            C=JNR_MC455A,JNR_M454AA,JNR_TC455AL;                                                          \
1065            D=R; P=<0+700;
1066          C=JNR_EF81D,JR_SUHAFU42B1L,JNR_OHA47B2L,JNR_OHA47B1L,JNR_OHA47B2L,JNR_OHA47B1L,JNR_SURO62DL,    \
1067              JNR_SUHANE16AL,JNR_SUHANE16AL,JNR_SUHANE16AL,JNR_SUHANE16AL,JNR_OHANEFU12A,JNR_ORONE10B1L,  \
1068              JR_SUNI41AL;                                                                                \
1069            D=R;
1070          C=JRW_EF81_TWILIGHT,                                                                            \
1071              (<JRH_TES9L,JRH_TES8L,JRH_TES7L,JRH_TES6L,JRH_TES5L,JRH_TES5L,JRH_TES4L,JRH_TES3L,          \
1072              JRH_TES2,JRH_TES1);                                                                         \
1073            D=R;
1074          M=STOP;                                                                                         \
1075            C=JRF_EF510_1,9-12*KOKIA,9-12*KOKIA;                                                          \
1076            D=R; P=<0+0;
1077          C=JNR_TC481_0BA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_TD481A,JNR_TS481_0BA,   \
1078              JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_TC481_0BAL;                         \
1079            D=R;
1080        $ENDPATH
1081      $ENDSCENE
1082  #..........................................................................
1083  # 404
1084      $GROUP                                                                                              \
1085          NAME=FU404;                                                                                     \
1086          DX=1600; AB=9; BL=113; VM=HEAD;                                                                 \
1087          BG=TATEBAGAWAB:,-113;                                                                   \
1088          FG=(SIG_J3R:<0+100,-5;TATEBAGAWAF:,-113);                                               \
1089          WP=0+1,<TB:FG.SIGR;                                                                             \
1090          ENV=[TB=<FG.SIGG,>FG.SIGR,3];
1091        C=<JNR_TC115_0BWBL,JNR_M114_800BWA47,JNR_MC115R_0BWAR,JNR_T115_0BWA,JNR_T115_0BWA,                \
1092            JNR_TC115_0BWBL,JNR_M114_800BWA47,JNR_MC115R_0BWAR,JNR_KUMONI83_47;
1093        C=<JNR_KUMONI143B47,JNR_TC165CXL,JNR_M164_0CX47,JNR_MC165CX,JNR_TB165_0AL,JNR_TS165CL,            \
1094            JNR_TS165CL,JNR_M164_0CX47,JNR_MC165CX;
1095        C=<JNR_TC183_0AL,JNR_TS183_0A,JNR_M182_0A,JNR_M183_0A47,JNR_M182_0A,JNR_M183_0A47,JNR_M182_0A,    \
1096            JNR_M183_0A47,JNR_TC183_0A;
1097        AP=[D=L]                                                                                          \
1098            [C=JR_EF64B47,JR_SUHAFU42K1,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,          \
1099            JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L]|                                                  \
1100            [D=R]                                                                                         \
1101            [C=JR_EF64B47,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,         \
1102            JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1];
1103        C=JR_EF64B47,2*JR_G4,JR_TOKI15000A,JR_TAKI3000A,JR_YO3500~OP;                                     \
1104          V=5;
1105      $ENDGROUP
1106  #..........................................................................
1107  # 405
1108      $GROUP                                                                                              \
1109          NAME=FU405;                                                                                     \
1110          DX=1590; AB=55; BL=67; VM=CONT;                                                                 \
1111          BG=KAKEHASHIB:,-67;                                                                     \
1112          FG=KAKEHASHIF:,-67;
1113        AP=[D=L]                                                                                          \
1114            [C=JNR_D51WRBL,JR_SUHAFU42K1,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L,JR_SUHAFU42K1,        \
1115            JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L][V=4]|                                             \
1116            [D=R]                                                                                         \
1117            [C=JNR_D51WRB,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1,JR_SUHAFU42K1L,        \
1118            JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1][V=4];
1119        C=<JR_DC181_0JL,JR_D180R_0B,JR_DC181_0JL,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,JR_KISASHI180,       \
1120            JR_DS180R_0B,JR_DC181_0J;
1121        C=<JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA58L,JNR_KIHA58L,JNR_KIRO28G1,JNR_KIRO28G1,JNR_KIHA58A,         \
1122            JNR_KIHA58A;
1123        AP=[D=L]                                                                                          \
1124            [C=JNR_D51WRBL,JR_YO3500~OP,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,  \
1125            2*JR_G4,2*JR_G4,JR_YO3500~OP][V=4]|                                                           \
1126            [D=R]                                                                                         \
1127            [C=JNR_D51WRB,JR_YO3500~OP,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,   \
1128            2*JR_G4,2*JR_G4,JR_YO3500~OP][V=4];
1129      $ENDGROUP
1130  #..........................................................................
1131  # 409
1132      $SCENE                                                                                              \
1133          NAME=FU409;                                                                                     \
1134          DX=1600; DY=130; YDIR=U;                                                                        \
1135          BG=OUMIGAWASTB;                                                                 \
1136          FG=OUMIGAWASTF;
1137        $PATH Y=0; LC=2;
1138          C=JNR_KIHA58L,JNR_KIHA58L,JNR_KIRO28G1,JNR_KIRO28G1,JNR_KIHA58A,JNR_KIHA58L,JNR_KIHA58A,        \
1139              JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA58A;                                                        \
1140            D=L;
1141          C=JNR_EF81D,JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,  \
1142              JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,JRE_OHANE24L,JRE_OHANEFU24L,JRE_ORONE24L,          \
1143              JRE_KANI24A;                                                                                \
1144            D=L;
1145          C=JNR_TC481_0BAL,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_TS481_0BA,JNR_TD481A,  \
1146              JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_TC481_0BA;                          \
1147            D=L;
1148          M=STOP;                                                                                         \
1149            C=(<JRE_TCB115NIGATA2L,JRE_M115NIGATA2E,JRE_TC115NIGATA2),                                    \
1150              (<JRE_TC115NIGATA1L,JRE_MC115NIGATA1,JRE_TCB115NIGATA1);                                    \
1151            D=L; P=<50-800;
1152          C=JNR_EF81,JR_SUHAFU42B1,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JR_SUHAFU42B1L,              \
1153              JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1L;                                                 \
1154            D=L;
1155          C=JRF_EF510_2RTL,10*KOKI15,10*KOKIC;                                                            \
1156            D=L;
1157        $ENDPATH
1158        $PATH Y=0; LC=2;                                                                                  \
1159            BG=SIG_J3:<50+750,-5;
1160          M=STOP;                                                                                         \
1161            C=(<JRE_TC115NIGATA1L,JRE_MC115NIGATA1,JRE_TCB115NIGATA1),                                    \
1162              (<JRE_TCB115NIGATA2L,JRE_M115NIGATA2E,JRE_TC115NIGATA2);                                    \
1163            D=R; P=<50-800;
1164          C=JNR_EF81,JR_SUHAFU42B1L,JNR_SUHA43B1L,JR_SUHAFU42B1,JR_SUHAFU42B1L,JNR_SUHA43B2L,             \
1165              JNR_SUHA43B1L,JNR_SUHA43B1L,JR_SUHAFU42B1;                                                  \
1166            D=R;
1167          C=JRF_EF510_2RTL,10*KOKIC,10*KOKIC;                                                             \
1168            D=R;
1169          C=JNR_KIHA58A,JNR_KIHA58A,JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA58L,JNR_KIHA58A,JNR_KIRO28G1,         \
1170              JNR_KIRO28G1,JNR_KIHA58L,JNR_KIHA58L;                                                       \
1171            D=R;
1172          C=JNR_EF81D,JRE_KANI24A,JRE_ORONE24L,JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,JRE_OHANE24L,     \
1173              JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,          \
1174              JRE_OHANEFU24L;                                                                             \
1175            D=R;
1176          C=JNR_TC481_0BA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_TD481A,JNR_TS481_0BA,   \
1177              JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_TC481_0BAL;                         \
1178            D=R;
1179        $ENDPATH
1180      $ENDSCENE
1181  #..........................................................................
1182  # 410
1183      $SCENE                                                                                              \
1184          NAME=FU410;                                                                                     \
1185          DX=1600; DY=130; YDIR=U;                                                                        \
1186          BG=(FL_J10:..,4,0; OYASIRAZUB);                                                 \
1187          FG=FL_J9:..,4,0;
1188        $PATH Y=9; LC=4;                                                                                  \
1189            BG=(TRBED44:..,^0;OYASIRAZUSTM:<50-800,^121);                                 \
1190            FG=SIG_J3R:<50+700,-5;                                                                        \
1191            ENV=[TB=FG.SIGG];
1192          C=JRW_TSC683_0TBAL,JRW_TP682_2TBA,JRW_M683_1000TBA,JRW_T683_300TBA,JRW_TP682_2TBA,              \
1193              JRW_MC683_1500TBA,JRW_TPC682_500TBAL,JRW_M683_5400TBA,JRW_TC683_700TBA;                     \
1194            D=L;
1195          C=JNR_EF81D,JR_OYU10,JNR_SURO62DL,JR_OHAFU13L,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHA12,JR_SUHAFU12,  \
1196              JNR_OHANEFU12A,JNR_SUHANE16AL,JNR_ORONE10B1L,JNR_SUHANE16AL,JNR_OHANEFU12AL;                \
1197            D=L;
1198          C=JRF_EF81,(8-11*KOKI55,KOKIE),9-12*KOKIA;                                                      \
1199            D=L;
1200          M=STOP;                                                                                         \
1201            C=JRW_TC412_0JBL,JRW_M412_0JB,JRW_MC413_0JB;                                                  \
1202            D=L; P=*50;
1203          M=STOP;                                                                                         \
1204            C=JNR_EF81D,JR_SUHAFU42B1,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JR_SUHAFU42B1L,           \
1205              JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1L;                                                 \
1206            D=L; P=<50-800;
1207        $ENDPATH
1208        $PATH Y=9; LC=4;                                                                                  \
1209            BG=SIG_J3:<50+500,-5;
1210          M=STOP;                                                                                         \
1211            C=JRW_MC413_0JB,JRW_M412_0JB,JRW_TC412_0JBL;                                                  \
1212            D=R; P=*50;
1213          C=JNR_EF81D,JR_SUHAFU42B1L,JNR_SUHA43B1L,JR_SUHAFU42B1,JR_SUHAFU42B1L,JNR_SUHA43B2L,            \
1214              JNR_SUHA43B1L,JNR_SUHA43B1L,JR_SUHAFU42B1;                                                  \
1215            D=R;
1216          C=JRW_TC683_700TBA,JRW_M683_5400TBA,JRW_TPC682_500TBAL,JRW_MC683_1500TBA,JRW_TP682_2TBA,        \
1217              JRW_T683_300TBA,JRW_M683_1000TBA,JRW_TP682_2TBA,JRW_TSC683_0TBAL;                           \
1218            D=R;
1219          M=STOP;                                                                                         \
1220            C=JNR_EF81D,JNR_OHANEFU12AL,JNR_SUHANE16AL,JNR_ORONE10B1L,JNR_SUHANE16AL,JNR_OHANEFU12A,      \
1221              JR_SUHAFU12,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHAFU13L,JNR_SURO62DL,JR_OYU10;          \
1222            D=R; P=<50-800;
1223          C=JRF_EF81,9-12*KOKIA,(8-11*KOKI55,KOKIE);                                                      \
1224            D=R;
1225        $ENDPATH
1226      $ENDSCENE
1227  #..........................................................................
1228  # 411
1229      $SCENE                                                                                              \
1230          NAME=FU411;                                                                                     \
1231          DX=1600; DY=150; YDIR=U;                                                                        \
1232          BG=KATSURAGAWAB;                                                                        \
1233          FG=KATSURAGAWAF;
1234        $PATH Y=70; LC=2;
1235          C=JR_EF64B47,JR_EF64B47,9-12*KOKIA;                                                             \
1236            D=L;
1237          C=JNR_TC165CXL,JNR_M164_0CX47,JNR_MC165CX,JNR_TB165_0A,JNR_TS165C,JNR_TS165C,JNR_M164_0CX47,    \
1238              JNR_MC165CX,JNR_KUMONI83_47S,JNR_KUMONI83_47S;                                              \
1239            D=L;
1240          C=JRE_TC189_0ZCL,JRE_M189_0ZCL,JRE_M188_0ZC47L,JRE_TS189_0ZCGL,JRE_M189_0ZCL,JRE_M188_0ZC47L,   \
1241              JRE_M189_0ZCL,JRE_M188_0ZC47L,JRE_TC189_0ZC;                                                \
1242            D=L;
1243          C=JNR_TC115_0BWBL,JNR_M114_800BWA47,JNR_MC115R_0BWAR,JNR_T115_0BWA,JNR_T115_0BWA,               \
1244              JNR_TC115_0BWBL,JNR_M114_800BWA47,JNR_MC115R_0BWAR;                                         \
1245            D=L;
1246          C=JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TA47,JRE_M200_0TA,JRE_M201_0TA47,JRE_TC201_0TAA,       \
1247              JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TA47,JRE_TC201_0TAA;                                 \
1248            D=L;
1249          C=JNR_EF64_1000COOL47,JNR_EF64_1000COOL47,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,         \
1250              JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,  \
1251              JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,  \
1252              JR_TAKI1000JEL;                                                                             \
1253            D=L;
1254        $ENDPATH
1255        $PATH Y=70; LC=2;
1256          C=JNR_MC115R_0BWAR,JNR_M114_800BWA47,JNR_TC115_0BWBL,JNR_T115_0BWA,JNR_T115_0BWA,               \
1257              JNR_MC115R_0BWAR,JNR_M114_800BWA47,JNR_TC115_0BWBL;                                         \
1258            D=R;
1259          C=JRE_TC201_0TAA,JRE_M201_0TA47,JRE_M200_0TA,JRE_TC200_0TAAL,JRE_TC201_0TAA,JRE_M201_0TA47,     \
1260              JRE_M200_0TA,JRE_M201_0TA47,JRE_M200_0TA,JRE_TC200_0TAAL;                                   \
1261            D=R;
1262          C=JNR_EF64_1000COOL47,JNR_EF64_1000COOL47,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,            \
1263              JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,        \
1264              JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,        \
1265              JR_TAKI1000JL;                                                                              \
1266            D=R;
1267          C=JR_EF64B47,JR_EF64B47,(8-11*KOKI55,KOKIE);                                                    \
1268            D=R;
1269          C=JNR_KUMONI83_47S,JNR_KUMONI83_47S,JNR_MC165CX,JNR_M164_0CX47,JNR_TS165C,JNR_TS165C,           \
1270              JNR_TB165_0A,JNR_MC165CX,JNR_M164_0CX47,JNR_TC165CXL;                                       \
1271            D=R;
1272          C=JRE_TC189_0ZC,JRE_M188_0ZC47L,JRE_M189_0ZCL,JRE_M188_0ZC47L,JRE_M189_0ZCL,JRE_TS189_0ZCGL,    \
1273              JRE_M188_0ZC47L,JRE_M189_0ZCL,JRE_TC189_0ZCL;                                               \
1274            D=R;
1275        $ENDPATH
1276      $ENDSCENE
1277  #..........................................................................
1278  # 412
1279      $GROUP                                                                                              \
1280          NAME=FU412;                                                                                     \
1281          DX=1600; AB=56; BL=66;                                                                          \
1282          BG=SAKUMAB:,-66;                                                                        \
1283          FG=SAKUMAF:,-66;
1284        C=<JRC_MC119_5300F,JRC_TC118_5300F;                                                               \
1285          V=4;
1286        C=<JRC_MC373_0BL,JRC_T373_0BL,JRC_TC372_0B;                                                       \
1287          V=5;
1288        C=<JNR_TC165CXL,JNR_M165C,JNR_M164_0CXL,JNR_TC165CX,JNR_MC165CXL,JNR_M164_0CXL,JNR_TC165CX;       \
1289          V=5;
1290      $ENDGROUP
1291  #..........................................................................
1292  # 416
1293      $SCENE                                                                                              \
1294          NAME=FU416;                                                                                     \
1295          DX=1600; DY=180; YDIR=U;                                                                        \
1296          BG=(RYUOMB:,0;RYUOB);                                                           \
1297          FG=RYUOF;
1298        $PATH Y=9; LC=2;                                                                                  \
1299            BG=(TRBED14:..,^0;RYUOM:,^171);
1300          C=JRF_EH200_2,3*KOKIC,JR_TAKI1000O1L,JR_TAKI1000O1L,JR_TAKI1000O2L,JR_TAKI1000O2L,              \
1301              JR_TAKI1000O3L,JR_TAKI1000JEL,JR_TAKI1000JEL;                                               \
1302            D=L;
1303          M=STOP;                                                                                         \
1304            C=JRE_TC115_1000SUKAJBCL,JRE_M114_1000SUKAB,JRE_M115_1000SUKAB,JRE_T115_1000SUKAB,            \
1305              JRE_M114_1000SUKAB,JRE_MC115_1000SUKAJB;                                                    \
1306            D=L; P=<50-300;
1307          C=JNR_TC183_0AL,JNR_TS183_0A,JNR_M183_0A,JNR_M182_0A,JNR_M183_0A,JNR_M182_0A,JNR_M183_0A,       \
1308              JNR_M182_0A,JNR_TC183_0A;                                                                   \
1309            D=L;
1310          M=STOP;                                                                                         \
1311            C=(<JRE_TC115_1000HL,JRE_M114_1000H,JRE_MC115_1000H),                                         \
1312              (<JRE_TC115_1000HL,JRE_M114_1000H,JRE_MC115_1000H);                                         \
1313            D=L; P=<50-800;
1314          C=<JRE_TCE351_1000BL,JRE_ME350_1000B,JRE_ME351_1000B,JRE_TSE351_1000B,JRE_TE351_1000B,          \
1315              JRE_ME350_1100B,JRE_ME351_1100B,JRE_TCE351_1300B,JRE_TCE351_1200BL,JRE_ME350_1000B,         \
1316              JRE_ME351_1100B,JRE_TCE351_1100B;                                                           \
1317            D=L;
1318          C=JRF_EH200_2,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,       \
1319              JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL;                 \
1320            D=L;
1321        $ENDPATH
1322        $PATH Y=9; LC=2;
1323          C=(<JRE_TC115_1000HL,JRE_M114_1000H,JRE_MC115_1000H),                                           \
1324              (<JRE_TC115_1000HL,JRE_M114_1000H,JRE_MC115_1000H);                                         \
1325            D=R;
1326          C=<JRE_TCE351_1000BL,JRE_ME350_1000B,JRE_ME351_1000B,JRE_TSE351_1000B,JRE_TE351_1000B,          \
1327              JRE_ME350_1100B,JRE_ME351_1100B,JRE_TCE351_1300B,JRE_TCE351_1200BL,JRE_ME350_1000B,         \
1328              JRE_ME351_1100B,JRE_TCE351_1100B;                                                           \
1329            D=R;
1330          C=JRF_EH200_2,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,       \
1331              JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL;                 \
1332            D=R;
1333          C=JRF_EH200_2,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JL,JR_TAKI1000JL,         \
1334              JR_TAKI1000JL,JR_TAKI1000JL,3*KOKIC;                                                        \
1335            D=R;
1336          M=STOP;                                                                                         \
1337            C=JRE_MC115_1000SUKAJB,JRE_M114_1000SUKAB,JRE_T115_1000SUKAB,JRE_M115_1000SUKAB,              \
1338              JRE_M114_1000SUKAB,JRE_TC115_1000SUKAJBCL;                                                  \
1339            D=R; P=<50-300;
1340          M=STOP;                                                                                         \
1341            C=JNR_TC183_0A,JNR_M182_0A,JNR_M183_0A,JNR_M182_0A,JNR_M183_0A,JNR_M182_0A,JNR_M183_0A,       \
1342              JNR_TS183_0A,JNR_TC183_0AL;                                                                 \
1343            D=R; P=<50-300;
1344        $ENDPATH
1345      $ENDSCENE
1346  #..........................................................................
1347  # 417
1348      $SCENE                                                                                              \
1349          NAME=FU417;                                                                                     \
1350          DX=1600; DY=150; YDIR=U;                                                                        \
1351          BG=JOKOJIB;                                                                             \
1352          FG=JOKOJIF;
1353        $PATH Y=87; LC=2;
1354          C=JR_EF64~OP,JR_SUHAFU12L,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHAFU13,JR_OHA12,JR_SUHAFU12,  \
1355              JR_SUYU15L,JR_MANI50;                                                                       \
1356            D=L;
1357          C=JRF_EF64,JRF_EF64,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,                \
1358              JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000O1L,JR_TAKI1000O1L,JR_TAKI1000JEL,JR_TAKI1000JEL,  \
1359              JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL;      \
1360            D=L;
1361          M=STOP;                                                                                         \
1362            C=JRC_TC312_8000,JRC_M313_8000,JRC_MC313_8000,JRC_TC312_8000,JRC_M313_8000,JRC_MC313_8000;    \
1363            D=L; P=*50-250;
1364          M=STOP;                                                                                         \
1365            C=<JRC_TC312_5000L,JRC_M313_5300,JRC_T313_5000,JRC_M313_5000,JRC_T313_5300,JRC_MC313_5000;    \
1366            D=L; P=*50-250;
1367          C=JNR_TC381_0NL,JNR_M381NC,JNR_M380NA,JNR_M381NC,JNR_M380NA,JNR_TS381NA,JNR_M381NC,JNR_M380NA,  \
1368              JNR_TC381_0N;                                                                               \
1369            D=L;
1370          M=STOP;                                                                                         \
1371            C=JRC_TC210_5000B1L,JRC_T211_5000B1,JRC_M210_5000B1,JRC_MC211_5000B1;                         \
1372            D=L; P=*50-250;
1373        $ENDPATH
1374        $PATH Y=87; LC=2;
1375          M=STOP;                                                                                         \
1376            C=<JRC_TC312_5000L,JRC_M313_5300,JRC_T313_5000,JRC_M313_5000,JRC_T313_5300,JRC_MC313_5000;    \
1377            D=R; P=*50-250;
1378          C=JNR_TC381_0N,JNR_M380NA,JNR_M381NC,JNR_TS381NA,JNR_M380NA,JNR_M381NC,JNR_M380NA,JNR_M381NC,   \
1379              JNR_TC381_0NL;                                                                              \
1380            D=R;
1381          M=STOP;                                                                                         \
1382            C=JRC_MC211_5000B1,JRC_M210_5000B1,JRC_T211_5000B1,JRC_TC210_5000B1L;                         \
1383            D=R; P=*50-250;
1384          C=JR_EF64~OP,JR_MANI50,JR_SUYU15L,JR_SUHAFU12,JR_OHA12,JR_OHAFU13,JR_OHA12,JR_OHA12,JR_OHA12,   \
1385              JR_OHA12,JR_SUHAFU12L;                                                                      \
1386            D=R;
1387          C=JRF_EF64,JRF_EF64,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JL,  \
1388              JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000O3L,JR_TAKI1000O3L,    \
1389              JR_TAKI1000O1L,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL;                 \
1390            D=R;
1391          M=STOP;                                                                                         \
1392            C=JRC_MC313_8000,JRC_M313_8000,JRC_TC312_8000,JRC_MC313_8000,JRC_M313_8000,JRC_TC312_8000;    \
1393            D=R; P=*50-250;
1394        $ENDPATH
1395      $ENDSCENE
1396  #..........................................................................
1397  # 419
1398      $GROUP                                                                                              \
1399          NAME=FU419;                                                                                     \
1400          LC=2; DX=1600; AB=100; BL=22;                                                                   \
1401          BG=SAKAIGAWAKOUMIB:,-22;
1402        AP=[D=L][C=JNR_C5644L,JNR_WAFU29500][V=4]|[D=R][C=JNR_C5644,JNR_WAFU29500][V=4];
1403        AP=[D=L][C=JNR_C5644L,JR_OHAFU33CK1,2*JR_G4,JNR_WAFU29500][V=4]|                                  \
1404            [D=R][C=JNR_C5644,JNR_WAFU29500,2*JR_G4,JR_OHAFU33CK1][V=4];
1405        C=<JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA58A;
1406        C=<JNR_KH22E,JNR_KH20H;
1407      $ENDGROUP
1408  #..........................................................................
1409  # 420
1410      $SCENE                                                                                              \
1411          NAME=FU420;                                                                                     \
1412          DX=1600; DY=180; YDIR=U;                                                                        \
1413          BG=YOHITOSAWAB;                                                                 \
1414          FG=(YOHITOSAWAF;PHOTOGRAPHER2:<50-784,103);                                             \
1415          IMGY=51;
1416        $PATH Y=47; LC=2;                                                                                 \
1417            BG=YOHITOSAWAM:,^133;
1418          C=JR_EF64B47,JR_SUHAFU42K1,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,             \
1419              JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L;                                                 \
1420            D=L;
1421          C=JRE_TC115_1000SUKAJBCL,JRE_M114_1000SUKAB47,JRE_M115_1000SUKAB,JRE_T115_1000SUKAB,            \
1422              JRE_M114_1000SUKAB47,JRE_MC115_1000SUKAJB;                                                  \
1423            D=L;
1424          C=JNR_TC183_0AL,JNR_TS183_0A,JNR_M183_0A47,JNR_M182_0A,JNR_M183_0A47,JNR_M182_0A,               \
1425              JNR_M183_0A47,JNR_M182_0A,JNR_TC183_0A;                                                     \
1426            D=L;
1427          C=JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA58L,JNR_KH65A,JNR_KIHA58L,JNR_KH65A,JNR_KIHA58A,JNR_KIHA28L,  \
1428              JNR_KIRO28G1,JNR_KIRO28G1,JNR_KIHA28,JNR_KIHA58A;                                           \
1429            D=L;
1430          C=JNR_TC115_0BWBL,JNR_M114_800BWA47,JNR_MC115R_0BWAR,JNR_TS165_14,JNR_T115_0BWA,                \
1431              JNR_TC115_0BWBL,JNR_M114_800BWA47,JNR_MC115R_0BWAR;                                         \
1432            D=L;
1433          C=JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TA47,JRE_M200_0TA,JRE_M201_0TA47,JRE_TC201_0TAA,       \
1434              JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TA47,JRE_TC201_0TAA;                                 \
1435            D=L;
1436          C=JNR_EF64_1000COOL47,JNR_EF64_1000COOL47,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,         \
1437              JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,  \
1438              JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL;                 \
1439            D=L;
1440        $ENDPATH
1441        $PATH Y=130; LC=2;
1442          C=JNR_MC115R_0BWAR,JNR_M114_800BWA47,JNR_TC115_0BWBL,JNR_T115_0BWA,JNR_TS165_14,                \
1443              JNR_MC115R_0BWAR,JNR_M114_800BWA47,JNR_TC115_0BWBL;                                         \
1444            D=R;
1445          C=JRE_TC201_0TAA,JRE_M201_0TA47,JRE_M200_0TA,JRE_TC200_0TAAL,JRE_TC201_0TAA,JRE_M201_0TA47,     \
1446              JRE_M200_0TA,JRE_M201_0TA47,JRE_M200_0TA,JRE_TC200_0TAAL;                                   \
1447            D=R;
1448          C=JNR_EF64_1000COOL47,JNR_EF64_1000COOL47,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,         \
1449              JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,  \
1450              JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL;                 \
1451            D=R;
1452          C=JR_EF64B47,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,            \
1453              JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1;                                                  \
1454            D=R;
1455          C=JRE_MC115_1000SUKAJB,JRE_M114_1000SUKAB47,JRE_T115_1000SUKAB,JRE_M115_1000SUKAB,              \
1456              JRE_M114_1000SUKAB47,JRE_TC115_1000SUKAJBCL;                                                \
1457            D=R;
1458          C=JNR_TC183_0A,JNR_M182_0A,JNR_M183_0A47,JNR_M182_0A,JNR_M183_0A47,JNR_M182_0A,JNR_M183_0A47,   \
1459              JNR_TS183_0A,JNR_TC183_0AL;                                                                 \
1460            D=R;
1461          C=JNR_KIHA58A,JNR_KIHA28,JNR_KIRO28G1,JNR_KIRO28G1,JNR_KIHA28L,JNR_KIHA58A,JNR_KH65A,           \
1462              JNR_KIHA58L,JNR_KH65A,JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA58L;                                  \
1463            D=R;
1464        $ENDPATH
1465      $ENDSCENE
1466  #..........................................................................
1467  # 426
1468      $GROUP                                                                                              \
1469          NAME=FU426;                                                                                     \
1470          DX=1600; AB=47; BL=75; D=X;                                                                     \
1471          BG=KUBIKIB:,-75;                                                                        \
1472          FG=KUBIKIF:,-75;
1473        C=2*HOK_100A;                                                                                     \
1474          V=11;
1475        C=<JRE_485_3000TCL,JRE_485_3000M2,JRE_485_3000M1,JRE_485_3000M2,JRE_485_3000M1,JRE_485_3000TS,    \
1476            JRE_485_3000M2,JRE_485_3000M1,JRE_485_3000TC;                                                 \
1477          V=13;
1478        C=<HOK_TSC681_2000SL,HOK_T680_2000S,HOK_M681_2200S,HOK_T681_2000S,HOK_T680_2000S,                 \
1479            HOK_MC681_2000S,HOK_TC680_2000SL,HOK_M681_2000S,HOK_TC681_2000S;                              \
1480          V=16;
1481        C=<HOK_100B,HOK_100C;                                                                             \
1482          V=11;
1483        C=<HOK_100ML,HOK_100N;                                                                            \
1484          V=11;
1485      $ENDGROUP
1486  #..........................................................................
1487  # 429
1488      $GROUP                                                                                              \
1489          NAME=FU429;                                                                                     \
1490          DX=1600; AB=91; BL=31; D=X;                                                                     \
1491          BG=(FUEFUKIBGB:,-31;TRBED46:..,^0);                                                     \
1492          FG=FUEFUKIBGF:,-31;
1493        C=<JRC_MC115_2000MJAL,JRC_M114_2600MAL,JRC_TC115_2000MJAA;
1494        C=<JRC_313_1500MCL,JRC_312_1500TC;
1495        C=<JNR_TC165CXL,JNR_M165C,JNR_M164_0CXL,JNR_TC165CX;
1496        AP=[D=L]                                                                                          \
1497            [C=JNR_EF10_34,JR_YO3500~OP,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,  \
1498            JNR_WAFU29500]|                                                                               \
1499            [D=R]                                                                                         \
1500            [C=JNR_EF10_34,JNR_WAFU29500,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,         \
1501            2*JR_G4,JR_YO3500~OP];
1502      $ENDGROUP
1503  #..........................................................................
1504  # 430
1505      $SCENE                                                                                              \
1506          NAME=FU430;                                                                                     \
1507          DX=1600; DY=150; YDIR=U;                                                                        \
1508          BG=FUJIBG_B;                                                                            \
1509          FG=FUJIBG_F;
1510        $PATH Y=32; LC=2;                                                                                 \
1511            BG=FUJIBG_M:<50-800,^118;                                                             \
1512            TB=7;
1513          C=JRF_EF210,3*KOKIC,8-12*KOKII,3*KOKIC,8-12*(10:KOKI24|3:KOKI23|1:KOKI22);                      \
1514            D=L;
1515          C=JNR_TC165CXL,JNR_M164_0CX,JNR_M165CL,JNR_TS165C,JNR_TS165C,JNR_M164_0CX,JNR_M165CL,           \
1516              JNR_TC165CX,JNR_TC165CXL,JNR_M164_0CX,JNR_MC165CX;                                          \
1517            D=L;
1518          C=JNR_EF66,JRW_SUHANEFU14L,JNR_ORONE14B,JNR_OHANE14_700FL,JNR_OHANE14_0CL,JNR_OSHI14FL,         \
1519              JNR_OHANE14_0CL,JNR_OHANE14_0CL,JRW_SUHANEFU14,JRE_SUHANEFU14_0BL,JNR_OHANE14_0CL,          \
1520              JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JRE_SUHANEFU14_0B;                          \
1521            D=L;
1522          C=<JRE_TC111SL,JRE_M112SL,JRE_M113S,JRE_TC111S;                                                 \
1523            D=L;
1524          C=JRC_313_1500MCL,JRC_312_1500TC,JRC_TC210_5000B1L,JRC_M210_5000B1,JRC_MC211_5000B1;            \
1525            D=L;
1526        $ENDPATH
1527        $PATH Y=35; LC=2; TE=7;
1528          C=<JRE_TC111SL,JRE_M112SL,JRE_M113S,JRE_TC111S;                                                 \
1529            D=R;
1530          C=JRC_MC211_5000B1,JRC_M210_5000B1,JRC_TC210_5000B1L,JRC_312_1500TC,JRC_313_1500MCL;            \
1531            D=R;
1532          C=JRF_EF210,3*KOKIC,8-12*(6:KOKI24|KOKI23|KOKI22|KOKI21|KOKI25),3*KOKIC,8-12*KOKII;             \
1533            D=R;
1534          C=JNR_MC165CX,JNR_M164_0CX,JNR_TC165CXL,JNR_TC165CX,JNR_M165CL,JNR_M164_0CX,JNR_TS165C,         \
1535              JNR_TS165C,JNR_M165CL,JNR_M164_0CX,JNR_TC165CXL;                                            \
1536            D=R;
1537          C=JNR_EF66,JRE_SUHANEFU14_0B,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,   \
1538              JRE_SUHANEFU14_0BL,JRW_SUHANEFU14,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_OSHI14FL,             \
1539              JNR_OHANE14_0CL,JNR_OHANE14_700FL,JNR_ORONE14B,JRW_SUHANEFU14L;                             \
1540            D=R;
1541        $ENDPATH
1542      $ENDSCENE
1543  #..........................................................................
1544  # 501x
1545      $SCENE                                                                                              \
1546          NAME=FU501;                                                                                     \
1547          DX=1600; DY=150; YDIR=U;                                                                        \
1548          BG=HODUKYOB;                                                                            \
1549          FG=HODUKYOF;
1550        $PATH Y=53; LC=3; D=L; ENV=[M=STOP][P=<50-250][T=4,[WI:N=IR]][TE=[SI:N=IL]];
1551          M=STOP;                                                                                         \
1552            C=JNR_KIHA58L,JNR_KIRO28G1,JNR_KIHA28,JNR_KIHA58L,JNR_KIHA28,JNR_KIHA58A,JNR_KIHA28L,         \
1553              JNR_KIHA58A;                                                                                \
1554            P=<50+820;
1555          C=JR_DD51_500F,JR_SUHAFU42B1,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,           \
1556              JR_SUHAFU42B1L,JR_SUHAFU42K1,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L;
1557          M=STOP;                                                                                         \
1558            C=JR_DD51_500F,JRE_OHANEFU25_0AL,JRE_OHANE25,JRE_OHANEFU25_0A,JRE_OSI24_0A,                   \
1559              JRE_OHANEFU25_0AL,JRE_OHANE25,JRE_OHANE25,JRE_ORONE25_0A,JRE_KANI24A;                       \
1560            P=<50+1100;
1561          M=STOP;                                                                                         \
1562            C=JNR_KH40_2000,JRE_KH47SYUTOKENL,JRE_KH47SYUTOKEN,JRE_KH47SYUTOKENL,JRE_KH47SYUTOKEN,        \
1563              JNR_KH40_2000,JNR_KH40_2000,JNR_KH40_2000;                                                  \
1564            P=<50+900;
1565          C=JR_DC181_0JL,JR_DS180R_0B,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,        \
1566              JR_DC181_0J;
1567          C=JR_DD51_500F,JR_SUHAFU42B1,JNR_SUHA43B1L,JNR_OHA47B1L,JNR_SUHA43B2L,JNR_SUHA43B2L,            \
1568              JR_SUHAFU44BL,JNR_OHANEFU12AL,JR_SUYU15L,JNR_MANI37A;
1569        $ENDPATH
1570        $PATH Y=53; LC=3; D=R; WP=50-500,>TE:[SI:N=IR]; ENV=[M=STOP][P=<50-300][TE=[WI:N=IL]][TB=6];
1571          M=STOP;                                                                                         \
1572            C=JNR_KH40_2000,JNR_KH40_2000,JNR_KH40_2000,JRE_KH47SYUTOKEN,JRE_KH47SYUTOKENL,               \
1573              JRE_KH47SYUTOKEN,JRE_KH47SYUTOKENL,JNR_KH40_2000;                                           \
1574            P=<50+820;
1575          C=JR_DC181_0J,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,JR_DS180R_0B,         \
1576              JR_DC181_0JL;
1577          M=STOP;                                                                                         \
1578            C=JR_DD51_500F,JNR_MANI37A,JR_SUYU15L,JNR_OHANEFU12AL,JR_SUHAFU44BL,JNR_SUHA43B2L,            \
1579              JNR_SUHA43B2L,JNR_OHA47B1L,JNR_SUHA43B1L,JR_SUHAFU42B1;                                     \
1580            P=<50+1100;
1581          M=STOP;                                                                                         \
1582            C=JNR_KIHA58A,JNR_KIHA28L,JNR_KIHA58A,JNR_KIHA28,JNR_KIHA58L,JNR_KIHA28,JNR_KIRO28G1,         \
1583              JNR_KIHA58L;                                                                                \
1584            P=<50+900;
1585          C=JR_DD51_500F,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1,JR_SUHAFU42B1L,         \
1586              JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1;
1587          C=JR_DD51_500F,JRE_KANI24A,JRE_ORONE25_0A,JRE_OHANE25,JRE_OHANE25,JRE_OHANEFU25_0AL,            \
1588              JRE_OSI24_0A,JRE_OHANEFU25_0A,JRE_OHANE25,JRE_OHANEFU25_0AL;
1589        $ENDPATH
1590      $ENDSCENE
1591  #..........................................................................
1592  # 502
1593      $SCENE                                                                                              \
1594          NAME=FU502;                                                                                     \
1595          DX=1600; DY=130; YDIR=U;                                                                        \
1596          BG=TENRISTB;                                                                            \
1597          FG=TENRISTF;
1598        $PATH Y=39; LC=3;                                                                                 \
1599            BG=(TRBED14:..,^0;TENRISTM:<50-800,^120);
1600          M=STOP;                                                                                         \
1601            C=JRW_TC104_500NBL,JRW_MC105_500NB;                                                           \
1602            D=L; P=<50-300; TB=10; TE=40;
1603        $ENDPATH
1604        $PATH Y=39; LC=3;
1605          M=STOP;                                                                                         \
1606            C=JRW_MC105_500NB,JRW_TC104_500NBL;                                                           \
1607            D=R; P=<50-500; TB=40; TE=10;
1608        $ENDPATH
1609        $PATH Y=39; LC=2; ENV=[M=BACK][D=L][P=>50][V=5][B=0.002][A=0.003][T=7];
1610          C=JR_DD51_500F,JRC_SUHAFU14_700EUL,JRC_OHA14_700EU,JRC_OHA14_700EU,JRC_OHAFU15_700EU;
1611          C=JR_SUHAFU12L,JR_OHA12,JR_OHA12,JR_SUHAFU12,JR_DD51_500F;
1612          C=JRC_SUHAFU14_700EUL,JRC_OHA14_700EU,JRC_OHA14_700EU,JRC_OHAFU15_700EU,JR_DD51_500F;
1613          C=<JRW_DC65DANRIN1L,JRW_DC65DANRIN2L,JRW_DC65DANRIN3,JRW_DC65DANRIN4L,JRW_DC65DANRIN5,          \
1614              JRW_DC65DANRIN6;
1615          C=JR_DD51_500F,JR_SUHAFU12L,JR_OHA12,JR_OHA12,JR_SUHAFU12;
1616        $ENDPATH
1617      $ENDSCENE
1618  #..........................................................................
1619  # 503
1620      $GROUP                                                                                              \
1621          NAME=FU503;                                                                                     \
1622          DX=1600; AB=-9; BL=131; D=X;                                                                    \
1623          BG=AMARUBEB:,-131;                                                                      \
1624          FG=AMARUBEF:,-131;
1625        AP=[D=L]                                                                                          \
1626            [C=JNR_DD54_1,JNR_SUYUNI60AL,JR_SUNI41AL,JNR_MANI35AL,JNR_ORONE10B1L,JR_SURO54K1L,            \
1627            JNR_OHANE12AL,JNR_OHANE12AL,JNR_NAHA10N1,JNR_NAHA10N1,JNR_NAHA10N1,JNR_NAHA10N1,              \
1628            JNR_NAHA10N1,JNR_NAHAFU10N1,200][V=7]|                                                        \
1629            [D=R]                                                                                         \
1630            [C=JNR_DD54_1,JNR_NAHAFU10N1,JNR_NAHA10N1,JNR_NAHA10N1,JNR_NAHA10N1,JNR_NAHA10N1,             \
1631            JNR_NAHA10N1,JNR_OHANE12AL,JNR_OHANE12AL,JR_SURO54K,JNR_ORONE10B1L,JNR_MANI35AL,JR_SUNI41AL,  \
1632            JNR_SUYUNI60AL,JR_MANI60L~OP][V=7];
1633        C=<JNR_KH40_2000,JRE_KH47SYUTOKENL,JRE_KH47SYUTOKEN;                                              \
1634          V=7;
1635        AP=[D=L]                                                                                          \
1636            [C=JR_DD51_500F,JR_SUHAFU42B1,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,        \
1637            JR_SUHAFU42B1L,JR_SUHAFU42K1,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L][V=7]|                \
1638            [D=R]                                                                                         \
1639            [C=JR_DD51_500F,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1,JR_SUHAFU42B1L,      \
1640            JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1][V=7];
1641        AP=[D=L]                                                                                          \
1642            [C=JR_DD51_500F,JRW_SUHANEFU14L,JNR_ORONE14B,JNR_OHANE14_0CL,JNR_OHANE14_0CL,                 \
1643            JNR_OHANE14_0CL,JNR_OSHI14FL,JNR_OHANE14_0CL,JRW_SUHANEFU14][V=7]|                            \
1644            [D=R]                                                                                         \
1645            [C=JR_DD51_500F,JRW_SUHANEFU14,JNR_OHANE14_0CL,JNR_OSHI14FL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,  \
1646            JNR_OHANE14_0CL,JNR_ORONE14B,JRW_SUHANEFU14L][V=7];
1647        C=<JRW_DC181_0L,JRW_D180_0L,JRW_DS180_0L,JRW_DC181_0;                                             \
1648          V=7;
1649      $ENDGROUP
1650  #..........................................................................
1651  # 504
1652      $GROUP                                                                                              \
1653          NAME=FU504;                                                                                     \
1654          DX=1600; AB=63; BL=9; D=X;                                                                      \
1655          BG=(MAIDURUB:,-9;CABLE19:..,-9,0;SIG_J3:<50+700,-5;TRBED43:..,^0);                      \
1656          FG=SIG_J3R:<0+100,-5;                                                                           \
1657          WP=(0+1599,>TB:BG.SIGR;0+1,<TB:FG.SIGR);                                                        \
1658          ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3];
1659        AP=[D=L]                                                                                          \
1660            [C=JRW_C56160L,JR_YO2000,JR_WAKI700,JR_WAKI700,JR_WAKI700,JR_WAKI700,JR_WAKI700,JR_WAKI700,   \
1661            JR_WAKI700,JR_WAKI700,JR_YO2000][V=4]|                                                        \
1662            [D=R]                                                                                         \
1663            [C=JRW_C56160,JR_YO2000,JR_WAKI700,JR_WAKI700,JR_WAKI700,JR_WAKI700,JR_WAKI700,JR_WAKI700,    \
1664            JR_WAKI700,JR_WAKI700,JR_YO2000][V=4];
1665        C=JNR_KH20H,JNR_KH20H;                                                                            \
1666          V=5;
1667        AP=[D=L][C=JR_DD51_500F,JR_SUHAFU42K1,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L][V=4]|           \
1668            [D=R][C=JR_DD51_500F,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1][V=4];
1669        AP=[D=L]                                                                                          \
1670            [C=JRW_C56160L,JR_YO2000,                                                                     \
1671            (<JR_G8,JR_G4,JR_G6,JR_G6,JR_G6,JR_G7,JR_G8,JR_G9,JR_G9,JR_TAKI1,JR_G10,JR_G11,JR_G11,        \
1672            JR_GT2,JR_G12,JR_G12,JR_G12,JR_G13,JR_G14,JR_G15,JR_G15,JR_G16),JR_YO2000][V=2]|              \
1673            [D=R]                                                                                         \
1674            [C=JRW_C56160,JR_YO2000,                                                                      \
1675            (<JR_G8,JR_G4,JR_G6,JR_G6,JR_G6,JR_G7,JR_G8,JR_G9,JR_G9,JR_TAKI1,JR_G10,JR_G11,JR_G11,        \
1676            JR_GT2,JR_G12,JR_G12,JR_G12,JR_G13,JR_G14,JR_G15,JR_G15,JR_G16),JR_YO2000][V=2];
1677      $ENDGROUP
1678  #..........................................................................
1679  # 505
1680      $SCENE                                                                                              \
1681          NAME=FU505;                                                                                     \
1682          DX=1600; DY=180; YDIR=U;                                                                        \
1683          BG=KIDUGAWAB;                                                                           \
1684          FG=KIDUGAWAF;
1685        $PATH Y=30; LC=2;
1686          C=JRW_TC381_100BL,JRW_M381BC,JRW_M380_500B,JRW_TC381_500BL,JRW_M381BC,JRW_M380BA,JRW_M381BC,    \
1687              JRW_M380BA,JRW_TSC380B;                                                                     \
1688            D=L;
1689          C=<JRW_TCS280FL,JRW_M281FL,JRW_T281F,JRW_T281F,JRW_M281FL,JRW_TC281FC,JRW_TCS280FL,JRW_T281F,   \
1690              JRW_MC281F;                                                                                 \
1691            D=L;
1692          C=<JRW_TC283_5FL,JRW_M283_0F,JRW_TC282_5F,JRW_TC283_5FL,JRW_M283_0F,JRW_T283F,JRW_M283_0F,      \
1693              JRW_T283F,JRW_TSC283F;                                                                      \
1694            D=L;
1695          C=<JRW_TC103O1FL,JRW_M102OF,JRW_M103OFL,JRW_M102OF,JRW_M103OFL,JRW_M102OF,JRW_M103OFL,          \
1696              JRW_TC103O2F;                                                                               \
1697            D=L;
1698          C=(<JRW_TC103NARA1L,JRW_M102NARA,JRW_M103NARAL,JRW_TC103NARA2),                                 \
1699              (<JRW_TC103NARA1L,JRW_M102NARA,JRW_M103NARAL,JRW_TC103NARA2);                               \
1700            D=L;
1701          C=JRW_MC221_73BL,JRW_M221_0BL,JRW_T221_0BL,JRW_TC221_0B,JRW_MC221_73BL,JRW_M221_0BL,            \
1702              JRW_T221_0BL,JRW_TC221_0B;                                                                  \
1703            D=L;
1704        $ENDPATH
1705        $PATH Y=30; LC=2;
1706          C=<JRW_TC103O1FL,JRW_M102OF,JRW_M103OFL,JRW_M102OF,JRW_M103OFL,JRW_M102OF,JRW_M103OFL,          \
1707              JRW_TC103O2F;                                                                               \
1708            D=R;
1709          C=(<JRW_TC103NARA1L,JRW_M102NARA,JRW_M103NARAL,JRW_TC103NARA2),                                 \
1710              (<JRW_TC103NARA1L,JRW_M102NARA,JRW_M103NARAL,JRW_TC103NARA2);                               \
1711            D=R;
1712          C=JRW_TC221_0B,JRW_T221_0BL,JRW_M221_0BL,JRW_MC221_73BL,JRW_TC221_0B,JRW_T221_0BL,              \
1713              JRW_M221_0BL,JRW_MC221_73BL;                                                                \
1714            D=R;
1715          C=JRW_TSC380B,JRW_M380BA,JRW_M381BC,JRW_M380BA,JRW_M381BC,JRW_TC381_500BL,JRW_M380_500B,        \
1716              JRW_M381BC,JRW_TC381_100BL;                                                                 \
1717            D=R;
1718          C=<JRW_TCS280FL,JRW_M281FL,JRW_T281F,JRW_T281F,JRW_M281FL,JRW_TC281FC,JRW_TCS280FL,JRW_T281F,   \
1719              JRW_MC281F;                                                                                 \
1720            D=R;
1721          C=<JRW_TC283_5FL,JRW_M283_0F,JRW_TC282_5F,JRW_TC283_5FL,JRW_M283_0F,JRW_T283F,JRW_M283_0F,      \
1722              JRW_T283F,JRW_TSC283F;                                                                      \
1723            D=R;
1724        $ENDPATH
1725      $ENDSCENE
1726  #..........................................................................
1727  # 506
1728      $SCENE                                                                                              \
1729          NAME=FU506;                                                                                     \
1730          DX=1600; DY=180; YDIR=U;                                                                        \
1731          BG=IWASAKIB;                                                                            \
1732          FG=IWASAKIF;
1733        $PATH Y=29; LC=2;
1734          C=JRW_TC381_100YL,JRW_M381YC,JRW_M380_500Y,JRW_TC381_100YL,JRW_M381YC,JRW_M380YA,JRW_M381YC,    \
1735              JRW_M380YA,JRW_TSC380Y;                                                                     \
1736            D=L;
1737          C=<JRW_TCS280FL,JRW_M281FL,JRW_T281F,JRW_T281F,JRW_M281FL,JRW_TC281FC,JRW_TCS280FL,JRW_T281F,   \
1738              JRW_MC281F;                                                                                 \
1739            D=L;
1740          C=<JRW_TC283_5FL,JRW_M283_0F,JRW_TC282_5F,JRW_TC283_5FL,JRW_M283_0F,JRW_T283F,JRW_M283_0F,      \
1741              JRW_T283F,JRW_TSC283F;                                                                      \
1742            D=L;
1743          C=<JRW_TC103O1FL,JRW_M102OF,JRW_M103OFL,JRW_M102OF,JRW_M103OFL,JRW_M102OF,JRW_M103OFL,          \
1744              JRW_TC103O2F;                                                                               \
1745            D=L;
1746          C=JRW_TC200_0NEL,JRW_M201_0NEL,JRW_M200_0NEL,JRW_M201_0NLE_001L,JRW_M200_0NEL,JRW_TC200_0NE;    \
1747            D=L;
1748          C=JRW_MC221_73BL,JRW_M221_0BL,JRW_T221_0BL,JRW_TC221_0B,JRW_MC221_73BL,JRW_M221_0BL,            \
1749              JRW_T221_0BL,JRW_TC221_0B;                                                                  \
1750            D=L;
1751        $ENDPATH
1752        $PATH Y=29; LC=2;
1753          C=<JRW_TC103O1FL,JRW_M102OF,JRW_M103OFL,JRW_M102OF,JRW_M103OFL,JRW_M102OF,JRW_M103OFL,          \
1754              JRW_TC103O2F;                                                                               \
1755            D=R;
1756          C=JRW_TC200_0NE,JRW_M200_0NEL,JRW_M201_0NLE_001L,JRW_M200_0NEL,JRW_M201_0NEL,JRW_TC200_0NEL;    \
1757            D=R;
1758          C=JRW_TC221_0B,JRW_T221_0BL,JRW_M221_0BL,JRW_MC221_73BL,JRW_TC221_0B,JRW_T221_0BL,              \
1759              JRW_M221_0BL,JRW_MC221_73BL;                                                                \
1760            D=R;
1761          C=JRW_TSC380Y,JRW_M380YA,JRW_M381YC,JRW_M380YA,JRW_M381YC,JRW_TC381_100YL,JRW_M380_500Y,        \
1762              JRW_M381YC,JRW_TC381_100YL;                                                                 \
1763            D=R;
1764          C=<JRW_TCS280FL,JRW_M281FL,JRW_T281F,JRW_T281F,JRW_M281FL,JRW_TC281FC,JRW_TCS280FL,JRW_T281F,   \
1765              JRW_MC281F;                                                                                 \
1766            D=R;
1767          C=<JRW_TC283_5FL,JRW_M283_0F,JRW_TC282_5F,JRW_TC283_5FL,JRW_M283_0F,JRW_T283F,JRW_M283_0F,      \
1768              JRW_T283F,JRW_TSC283F;                                                                      \
1769            D=R;
1770        $ENDPATH
1771      $ENDSCENE
1772  #..........................................................................
1773  # 507
1774      $SCENE                                                                                              \
1775          NAME=FU507;                                                                                     \
1776          DX=1600; DY=130; YDIR=U;                                                                        \
1777          BG=KYOTOB;
1778        $PATH Y=9; LC=2;                                                                                  \
1779            BG=TRBED14:..,^0;                                                                             \
1780            TB=10;                                                                                        \
1781            TE=10;
1782          C=JRF_EF510_1,9-12*KOKIB,9-12*KOKIB;
1783          C=JRF_EF210_100,3*KOKIC,8-12*KOKII,3*KOKIC,8-12*KOKII;
1784        $ENDPATH
1785        $PATH Y=9; LC=3; B=0.002; TE=3;
1786          M=STOP;                                                                                         \
1787            C=JRW_TC683_700TBA,JRW_M683_5400TBA,JRW_TPC682_500TBAL,JRW_MC683_1500TBA,JRW_TP682_2TBA,      \
1788              JRW_T683_300TBA,JRW_M683_1000TBA,JRW_TP682_2TBA,JRW_TSC683_0TBAL;                           \
1789            D=R; P=*50;
1790          M=STOP;                                                                                         \
1791            C=JRC_DC85_0FP,JRC_DC85_0FP,JRC_DC84_0F,JRC_DC85_0FL;                                         \
1792            D=R; P=<50-600;
1793          M=STOP;                                                                                         \
1794            C=JRW_EF81_TWILIGHT,                                                                          \
1795              (<JRH_TES9L,JRH_TES8L,JRH_TES7L,JRH_TES6L,JRH_TES5L,JRH_TES5L,JRH_TES4L,JRH_TES3L,          \
1796              JRH_TES2,JRH_TES1);                                                                         \
1797            D=R; P=*50;
1798          M=STOP;                                                                                         \
1799            C=JRW_TC581,JRW_M583,JRW_M582,JRW_TSN581,JRW_TS581,JRW_M583,JRW_M582,JRW_M583,JRW_M582,       \
1800              JRW_TC581L;                                                                                 \
1801            D=R; P=*50;
1802        $ENDPATH
1803      $ENDSCENE
1804  #..........................................................................
1805  # 508
1806      $SCENE                                                                                              \
1807          NAME=FU508;                                                                                     \
1808          DX=1600; DY=150; YDIR=U;                                                                        \
1809          BG=MAKINOB;                                                                             \
1810          FG=MAKINOF;
1811        $PATH Y=54; LC=3; D=L; TE=10;
1812          C=JR_EF500_901B,9-12*KOKIA,9-12*KOKIA;
1813          C=JRW_TSC681_1000TBCL,JRW_TP680_1100TBC,JRW_M681_1050TBC,JRW_TP680_1300TBC,JRW_M681_1100TBC,    \
1814              JRW_TC681_1500TBC,JRW_TPC680_1500TBCL,JRW_M681_1300TBC,JRW_TC680_1200TBC;
1815          M=STOP;                                                                                         \
1816            C=JRW_TC419_0JBL,JRW_M418_0JB,JRW_MC419_0JB;                                                  \
1817            P=>50-500;
1818          C=JNR_TC455AL,JNR_M470A,JNR_MC471B,JNR_TC455AL,JNR_TS455A,JNR_TS455A,JNR_TB455A,JNR_M470A,      \
1819              JNR_MC471B,JNR_TC455AL,JNR_M470A,JNR_MC471B;
1820          C=JRW_TC481CL,JRW_M484C,JRW_M485C,JRW_TS485C,JRW_M484C,JRW_M485C,JRW_M484C,JRW_M485C,JRW_TC481C;
1821          M=STOP;                                                                                         \
1822            C=JRW_TC221_0BL,JRW_T221_0B,JRW_M221_0B,JRW_MC221_73B;                                        \
1823            P=>50-500;
1824        $ENDPATH
1825        $PATH Y=54; LC=3; D=R; TB=10;
1826          M=STOP;                                                                                         \
1827            C=JRW_MC419_0JB,JRW_M418_0JB,JRW_TC419_0JBL;                                                  \
1828            P=>50-550;
1829          C=JRW_TC481C,JRW_M485C,JRW_M484C,JRW_M485C,JRW_M484C,JRW_TS485C,JRW_M485C,JRW_M484C,JRW_TC481CL;
1830          C=JR_EF500_901B,(8-11*KOKI55,KOKIE),(8-11*KOKI55,KOKIE);
1831          M=STOP;                                                                                         \
1832            C=JRW_MC221_73B,JRW_M221_0B,JRW_T221_0B,JRW_TC221_0BL;                                        \
1833            P=>50-550;
1834          C=JRW_TC680_1200TBC,JRW_M681_1300TBC,JRW_TPC680_1500TBCL,JRW_TC681_1500TBC,JRW_M681_1100TBC,    \
1835              JRW_TP680_1300TBC,JRW_M681_1050TBC,JRW_TP680_1100TBC,JRW_TSC681_1000TBCL;
1836          C=JNR_MC471B,JNR_M470A,JNR_TC455AL,JNR_MC471B,JNR_M470A,JNR_TB455A,JNR_TS455A,JNR_TS455A,       \
1837              JNR_TC455AL,JNR_MC471B,JNR_M470A,JNR_TC455AL;
1838        $ENDPATH
1839      $ENDSCENE
1840  #..........................................................................
1841  # 510
1842      $SCENE                                                                                              \
1843          NAME=FU510;                                                                                     \
1844          DX=1600; DY=150; YDIR=U;                                                                        \
1845          BG=(SHIOTSUKOSEIST:<50-800,0;SHIOTSUB);                                 \
1846          FG=FL_J9:..,4,0;
1847        $PATH Y=9; LC=2;                                                                                  \
1848            BG=(TRBED43:..,^0;SHIOTSUHOKURIKUST:<50-800,^141);                                    \
1849            D=L;
1850          C=JRF_EF81,JR_TAKI5450,JR_TAKI5450,JR_TAKI5450,JR_TAKI5450,JR_TAKI5450,JR_TAKI5450,             \
1851              JR_TAKI5450,JR_TAKI5450;
1852          C=JRF_EF81_10_SLOGANL,(8-11*KOKI55,KOKIE);
1853          M=STOP;                                                                                         \
1854            C=JRW_TC418_0JB2L,JRW_M418_0JB,JRW_MC419_0JB;                                                 \
1855            P=<50-500;
1856          M=STOP;                                                                                         \
1857            C=JNR_EF70,JR_SUHAFU42B1,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JR_SUHAFU42B1L,            \
1858              JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1L;                                                 \
1859            P=<50-700;
1860          C=JNR_EF81D,JR_OYU10,JNR_SURO62DL,JNR_NAHA11N1,JNR_NAHA11N1,JR_OSI17KL,JNR_NAHA11N1,            \
1861              JNR_NAHA11N1,JNR_NAHAFU11N1,JR_SUHAFU42B1,JNR_SUHANE16AL,JNR_SUHANE16AL,JNR_SUHANE16AL,     \
1862              JNR_ORONE10B1L,JNR_OHANEFU12AL;
1863          C=JNR_TC455AL,JNR_M470A,JNR_MC471B,JNR_TC455AL,JNR_M470A,JNR_MC471B;
1864          C=JRW_TSC481_2001L,JRW_M485_501L,JRW_M484_605L,JRW_T481_601L,JRW_M485_1004L,JRW_M484_1004L,     \
1865              JRW_M485_128L,JRW_M484_232L,JRW_TC481_324;
1866        $ENDPATH
1867        $PATH Y=9; LC=2; D=R;
1868          C=JNR_EF70,JR_SUHAFU42B1L,JNR_SUHA43B1L,JR_SUHAFU42B1,JR_SUHAFU42B1L,JNR_SUHA43B2L,             \
1869              JNR_SUHA43B1L,JNR_SUHA43B1L,JR_SUHAFU42B1;
1870          M=STOP;                                                                                         \
1871            C=JNR_EF81D,JNR_OHANEFU12AL,JNR_ORONE10B1L,JNR_SUHANE16AL,JNR_SUHANE16AL,JNR_SUHANE16AL,      \
1872              JR_SUHAFU42B1,JNR_NAHAFU11N1,JNR_NAHA11N1,JNR_NAHA11N1,JR_OSI17KL,JNR_NAHA11N1,             \
1873              JNR_NAHA11N1,JNR_SURO62DL,JR_OYU10;                                                         \
1874            P=<50-650;
1875          C=JNR_MC471B,JNR_M470A,JNR_TC455AL,JNR_MC471B,JNR_M470A,JNR_TC455AL;
1876          C=JRW_TC481_324,JRW_M484_232L,JRW_M485_128L,JRW_M484_1004L,JRW_M485_1004L,JRW_T481_601L,        \
1877              JRW_M484_605L,JRW_M485_501L,JRW_TSC481_2001L;
1878          C=JRF_EF81,JR_TAKI5450,JR_TAKI5450,JR_TAKI5450,JR_TAKI5450,JR_TAKI5450,JR_TAKI5450,             \
1879              JR_TAKI5450,JR_TAKI5450;
1880          C=JRF_EF81_10_SLOGANL,9-12*KOKIA;
1881          M=STOP;                                                                                         \
1882            C=JRW_MC419_0JB,JRW_M418_0JB,JRW_TC418_0JB2L;                                                 \
1883            P=<50-550;
1884        $ENDPATH
1885      $ENDSCENE
1886  #..........................................................................
1887  # 511
1888      $SCENE                                                                                              \
1889          NAME=FU511;                                                                                     \
1890          DX=1600; DY=180; YDIR=U;                                                                        \
1891          BG=(FL_J10:..,4,0;SHIOTSU2B);                                                           \
1892          FG=FL_J11:..,4,0;
1893        $PATH Y=9; LC=8;                                                                                  \
1894            BG=(TRBED20:..,^0;SHIOTSU2HOKURIKUST:<50-800,^171);                                   \
1895            D=L;
1896          M=STOP;                                                                                         \
1897            C=JRW_TC222_2000L,JRW_M223_3000L,JRW_T223_2000,JRW_MC223_3000;                                \
1898            P=<50-650;
1899          M=STOP;                                                                                         \
1900            C=JRW_TPC520_1L,JRW_MC521_1;                                                                  \
1901            P=<50-700;
1902          C=JNR_KIHA58L,JNR_KIRO28G1,JNR_KIHA58A,JNR_KIHA28L,JNR_KIHA58A;
1903          M=STOP;                                                                                         \
1904            C=JRW_TPC520_1L,JRW_MC521_1;                                                                  \
1905            P=<50-500;
1906          C=JRW_TC222_2000L,JRW_M223_3000L,JRW_T223_2000,JRW_MC223_3000;
1907          C=JRW_MC683_3500SKA1L,JRW_T683_2400SKAL,JRW_TPC682_2700SKA,JRW_MC683_3500SKA1L,                 \
1908              JRW_T683_2500SKAL,JRW_TP682_2200SKAL,JRW_M683_5400TBAL,JRW_TPSC682_2000SKA;
1909          C=JRF_EF81_10_SLOGANL,9-12*KOKIB;
1910          C=JRW_MC125_2F;
1911        $ENDPATH
1912        $PATH Y=9; LC=8; D=R;
1913          M=STOP;                                                                                         \
1914            C=JRW_MC223_3000,JRW_T223_2000,JRW_M223_3000L,JRW_TC222_2000L;                                \
1915            P=<50-700;
1916          C=JRW_TPSC682_2000SKA,JRW_M683_5400TBAL,JRW_TP682_2200SKAL,JRW_T683_2500SKAL,                   \
1917              JRW_MC683_3500SKA1L,JRW_TPC682_2700SKA,JRW_T683_2400SKAL,JRW_MC683_3500SKA1L;
1918          C=JRF_EF81_10_SLOGANL,9-12*KOKIB;
1919          M=STOP;                                                                                         \
1920            C=JRW_MC125_2F;                                                                               \
1921            P=<50-700;
1922          M=STOP;                                                                                         \
1923            C=JRW_MC223_3000,JRW_T223_2000,JRW_M223_3000L,JRW_TC222_2000L;                                \
1924            P=<50-700;
1925          M=STOP;                                                                                         \
1926            C=JRW_MC521_1,JRW_TPC520_1L;                                                                  \
1927            P=<50-700;
1928          C=JNR_KIHA58A,JNR_KIHA28L,JNR_KIHA58A,JNR_KIRO28G1,JNR_KIHA58L;
1929          M=STOP;                                                                                         \
1930            C=JRW_MC521_1,JRW_TPC520_1L;                                                                  \
1931            P=<50-700;
1932        $ENDPATH
1933      $ENDSCENE
1934  #..........................................................................
1935  # 512
1936      $SCENE                                                                                              \
1937          NAME=FU512;                                                                                     \
1938          DX=1600; DY=180; YDIR=U;                                                                        \
1939          BG=AKAGAWAB;                                                                            \
1940          FG=AKAGAWAF;
1941        $PATH Y=55; LC=3; D=R; ENV=[V=3];
1942          C=BIKE6,400,BIKE4;
1943          C=BIKE6;
1944          C=BIKE8,400,BIKE10;
1945          C=BIKE4,200,BIKE5,200,BIKE6;
1946          C=BIKE9,400,BIKE7;
1947          C=BIKE7;
1948          C=BIKE3,400,BIKE2;
1949          C=BIKE3,200,BIKE2,200,BIKE1;
1950        $ENDPATH
1951        $PATH Y=58; LC=3; D=L; TB=6;
1952          C=JRW_TSC681_1000TBCL,JRW_TP680_1100TBC,JRW_M681_1050TBC,JRW_TP680_1300TBC,JRW_M681_1100TBC,    \
1953              JRW_TC681_1500TBC,JRW_TPC680_1500TBCL,JRW_M681_1300TBC,JRW_TC680_1200TBC;
1954          C=JRF_DE10L,JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61];
1955          C=JR_DD51_500F,(<JR_KOKI50000NL,JR_KOKI50000NL),(<JR_KOKI50000NL,JR_KOKI50000NL);
1956          C=<JR_MZC443L,JR_MZC442;
1957          C=JRW_TC222_2000L,JRW_M223_3000L,JRW_T223_2000,JRW_MC223_3000,JRW_TC222_2000L,JRW_M223_3000L,   \
1958              JRW_T223_2000,JRW_MC223_3000;
1959        $ENDPATH
1960        $PATH Y=58; LC=3; TE=6;
1961          C=<JR_MZC443L,JR_MZC442;                                                                        \
1962            D=R;
1963          C=JRW_MC223_3000,JRW_T223_2000,JRW_M223_3000L,JRW_TC222_2000L,JRW_MC223_3000,JRW_T223_2000,     \
1964              JRW_M223_3000L,JRW_TC222_2000L;                                                             \
1965            D=R;
1966          C=JRW_TC680_1200TBC,JRW_M681_1300TBC,JRW_TPC680_1500TBCL,JRW_TC681_1500TBC,JRW_M681_1100TBC,    \
1967              JRW_TP680_1300TBC,JRW_M681_1050TBC,JRW_TP680_1100TBC,JRW_TSC681_1000TBCL;                   \
1968            D=R;
1969          C=JRF_DE10L,JR_KOKI200L~OP[C1:C2IT_JOT2][C3:C2IT_JOT2],                                         \
1970              JR_KOKI200L~OP[C1:C2IT_JOT2][C3:C2IT_JOT2];                                                 \
1971            D=R;
1972          C=JR_DD51_500F,2*KOKI55,2*KOKI55;                                                               \
1973            D=R;
1974        $ENDPATH
1975      $ENDSCENE
1976  #..........................................................................
1977  # 513
1978      $GROUP                                                                                              \
1979          NAME=FU513;                                                                                     \
1980          DX=1600; AB=48; BL=44; D=X;                                                                     \
1981          BG=MARUYAMAGAWAB:,-44;                                                                  \
1982          FG=BRIDGE_MARUYAMAGAWA,1,BRIDGE_MARUYAMAGAWA:<50-589,-14;
1983        C=<JRE_KH47SYUTOKENL,JRE_KH47SYUTOKEN;
1984        C=<JR_DC181_0JL,JR_DS180R_0B,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,         \
1985            JR_DC181_0J;
1986        C=<JNR_KIHA58L,JNR_KIHA28L,JNR_KIHA58A,JNR_KIRO28G1,JNR_KIHA28,JNR_KIHA28,JNR_KIHA58A;
1987      $ENDGROUP
1988  #..........................................................................
1989  # 514
1990      $GROUP                                                                                              \
1991          NAME=FU514;                                                                                     \
1992          DX=1600; AB=0; BL=92; D=X;                                                                      \
1993          BG=HODUKAWABGB:,-92;                                                                    \
1994          FG=(SIG_J3R:<0+1500,-5;HODUKAWABGF:,-92);                                               \
1995          WP=0+1400,<TB:FG.SIGR;                                                                          \
1996          ENV=[TB=<FG.SIGG,>FG.SIGR,3];
1997        AP=[D=L]                                                                                          \
1998            [C=JR_DD51_500F,JR_SUHAFU42B1,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,        \
1999            JR_SUHAFU42B1L,JR_SUHAFU42K1,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L]|                     \
2000            [D=R]                                                                                         \
2001            [C=JR_DD51_500F,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1,JR_SUHAFU42B1L,      \
2002            JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1];
2003        C=<JR_DC181_0JL,JR_D180_0BA,JR_DS180_0BA,JR_D180_0BA,JR_DC181_0J;
2004        C=JR_DD51_500F,JR_OHAFU50D,JR_OHA50D,JR_OHAFU50D,JR_OHAFU50D,JR_OHA50D,JR_OHA50D,JR_OHAFU50D,     \
2005            JR_OHAFU50D,JR_OHA50D,JR_OHAFU50D;
2006        C=<JNR_DC58CL,JNR_KIRO28G1,JNR_KIHA58C,JNR_DC28_2000,JNR_KIHA58C,JNR_DC58CL,JNR_DC28_2000;
2007      $ENDGROUP
2008  #..........................................................................
2009  # 515
2010      $GROUP                                                                                              \
2011          NAME=FU515;                                                                                     \
2012          DX=1600; AB=63; BL=9; D=X;                                                                      \
2013          BG=(KUMANONADAB:,-9;SIG_J3:<50+700,-5;TRBED44:..,^0);                                   \
2014          FG=(SIG_J3R:<0+100,-5;FL_J9:..,-5,0);                                                           \
2015          WP=(0+1599,>TB:BG.SIGR;0+1,<TB:FG.SIGR);                                                        \
2016          ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3];
2017        C=<JRW_TSC283FL,JRW_T283FL,JRW_M283_0FL,JRW_T283FL,JRW_M283_0FL,JRW_TSC283F;
2018        AP=[D=L][C=(<JRW_TC105KISEIL,JRW_MC105KISEI)]|[D=R][C=(<JRW_MC105_500NC1WL,JRW_TC104_500NB)];
2019        C=<JNR_KIHA58L,JNR_KIRO28G1,JNR_KIHA28,JNR_KIHA58L,JNR_KIHA58L,JNR_KIRO28G1,JNR_KIHA28,           \
2020            JNR_KIHA58A;
2021        AP=[D=L]                                                                                          \
2022            [C=JR_EF58,JNR_MANI37A,JR_SUHAFU42B1,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,               \
2023            JNR_SUHA43B1L,JR_SUHAFU42B1L]|                                                                \
2024            [D=R]                                                                                         \
2025            [C=JR_EF58,JR_SUHAFU42B1L,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,            \
2026            JR_SUHAFU42B1,JNR_MANI37A];
2027      $ENDGROUP
2028  #..........................................................................
2029  # 516
2030      $GROUP                                                                                              \
2031          NAME=FU516;                                                                                     \
2032          DX=1600; AB=67; BL=25; D=X;                                                                     \
2033          BG=MUKOGAWA2B:,-25;                                                                     \
2034          FG=BRIDGE_MUKOGAWA:<50-609,-12;
2035        AP=[D=L]                                                                                          \
2036            [C=JNR_DD54_1,JR_SUHAFU42B1,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,          \
2037            JR_SUHAFU42B1L,JR_SUHAFU42B1,JNR_SUHA43B2L,JNR_SUHA43B1L,JR_SUHAFU42B1L]|                     \
2038            [D=R]                                                                                         \
2039            [C=JNR_DD54_1,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43B2L,JR_SUHAFU42B1,JR_SUHAFU42B1L,        \
2040            JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1];
2041        C=<JR_DC181_0JL,JR_D180R_0B,JR_D180R_0B,JR_DS180R_0B,JR_D180R_0B,JR_DC181_0J,JR_D180R_0B,         \
2042            JR_DC181_0J;
2043        AP=[D=L]                                                                                          \
2044            [C=JR_DD51_500F,JR_SUHAFU12L,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHAFU13,JR_SUHAFU12L,JR_OHA12,     \
2045            JR_OHA12,JR_OHA12,JR_OHAFU13]|                                                                \
2046            [D=R]                                                                                         \
2047            [C=JR_DD51_500F,JR_OHAFU13,JR_OHA12,JR_OHA12,JR_OHA12,JR_SUHAFU12L,JR_OHAFU13,JR_OHA12,       \
2048            JR_OHA12,JR_OHA12,JR_SUHAFU12L];
2049        C=<JRE_KH47SYUTOKENL,JRE_KH47SYUTOKEN,JRE_KH47SYUTOKENL,JRE_KH47SYUTOKEN,JNR_KH40_2000;
2050        C=<JNR_DC58CL,JNR_DC28_2000L,JNR_DC28_2000,JNR_DC58CL,JNR_DC28_2000L,JNR_KIRO28G1,JNR_KIHA58C;
2051      $ENDGROUP
2052  #..........................................................................
2053  # 521
2054      $SCENE                                                                                              \
2055          NAME=FU521;                                                                                     \
2056          DX=1600; DY=180; YDIR=U;                                                                        \
2057          BG=YAMATO4B;                                                                            \
2058          FG=YAMATO4F;                                                                            \
2059          IMGY=51;
2060        $PATH Y=128; LC=3; TE=7;
2061          C=JNR_DC55FL,JNR_KIHA28L,JNR_KIRO28G1,JNR_DC55F;                                                \
2062            D=L;
2063          C=JRW_TC200_0NEL,JRW_M201_0NEL,JRW_M200_0NEL,JRW_M201_0NLE_001L,JRW_M200_0NEL,JRW_TC200_0NE;    \
2064            D=L;
2065          C=JR_DD51_500F,JRW_SUROFU14_704L,JRW_ORO14_706,JRW_ORO14_706,JRW_ORO14_706,JRW_ORO14_706,       \
2066              JRW_ORO14_706,JRW_SUROFU14_703;                                                             \
2067            D=L;
2068          C=JRW_MC221_73BL,JRW_M221_0BL,JRW_T221_0BL,JRW_TC221_0B,JRW_MC221_73BL,JRW_M221_0BL,            \
2069              JRW_T221_0BL,JRW_TC221_0B;                                                                  \
2070            D=L;
2071          C=(<JRW_TC103NARA1L,JRW_M102NARA,JRW_M103NARAL,JRW_TC103NARA2),                                 \
2072              (<JRW_TC103NARA1L,JRW_M102NARA,JRW_M103NARAL,JRW_TC103NARA2);                               \
2073            D=L;
2074        $ENDPATH
2075        $PATH Y=128; LC=3; TB=7;
2076          C=JRW_TC221_0B,JRW_T221_0BL,JRW_M221_0BL,JRW_MC221_73BL,JRW_TC221_0B,JRW_T221_0BL,              \
2077              JRW_M221_0BL,JRW_MC221_73BL;                                                                \
2078            D=R;
2079          C=(<JRW_TC103NARA1L,JRW_M102NARA,JRW_M103NARAL,JRW_TC103NARA2),                                 \
2080              (<JRW_TC103NARA1L,JRW_M102NARA,JRW_M103NARAL,JRW_TC103NARA2);                               \
2081            D=R;
2082          C=JNR_DC55F,JNR_KIRO28G1,JNR_KIHA28L,JNR_DC55FL;                                                \
2083            D=R;
2084          C=JRW_TC200_0NE,JRW_M200_0NEL,JRW_M201_0NLE_001L,JRW_M200_0NEL,JRW_M201_0NEL,JRW_TC200_0NEL;    \
2085            D=R;
2086          C=JR_DD51_500F,JRW_SUROFU14_703,JRW_ORO14_706,JRW_ORO14_706,JRW_ORO14_706,JRW_ORO14_706,        \
2087              JRW_ORO14_706,JRW_SUROFU14_704L;                                                            \
2088            D=R;
2089        $ENDPATH
2090      $ENDSCENE
2091  #..........................................................................
2092  # 522
2093      $GROUP                                                                                              \
2094          NAME=FU522;                                                                                     \
2095          LC=2; DX=1600; AB=41; BL=51; D=X;                                                               \
2096          BG=KUMANOBGB:,-51;                                                                      \
2097          FG=KUMANOBGF:,-51;
2098        C=<JNR_KH17HL,JNR_KH20H,JNR_KH35AL,JNR_KH35A,JNR_KH30A;
2099        C=<JRC_DC85_0FL,JRC_DC84_300F,JRC_DC85_0FP;
2100        C=<JRC_DC11F,JRC_KH11_300;
2101        C=<JNR_KIHA58L,JNR_KIHA28,JNR_KIHA58L,JNR_KIRO28G1,JNR_KIRO28G1,JNR_KIHA28,JNR_KIHA58A,           \
2102            JNR_KIHA28L,JNR_KIHA58A,JNR_KIHA58A;
2103      $ENDGROUP
2104  #..........................................................................
2105  # 523
2106      $GROUP                                                                                              \
2107          NAME=FU523;                                                                                     \
2108          DX=1600; AB=28; BL=64; D=X;                                                                     \
2109          BG=YURABGB:,-64;                                                                        \
2110          FG=HANDRAIL06:..,-4,20;
2111        C=<JRE_KH48_0L,JRE_KH48_0,JRE_KH48_0L,JRE_KH48_0;
2112        C=<JR_DC181_0JL,JR_D180R_0B,JR_D180R_0B,JR_DS180R_0B,JR_D180R_0B,JR_D180R_0B,JR_DC181_0J;
2113        C=<J_KTR8000AL,J_KTR8000B;
2114        C=<JNR_KIHA58L,JNR_KIHA28L,JNR_KIHA28L,JNR_KIRO28G1,JNR_KIHA58A,JNR_KIHA58L,JNR_KIRO28G1,         \
2115            JNR_KIHA28,JNR_KIHA58A;
2116      $ENDGROUP
2117  #..........................................................................
2118  # 525
2119      $SCENE                                                                                              \
2120          NAME=FU525;                                                                                     \
2121          DX=1600; DY=150; YDIR=U;                                                                        \
2122          BG=YAMATO3B;                                                                            \
2123          FG=YAMATO3F;
2124        $PATH Y=42; LC=2; D=L; TE=7;
2125          C=JR_DD51_500F,JRW_SUROFU14_703L,JRW_ORO14_706L,JRW_ORO14_706L,JRW_ORO14_706L,JRW_ORO14_706L,   \
2126              JRW_ORO14_706L,JRW_SUROFU14_704;
2127          C=JNR_KIHA82L,JNR_80DL,JNR_80DL,JNR_80DDL,JNR_80DSL,JNR_80DSL,JNR_KIHA82;
2128          C=JRF_EF65_21B,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F;
2129          C=JRW_TC200_0NEL,JRW_M200_0NE,JRW_M201_0NLE_001,JRW_M200_0NE,JRW_M201_0NE,JRW_TC201_0NE;
2130          C=JRW_TC221_0BL,JRW_T221_0B,JRW_M221_0B,JRW_MC221_73B,JRW_TC221_0BL,JRW_T221_0B,JRW_M221_0B,    \
2131              JRW_MC221_73B;
2132        $ENDPATH
2133        $PATH Y=42; LC=2; D=R; TB=7;
2134          C=JRW_TC201_0NE,JRW_M201_0NE,JRW_M200_0NE,JRW_M201_0NLE_001,JRW_M200_0NE,JRW_TC200_0NEL;
2135          C=JRW_MC221_73B,JRW_M221_0B,JRW_T221_0B,JRW_TC221_0BL,JRW_MC221_73B,JRW_M221_0B,JRW_T221_0B,    \
2136              JRW_TC221_0BL;
2137          C=JR_DD51_500F,JRW_SUROFU14_704,JRW_ORO14_706L,JRW_ORO14_706L,JRW_ORO14_706L,JRW_ORO14_706L,    \
2138              JRW_ORO14_706L,JRW_SUROFU14_703L;
2139          C=JNR_KIHA82,JNR_80DSL,JNR_80DSL,JNR_80DDL,JNR_80DL,JNR_80DL,JNR_KIHA82L;
2140          C=JRF_EF65_21B,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F;
2141        $ENDPATH
2142      $ENDSCENE
2143  #..........................................................................
2144  # 527
2145      $SCENE                                                                                              \
2146          NAME=FU527;                                                                                     \
2147          DX=1600; DY=180; YDIR=U;                                                                        \
2148          BG=HODUKYOST_B;                                                                 \
2149          FG=(HODUKYOST_FF:<50-800,0;HODUKYOST_F);                                        \
2150          IMGY=51;
2151        $PATH Y=127; LC=9; TE=8; D=L;
2152          C=JR_DD51_500F,JRW_SUROFU14_704L,JRW_ORO14_706,JRW_ORO14_706,JRW_ORO14_706,JRW_ORO14_706,       \
2153              JRW_ORO14_706,JRW_SUROFU14_703;
2154          C=JRW_MC221_73BL,JRW_M221_0BL,JRW_T221_0BL,JRW_TC221_0B,JRW_MC221_73BL,JRW_M221_0BL,            \
2155              JRW_T221_0BL,JRW_TC221_0B;
2156          M=STOP;                                                                                         \
2157            C=JRW_MC221_73BL,JRW_M221_0BL,JRW_T221_0BL,JRW_TC221_0B,JRW_MC223_5505L,JRW_TC222_5501;       \
2158            P=>50+630;
2159          C=JR_DD51_500F,JRE_OHANEFU25_0AL,JRE_OHANE25,JRE_OHANE25,JRE_OSI24_0A,JRE_OHANE25,              \
2160              JRE_OHANEFU25_0AL,JRE_OHANE25,JRE_OHANEFU25_0AL,JRE_OHANE25,JRE_OHANE25,JRE_ORONE25_0A,     \
2161              JRW_KANI24_100A;
2162          C=(<J_KTR8000AL,J_KTR8000B),(<J_KTR8000AL,J_KTR8000B);
2163          C=JRW_MC221_73BL,JRW_M221_0BL,JRW_T221_0BL,JRW_TC221_0B,JRW_MC221_73BL,JRW_M221_0BL,            \
2164              JRW_T221_0BL,JRW_TC221_0B;
2165          M=STOP;                                                                                         \
2166            C=JRW_MC221_73BL,JRW_M221_0BL,JRW_T221_0BL,JRW_TC221_0B,JRW_MC223_5505L,JRW_TC222_5501;       \
2167            P=>50+630;
2168          C=JRW_TC183_201L,JRW_M183_806L,JRW_M182_701AL,JRW_TSC183_2701;
2169          M=STOP;                                                                                         \
2170            C=JRW_MC221_73BL,JRW_M221_0BL,JRW_T221_0BL,JRW_TC221_0B;                                      \
2171            P=>50+630;
2172        $ENDPATH
2173        $PATH Y=127; LC=9; TB=8; D=R;
2174          C=JRW_TC221_0B,JRW_T221_0BL,JRW_M221_0BL,JRW_MC221_73BL,JRW_TC221_0B,JRW_T221_0BL,              \
2175              JRW_M221_0BL,JRW_MC221_73BL;
2176          M=STOP;                                                                                         \
2177            C=JRW_TC222_5501,JRW_MC223_5505L,JRW_TC221_0B,JRW_T221_0BL,JRW_M221_0BL,JRW_MC221_73BL;       \
2178            P=>50+670;
2179          C=JRW_TSC183_2701,JRW_M182_701AL,JRW_M183_806L,JRW_TC183_201L;
2180          M=STOP;                                                                                         \
2181            C=JRW_TC221_0B,JRW_T221_0BL,JRW_M221_0BL,JRW_MC221_73BL;                                      \
2182            P=>50+670;
2183          C=JR_DD51_500F,JRW_SUROFU14_703,JRW_ORO14_706,JRW_ORO14_706,JRW_ORO14_706,JRW_ORO14_706,        \
2184              JRW_ORO14_706,JRW_SUROFU14_704L;
2185          C=JRW_TC221_0B,JRW_T221_0BL,JRW_M221_0BL,JRW_MC221_73BL,JRW_TC221_0B,JRW_T221_0BL,              \
2186              JRW_M221_0BL,JRW_MC221_73BL;
2187          M=STOP;                                                                                         \
2188            C=JRW_TC222_5501,JRW_MC223_5505L,JRW_TC221_0B,JRW_T221_0BL,JRW_M221_0BL,JRW_MC221_73BL;       \
2189            P=>50+670;
2190          C=JR_DD51_500F,JRW_KANI24_100A,JRE_ORONE25_0A,JRE_OHANE25,JRE_OHANE25,JRE_OHANEFU25_0AL,        \
2191              JRE_OHANE25,JRE_OHANEFU25_0AL,JRE_OHANE25,JRE_OSI24_0A,JRE_OHANE25,JRE_OHANE25,             \
2192              JRE_OHANEFU25_0AL;
2193          C=(<J_KTR8000AL,J_KTR8000B),(<J_KTR8000AL,J_KTR8000B);
2194        $ENDPATH
2195      $ENDSCENE
2196  #..........................................................................
2197  # 801
2198      $GROUP                                                                                              \
2199          NAME=FU801;                                                                                     \
2200          DX=1600; AB=59; BL=33; VM=CONT;                                                                 \
2201          BG=CHIKUGOGAWAB:,-33;                                                                   \
2202          FG=CHIKUGOGAWAF:,-33;
2203        C=JRK_KH140,JRK_KH140;
2204        C=<JNR_KIHA58L,JNR_KIRO28G1,JRK_KH26,JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA58A,JNR_KIHA28L,JNR_KIHA58A;
2205        C=JNR_DE10L,JRK_OHAFU50D_1000,JNR_OHA50D_1000,JNR_OHA50D_1000,JRK_OHAFU50D_1000;
2206        C=<JRK_DC71AL,JRK_D70_2A,JRK_D70_1A,JRK_DC71A;
2207      $ENDGROUP
2208  #..........................................................................
2209  # 802
2210      $SCENE                                                                                              \
2211          NAME=FU802;                                                                                     \
2212          DX=1600; DY=180; YDIR=U; VM=INDEP;                                                              \
2213          BG=R3NAJIMAB;                                                                           \
2214          FG=R3NAJIMAF;                                                                           \
2215          LT=90;                                                                                          \
2216          FIN=W;
2217        $PATH Y=69;
2218          M=FOLLOW;                                                                                       \
2219            C=15*(5:J_STREET1|100|200|300);                                                               \
2220            D=L;
2221        $ENDPATH
2222        $PATH Y=69;
2223          M=FOLLOW;                                                                                       \
2224            C=15*(5:J_STREET1|100|200|300);                                                               \
2225            D=R;
2226        $ENDPATH
2227        $PATH Y=107;                                                                                      \
2228            BG=R3NAJIMAM:,-107;
2229          C=JR_EF81_408,JNR_EF81_407COOL;                                                                 \
2230            D=L;
2231          C=JRF_ED76_1014,JRF_EF81_304;                                                                   \
2232            D=R;
2233          C=JRF_ED76,9-12*KOKIA;                                                                          \
2234            D=L;
2235          C=JRK_ED76D,(8-11*KOKI55,KOKIE);                                                                \
2236            D=R;
2237        $ENDPATH
2238        $PATH Y=35;
2239          C=<NIS_MC313L,NIS_TC313;                                                                        \
2240            D=X; TE=15;
2241        $ENDPATH
2242      $ENDSCENE
2243  #..........................................................................
2244  # 803
2245      $SCENE                                                                                              \
2246          NAME=FU803;                                                                                     \
2247          DX=1600; DY=180; YDIR=U; VM=INDEP;                                                              \
2248          BG=NAJIMAB;                                                                             \
2249          FG=NAJIMAF;                                                                             \
2250          LT=90;                                                                                          \
2251          FIN=W;
2252        $PATH Y=34;                                                                                       \
2253            BG=NAJIMAM:,-34;
2254          C=<NIS_TC313L,NIS_MC313;                                                                        \
2255            D=L; V=6;
2256          C=<NIS_TC600L,NIS_MC600;                                                                        \
2257            D=R; V=6;
2258          C=<NIS_TC600L,NIS_MC600;                                                                        \
2259            D=L; V=6;
2260          C=<NIS_TC313L,NIS_MC313;                                                                        \
2261            D=R; V=6;
2262        $ENDPATH
2263        $PATH Y=106;
2264          AP=[D=L][C=JNR_ED75_300,(KOKI16,KOKI21,KOKI23)][V=4]|[D=R][C=JNR_ED75_300,3*KOKIC][V=4];
2265          AP=[D=L][C=JRF_ED76,10*KOKIC][V=4]|[D=R][C=JRK_ED76D,10*KOKIC][V=4];
2266          AP=[D=L][C=JRF_EF81_451,9-12*KOKIA,(8-11*KOKI55,KOKIE)][V=4]|                                   \
2267              [D=R][C=JRF_EF81_451,9-12*KOKIA,(8-11*KOKI55,KOKIE)][V=4];
2268        $ENDPATH
2269      $ENDSCENE
2270  #..........................................................................
2271  # 804
2272      $SCENE                                                                                              \
2273          NAME=FU804;                                                                                     \
2274          DX=1600; DY=180; YDIR=U; VM=INDEP;                                                              \
2275          BG=TATARAB;                                                                             \
2276          FG=TATARAF;                                                                             \
2277          LT=90;                                                                                          \
2278          FIN=W;
2279        $PATH Y=38; ENV=[TE=15];
2280          C=(<JRK_MC813AL,JRK_T813A,JRK_TC813A),(<JRK_MC813AL,JRK_T813A,JRK_TC813A);                      \
2281            D=L;
2282          C=JRK_TCS787CL,JRK_M786,JRK_TD787,JRK_M787,JRK_M786,JRK_T787_100,JRK_T787,JRK_M787,JRK_MC786;   \
2283            D=L;
2284          C=JRK_ED76DL,JR_SUHAFU12L,JR_OHA12,JR_OHA12,JR_OHAFU13,JR_SUHAFU12L,JRE_OHANE25_0AL,            \
2285              JRE_OHANEFU25_0A;                                                                           \
2286            D=L;
2287          C=(<JRK_TC411BWL,JRK_M414BW,JRK_M415BW,JRK_TC411BW),                                            \
2288              (<JRK_TC411BWL,JRK_M414BW,JRK_M415BW,JRK_TC411BW);                                          \
2289            D=L;
2290        $ENDPATH
2291        $PATH Y=38;                                                                                       \
2292            BG=TATARAM:,-38;                                                                      \
2293            ENV=[TB=10][TE=5];
2294          C=(<JRK_TC411BWL,JRK_M414BW,JRK_M415BW,JRK_TC411BW),                                            \
2295              (<JRK_TC411BWL,JRK_M414BW,JRK_M415BW,JRK_TC411BW);                                          \
2296            D=R;
2297          C=(<JRK_MC813AL,JRK_T813A,JRK_TC813A),(<JRK_MC813AL,JRK_T813A,JRK_TC813A);                      \
2298            D=R;
2299          C=JRK_MC786,JRK_M787,JRK_T787,JRK_T787_100,JRK_M786,JRK_M787,JRK_TD787,JRK_M786,JRK_TCS787CL;   \
2300            D=R;
2301          C=JRK_ED76D,JRE_OHANEFU25_0A,JRE_OHANE25_0AL,JR_SUHAFU12L,JR_OHAFU13,JR_OHA12,JR_OHA12,         \
2302              JR_SUHAFU12L;                                                                               \
2303            D=R;
2304        $ENDPATH
2305        $PATH Y=34;
2306          C=<NIS_TC313L,NIS_MC313;                                                                        \
2307            D=X; TB=15; TE=15;
2308        $ENDPATH
2309        $PATH Y=106; ENV=[TB=10];
2310          C=JNR_ED75_300,2*KOKIC;                                                                         \
2311            D=L;
2312          C=JRK_ED76D,(8-11*KOKI55,KOKIE);                                                                \
2313            D=R;
2314          C=JRF_ED76,9-12*KOKIA;                                                                          \
2315            D=L;
2316          C=JNR_ED75_300,2*JR_KOKI104L~OP;                                                                \
2317            D=R;
2318        $ENDPATH
2319      $ENDSCENE
2320  #..........................................................................
2321  # 806
2322      $SCENE                                                                                              \
2323          NAME=FU806;                                                                                     \
2324          DX=1600; DY=180; YDIR=U; VM=CONT;                                                               \
2325          BG=(FL_J10:..,4,0;SAKURAJIMAB);                                                 \
2326          FG=FL_J9:..,4,0;
2327        $PATH Y=9; LC=2;                                                                                  \
2328            BG=TRBED44:..,^0;                                                                             \
2329            FG=SIG_J3R:<0+100,-5;                                                                         \
2330            ENV=[TB=FG.SIGG];
2331          C=JRK_ED76DL,JR_SUHAFU42B1,JR_SUHAFU42B1,JNR_SUHA43B1L,JR_SUHAFU42B1L,JR_SUHAFU42K1,            \
2332              JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L;                                                 \
2333            D=L;
2334          C=JRK_ED76DL,JNR_OHANEFU12A,JNR_OHANE12A,JNR_SUHANE16A,JNR_OHA47B2L,JNR_NAHAFU10N1,             \
2335              JNR_NAHA10N1,JNR_NAHA10N1,JNR_NAHA10N1,JNR_SUYUNI60AL;                                      \
2336            D=L;
2337          C=<JRK_MC711L,JRK_M711,JRK_TC711;                                                               \
2338            D=L;
2339          C=<JRK_KH140HAY,JRK_KH147HAY;                                                                   \
2340            D=L;
2341          C=<JRK_485KIR1L,JRK_485KIR2,JRK_485KIR3;                                                        \
2342            D=L;
2343        $ENDPATH
2344        $PATH Y=9; LC=2;                                                                                  \
2345            BG=SIG_J3:<0+1500,-5;
2346          C=<JRK_KH140HAY,JRK_KH147HAY;                                                                   \
2347            D=R;
2348          C=<JRK_485KIR1L,JRK_485KIR2,JRK_485KIR3;                                                        \
2349            D=R;
2350          C=JRK_ED76D,JR_SUHAFU42B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JR_SUHAFU42B1,JR_SUHAFU42B1L,            \
2351              JNR_SUHA43B1L,JR_SUHAFU42B1,JR_SUHAFU42B1;                                                  \
2352            D=R;
2353          C=JRK_ED76D,JNR_SUYUNI60AL,JNR_NAHA10N1,JNR_NAHA10N1,JNR_NAHA10N1,JNR_NAHAFU10N1,JNR_OHA47B2L,  \
2354              JNR_SUHANE16A,JNR_OHANE12A,JNR_OHANEFU12A;                                                  \
2355            D=R;
2356          C=<JRK_MC711L,JRK_M711,JRK_TC711;                                                               \
2357            D=R;
2358        $ENDPATH
2359      $ENDSCENE
2360  #..........................................................................
2361  # 808
2362      $GROUP                                                                                              \
2363          NAME=FU808;                                                                                     \
2364          DX=1600; AB=113; BL=9; D=X; VM=CONT;                                                            \
2365          BG=(ASOB:,-9;SIG_J3:<0+1500,-5;TRBED43:..,^0);                                          \
2366          FG=SIG_J3R:<0+100,-5;                                                                           \
2367          WP=(0+1599,>TB:BG.SIGR;0+1,<TB:FG.SIGR);                                                        \
2368          ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3];
2369        C=<JRK_KH185AL,JRK_KH185A;
2370        C=<JRK_KH58_ASO1962AL,JRK_KH58_ASO1962B;                                                          \
2371          V=5;
2372        C=JRK_KH140;                                                                                      \
2373          V=5;
2374        C=<JNR_KIHA28L,JNR_KIRO28G1,JNR_KH65AL,JNR_KIHA58A,JNR_KIHA58L,JNR_KIRO28G1,JNR_KH65AL,           \
2375            JNR_KIHA58A;                                                                                  \
2376          V=5;
2377      $ENDGROUP
2378  #..........................................................................
2379  # 810
2380      $GROUP                                                                                              \
2381          NAME=FU810;                                                                                     \
2382          LC=2; DX=1600; AB=83; BL=39; D=X; VM=CONT;                                                      \
2383          BG=KUMAGAWA2B:,-39;                                                                     \
2384          FG=KUMAGAWA2F:,-39;                                                                     \
2385          TB=3;                                                                                           \
2386          TE=3;
2387        C=<JRK_KH185AL,JRK_KH185A;
2388        C=<JNR_KIHA28L,JNR_KIRO28G1,JNR_KIHA58A,JNR_KIHA28,JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA58A;
2389        C=JRK_KH140;                                                                                      \
2390          V=5;
2391      $ENDGROUP
2392  #..........................................................................
2393  # 811
2394      $GROUP                                                                                              \
2395          NAME=FU811;                                                                                     \
2396          LC=2; DX=1600; AB=88; BL=34; D=X; VM=CONT;                                                      \
2397          BG=KUMAGAWA1B:,-34;                                                                     \
2398          FG=KUMAGAWA1F:,-34;
2399        C=<JRK_KH185AL,JRK_KH185A;
2400        C=<JNR_KIHA28L,JNR_KIHA28L,JRK_KH26,JNR_KIHA58L,JRK_KH26L,JNR_KIHA58A;
2401        C=<JRK_KH47L,JRK_KH47;                                                                            \
2402          V=5;
2403      $ENDGROUP
2404  #..........................................................................
2405  # 812
2406      $SCENE                                                                                              \
2407          NAME=FU812;                                                                                     \
2408          DX=1600; DY=180; YDIR=U; SEQ=F; VM=CONT;                                                        \
2409          BG=MASAKIB;
2410        $PATH Y=9; LC=2; ENV=[D=R][TB=[WI:N=IL]][TE=6,[SI:N=IR]][M=BACK][P=*50-200][T=12];
2411          C=JRK_KH31;
2412          C=<JRK_KH40IS,JRK_KH47IS;
2413          C=<JRK_KH58EBL,JRK_KH65EB;
2414        $ENDPATH
2415        $PATH Y=73; LC=4;                                                                                 \
2416            FG=MASAKIM:,-73;                                                                      \
2417            SEQ=F;
2418          C=JRK_KH31;                                                                                     \
2419            D=L; V=4; TE=6,[SI:N=IL];
2420          C=JRK_KH31;                                                                                     \
2421            D=R; V=4; TB=[WI:N=IR];
2422          C=<JRK_KH40IS,JRK_KH47IS;                                                                       \
2423            D=L; TE=6,[SI:N=IL];
2424          C=<JRK_KH40IS,JRK_KH47IS;                                                                       \
2425            D=R; TB=[WI:N=IR];
2426          C=<JRK_KH58EBL,JRK_KH65EB;                                                                      \
2427            D=L; V=4; TE=6,[SI:N=IL];
2428          C=<JRK_KH58EBL,JRK_KH65EB;                                                                      \
2429            D=R; V=4; TB=[WI:N=IR];
2430        $ENDPATH
2431      $ENDSCENE
2432  #..........................................................................
2433  # 814
2434      $SCENE                                                                                              \
2435          NAME=FU814;                                                                                     \
2436          DX=1600; DY=180; YDIR=U;                                                                        \
2437          BG=SAKAIGAWANIPPOUB;                                                                    \
2438          FG=SAKAIGAWANIPPOUF;                                                                    \
2439          LT=60;                                                                                          \
2440          FIN=A;
2441        $PATH Y=21;
2442          C=<JRK_TC817KAGL,JRK_MC817KAG;
2443          C=<JNR_TC481_0BAL,JNR_M485AAL,JNR_M484_0AAL,JNR_M485AAL,JNR_M484_0AAL,JNR_TD481AL,              \
2444              JNR_TS481_0BAL,JNR_TS481_0BAL,JNR_M485AAL,JNR_M484_0AAL,JNR_TC481_0BA;
2445          C=<JRK_TC717_900L,JRK_MC717_900;
2446        $ENDPATH
2447        $PATH Y=144; IMGY=3;
2448          C=PLANE_HIGH1;                                                                                  \
2449            V=0.4; TE=10;
2450        $ENDPATH
2451        $PATH Y=120; IMGY=12;
2452          M=FOLLOW;                                                                                       \
2453            C=3*(HELI_02|HELI_01);                                                                        \
2454            V=1-1.5; TE=10;
2455        $ENDPATH
2456      $ENDSCENE
2457  #..........................................................................
2458    $ENDSECTION
2459  #----------------------------------------------------------------------------
2460    $SECTION LC=1;
2461
2462  #
2463  # 1200
2464  #
2465      $SECTION                                                                                            \
2466          NAME=FUK1200;                                                                                   \
2467          DIS=20; %SECFIN;%FOOTER(© fukayatanteijimusyo http://www.geocities.jp/kantentomaccha/);
2468  #..........................................................................
2469  # 120
2470        $SCENE                                                                                            \
2471            NAME=FU120;                                                                                   \
2472            DX=1200; DY=150; YDIR=U;                                                                      \
2473            BG=NOTSUPOROKAWABG_B;                                                         \
2474            FG=NOTSUPOROKAWABG_F;
2475          $PATH Y=59; LC=5;                                                                               \
2476              BG=NOTSUPOROKAWABG_M:,^91;                                                          \
2477              FG=SIG_J4R:<0+1000,-5;                                                                      \
2478              ENV=[TB=SCFG1.SIGG,2][TE=2,SCFG1.SIGY,3];                                                   \
2479              WP=0+900,<TB:SCFG1.SIGR;
2480            C=JNR_TC711_100BL,JNR_M711_100BL,JNR_TC711_200B;                                              \
2481              D=L;
2482            C=JRF_DF200BN,(8-11*KOKI55,KOKIE);                                                            \
2483              D=L;
2484            C=JRH_DD51S_STAR,JRH_DD51S_STAR,                                                              \
2485                (<JRW_HOKUT1,JRW_HOKUT2,JRW_HOKUT3,JRW_HOKUT3,JRW_HOKUT3,JRW_HOKUT4,JRW_HOKUT5,           \
2486                JRW_HOKUT6,JRW_HOKUT7,JRW_HOKUT8,JRW_HOKUT1A,JRW_HOKUT9);                                 \
2487              D=L;
2488            C=<JRH_KH281L,JRH_KH280_100,JRH_KH280_0,JRH_KH280_100,JRH_KR280,JRH_KH280_100,JRH_KH281;      \
2489              D=L;
2490            C=JRH_721MCL,JRH_721M,JRH_721TC;                                                              \
2491              D=L;
2492            C=JNR_DC56_0AL,JNR_DC27_0A,JNR_DC27_0A,JNR_DC27_0AL,JNR_DC56_0A,JNR_DC27_0AL,JNR_DC56_0A;     \
2493              D=L;
2494            C=JRH_DD51S_STAR,JRH_DD51S_STAR,                                                              \
2495                (<JRH_TES1L,JRH_TES2L,JRH_TES3,JRH_TES4,JRH_TES5,JRH_TES5,JRH_TES6,JRH_TES7,JRH_TES8,     \
2496                JRH_TES9);                                                                                \
2497              D=L;
2498          $ENDPATH
2499          $PATH Y=59; LC=5;
2500            C=JRH_721TC,JRH_721M,JRH_721MCL;                                                              \
2501              D=R;
2502            C=JNR_DC56_0A,JNR_DC27_0AL,JNR_DC56_0A,JNR_DC27_0AL,JNR_DC27_0A,JNR_DC27_0A,JNR_DC56_0AL;     \
2503              D=R;
2504            C=JRH_DD51S_STAR,JRH_DD51S_STAR,                                                              \
2505                (<JRH_TES1L,JRH_TES2L,JRH_TES3,JRH_TES4,JRH_TES5,JRH_TES5,JRH_TES6,JRH_TES7,JRH_TES8,     \
2506                JRH_TES9);                                                                                \
2507              D=R;
2508            C=JNR_TC711_200B,JNR_M711_100BL,JNR_TC711_100BL;                                              \
2509              D=R;
2510            C=JRF_DF200BN,9-12*KOKIA;                                                                     \
2511              D=R;
2512            C=JRH_DD51S_STAR,JRH_DD51S_STAR,                                                              \
2513                (<JRW_HOKUT1,JRW_HOKUT2,JRW_HOKUT3,JRW_HOKUT3,JRW_HOKUT3,JRW_HOKUT4,JRW_HOKUT5,           \
2514                JRW_HOKUT6,JRW_HOKUT7,JRW_HOKUT8,JRW_HOKUT1A,JRW_HOKUT9);                                 \
2515              D=R;
2516            C=<JRH_KH281L,JRH_KH280_100,JRH_KH280_0,JRH_KH280_100,JRH_KR280,JRH_KH280_100,JRH_KH281;      \
2517              D=R;
2518          $ENDPATH
2519        $ENDSCENE
2520  #..........................................................................
2521  # 123
2522        $GROUP                                                                                            \
2523            NAME=FU123;                                                                                   \
2524            DX=1200; AB=63; BL=59;                                                                        \
2525            BG=SANGENBG_B:,-59;                                                                   \
2526            FG=BRIDGE_SANGEN:,-11;
2527          C=JFOR_OKETOK1,5*KISO_LOG0;                                                                     \
2528            D=L; V=3;
2529          C=JFOR_OKETOK1,KISO_LOG1,KISO_LOG2,KISO_LOG3,KISO_LOG4,KISO_LOG5;                               \
2530            D=R; V=3;
2531        $ENDGROUP
2532  #..........................................................................
2533  # 217
2534        $GROUP                                                                                            \
2535            NAME=FU217;                                                                                   \
2536            DX=1200; AB=83; BL=39;                                                                        \
2537            BG=KITAKAMIBG_B:,-39;                                                         \
2538            FG=KITAKAMIBG_F:,-39;
2539          AP=[D=L]                                                                                        \
2540              [C=JNR_C58L,JR_OHAFU33CB2,JNR_OHA46B1L,JNR_OHA47B1L,JR_OHAFU33CB2L,JR_OHAFU33CN1,           \
2541              JR_OHAFU33CN1L][V=5]|                                                                       \
2542              [D=R]                                                                                       \
2543              [C=JNR_C58,JR_OHAFU33CN1L,JR_OHAFU33CN1,JR_OHAFU33CB2L,JNR_OHA47B1L,JNR_OHA46B1L,           \
2544              JR_OHAFU33CB2][V=4];
2545          AP=[D=L]                                                                                        \
2546              [C=JNR_C58L,JNR_WAFU29500,2*JR_G2,2*JR_G2,                                                  \
2547              (<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JNR_RE12000,JNR_RE12000,JR_GO1,            \
2548              JNR_WAFU29500][V=5]|                                                                        \
2549              [D=R]                                                                                       \
2550              [C=JNR_C58,JNR_WAFU29500,JR_GO1,JNR_RE12000,JNR_RE12000,                                    \
2551              (<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),2*JR_G2,2*JR_G2,JNR_WAFU29500][V=4];
2552          C=<JNR_KIHA28L,JNR_KIHA58A,JNR_KIHA28L,JNR_KIRO28G1,JNR_KIHA58A;                                \
2553            V=7;
2554          C=<JNR_KH17HL,JNR_KH17HL,JNR_KH20H;                                                             \
2555            V=7;
2556        $ENDGROUP
2557  #..........................................................................
2558  # 221
2559        $SCENE                                                                                            \
2560            NAME=FU221;                                                                                   \
2561            DX=1200; DY=130; YDIR=U;                                                                      \
2562            BG=OKUNAKAYAMA_B;                                                                     \
2563            FG=OKUNAKAYAMA_F;
2564          $PATH Y=9; LC=2;                                                                                \
2565              FG=SIG_J3R:<0+200,-5;                                                                       \
2566              ENV=[TB=FG.SIGG,SNOW];
2567            C=JNR_DC81L,JNR_KIRO80L,JNR_KIRO80L,JNR_KISI80,JNR_KIHA80,JNR_KIHA80,JNR_KIHA80,JNR_KIHA80,   \
2568                JNR_KIHA80,JNR_DC81;                                                                      \
2569              D=L;
2570            C=JNR_D51HVL,JNR_C61L,JR_OHAFU33CK1,JNR_OHA35K1,JNR_OHA35K1,JR_OHAFU33CN1,JNR_OHA35CK1,       \
2571                JNR_OHA35CK1,JNR_OHA35CK1,JR_OHAFU33CN1L;                                                 \
2572              D=L;
2573            C=JNR_D51HVL,JNR_D51HVL,JNR_D51HVL,2*JR_G2,2*JR_G2,                                           \
2574                JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],JR_TAKI3000A,         \
2575                JR_TAKI3000A,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JNR_RE12000,2*JR_G4,        \
2576                2*JR_G3,JR_GO1,JR_TOM3,JR_TOKI15000A,JNR_WAFU29500;                                       \
2577              D=L;
2578            C=JR_DD51_500A,JR_DD51_500A,JR_KANI21B,JR_NARONE21_100B,JR_NARONE21_100B,JR_NAHANE20B,        \
2579                JR_NAHANE20B,JR_NAHANE20B,JR_NASHI20B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANE20B,             \
2580                JR_NAHANE20B,JR_NAHA20B,JR_NAHAFU20B;                                                     \
2581              D=L;
2582            C=JNR_DD51_500FD,JNR_C61L,JR_SUHAFU42B1,JNR_OHA46B1L,JNR_OHA47B1L,JNR_OHA47B2L,               \
2583                JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1L;     \
2584              D=L;
2585          $ENDPATH
2586          $PATH Y=39; LC=2;
2587            C=JR_DD51_500A,JR_DD51_500A,JR_NAHAFU20B,JR_NAHA20B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANE20B,   \
2588                JR_NAHANE20B,JR_NASHI20B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANE20B,JR_NARONE21_100B,         \
2589                JR_NARONE21_100B,JR_KANI21B;                                                              \
2590              D=R;
2591            C=JNR_DD51_500FD,JNR_C61,JR_SUHAFU42B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_SUHA43B1L,            \
2592                JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_OHA47B2L,JNR_OHA47B1L,JNR_OHA46B1L,JR_SUHAFU42B1;         \
2593              D=R;
2594            C=JNR_DC81,JNR_KIHA80,JNR_KIHA80,JNR_KIHA80,JNR_KIHA80,JNR_KIHA80,JNR_KISI80,JNR_KIRO80L,     \
2595                JNR_KIRO80L,JNR_DC81L;                                                                    \
2596              D=R;
2597            C=JNR_D51HV,JNR_C61,JR_OHAFU33CN1L,JNR_OHA35CK1,JNR_OHA35CK1,JNR_OHA35CK1,JR_OHAFU33CN1,      \
2598                JNR_OHA35K1,JNR_OHA35K1,JR_OHAFU33CK1;                                                    \
2599              D=R;
2600            C=JNR_D51HV,JNR_D51HV,JNR_D51HV,JR_TOKI15000A,JR_TOM3,JR_GO1,2*JR_G3,2*JR_G4,JNR_RE12000,     \
2601                (<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_TAKI3000A,JR_TAKI3000A,               \
2602                JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],2*JR_G2,2*JR_G2,      \
2603                JR_YO2000;                                                                                \
2604              D=R;
2605          $ENDPATH
2606        $ENDSCENE
2607  #..........................................................................
2608  # 226
2609        $GROUP                                                                                            \
2610            NAME=FU226;                                                                                   \
2611            LC=3; DX=1200; AB=-17; BL=139;                                                                \
2612            BG=AKKAGAWABG_B:,-139;                                                                \
2613            FG=AKKAGAWABG_F:,-139;                                                                \
2614            ENV=[V=4][D=X];
2615          C=SANR_36_100;
2616          C=SANR_36C;
2617          C=SANR_36R;
2618          C=SANR_36Y;
2619          C=SANR_36A;
2620          C=SANR_36K;
2621          C=SANR_36T;
2622          C=SANR_36_2110;
2623        $ENDGROUP
2624  #..........................................................................
2625  # 232
2626        $GROUP                                                                                            \
2627            NAME=FU232;                                                                                   \
2628            DX=1200; AB=74; BL=48;                                                                        \
2629            BG=MOGAMIBG_ATERAZAWA_B:,-48;                                                 \
2630            FG=MOGAMIBG_ATERAZAWA_F:,-48;
2631          AP=[D=L][C=JR_C11325MOKA,JNR_SUHAFU32A,JNR_OHA35CK1,JR_SUHAFU42K1L][V=4]|                       \
2632              [D=R][C=JR_C11325MOKA,JR_SUHAFU42K1L,JNR_OHA35CK1,JNR_SUHAFU32A][V=4];
2633          C=JRH_KH22SYU;                                                                                  \
2634            V=5;
2635          C=JRE_DC101,JRE_DC101;                                                                          \
2636            V=6;
2637          C=JRE_DC101,JRE_DC101,JRE_DC101,JRE_DC101;                                                      \
2638            V=5;
2639        $ENDGROUP
2640  #..........................................................................
2641  # 305
2642        $SCENE                                                                                            \
2643            NAME=FU305;                                                                                   \
2644            DX=1200; DY=130; YDIR=U;                                                                      \
2645            BG=USUIB;                                                                             \
2646            FG=USUIF;
2647          $PATH Y=68; LC=2;                                                                               \
2648              BG=USUIM:<0+0,^62;                                                                  \
2649              FG=SIG_J3R:<0+20,-5;                                                                        \
2650              ENV=[TB=FG.SIGG];
2651            C=JR_EF63CN,JR_EF63CN,JNR_MC165CXL,JNR_M164_0CXL,JNR_TS165CL,JNR_TS165CL,JNR_TC165CX,         \
2652                JNR_MC165CXL,JNR_M164_0CXL,JNR_TC165CX,JNR_MC165CXL,JNR_M164_0CXL,JNR_TC165CX;            \
2653              D=L;
2654            C=JR_EF63C,JR_EF63C,JR_EF62C,JR_MANI50,JRE_SUHANEFU14_0BL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,    \
2655                JNR_OHAFU15_0B1L,JRE_OHA14_0CL,JRE_OHA14_0CL,JRE_OHA14_0CL,JRE_SUHAFU14_0BAR;             \
2656              D=L;
2657            C=JR_EF63C,JR_EF63C,JR_EF63CN,JR_EF63CN;                                                      \
2658              D=L;
2659            C=JR_EF63C,JR_EF63C,                                                                          \
2660                (<JRE_TC189_500GSL,JRE_M188_0DGS,JRE_M189_0BGS,JRE_M188_0DGS,JRE_M189_0BGS,               \
2661                JRE_TS189_0GS,JRE_M188_0DGS,JRE_M189_0BGS,JRE_M188_0DGS,JRE_M189_0BGS,JRE_TC189_500GS);   \
2662              D=L;
2663            C=JR_EF63C,JR_EF63CN,(<JRE_MC115_1000HL,JRE_M114_1000HL,JRE_TC115_1000H);                     \
2664              D=L;
2665          $ENDPATH
2666          $PATH Y=37; LC=2;
2667            C=(<JRE_TC189_500GSL,JRE_M188_0DGS,JRE_M189_0BGS,JRE_M188_0DGS,JRE_M189_0BGS,JRE_TS189_0GS,   \
2668                JRE_M188_0DGS,JRE_M189_0BGS,JRE_M188_0DGS,JRE_M189_0BGS,JRE_TC189_500GS),JR_EF63C,        \
2669                JR_EF63C;                                                                                 \
2670              D=R;
2671            C=(<JRE_MC115_1000HL,JRE_M114_1000HL,JRE_TC115_1000H),JR_EF63CN,JR_EF63C;                     \
2672              D=R;
2673            C=JNR_TC165CX,JNR_M164_0CXL,JNR_MC165CXL,JNR_TC165CX,JNR_M164_0CXL,JNR_MC165CXL,JNR_TC165CX,  \
2674                JNR_TS165CL,JNR_TS165CL,JNR_M164_0CXL,JNR_MC165CXL,JR_EF63CN,JR_EF63CN;                   \
2675              D=R;
2676            C=JR_EF62C,JRE_SUHAFU14_0BAR,JRE_OHA14_0CL,JRE_OHA14_0CL,JRE_OHA14_0CL,JNR_OHAFU15_0B1L,      \
2677                JNR_OHANE14_0CL,JNR_OHANE14_0CL,JRE_SUHANEFU14_0BL,JR_MANI50,JR_EF63C,JR_EF63C;           \
2678              D=R;
2679            C=JR_EF63CN,JR_EF63CN,JR_EF63C,JR_EF63C;                                                      \
2680              D=R;
2681          $ENDPATH
2682        $ENDSCENE
2683  #..........................................................................
2684  # 308
2685        $GROUP                                                                                            \
2686            NAME=FU308;                                                                                   \
2687            DX=1200; AB=146; BL=46;                                                                       \
2688            BG=TAMAKOSTB:,-46;                                                                    \
2689            FG=TAMAKOSTF:,-46;
2690          M=BACK;                                                                                         \
2691            C=<SEIBU_351AL,SEIBU_351B,SEIBU_351A;                                                         \
2692            D=R; P=<0+1000; TB=3; T=1,OPEN,W,6,CLOSE,W,1;
2693          M=BACK;                                                                                         \
2694            C=<SEIBU_2MCL,SEIBU_2TC;                                                                      \
2695            D=R; P=<0+1100; TB=4; T=1,OPEN,W,6,CLOSE,W,1;
2696          M=BACK;                                                                                         \
2697            C=<SEIBU_4AL,SEIBU_4B,SEIBU_4C,SEIBU_4D;                                                      \
2698            D=R; P=<0+1000; TB=4; T=1,OPEN,W,6,CLOSE,W,1;
2699          M=BACK;                                                                                         \
2700            C=SEIBU_2000TC,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000TCL;               \
2701            D=R; P=<0+700; TB=4; T=1,OPEN,W,6,CLOSE,W,1;
2702        $ENDGROUP
2703  #..........................................................................
2704  # 321
2705        $SCENE                                                                                            \
2706            NAME=FU321;                                                                                   \
2707            DX=1200; DY=180; YDIR=U;                                                                      \
2708            BG=TAKADABABA2B:<0;                                                                   \
2709            FG=TAKADABABA2F:<0;
2710          $PATH Y=66; LC=2; ENV=[M=STOP][P=>0+180][B=0.01][A=0.02];
2711            C=SEIBU_2000TCL,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000MP,   \
2712                SEIBU_2000M,SEIBU_2000MP,SEIBU_2000TC;                                                    \
2713              D=L;
2714            C=(<SEIBU_4AL,SEIBU_4B,SEIBU_4C,SEIBU_4D),(<SEIBU_4AL,SEIBU_4B,SEIBU_4C,SEIBU_4D);            \
2715              D=L;
2716            C=<SEIBU_10000AL,SEIBU_10000B,SEIBU_10000C,SEIBU_10000D,SEIBU_10000B,SEIBU_10000E,            \
2717                SEIBU_10000F;                                                                             \
2718              D=L;
2719          $ENDPATH
2720          $PATH Y=66; LC=2;                                                                               \
2721              BG=TAKADABABA2M:<0,-66;                                                             \
2722              ENV=[M=STOP][P=>0+180][B=0.01][A=0.02];
2723            C=<SEIBU_10000AL,SEIBU_10000B,SEIBU_10000C,SEIBU_10000D,SEIBU_10000B,SEIBU_10000E,            \
2724                SEIBU_10000F;                                                                             \
2725              D=R;
2726            C=SEIBU_2000TC,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000M,    \
2727                SEIBU_2000MP,SEIBU_2000M,SEIBU_2000TCL;                                                   \
2728              D=R;
2729            C=(<SEIBU_4AL,SEIBU_4B,SEIBU_4C,SEIBU_4D),(<SEIBU_4AL,SEIBU_4B,SEIBU_4C,SEIBU_4D);            \
2730              D=R;
2731          $ENDPATH
2732          $PATH Y=79; LC=2;
2733            C=JRF_EF64_1010,9-12*KOKIA;                                                                   \
2734              D=L;
2735            C=<JRE_TCE230_8000AL,JRE_ME230_3500C,JRE_ME231_3500B,JRE_TSE230_1000A,JRE_TSE231_1000A,       \
2736                JRE_TE231_1000A,JRE_TE231_1000A,JRE_ME231_3500B,JRE_ME230_3500C,JRE_TCE231_8500B,         \
2737                JRE_TCE230_6000BL,JRE_ME230_1000C,JRE_ME231_1000C,JRE_TE231_3000C,JRE_TCE231_8000B;       \
2738              D=L;
2739          $ENDPATH
2740          $PATH Y=79; LC=2;
2741            C=JRF_EF64_1010,(8-11*KOKI55,KOKIE);                                                          \
2742              D=R;
2743            C=<JRE_TCE230_8000AL,JRE_ME230_3500C,JRE_ME231_3500B,JRE_TSE230_1000A,JRE_TSE231_1000A,       \
2744                JRE_TE231_1000A,JRE_TE231_1000A,JRE_ME231_3500B,JRE_ME230_3500C,JRE_TCE231_8500B,         \
2745                JRE_TCE230_6000BL,JRE_ME230_1000C,JRE_ME231_1000C,JRE_TE231_3000C,JRE_TCE231_8000B;       \
2746              D=R;
2747          $ENDPATH
2748          $PATH Y=79; LC=2;                                                                               \
2749              BG=(TRBED14:..,^0;TAKADABABA2ST:<0,-79);
2750            M=STOP;                                                                                       \
2751              C=JRE_205TC1SL,(<JRE_205M1S,JRE_205M2S),JRE_205TS,(<JRE_205M1S,JRE_205M2S),JRE_205TS,       \
2752                (<JRE_205M1S,JRE_205M2S),JRE_205TC1S;                                                     \
2753              D=L; P=>0+980;
2754            M=STOP;                                                                                       \
2755              C=JRE_TC204_0YAL,JRE_T204_900YBL,JRE_M205_0YAL,JRE_M204_0YAAL,JRE_T205_0YAL,JRE_M205_0YAL,  \
2756                JRE_M204_0YAAL,JRE_T205_0YAL,JRE_M205_0YAL,JRE_M204_0YAAL,JRE_TC204_0YA;                  \
2757              D=L; P=>0+980;
2758          $ENDPATH
2759          $PATH Y=79; LC=2;
2760            M=OPEN;                                                                                       \
2761              C=JRE_205TC1S,(<JRE_205M1S,JRE_205M2S),JRE_205TS,(<JRE_205M1S,JRE_205M2S),JRE_205TS,        \
2762                (<JRE_205M1S,JRE_205M2S),JRE_205TC1SL;                                                    \
2763              D=R; P=>0+1000;
2764            M=OPEN;                                                                                       \
2765              C=JRE_TC204_0YA,JRE_M204_0YAAL,JRE_M205_0YAL,JRE_T205_0YAL,JRE_M204_0YAAL,JRE_M205_0YAL,    \
2766                JRE_T205_0YAL,JRE_M204_0YAAL,JRE_M205_0YAL,JRE_T204_900YBL,JRE_TC204_0YAL;                \
2767              D=R; P=>0+1000;
2768          $ENDPATH
2769        $ENDSCENE
2770  #..........................................................................
2771  # 345
2772        $SCENE                                                                                            \
2773            NAME=FU345;                                                                                   \
2774            DX=1200; DY=180; YDIR=U;                                                                      \
2775            BG=GOTANDASTB;                                                                        \
2776            FG=GOTANDASTF;                                                                        \
2777            LT=150;                                                                                       \
2778            FIN=A;
2779          $PATH Y=79;                                                                                     \
2780              BG=GOTANDASTM:<0+0,^101;
2781            M=STOP;                                                                                       \
2782              C=JRE_TC231_500CL,JRE_T230_500C,JRE_M231_500C,JRE_M230_500C,JRE_T230_500C,JRE_M231_500C,    \
2783                JRE_M230_500C,JRE_T231_500C,JRE_M231_500C,JRE_M230_500C,JRE_TC230_500C;                   \
2784              D=L; P=*50; TB=35; TE=20; T=8;
2785          $ENDPATH
2786          $PATH Y=79;
2787            M=STOP;                                                                                       \
2788              C=JRE_TC230_500C,JRE_M230_500C,JRE_M231_500C,JRE_T231_500C,JRE_M230_500C,JRE_M231_500C,     \
2789                JRE_T230_500C,JRE_M230_500C,JRE_M231_500C,JRE_T230_500C,JRE_TC231_500CL;                  \
2790              D=R; P=*50; TB=5; TE=50; T=OPEN,6,CLOSE,2;
2791          $ENDPATH
2792          $PATH Y=79; ENV=[TE=10];
2793            C=JRF_EF65_1000R,JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],           \
2794                JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                        \
2795                JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                        \
2796                JR_KOKI200L~OP[C1:CT61][C3:CT61];                                                         \
2797              D=L;
2798            C=<JRE_TSC253NL,JRE_M253_100N,JRE_M252N,JRE_T253N,JRE_M253N,JRE_MC252N;                       \
2799              D=L;
2800            C=JRE_TC204_0YAL,JRE_T204_900YBL,JRE_M205_0YAL,JRE_M204_0YAAL,JRE_T205_0YAL,JRE_M205_0YAL,    \
2801                JRE_M204_0YAAL,JRE_T205_0YAL,JRE_M205_0YAL,JRE_M204_0YAAL,JRE_TC204_0YA;                  \
2802              D=L;
2803            C=JRE_205TC1SL,(<JRE_205M1S,JRE_205M2S),JRE_205TS,(<JRE_205M1S,JRE_205M2S),JRE_205TS,         \
2804                (<JRE_205M1S,JRE_205M2S),JRE_205TC1S;                                                     \
2805              D=L;
2806            C=<JRE_TCE230_8000AL,JRE_ME230_3500C,JRE_ME231_3500B,JRE_TSE230_1000A,JRE_TSE231_1000A,       \
2807                JRE_TE231_1000A,JRE_TE231_1000A,JRE_ME231_3500B,JRE_ME230_3500C,JRE_TCE231_8500B,         \
2808                JRE_TCE230_6000BL,JRE_ME230_1000C,JRE_ME231_1000C,JRE_TE231_3000C,JRE_TCE231_8000B;       \
2809              D=L;
2810          $ENDPATH
2811          $PATH Y=79; ENV=[TB=10];
2812            C=JRE_TC204_0YA,JRE_M204_0YAAL,JRE_M205_0YAL,JRE_T205_0YAL,JRE_M204_0YAAL,JRE_M205_0YAL,      \
2813                JRE_T205_0YAL,JRE_M204_0YAAL,JRE_M205_0YAL,JRE_T204_900YBL,JRE_TC204_0YAL;                \
2814              D=R;
2815            C=JRE_205TC1S,(<JRE_205M1S,JRE_205M2S),JRE_205TS,(<JRE_205M1S,JRE_205M2S),JRE_205TS,          \
2816                (<JRE_205M1S,JRE_205M2S),JRE_205TC1SL;                                                    \
2817              D=R;
2818            C=<JRE_TCE230_8000AL,JRE_ME230_3500C,JRE_ME231_3500B,JRE_TSE230_1000A,JRE_TSE231_1000A,       \
2819                JRE_TE231_1000A,JRE_TE231_1000A,JRE_ME231_3500B,JRE_ME230_3500C,JRE_TCE231_8500B,         \
2820                JRE_TCE230_6000BL,JRE_ME230_1000C,JRE_ME231_1000C,JRE_TE231_3000C,JRE_TCE231_8000B;       \
2821              D=R;
2822            C=JRF_EF65_1000R,JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],           \
2823                JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                        \
2824                JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                        \
2825                JR_KOKI200L~OP[C1:CT61][C3:CT61];                                                         \
2826              D=R;
2827            C=<JRE_TSC253NL,JRE_M253_100N,JRE_M252N,JRE_T253N,JRE_M253N,JRE_MC252N;                       \
2828              D=R;
2829          $ENDPATH
2830        $ENDSCENE
2831  #..........................................................................
2832  # 353
2833        $SCENE DX=1200; DY=150; YDIR=U;                                                                   \
2834            BG=SUMIDAHIBIYAB;                                                                     \
2835            FG=SUMIDAHIBIYAF;
2836          $PATH Y=26; LC=2;
2837            C=TOKYO_TC03METL,TOKYO_MP03MET,TOKYO_M03MET,TOKYO_T03MET,TOKYO_T03MET,TOKYO_MP03MET,          \
2838                TOKYO_M03MET,TOKYO_TC03MET;                                                               \
2839              D=L; TB=25; TE=25;
2840            C=TOKYO_TC03MET5L,TOKYO_MP03MET5,TOKYO_M03MET,TOKYO_T03MET,TOKYO_T03MET,TOKYO_MP03MET,        \
2841                TOKYO_M03MET5,TOKYO_TC03MET5;                                                             \
2842              D=L; TB=25; TE=25;
2843          $ENDPATH
2844          $PATH Y=26; LC=2;                                                                               \
2845              BG=SUMIDAHIBIYAMF:,-26;
2846            C=TOKYO_TC03MET,TOKYO_M03MET,TOKYO_MP03MET,TOKYO_T03MET,TOKYO_T03MET,TOKYO_M03MET,            \
2847                TOKYO_MP03MET,TOKYO_TC03METL;                                                             \
2848              D=R; TB=5; TE=45;
2849            C=TOKYO_TC03MET5,TOKYO_M03MET5,TOKYO_MP03MET,TOKYO_T03MET,TOKYO_T03MET,TOKYO_M03MET,          \
2850                TOKYO_MP03MET5,TOKYO_TC03MET5L;                                                           \
2851              D=R; TB=5; TE=45;
2852          $ENDPATH
2853          $PATH Y=29; LC=2;
2854            C=<TX_1000AL,TX_1000B,TX_1000C,TX_1000D,TX_1000E,TX_1000F;                                    \
2855              D=L; TB=35; TE=15;
2856            C=<TX_2000AL,TX_2000B,TX_2000C,TX_2000D,TX_2000E,TX_2000F;                                    \
2857              D=L; TB=35; TE=15;
2858          $ENDPATH
2859          $PATH Y=29; LC=2;                                                                               \
2860              BG=SUMIDAHIBIYAMB:,-29;
2861            C=<TX_1000AL,TX_1000B,TX_1000C,TX_1000D,TX_1000E,TX_1000F;                                    \
2862              D=R; TB=15; TE=35;
2863            C=<TX_2000AL,TX_2000B,TX_2000C,TX_2000D,TX_2000E,TX_2000F;                                    \
2864              D=R; TB=15; TE=35;
2865          $ENDPATH
2866          $PATH Y=29; LC=4;
2867            C=JRE_531TCL,JRE_531M,JRE_531MP,JRE_531T,JRE_531T,JRE_531T,JRE_531M,JRE_531MP,JRE_531T,       \
2868                JRE_531TC,JRE_531TCL,JRE_531M,JRE_531MP,JRE_531T,JRE_531TC;                               \
2869              D=L;
2870            C=JRE_TC230_0JAL,JRE_M230_0JA,JRE_M231_0JA,JRE_T231_0JA,JRE_T231_0JA,JRE_T231_0JA,            \
2871                JRE_M230_0JA,JRE_M231_0JA,JRE_TC230_0JA,JRE_TC230_0JAL,JRE_TC230_0JAL,JRE_M230_0JA,       \
2872                JRE_M231_0JA,JRE_T231_0JA,JRE_TC230_0JA;                                                  \
2873              D=L;
2874            C=JRE_EF80,9-12*KOKIA,(8-11*KOKI55,KOKIE);                                                    \
2875              D=L;
2876            C=JRE_TCE652_0BAL,JRE_ME653_0BA,JRE_ME652_0BA,JRE_TE653_0BA,JRE_ME653_0BA,JRE_ME652_0BA,      \
2877                JRE_TCE653_0BA,JRE_TCE652_0BAL,JRE_ME653_0BA,JRE_ME652_0BA,JRE_TE653_0BA,JRE_ME653_0BA,   \
2878                JRE_ME652_0BA,JRE_TCE653_0BA;                                                             \
2879              D=L;
2880          $ENDPATH
2881          $PATH Y=29; LC=4;
2882            C=JRE_EF80,(8-11*KOKI55,KOKIE),9-12*KOKIA;                                                    \
2883              D=R;
2884            C=JRE_TCE653_0BA,JRE_ME652_0BA,JRE_ME653_0BA,JRE_TE653_0BA,JRE_ME652_0BA,JRE_ME653_0BA,       \
2885                JRE_TCE652_0BAL,JRE_TCE653_0BA,JRE_ME652_0BA,JRE_ME653_0BA,JRE_TE653_0BA,JRE_ME652_0BA,   \
2886                JRE_ME653_0BA,JRE_TCE652_0BAL;                                                            \
2887              D=R;
2888            C=JRE_531TC,JRE_531T,JRE_531MP,JRE_531M,JRE_531TCL,JRE_531TC,JRE_531T,JRE_531MP,JRE_531M,     \
2889                JRE_531T,JRE_531T,JRE_531T,JRE_531MP,JRE_531M,JRE_531TCL;                                 \
2890              D=R;
2891            C=JRE_TC230_0JA,JRE_T231_0JA,JRE_M231_0JA,JRE_M230_0JA,JRE_TC230_0JAL,JRE_TC230_0JAL,         \
2892                JRE_TC230_0JA,JRE_M231_0JA,JRE_M230_0JA,JRE_T231_0JA,JRE_T231_0JA,JRE_T231_0JA,           \
2893                JRE_M231_0JA,JRE_M230_0JA,JRE_TC230_0JAL;                                                 \
2894              D=R;
2895          $ENDPATH
2896        $ENDSCENE
2897  #..........................................................................
2898  # 358
2899        $SCENE                                                                                            \
2900            NAME=FU358;                                                                                   \
2901            DX=1200; DY=150; YDIR=U;                                                                      \
2902            BG=HARAJUKUST_B;                                                                      \
2903            FG=HARAJUKUST_F;                                                                      \
2904            FIN=W;
2905          $PATH Y=9; ENV=[TE=40][V=8];
2906            C=<JRE_TCE230_8000AL,JRE_ME230_3500C,JRE_ME231_3500B,JRE_TSE230_1000A,JRE_TSE231_1000A,       \
2907                JRE_TE231_1000A,JRE_TE231_1000A,JRE_ME231_3500B,JRE_ME230_3500C,JRE_TCE231_8500B,         \
2908                JRE_TCE230_6000BL,JRE_ME230_1000C,JRE_ME231_1000C,JRE_TE231_3000C,JRE_TCE231_8000B;       \
2909              D=L;
2910            C=<JRE_TSC253NL,JRE_M253_100N,JRE_M252N,JRE_T253N,JRE_M253N,JRE_MC252N;                       \
2911              D=L;
2912            C=JRE_205TC1SL,(<JRE_205M1S,JRE_205M2S),JRE_205TS,(<JRE_205M1S,JRE_205M2S),JRE_205TS,         \
2913                (<JRE_205M1S,JRE_205M2S),JRE_205TC1S;                                                     \
2914              D=L;
2915          $ENDPATH
2916          $PATH Y=9; ENV=[TB=20][TE=20][V=8];
2917            C=JRE_205TC1S,(<JRE_205M1S,JRE_205M2S),JRE_205TS,(<JRE_205M1S,JRE_205M2S),JRE_205TS,          \
2918                (<JRE_205M1S,JRE_205M2S),JRE_205TC1SL;                                                    \
2919              D=R;
2920            C=<JRE_TCE230_8000AL,JRE_ME230_3500C,JRE_ME231_3500B,JRE_TSE230_1000A,JRE_TSE231_1000A,       \
2921                JRE_TE231_1000A,JRE_TE231_1000A,JRE_ME231_3500B,JRE_ME230_3500C,JRE_TCE231_8500B,         \
2922                JRE_TCE230_6000BL,JRE_ME230_1000C,JRE_ME231_1000C,JRE_TE231_3000C,JRE_TCE231_8000B;       \
2923              D=R;
2924            C=<JRE_TSC253NL,JRE_M253_100N,JRE_M252N,JRE_T253N,JRE_M253N,JRE_MC252N;                       \
2925              D=R;
2926          $ENDPATH
2927          $PATH Y=9;                                                                                      \
2928              BG=(TRBED20:..,^0;HARAJUKUST_M:<0+0,^141);                                          \
2929              ENV=[TB=10][TE=30][V=7][B=0.006];
2930            M=STOP;                                                                                       \
2931              C=JRE_TC231_500CL,JRE_T230_500C,JRE_M231_500C,JRE_M230_500C,JRE_T230_500C,JRE_M231_500C,    \
2932                JRE_M230_500C,JRE_T231_500C,JRE_M231_500C,JRE_M230_500C,JRE_TC230_500C;                   \
2933              D=L; P=*50;
2934          $ENDPATH
2935          $PATH Y=9; ENV=[TB=30][TE=10][V=7][B=0.006];
2936            M=OPEN;                                                                                       \
2937              C=JRE_TC230_500C,JRE_M230_500C,JRE_M231_500C,JRE_T231_500C,JRE_M230_500C,JRE_M231_500C,     \
2938                JRE_T230_500C,JRE_M230_500C,JRE_M231_500C,JRE_T230_500C,JRE_TC231_500CL;                  \
2939              D=R; P=*50;
2940          $ENDPATH
2941        $ENDSCENE
2942  #..........................................................................
2943  # 362
2944        $SCENE                                                                                            \
2945            NAME=FU362;                                                                                   \
2946            DX=1200; DY=150; YDIR=U;                                                                      \
2947            BG=HAGIYAMAST_B;                                                                      \
2948            FG=HAGIYAMAST_F;                                                                      \
2949            LT=120;                                                                                       \
2950            FIN=W;
2951          $PATH Y=9;                                                                                      \
2952              BG=HAGIYAMAST_M:,-9;                                                                \
2953              ENV=[M=BACK][D=L][P=>50+520][T=12][B=0.06][TE=20];
2954            C=<SEIBU_351A2L,SEIBU_351B2,SEIBU_351A2;
2955            C=<SEIBU_MC401L,SEIBU_TC401;
2956            C=SEIBU_TC101AL,SEIBU_MP101,SEIBU_M101,SEIBU_TC101B;
2957            C=SEIBU_2000TCL,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000TC;
2958          $ENDPATH
2959          $PATH Y=9;                                                                                      \
2960              BG=TRBED44:..,^0;                                                                           \
2961              ENV=[D=L][M=OPEN][P=*50][TB=40];
2962            C=SEIBU_2000TCL,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000M,   \
2963                SEIBU_2000TC;                                                                             \
2964              D=L;
2965            C=<SEIBU_TC20000L,SEIBU_MP20000B,SEIBU_M20000,SEIBU_T20000,SEIBU_MP20000A,SEIBU_T20000,       \
2966                SEIBU_T20000,SEIBU_MP20000A,SEIBU_M20000,SEIBU_TC20000;                                   \
2967              D=L;
2968            C=SEIBU_TC101AL,SEIBU_MP101,SEIBU_M101,SEIBU_TC101B;                                          \
2969              D=L;
2970          $ENDPATH
2971          $PATH Y=9; ENV=[D=R][M=STOP][P=*50][TB=20][TE=20];
2972            C=SEIBU_TC101B,SEIBU_M101,SEIBU_MP101,SEIBU_TC101AL;
2973            C=SEIBU_2000TC,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000MP,    \
2974                SEIBU_2000TCL;
2975            C=<SEIBU_TC20000L,SEIBU_MP20000B,SEIBU_M20000,SEIBU_T20000,SEIBU_MP20000A,SEIBU_T20000,       \
2976                SEIBU_T20000,SEIBU_MP20000A,SEIBU_M20000,SEIBU_TC20000;
2977          $ENDPATH
2978        $ENDSCENE
2979  #..........................................................................
2980  # 364/1
2981        $GROUP                                                                                            \
2982            NAME=FU364A;                                                                                  \
2983            DX=1200; AB=83; BL=39;                                                                        \
2984            BG=ARAKAWABGKAWAGOE_B:,-39;                                                           \
2985            FG=ARAKAWABGKAWAGOE_F:,-39;
2986          C=<JRE_205TC1SL,(<JRE_205M1S,JRE_205M2S),JRE_205TS,(<JRE_205M1S,JRE_205M2S),JRE_205TS,          \
2987              (<JRE_205M1S,JRE_205M2S),JRE_205TC1S;
2988          C=<TWR_TC70_000L,(<TWR_MP70_000,TWR_M70_000),TWR_T70_000,(<TWR_MP70_000,TWR_M70_000),           \
2989              TWR_T70_000,(<TWR_MP70_000,TWR_M70_000),TWR_TC70_000;
2990          C=<JRE_TC103GL,JRE_M103G,JRE_M102G,JRE_T103G,JRE_M103G,JRE_M102G,JRE_T103G,JRE_M103G,           \
2991              JRE_M102G,JRE_TC103G;
2992        $ENDGROUP
2993  #..........................................................................
2994  # 364/2
2995        $GROUP                                                                                            \
2996            NAME=FU364B;                                                                                  \
2997            DX=1200; AB=83; BL=39;                                                                        \
2998            BG=ARAKAWABGKAWAGOE2_B:,-39;                                                          \
2999            FG=ARAKAWABGKAWAGOE2_F:,-39;
3000          AP=[D=L]                                                                                        \
3001              [C=JNR_9600DFL,JR_SUHAFU42B1,JNR_SUHA43B1L,JR_SUHAFU42B1L,JR_SUHAFU42B1,JNR_SUHA43B1L,      \
3002              JNR_SUHA43B2L,JR_SUHAFU42B1L][V=4]|                                                         \
3003              [D=R]                                                                                       \
3004              [C=JNR_9600DF,JR_SUHAFU42B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JR_SUHAFU42B1,JR_SUHAFU42B1L,      \
3005              JNR_SUHA43B1L,JR_SUHAFU42B1][V=4];
3006          C=<JNR_KH35SL,JNR_KH35S,JNR_KH35SL,JNR_KH35A;
3007        $ENDGROUP
3008  #..........................................................................
3009  # 368
3010        $SCENE                                                                                            \
3011            NAME=FU368;                                                                                   \
3012            DX=1200; DY=150; YDIR=U;                                                                      \
3013            BG=(SIG_3F:<0+338,70; GYOEN_B);                                                       \
3014            FG=GYOEN_F;
3015          $PATH Y=9; LC=2;                                                                                \
3016              FG=SIG_J3R:<0+344,-5;                                                                       \
3017              WP=50-300,<TB:SIGR;                                                                         \
3018              ENV=[TB=SIGG][TE=2,SIGY,4,SIGG];
3019            C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),                                      \
3020                (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);            \
3021              D=L;
3022            C=<JRE_TCE256_500AL,JRE_ME257_1500A,JRE_ME256_500A,JRE_ME257_500A,JRE_TCE257_500A;            \
3023              D=L;
3024            C=JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TAS,JRE_M200_0TA,JRE_M201_0TAS,JRE_TC201_0TAA,       \
3025                JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TAS,JRE_TC201_0TAA;                                \
3026              D=L;
3027            C=JNR_TC103OL,(<JNR_M102O,JNR_M103O),JNR_T103O,(<JNR_M102O,JNR_M103O),JNR_T103O,              \
3028                (<JNR_M102O,JNR_M103O),JNR_TC103O;                                                        \
3029              D=L;
3030            C=<JRE_TCE257_0AL,JRE_ME256_0A,JRE_ME257_100A,JRE_THSE257_0A,JRE_TE257_0A,JRE_ME257_1000A,    \
3031                JRE_ME256_0A,JRE_ME257_0A,JRE_TCE257_100A;                                                \
3032              D=L;
3033          $ENDPATH
3034          $PATH Y=9; LC=2;
3035            C=JNR_TC103O,(<JNR_M102O,JNR_M103O),JNR_T103O,(<JNR_M102O,JNR_M103O),JNR_T103O,               \
3036                (<JNR_M102O,JNR_M103O),JNR_TC103OL;                                                       \
3037              D=R;
3038            C=<JRE_TCE257_0AL,JRE_ME256_0A,JRE_ME257_100A,JRE_THSE257_0A,JRE_TE257_0A,JRE_ME257_1000A,    \
3039                JRE_ME256_0A,JRE_ME257_0A,JRE_TCE257_100A;                                                \
3040              D=R;
3041            C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),              \
3042                (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);                                    \
3043              D=R;
3044            C=<JRE_TCE256_500AL,JRE_ME257_1500A,JRE_ME256_500A,JRE_ME257_500A,JRE_TCE257_500A;            \
3045              D=R;
3046            C=JRE_TC201_0TAA,JRE_M201_0TAS,JRE_M200_0TA,JRE_TC200_0TAAL,JRE_TC201_0TAA,JRE_M201_0TAS,     \
3047                JRE_M200_0TA,JRE_M201_0TAS,JRE_M200_0TA,JRE_TC200_0TAAL;                                  \
3048              D=R;
3049          $ENDPATH
3050        $ENDSCENE
3051  #..........................................................................
3052  # 369
3053        $SCENE                                                                                            \
3054            NAME=FU369;                                                                                   \
3055            DX=1200; DY=150; YDIR=U;                                                                      \
3056            BG=(SIG_4F:50+-400,94; KAMEIDOST_B);                                                  \
3057            FG=KAMEIDOST_FF;                                                                      \
3058            LT=120;                                                                                       \
3059            FIN=W;
3060          $PATH Y=71;                                                                                     \
3061              BG=KAMEIDOST_F:,-9;                                                         \
3062              ENV=[TE=30][V=3];
3063            C=JNR_DE10L,4*JR_TIKI;                                                                        \
3064              D=L;
3065            C=JNR_DE10L,2*JR_TIKI2;                                                                       \
3066              D=R;
3067          $ENDPATH
3068          $PATH Y=9;                                                                                      \
3069              BG=(TRBED44:..,^0; KAMEIDOST_M:,-9);                                                \
3070              FG=SIG_J4R:50+-400,-5;                                                                      \
3071              ENV=[TB=SIGG][TE=6,SIGY,5,SIGYG,4,SIGG,5][D=L][M=STOP][P=>50+-40];                          \
3072              WP=50+-430,<TB:SIGR;
3073            C=JRE_TC208_500MAL,JRE_M208_500MA,JRE_M209_500MB,JRE_T209_500MA,JRE_T209_500MA,               \
3074                JRE_T209_500MA,JRE_M208_500MA,JRE_M209_500MB,JRE_T209_500MA,JRE_TC209_500MA;
3075            C=JRE_TC230_0ML,JRE_M230_0M,JRE_M231_0M,JRE_T231_0M,JRE_T231_0M,JRE_T230_0M,JRE_M230_0M,      \
3076                JRE_M231_0M,JRE_T231_0M,JRE_TC231_0M;
3077          $ENDPATH
3078          $PATH Y=9;                                                                                      \
3079              BG=KAMEIDOST_MB:,-9;                                                                \
3080              ENV=[D=R][M=OPEN][TB=20][TE=10][P=>50];
3081            C=JRE_TC231_0M,JRE_T231_0M,JRE_M231_0M,JRE_M230_0M,JRE_T230_0M,JRE_T231_0M,JRE_T231_0M,       \
3082                JRE_M231_0M,JRE_M230_0M,JRE_TC230_0ML;
3083            C=JRE_TC209_500MA,JRE_T209_500MA,JRE_M209_500MB,JRE_M208_500MA,JRE_T209_500MA,                \
3084                JRE_T209_500MA,JRE_T209_500MA,JRE_M209_500MB,JRE_M208_500MA,JRE_TC208_500MAL;
3085          $ENDPATH
3086          $PATH Y=9; ENV=[TB=10][TE=20][V=7-10];
3087            C=<JRE_TCE216_1000BL,JRE_ME216_2000B,JRE_ME217_2000B,JRE_TCE217_2000B,JRE_TCE216_2000BL,      \
3088                JRE_ME216_2000B,JRE_ME217_2000B,JRE_TSE216_0B,JRE_TSE217_0B,JRE_TE217_2000B,              \
3089                JRE_TE217_2000B,JRE_ME216_2000B,JRE_ME217_0B,JRE_TE217_0B,JRE_TCE217_0B;                  \
3090              D=L;
3091            C=(<JRE_TC111B1L,JRE_M112B1,JRE_M113B1,JRE_TC111B1),                                          \
3092                (<JRE_TC111B1L,JRE_M112B1,JRE_M113B1,JRE_TS111B1L,JRE_TS111B1L,JRE_M112B1,JRE_M113B1,     \
3093                JRE_T111B,JRE_M112B1,JRE_M113B1,JRE_TC111B1);                                             \
3094              D=L;
3095            C=(<JRE_TCE256_500AL,JRE_ME257_1500A,JRE_ME256_500A,JRE_ME257_500A,JRE_TCE257_500A),          \
3096                (<JRE_TCE256_500AL,JRE_ME257_1500A,JRE_ME256_500A,JRE_ME257_500A,JRE_TCE257_500A);        \
3097              D=L;
3098            C=JRE_MC252_0BL,JRE_M253_0B,JRE_T253_0B,JRE_M252_0B,JRE_M253_100B,JRE_TSC253_0B,              \
3099                JRE_MC252_0BL,JRE_M253_0B,JRE_TSC253_0B,JRE_MC252_0BL,JRE_M253_0B,JRE_TSC253_0B;          \
3100              D=L;
3101            C=JNR_TC183_0AL,JNR_TS183_0A,JNR_M183_0A,JNR_M182_0A,JNR_M183_0A,JNR_M182_0A,JNR_M183_0A,     \
3102                JNR_M182_0A,JNR_TC183_0A;                                                                 \
3103              D=L;
3104          $ENDPATH
3105          $PATH Y=9; ENV=[TB=30][V=7-10];
3106            C=JRE_TSC253_0B,JRE_M253_0B,JRE_MC252_0BL,JRE_TSC253_0B,JRE_M253_0B,JRE_MC252_0BL,            \
3107                JRE_TSC253_0B,JRE_M253_100B,JRE_M252_0B,JRE_T253_0B,JRE_M253_0B,JRE_MC252_0BL;            \
3108              D=R;
3109            C=JNR_TC183_0A,JNR_M182_0A,JNR_M183_0A,JNR_M182_0A,JNR_M183_0A,JNR_M182_0A,JNR_M183_0A,       \
3110                JNR_TS183_0A,JNR_TC183_0AL;                                                               \
3111              D=R;
3112            C=<JRE_TCE216_1000BL,JRE_ME216_2000B,JRE_ME217_2000B,JRE_TCE217_2000B,JRE_TCE216_2000BL,      \
3113                JRE_ME216_2000B,JRE_ME217_2000B,JRE_TSE216_0B,JRE_TSE217_0B,JRE_TE217_2000B,              \
3114                JRE_TE217_2000B,JRE_ME216_2000B,JRE_ME217_0B,JRE_TE217_0B,JRE_TCE217_0B;                  \
3115              D=R;
3116            C=(<JRE_TC111B1L,JRE_M112B1,JRE_M113B1,JRE_TS111B1L,JRE_TS111B1L,JRE_M112B1,JRE_M113B1,       \
3117                JRE_T111B,JRE_M112B1,JRE_M113B1,JRE_TC111B1),                                             \
3118                (<JRE_TC111B1L,JRE_M112B1,JRE_M113B1,JRE_TC111B1);                                        \
3119              D=R;
3120            C=(<JRE_TCE256_500AL,JRE_ME257_1500A,JRE_ME256_500A,JRE_ME257_500A,JRE_TCE257_500A),          \
3121                (<JRE_TCE256_500AL,JRE_ME257_1500A,JRE_ME256_500A,JRE_ME257_500A,JRE_TCE257_500A);        \
3122              D=R;
3123          $ENDPATH
3124        $ENDSCENE
3125  #..........................................................................
3126  # 431
3127        $SCENE                                                                                            \
3128            NAME=FU431;                                                                                   \
3129            DX=1200; DY=180; YDIR=U;                                                                      \
3130            BG=YOKOBUKIBG_B;                                                                      \
3131            FG=YOKOBUKIBG_F;                                                                      \
3132            IMGY=51;
3133          $PATH Y=129; LC=2; TE=8;
3134            C=JNR_EF13_47,JR_SUHAFU42K1,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,          \
3135                JNR_ORO61NCL,JR_SUHAFU42K1L;                                                              \
3136              D=L;
3137            C=JR_EF64B47,JR_EF64B47,JR_TAKI43486FL,JR_TAKI35000_05,JR_TAKI35000_05,JR_TAKI35000_05,       \
3138                JR_TAKI35000_04,JR_TAKI35000_03,JR_TAKI43486FL,JR_TAKI43486FL,JR_TAKI38000,JR_TAKI38000,  \
3139                JR_TAKI38000,JR_TAKI38000,JR_TAKI35000_04,JR_TAKI35000_04,JR_TAKI43486FL,JR_TAKI43486FL,  \
3140                JR_YO3500~OP;                                                                             \
3141              D=L;
3142            C=JNR_TC183_0AL,JNR_TS183_0A,JNR_M183_0A47,JNR_M182_0A,JNR_M183_0A47,JNR_M182_0A,             \
3143                JNR_M183_0A47,JNR_M182_0A,JNR_TC183_0A;                                                   \
3144              D=L;
3145            C=JRE_TC115_1000SUKAJBCL,JRE_M114_1000SUKAB47,JRE_M115_1000SUKAB,JRE_T115_1000SUKAB,          \
3146                JRE_M114_1000SUKAB47,JRE_MC115_1000SUKAJB;                                                \
3147              D=L;
3148            C=JR_EF64B47,JR_EF64B47,9-12*KOKIA;                                                           \
3149              D=L;
3150            C=JNR_TC165CXL,JNR_M164_0CX47,JNR_MC165CX,JNR_TB165_0A,JNR_TS165C,JNR_TS165C,JNR_M164_0CX47,  \
3151                JNR_MC165CX,JNR_TC165CXL,JNR_TC165CXL,JNR_M164_0CX47,JNR_MC165CX;                         \
3152              D=L;
3153          $ENDPATH
3154          $PATH Y=129; LC=2; TB=8;
3155            C=JRE_MC115_1000SUKAJB,JRE_M114_1000SUKAB47,JRE_T115_1000SUKAB,JRE_M115_1000SUKAB,            \
3156                JRE_M114_1000SUKAB47,JRE_TC115_1000SUKAJBCL;                                              \
3157              D=R;
3158            C=JR_EF64B47,JR_EF64B47,9-12*KOKIA;                                                           \
3159              D=R;
3160            C=JNR_MC165CX,JNR_M164_0CX47,JNR_TC165CXL,JNR_TC165CXL,JNR_MC165CX,JNR_M164_0CX47,            \
3161                JNR_TS165C,JNR_TS165C,JNR_TB165_0A,JNR_MC165CX,JNR_M164_0CX47,JNR_TC165CXL;               \
3162              D=R;
3163            C=JNR_EF13_47,JR_SUHAFU42K1L,JNR_ORO61NCL,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,          \
3164                JNR_SUHA43K1L,JR_SUHAFU42K1;                                                              \
3165              D=R;
3166            C=JR_YO3500~OP,JR_TAKI43486FL,JR_TAKI43486FL,JR_TAKI35000_04,JR_TAKI35000_04,JR_TAKI38000,    \
3167                JR_TAKI38000,JR_TAKI38000,JR_TAKI38000,JR_TAKI43486FL,JR_TAKI43486FL,JR_TAKI35000_03,     \
3168                JR_TAKI35000_04,JR_TAKI35000_05,JR_TAKI35000_05,JR_TAKI35000_05,JR_TAKI43486FL,           \
3169                JR_EF64B47,JR_EF64B47;                                                                    \
3170              D=R;
3171            C=JNR_TC183_0A,JNR_M182_0A,JNR_M183_0A47,JNR_M182_0A,JNR_M183_0A47,JNR_M182_0A,               \
3172                JNR_M183_0A47,JNR_TS183_0A,JNR_TC183_0AL;                                                 \
3173              D=R;
3174          $ENDPATH
3175        $ENDSCENE
3176  #..........................................................................
3177  # 433
3178        $GROUP                                                                                            \
3179            NAME=FU433;                                                                                   \
3180            DX=1200; AB=4; BL=118;                                                                        \
3181            BG=IMAWATARIDAM_B:,-118;                                                              \
3182            FG=IMAWATARIDAM_F:,-118;
3183          C=JRC_DC11F,JRC_DC11F;
3184          C=<JRC_DC85_200FL,JRC_DC84_0F,JRC_DC85_200FL,JRC_DC84_300F,JRC_DC85_0GF;
3185          C=(<JRC_DC47_5000AL,JRC_DC47_5000B),(<JRC_DC47_5000AL,JRC_DC47_5000B);
3186          AP=[D=L][C=JR_DD51_500F,4*JR_TIKI]|[D=R][C=JR_DD51_500F,2*JR_TIKI2];
3187          C=JRC_DC11F,JRC_DC11F,JRC_DC11F;
3188        $ENDGROUP
3189  #..........................................................................
3190  # 460
3191        $SCENE                                                                                            \
3192            NAME=FU460;                                                                                   \
3193            DX=1200; DY=180; YDIR=U;                                                                      \
3194            BG=IBIGAWATOKAIDO02_B;                                                                \
3195            FG=IBIGAWATOKAIDO02_F;
3196          $PATH Y=39; LC=2; TE=8;
3197            C=JR_EF58,JNR_MANI35AL,JR_MANI60L~OP,JR_SUYU13N,JNR_ORO61NC,JNR_SUHA43K1L,JNR_SUHA43K1L,      \
3198                JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L,JNR_OHA35CK1,      \
3199                JR_SUHAFU42K1L,JR_OHAFU33CN1L;                                                            \
3200              D=L;
3201            C=JR_EF58,JR_MANI20B,JR_NARONE20B,JR_NARONE21_100B,JR_NARONE21_100B,JR_NARO20B,JR_NASHI20B,   \
3202                JR_NAHANE20B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHA20B,JR_NAHAFU20B; \
3203              D=L;
3204            C=JNR_TC153_0AL,JNR_M152A,JNR_M153A,JNR_TS152A,JNR_M152A,JNR_M153A,JNR_T153_0A,JNR_M152A,     \
3205                JNR_M153A,JNR_TC153_0A;                                                                   \
3206              D=L;
3207            C=JR_EF58G,JR_SUHANI35GL~OP,JR_SUHA44GL~OP,JR_SUHA44GL~OP,JR_SUHA44GL~OP,JR_NARO10GL~OP,      \
3208                JR_OSI17G~OP,JR_NARO10G~OP,JR_NARO10G~OP,JR_MAITE3921G~OP;                                \
3209              D=L;
3210            C=JR_EH10~OP,24*JRF_CHIKI5000L[C1:C1034][C2:C1034][C3:C1034][C4:C1034][C5:C1034],,JR_YO5000;  \
3211              D=L;
3212          $ENDPATH
3213          $PATH Y=39; LC=2; TB=8;
3214            C=JR_EF58G,JR_SUHANI35G~OP,JR_SUHA44G~OP,JR_SUHA44G~OP,JR_SUHA44G~OP,JR_NARO10G1,             \
3215                JR_OSI17GL~OP,JR_NARO10GL~OP,JR_NARO10GL~OP,JR_MAITE3921GL~OP;                            \
3216              D=R;
3217            C=JR_EH10~OP,24*JRF_CHIKI5000L[C1:C1034][C2:C1034][C3:C1034][C4:C1034][C5:C1034],JR_YO5000;   \
3218              D=R;
3219            C=JR_EF58,JR_OHAFU33CN1L,JR_SUHAFU42K1L,JNR_OHA35CK1,JR_SUHAFU42K1L,JNR_SUHA43K1L,            \
3220                JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JNR_ORO61NCL,       \
3221                JR_SUYU13N,JR_MANI60L~OP,JNR_MANI35AL;                                                    \
3222              D=R;
3223            C=JR_EF58,JR_NAHAFU20B,JR_NAHA20B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANE20B,JR_NAHANE20B,        \
3224                JR_NAHANE20B,JR_NASHI20B,JR_NARO20B,JR_NARONE21_100B,JR_NARONE21_100B,JR_NARONE20B,       \
3225                JR_MANI20B;                                                                               \
3226              D=R;
3227            C=JNR_TC153_0A,JNR_M153A,JNR_M152A,JNR_T153_0A,JNR_M153A,JNR_M152A,JNR_TS152A,JNR_M153A,      \
3228                JNR_M152A,JNR_TC153_0AL;                                                                  \
3229              D=R;
3230          $ENDPATH
3231        $ENDSCENE
3232  #..........................................................................
3233  # 461
3234        $SCENE                                                                                            \
3235            NAME=FU461;                                                                                   \
3236            DX=1200; DY=180; YDIR=U;                                                                      \
3237            BG=IBIGAWATOKAIDO03_B;                                                                \
3238            FG=IBIGAWATOKAIDO03_F;
3239          $PATH Y=39; LC=2; TE=10;
3240            C=JNR_EF66,JRE_OHANEFU25_300WAL,JRE_OHANE25_0AL,JRE_ORONE25_300WA,JRE_SUHA25_300WAE,          \
3241                JRE_OHANE25_0AL,JRE_OHANE25_0AL,JRE_OHANEFU25_0A,JRE_OHANE25_0AL,JRE_OHANEFU25_0A,        \
3242                JRE_OHANE25_0AL,JRE_OHANE25_0AL,JRE_OHANE25_0AL,JRE_OHANEFU25_0A;                         \
3243              D=L;
3244            C=<JRC_312_1500TCL,JRC_313_1500M1L,JRC_313_1500T,JRC_313_1500M1L,JRC_313_1500T1,              \
3245                JRC_312_1500MC;                                                                           \
3246              D=L;
3247            C=JNR_TSC151AL,JNR_MS151AL,JNR_MS150AL,JNR_TS150AL,JNR_TD151AL,JNR_MB150AAL,JNR_M151AAL,      \
3248                JNR_T150AL,JNR_T150AL,JNR_M150AL,JNR_M151AAL,JNR_TC151AA;                                 \
3249              D=L;
3250            C=<JRC_312_1500TCL,JRC_313_1500M1L,JRC_313_1500ML,JRC_312_1500MC;                             \
3251              D=L;
3252            C=JRF_EF200L~OP,3*KOKIC,8-12*(10:KOKI24|3:KOKI23|1:KOKI22),3*KOKIC,8-12*KOKI24;               \
3253              D=L;
3254          $ENDPATH
3255          $PATH Y=39; LC=2; TB=10;
3256            C=<JRC_312_1500TCL,JRC_313_1500M1L,JRC_313_1500ML,JRC_312_1500MC;                             \
3257              D=R;
3258            C=JRF_EF200L~OP,8-12*KOKI24,8-12*(6:KOKI24|KOKI23|KOKI22|KOKI21|KOKI25),3*KOKIC,3*KOKIC;      \
3259              D=R;
3260            C=JNR_EF66,JRE_OHANEFU25_0A,JRE_OHANE25_0AL,JRE_OHANE25_0AL,JRE_OHANE25_0AL,                  \
3261                JRE_OHANEFU25_0A,JRE_OHANE25_0AL,JRE_OHANEFU25_0A,JRE_OHANE25_0AL,JRE_OHANE25_0AL,        \
3262                JRE_SUHA25_300WAE,JRE_ORONE25_300WA,JRE_OHANE25_0AL,JRE_OHANEFU25_300WAL;                 \
3263              D=R;
3264            C=<JRC_312_1500TCL,JRC_313_1500M1L,JRC_313_1500T,JRC_313_1500M1L,JRC_313_1500T1,              \
3265                JRC_312_1500MC;                                                                           \
3266              D=R;
3267            C=JNR_TC151AA,JNR_M151AAL,JNR_M150AL,JNR_T150AL,JNR_T150AL,JNR_M151AAL,JNR_MB150AAL,          \
3268                JNR_TD151AL,JNR_TS150AL,JNR_MS150AL,JNR_MS151AL,JNR_TSC151AL;                             \
3269              D=R;
3270          $ENDPATH
3271        $ENDSCENE
3272  #..........................................................................
3273  # 823
3274        $GROUP                                                                                            \
3275            NAME=FU823;                                                                                   \
3276            LC=2; DX=1200; AB=-16; BL=138; D=X;                                                           \
3277            BG=SHIRAKAWA1_B:,-138;                                                                \
3278            FG=SHIRAKAWA1_F:,-138;
3279          M=STOP;                                                                                         \
3280            C=<ASO_D1,ASO_P1,ASO_P2,ASO_P3,ASO_D1L;                                                       \
3281            V=3; B=0.005; P=*50;
3282          C=ASO_3001;                                                                                     \
3283            V=4;
3284          C=ASO_2003;                                                                                     \
3285            V=4;
3286        $ENDGROUP
3287  #..........................................................................
3288      $ENDSECTION
3289  #----------------------------------------------------------------------------
3290  #
3291  # 1000
3292  #
3293      $SECTION                                                                                            \
3294          NAME=FUK1000;                                                                                   \
3295          DIS=20; %SECFIN;%FOOTER(© fukayatanteijimusyo http://www.geocities.jp/kantentomaccha/);
3296  #..........................................................................
3297  # 108
3298        $GROUP                                                                                            \
3299            NAME=FU108;                                                                                   \
3300            DX=1000; AB=33; BL=59;                                                                        \
3301            BG=(SAKOWATARIBG_B:,-59;SIG_J4:0+1025,-5);                                            \
3302            FG=(SIG_J3R:0+100,-5;SAKOWATARIBG_F:,-59);                                            \
3303            WP=(0+999,>TB:BG.SIGR;0+1,<TB:FG.SIGR);                                                       \
3304            ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3];
3305          C=JRH_DC40_700L;
3306          C=<JNR_KIHA82L,JNR_KIHA80,JNR_KIHA80,JNR_KIHA80,JNR_KISI80,JNR_KIRO80L,JNR_KIHA82,JNR_KIHA80,   \
3307              JNR_KIHA82;
3308          C=<JRH_DC40_100,JR_KH23;
3309          C=JRH_DD51S_STAR,JRH_DD51S_STAR,                                                                \
3310              (<JRW_HOKUT1,JRW_HOKUT2,JRW_HOKUT3,JRW_HOKUT3,JRW_HOKUT3,JRW_HOKUT4,JRW_HOKUT5,JRW_HOKUT6,  \
3311              JRW_HOKUT7,JRW_HOKUT8,JRW_HOKUT1A,JRW_HOKUT9);
3312          C=<JRH_KH281L,JRH_KH280_100,JRH_KH280_0,JRH_KH280_100,JRH_KR280,JRH_KH280_100,JRH_KH281;
3313        $ENDGROUP
3314  #..........................................................................
3315  # 109
3316        $GROUP                                                                                            \
3317            NAME=FU109;                                                                                   \
3318            DX=1000; AB=25; BL=47;                                                                        \
3319            BG=SHINKUSHIROBG_B:,-47;
3320          C=JRH_DC40_100,JRH_DC40_100;
3321          C=JR_DE15SNOW1;
3322          C=<JNR_DC183_900BL,JNR_D182_900AL,JNR_D182_900AL,JNR_D182_900AL,JNR_D182_900AL,                 \
3323              JNR_DS182_900AL,JNR_D184_900AL,JNR_D182_900AL,JNR_D182_900AL,JNR_DC183_900A;
3324          C=<JNR_DC56_0AL,JNR_DC27_0A,JNR_DC56_0AL,JNR_DC27_0A,JNR_DC27_0AL,JNR_DS26_0COOLABL,JNR_DC56_0A;
3325          C=JNR_DD51_500FD,                                                                               \
3326              (<JNR_OHANEFU12A,JNR_SUHANE16AL,JNR_SUHANE16AL,JNR_SUHANE16AL,JNR_SUHANE16AL,               \
3327              JNR_SUHANE16AL,JNR_ORONE10B1L,JNR_SURO54DL,JR_SUHA45BL,JR_SUHAFU42B1L,JNR_MANI36AL,         \
3328              JR_OYU10);
3329        $ENDGROUP
3330  #..........................................................................
3331  # 110
3332        $GROUP                                                                                            \
3333            NAME=FU110;                                                                                   \
3334            DX=1000; AB=83; BL=39;                                                                        \
3335            BG=TOKOROKAWABG_B:,-39;                                                               \
3336            FG=BRIDGE_TOKOROKAWA:<0+459,-10;
3337          C=JRH_DC40_100L,JRH_DC40_100L;
3338          C=JR_DE15SNOW1;                                                                                 \
3339            V=4;
3340          AP=[D=L]                                                                                        \
3341              [C=JNR_9600Z2L,JR_YO2000,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JNR_WAFU29500]|   \
3342              [D=R]                                                                                       \
3343              [C=JNR_9600Z2,JNR_WAFU29500,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_YO2000];
3344          C=JR_KH23;
3345          C=<JRH_DC40_100L,JR_KH23;
3346        $ENDGROUP
3347  #..........................................................................
3348  # 112
3349        $GROUP                                                                                            \
3350            NAME=FU112;                                                                                   \
3351            DX=1000; AB=23; BL=69;                                                                        \
3352            BG=NISHIBETSUBG_B:,-69;                                                               \
3353            FG=(SIG_J3R:<0+50,-5;NISHIBETSUBG_F:<0+0,-69);                                        \
3354            WP=0+1,<TB:FG.SIGR;                                                                           \
3355            ENV=[TB=<FG.SIGG,>FG.SIGR,SNOW,3];
3356          C=JRH_DC40_100;
3357          C=JR_DE15SNOW1;
3358          C=JR_KH23;
3359          AP=[D=L]                                                                                        \
3360              [C=OIG_C11227L,JR_YO3500~OP,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_YO3500~OP]| \
3361              [D=R]                                                                                       \
3362              [C=OIG_C11227,JR_YO3500~OP,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_YO3500~OP];
3363          C=<JRH_DC40_100,JR_KH23;
3364        $ENDGROUP
3365  #..........................................................................
3366  # 113A
3367        $GROUP                                                                                            \
3368            NAME=FU113A;                                                                                  \
3369            DX=1000; AB=93; BL=29;                                                                        \
3370            BG=SCENE_ISHIKARIGAWA1B:,-29;                                                                 \
3371            FG=BRIDGE_ISHIKARIGAWA1:,-29;
3372          C=JRH_DC40_100L,JRH_DC40_100L,JRH_DC40_100L;
3373          C=<JRH_DC40_700L,JRH_DC40_700L,JRH_DC48_1331B;
3374          C=<JRH_KH141L,JRH_KH141,JRH_KH141L,JRH_KH141,JRH_KH141L,JRH_KH141;
3375          C=<JRH_DC48_1331BL,JRH_DC48_1331B,JRH_DC48_1331BL,JRH_DC48_1331B;
3376          C=<JNR_KH17HL,JNR_KH20H,JNR_KH22E,JNR_KH20H,JNR_KH22E,JNR_KH22F;
3377        $ENDGROUP
3378  #..........................................................................
3379  # 113B
3380        $GROUP                                                                                            \
3381            NAME=FU113B;                                                                                  \
3382            DX=1000; AB=93; BL=29;                                                                        \
3383            BG=SCENE_ISHIKARIGAWA2B:,-29;                                                                 \
3384            FG=BRIDGE_ISHIKARIGAWA2:,-29;
3385          C=JRH_DC40_100L,JRH_DC40_100L,JRH_DC40_100L;
3386          C=<JRH_DC40_700L,JRH_DC40_700L,JRH_DC48_1331B;
3387          C=<JRH_KH141L,JRH_KH141,JRH_KH141L,JRH_KH141,JRH_KH141L,JRH_KH141;
3388          C=<JRH_DC48_1331BL,JRH_DC48_1331B,JRH_DC48_1331BL,JRH_DC48_1331B;
3389          C=<JNR_KH17HL,JNR_KH20H,JNR_KH22E,JNR_KH20H,JNR_KH22E,JNR_KH22F;
3390        $ENDGROUP
3391  #..........................................................................
3392  # 115
3393        $GROUP                                                                                            \
3394            NAME=FU115;                                                                                   \
3395            DX=1000; AB=13; BL=79;                                                                        \
3396            BG=OBIRASHIBEBG_B:,-79;
3397          AP=[D=L]                                                                                        \
3398              [C=JR_D61L,JR_D61L,JR_SEKI3000A,JR_SEKI3000A,JR_TOM3,JR_TOM3,JR_SEKI3000A,JR_SEKI3000A,     \
3399              JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_TOM3,JR_TOM3,JR_TOM3,JR_SEKI3000A,JR_SEKI3000A,   \
3400              JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_YO3500~OP]| \
3401              [D=R]                                                                                       \
3402              [C=JNR_D61,JNR_D61,JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],                 \
3403              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3404              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3405              JR_GO1,JR_GO1,JR_GO1,JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],               \
3406              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3407              JR_GO1,JR_GO1,JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_YO3500~OP];
3408          C=JNR_KH22E,JNR_KH22F,JNR_KH22E;
3409          AP=[D=L]                                                                                        \
3410              [C=JNR_D51HKDL,JNR_D51HKDL,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,             \
3411              JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,              \
3412              JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,              \
3413              JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_YO3500~OP]|                          \
3414              [D=R]                                                                                       \
3415              [C=JNR_D51HKD,JNR_D51HKD,JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],           \
3416              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3417              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3418              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3419              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3420              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3421              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3422              JR_YO3500~OP];
3423          AP=[D=L]                                                                                        \
3424              [C=JR_D61L,JR_YO3500~OP,2*JR_G4,2*JR_G4,JR_GO1,JR_GO1,2*JR_G4,2*JR_G4,2*JR_G4,              \
3425              JR_SEKI3000A,JR_SEKI3000A,2*JR_G3,JR_YO3500~OP]|                                            \
3426              [D=R]                                                                                       \
3427              [C=JNR_D61,JR_YO3500~OP,2*JR_G3,JR_SEKI3000A,JR_SEKI3000A,2*JR_G4,2*JR_G4,2*JR_G4,JR_GO1,   \
3428              JR_GO1,2*JR_G4,2*JR_G4,JR_YO3500~OP];
3429          AP=[D=L]                                                                                        \
3430              [C=JR_D61L,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,   \
3431              JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_SEKI3000A,JR_YO3500~OP]|                          \
3432              [D=R]                                                                                       \
3433              [C=JNR_D61,JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],                         \
3434              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3435              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],        \
3436              JR_SEKI3000A[O:COAL39,4,29],JR_SEKI3000A[O:COAL39,4,29],JR_YO3500~OP];
3437        $ENDGROUP
3438  #..........................................................................
3439  # 122
3440        $GROUP                                                                                            \
3441            NAME=FU122;                                                                                   \
3442            DX=1000; AB=63; BL=59;                                                                        \
3443            BG=URYUGAWABG_B:,-59;                                                         \
3444            FG=(BRIDGE_URYUGAWA:<0+0,-13;SCENE_URYUGAWA1:,-59);
3445          C=<JRH_KH27_0ADCSL,JNR_DC56_0ADCSL,JRH_KH27_0ADCS,JNR_DC56_0ADCS;
3446          C=JRH_DC40_100S;
3447          C=JRH_DC54SL;
3448          C=JRH_DC40_100S,JRH_DC40_100S;
3449        $ENDGROUP
3450  #..........................................................................
3451  # 125
3452        $GROUP                                                                                            \
3453            NAME=FU125;                                                                                   \
3454            DX=1000; AB=3; BL=119;                                                                        \
3455            BG=DAIMATSUMAEGAWABG_B:,-119;                                                 \
3456            FG=DAIMATSUMAEGAWABG_F:,-119;                                                 \
3457            ENV=[TB=SNOW,5];
3458          C=JRH_DC40_100,JRH_DC40_100;                                                                    \
3459            V=9;
3460          C=<JNR_KIHAYUNI26L,JNR_KH22E,JNR_KH22E;                                                         \
3461            V=5;
3462          C=JRH_KH22SYU,JRH_KH22SYU,JRH_KH22SYU;                                                          \
3463            V=5;
3464          C=JR_DE15,(<JR_TOM3,JR_G4,JR_YO3500~OP);                                                        \
3465            V=4;
3466        $ENDGROUP
3467  #..........................................................................
3468  # 214
3469        $GROUP                                                                                            \
3470            NAME=FU214;                                                                                   \
3471            DX=1000; AB=67; BL=55;                                                                        \
3472            BG=ARAKAWAB4B:,-55;                                                                   \
3473            FG=SCENE_ARAKAWAB4F:,-16;
3474          C=<JRE_DC47NGTL,JNR_DC52_100,JRE_DC47NGT;                                                       \
3475            V=6;
3476          C=<JRE_DC47NGTL,JRE_DC47NGT2;                                                                   \
3477            V=6;
3478          C=<JRE_KH47SYUTOKENL,JNR_DC52_100;                                                              \
3479            V=6;
3480          C=<JNR_KIHA58L,JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA28L,JNR_KIHA58A;                                 \
3481            V=6;
3482        $ENDGROUP
3483  #..........................................................................
3484  # 215
3485        $SCENE                                                                                            \
3486            NAME=FU215;                                                                                   \
3487            DX=1000; DY=180; YDIR=U;                                                                      \
3488            BG=OGACHI_B;                                                                          \
3489            FG=OGACHI_F;
3490          $PATH Y=129; LC=3;
3491            C=JNR_DD51_500FD,JR_SUHAFU42B1,JR_SUHAFU42B1,JR_NAHA11B1,JR_NAHA11B1,JR_NAHA11B1,             \
3492                JR_NAHA11B1,JNR_SUHANE16A,JNR_SUHANE16A,JR_SUROFU62D,JNR_ORONE10B1,JNR_SUHANE16A,         \
3493                JNR_OHANEFU12A,JNR_SUYU42C;                                                               \
3494              D=L;
3495            C=JNR_C61L,JR_SUHAFU42B1,JNR_OHA46B1L,JNR_OHA47B1L,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_OHA46B1L,  \
3496                JNR_SUHA43B2L,JNR_OHA47B2L,JNR_SUHA43B1L,JR_SUHAFU42B1L;                                  \
3497              D=L;
3498            C=JNR_KIHA58L,JNR_KIHA28,JNR_KIHA58L,JNR_KIHA58L,JNR_KIRO28G1,JNR_KIHA58A;                    \
3499              D=L;
3500            C=JNR_D51HVL,JNR_WAFU29500,2*JR_G2,2*JR_G2,JNR_RE12000,JNR_RE12000,JNR_RE12000,JNR_RE12000,   \
3501                JNR_RE12000,2*JR_G4,2*JR_G3,JR_GO1,JR_GO1,JR_TOKI15000A,                                  \
3502                (<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_TAKI3000A,2*JR_G3,2*JR_G3,            \
3503                JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],2*JR_G2,              \
3504                JR_HOKI800AKITA,JR_HOKI800AKITA,JNR_WAFU29500;                                            \
3505              D=L;
3506            C=JR_DC181_0JL,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,JR_D180R_0B,JR_DC181_0JL,JR_D180R_0B,      \
3507                JR_KISASHI180,JR_DS180R_0B,JR_DC181_0J;                                                   \
3508              D=L;
3509          $ENDPATH
3510          $PATH Y=129; LC=3;
3511            C=JNR_D51HV,JNR_WAFU29500,JR_HOKI800AKITA,JR_HOKI800AKITA,2*JR_G2,                            \
3512                JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],2*JR_G3,2*JR_G3,      \
3513                JR_TAKI3000A,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_TOKI15000A,JR_GO1,       \
3514                JR_GO1,2*JR_G3,2*JR_G4,JNR_RE12000,JNR_RE12000,JNR_RE12000,JNR_RE12000,JNR_RE12000,       \
3515                2*JR_G2,2*JR_G2,JNR_WAFU29500;                                                            \
3516              D=R;
3517            C=JR_DC181_0J,JR_DS180R_0B,JR_KISASHI180,JR_D180R_0B,JR_DC181_0JL,JR_D180R_0B,JR_D180R_0B,    \
3518                JR_D180R_0B,JR_D180R_0B,JR_DC181_0JL;                                                     \
3519              D=R;
3520            C=JNR_DD51_500FD,JNR_SUYU42C,JNR_OHANEFU12A,JNR_SUHANE16A,JNR_ORONE10B1,JR_SUROFU62D,         \
3521                JNR_SUHANE16A,JNR_SUHANE16A,JR_NAHA11B1,JR_NAHA11B1,JR_NAHA11B1,JR_NAHA11B1,              \
3522                JR_SUHAFU42B1,JR_SUHAFU42B1;                                                              \
3523              D=R;
3524            C=JNR_C61,JR_SUHAFU42B1L,JNR_SUHA43B1L,JNR_OHA47B2L,JNR_SUHA43B2L,JNR_OHA46B1L,               \
3525                JNR_SUHA43B2L,JNR_SUHA43B1L,JNR_OHA47B1L,JNR_OHA46B1L,JR_SUHAFU42B1;                      \
3526              D=R;
3527            C=JNR_KIHA58A,JNR_KIRO28G1,JNR_KIHA58L,JNR_KIHA58L,JNR_KIHA28,JNR_KIHA58L;                    \
3528              D=R;
3529          $ENDPATH
3530        $ENDSCENE
3531  #..........................................................................
3532  # 216
3533        $SCENE                                                                                            \
3534            NAME=FU216;                                                                                   \
3535            DX=1000; DY=210; YDIR=U;                                                                      \
3536            BG=ONIGASAWABG_B;                                                                     \
3537            FG=ONIGASAWABG_F;
3538          $PATH Y=139; LC=2; SEQ=B;
3539            C=<JRE_KH111AL,JRE_KH111A,JRE_KH112A;                                                         \
3540              D=L; V=7; TE=4,[SI:N=IL];
3541            C=<JRE_KH111AL,JRE_KH111A,JRE_KH112A;                                                         \
3542              D=R; V=7; TB=[WI:N=IR];
3543          $ENDPATH
3544          $PATH Y=29; LC=2; SEQ=B;
3545            C=<T30_JRE_DC112L,T30_JRE_DC111,T30_JRE_DC110;                                                \
3546              D=R; V=3; TB=[WI:N=IL]; TE=4;
3547            C=<T30_JRE_DC112L,T30_JRE_DC111,T30_JRE_DC110;                                                \
3548              D=L; V=3; TE=4,[SI:N=IR];
3549          $ENDPATH
3550        $ENDSCENE
3551  #..........................................................................
3552  # 219
3553        $GROUP                                                                                            \
3554            NAME=FU219;                                                                                   \
3555            DX=1000; AB=83; BL=9;                                                                         \
3556            BG=(IWAKIMT_B:,-10;SIG_J3:<0+900,-5;TRBED43:..,^0);                                   \
3557            FG=(SIG_J3R:<0+100,-5;FIELD02:<0+43,-9);                                                      \
3558            WP=(0+999,>TB:BG.SIGR;0+1,<TB:FG.SIGR);                                                       \
3559            ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3];
3560          AP=[D=L]                                                                                        \
3561              [C=JNR_8620DFL,JR_TORA60000A,JR_G4,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,              \
3562              JNR_OHANI61A,JR_G4][V=5]|                                                                   \
3563              [D=R]                                                                                       \
3564              [C=JNR_8620DF,JR_G4,JNR_OHANI61A,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L,JR_G4,          \
3565              JR_TORA60000A][V=4];
3566          C=<JRE_KH48GONO1L,JRE_KH40_2000,JRE_KH40GONO;                                                   \
3567            V=6;
3568          C=<JNR_KIHA58L,JNR_KIHA28;                                                                      \
3569            V=6;
3570          C=<JRE_KH48GONO1L,JRE_KH48GONO2,JRE_KH40GONO,JRE_KH48GONO1L,JRE_KH48GONO2;                      \
3571            V=6;
3572        $ENDGROUP
3573  #..........................................................................
3574  # 220
3575        $GROUP                                                                                            \
3576            NAME=FU220;                                                                                   \
3577            DX=1000; AB=113; BL=9;                                                                        \
3578            BG=(IWATEMT_B:,-9;SIG_J3:<0+900,-5;TRBED43:..,^0);                                    \
3579            FG=(SIG_J3R:<0+100,-5;SCENE_AF_GRASS:<0-400,-9);                                      \
3580            WP=(0+999,>TB:BG.SIGR;0+1,<TB:FG.SIGR);                                                       \
3581            ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3][D=X];
3582          AP=[D=L]                                                                                        \
3583              [C=JNR_C60A_TOHOKUL,JNR_C61L,JR_SUHANI35HL~OP,JR_SUHA44HL~OP,JR_SUHA44HL~OP,                \
3584              JR_SUHA44HL~OP,JR_OSI17HL~OP,JR_NARO10HL~OP,JR_NARO10HL~OP,JR_SUHAFU43HL~OP][V=6]|          \
3585              [D=R]                                                                                       \
3586              [C=JNR_C60A_TOHOKU,JNR_C61,JR_SUHANI35H~OP,JR_SUHA44H~OP,JR_SUHA44H~OP,JR_SUHA44H~OP,       \
3587              JR_OSI17H~OP,JR_NARO10H~OP,JR_NARO10H~OP,JR_SUHAFU43H~OP][V=6];
3588          AP=[D=L]                                                                                        \
3589              [C=JNR_C60A_TOHOKUL,JNR_C61L,JNR_MANI36CL,JR_MANI60L~OP,JR_MANI60L~OP,JNR_MANI35AL,         \
3590              JNR_MANI35AL,JR_MANI60L~OP,JNR_SUYUNI60AL,JNR_SUYUNI61AL][V=5]|                             \
3591              [D=R]                                                                                       \
3592              [C=JNR_C60A_TOHOKU,JNR_C61,JNR_SUYUNI61AL,JNR_SUYUNI60AL,JR_MANI60L~OP,JNR_MANI35AL,        \
3593              JNR_MANI35AL,JR_MANI60L~OP,JR_MANI60L~OP,JNR_MANI36CL][V=5];
3594          AP=[D=L]                                                                                        \
3595              [C=JNR_D51HVL,JNR_D51HVL,JNR_WAFU29500,2*JR_G2,2*JR_G2,JNR_RE12000,JNR_RE12000,             \
3596              JNR_RE12000,JNR_RE12000,JNR_RE12000,2*JR_G4,2*JR_G3,JR_GO1,JR_GO1,JR_TOKI15000A,            \
3597              (<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_TAKI3000A,2*JR_G3,2*JR_G3,KOKIH,        \
3598              2*JR_G2,JNR_WAFU29500][V=4]|                                                                \
3599              [D=R]                                                                                       \
3600              [C=JNR_D51HV,JNR_D51HV,JNR_WAFU29500,2*JR_G2,KOKIH,2*JR_G3,2*JR_G3,JR_TAKI3000A,            \
3601              (<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_TOKI15000A,JR_GO1,JR_GO1,2*JR_G3,       \
3602              2*JR_G4,JNR_RE12000,JNR_RE12000,JNR_RE12000,JNR_RE12000,JNR_RE12000,2*JR_G2,2*JR_G2,        \
3603              JNR_WAFU29500][V=4];
3604          AP=[D=L]                                                                                        \
3605              [C=JNR_C60A_TOHOKUL,JR_OHAFU33CK1,JNR_OHA35K1,JNR_OHA35K1,JR_OHAFU33CN1,JNR_OHA35CK1,       \
3606              JNR_OHA35CK1,JNR_OHA35CK1,JR_OHAFU33CN1L][V=5]|                                             \
3607              [D=R]                                                                                       \
3608              [C=JNR_C60A_TOHOKU,JR_OHAFU33CN1L,JNR_OHA35CK1,JNR_OHA35CK1,JNR_OHA35CK1,JR_OHAFU33CN1,     \
3609              JNR_OHA35K1,JNR_OHA35K1,JR_OHAFU33CK1][V=5];
3610          AP=[D=L]                                                                                        \
3611              [C=JNR_D51HVL,JNR_D51HVL,JNR_D51HVL,KOKIH,KOKIH,                                            \
3612              JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],                        \
3613              JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],                        \
3614              JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],KOKIH,KOKIH,KOKIH,      \
3615              KOKIH,JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],                  \
3616              JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],                        \
3617              JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],JR_YO2000][V=4]|        \
3618              [D=R]                                                                                       \
3619              [C=JNR_D51HV,JNR_D51HV,JNR_D51HV,                                                           \
3620              JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],                        \
3621              JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],                        \
3622              JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],KOKIH,KOKIH,KOKIH,      \
3623              KOKIH,JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],                  \
3624              JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],                        \
3625              JRF_KOKI5500[C1:C33_24][C2:C33_24][C3:C33_24][C4:C33_24][C5:C33_24],KOKIH,KOKIH,JR_YO2000]  \
3626              [V=4];
3627        $ENDGROUP
3628  #..........................................................................
3629  # 223
3630        $GROUP                                                                                            \
3631            NAME=FU223;                                                                                   \
3632            DX=1000; AB=113; BL=9;                                                                        \
3633            BG=(MATSUSHIMA_B:,-9; SIG_J4:<0+900,-5; TRBED43:..,^0);                               \
3634            FG=(SIG_J4R:<0+100,-5; FL_J9:..,-5,0);                                                        \
3635            WP=(0+999,>TB:BG.SIGR;0+1,<TB:FG.SIGR);                                                       \
3636            ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3][D=X];
3637          C=<JRE_TC205_3100L,JRE_M205_3100B,JRE_M204_3100,JRE_TC205_3100;
3638          C=<JRE_TC205_3100_2AL,JRE_M205_3100_2,JRE_M204_3100_2,JRE_TC205_3100_2B;
3639          C=<JRE_TC205_3100L,JRE_M205_3100A,JRE_M204_3100,JRE_TC205_3100;
3640        $ENDGROUP
3641  #..........................................................................
3642  # 225
3643        $SCENE                                                                                            \
3644            NAME=FU225;                                                                                   \
3645            DX=1000; DY=180; YDIR=U;                                                                      \
3646            BG=MIKANOSEBG_B;                                                                      \
3647            FG=MIKANOSEBG_F;
3648          $PATH Y=29; LC=4;
3649            C=TRANS_YAMATOL;                                                                              \
3650              D=L;
3651            C=TRUCK_J4T1;                                                                                 \
3652              D=L;
3653            C=CAR_ROADSTARY;                                                                              \
3654              D=L;
3655            C=HARLEY1,60,HARLEY2;                                                                         \
3656              D=L;
3657            C=BUS_YAMAKOL;                                                                                \
3658              D=L;
3659            C=CAR_WRX;                                                                                    \
3660              D=L;
3661            C=ACAB;                                                                                       \
3662              D=L;
3663          $ENDPATH
3664          $PATH Y=29; LC=4;
3665            C=BUS_YAMAKO;                                                                                 \
3666              D=R;
3667            C=CAR_WRX;                                                                                    \
3668              D=R;
3669            C=MOTOCROSS2;                                                                                 \
3670              D=R;
3671            C=TRANS_YAMATO;                                                                               \
3672              D=R;
3673            C=TRUCK_0123;                                                                                 \
3674              D=R;
3675            C=CAR_ROADSTARR;                                                                              \
3676              D=R;
3677            C=HARLEY1,60,HARLEY2;                                                                         \
3678              D=R;
3679          $ENDPATH
3680        $ENDSCENE
3681  #..........................................................................
3682  # 227
3683        $GROUP                                                                                            \
3684            NAME=FU227;                                                                                   \
3685            DX=1000; AB=73; BL=49;                                                                        \
3686            BG=AGANOGAWATOKUSAWABG_B:,-49;                                                        \
3687            FG=AGANOGAWATOKUSAWABG_F:,-49;                                                        \
3688            ENV=[D=X];
3689          C=<JNR_KIHA58L,JNR_KIRO28G1,JNR_KIHA28,JNR_KIHA58A,JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA28L,         \
3690              JNR_KIHA58A;
3691          C=<JRE_DC47NGTL,JRE_DC47NGT;                                                                    \
3692            V=6;
3693          C=<JRE_KH111AL,JRE_KH111A,JRE_KH112A;
3694          C=JR_DD51_500F,JR_DD51_500F,10*JR_TAKI1000JL;                                                   \
3695            V=4;
3696        $ENDGROUP
3697  #..........................................................................
3698  # 231
3699        $GROUP                                                                                            \
3700            NAME=FU231;                                                                                   \
3701            DX=1000; AB=73; BL=49;                                                                        \
3702            BG=FUNAKOSHIBG_B:,-49;                                                                \
3703            FG=FUNAKOSHIBG_F:,-49;
3704          C=<JNR_KIHA58L,JNR_KIRO28G1,JNR_KIHA58A,JNR_KIHA58L,JNR_KIHA28,JNR_KIHA58A;                     \
3705            V=6;
3706          C=JNR_DD51_500FD,JR_OHAFU50D,JR_OHA50D,JR_OHA50D,JR_OHAFU50D,JR_OHAFU50D,JR_OHA50D,JR_OHA50D,   \
3707              JR_OHAFU50D;                                                                                \
3708            V=5;
3709          C=<JNR_KIHA58L,JRE_KH48_0;                                                                      \
3710            V=5;
3711          C=JNR_DD51_500FD,JNR_DD51_500FD,JR_TAKI35000_03,JR_TAKI35000_03,JR_TAKI35000_03,                \
3712              JR_TAKI35000_03,JR_TAKI35000_03,JR_TAKI35000_03,JR_TAKI35000_03,JR_TAKI35000_03,            \
3713              JR_TAKI35000_03,JR_TAKI35000_03;                                                            \
3714            V=4;
3715        $ENDGROUP
3716  #..........................................................................
3717  # 233
3718        $GROUP                                                                                            \
3719            NAME=FU233;                                                                                   \
3720            DX=1000; AB=23; BL=99; D=X;                                                                   \
3721            BG=DAI2ARAOBG_B:,-99;
3722          AP=[D=L][C=JR_C11325MOKAL,JR_SUHAFU12L,JR_OHA12,JR_OHA12L,JR_OHAFU13,JNR_DE10][V=4]|            \
3723              [D=R][C=JR_C11325MOKA,JR_OHAFU13,JR_OHA12L,JR_OHA12,JR_SUHAFU12L,JNR_DE10][V=4];
3724          C=<JRE_DC111RIKUL,JRE_DC112RIKU;                                                                \
3725            V=5;
3726          C=<JNR_KIHA28L,JNR_KIHA28;                                                                      \
3727            V=6;
3728          AP=[D=L]                                                                                        \
3729              [C=JNR_C58L,JNR_RE12000,JR_TOM3,JR_TOM3,2*JR_G3,2*JR_G4,2*JR_G3,JR_TAKI3000A,JR_G4,         \
3730              JR_YO2000L][V=4]|                                                                           \
3731              [D=R]                                                                                       \
3732              [C=JNR_C58,JR_G4,JR_TAKI3000A,2*JR_G3,2*JR_G4,2*JR_G3,JR_TOM3,JR_TOM3,JNR_RE12000,          \
3733              JR_YO2000][V=4];
3734        $ENDGROUP
3735  #..........................................................................
3736  # 249
3737        $SCENE                                                                                            \
3738            NAME=FU249;                                                                                   \
3739            DX=1000; DY=180; YDIR=U;                                                                      \
3740            BG=TSUGARUFUTAMATAST_B;                                                               \
3741            FG=TSUGARUFUTAMATAST_F;
3742          $PATH Y=9; LC=2;
3743            M=OPEN;                                                                                       \
3744              C=<JRE_KIHA40_2000MORIOKA,JRE_KIHA40_2000MORIOKAL;                                          \
3745              D=X; P=>0+240; TB=3; TE=9;
3746          $ENDPATH
3747          $PATH Y=109; LC=4;
3748            C=JR_ED79,JRH_SUHANEFU14_550L,JRE_OHANE24_500L,JRE_SUHAFU14_500AL,JRH_OHA14_500NOBINOBI,      \
3749                JRH_OHA14_500DREAM2,JRH_OHA14_500DREAM2,JRE_SUHAFU14_500A;                                \
3750              D=L;
3751            C=JRF_EH500_10,10*KOKIC,10*KOKIC;                                                             \
3752              D=L;
3753            C=JR_ED79_50,JR_ED79_50,(8-11*KOKI55,KOKIE),9-12*KOKIB;                                       \
3754              D=L;
3755            C=<JRH_789_200TCNL,JRH_789_200M2L,JRH_789_200M1L,JRH_789_200TCNL,JRH_789_200M2L,              \
3756                JRH_789_200M1L,JRH_789_100BL,JRH_789_100A;                                                \
3757              D=L;
3758          $ENDPATH
3759          $PATH Y=109; LC=4;
3760            C=<JRH_789_200TCNL,JRH_789_200M2L,JRH_789_200M1L,JRH_789_200TCNL,JRH_789_200M2L,              \
3761                JRH_789_200M1L,JRH_789_100BL,JRH_789_100A;                                                \
3762              D=R;
3763            C=JR_ED79,JRE_SUHAFU14_500A,JRH_OHA14_500DREAM2,JRH_OHA14_500DREAM2,JRH_OHA14_500NOBINOBI,    \
3764                JRE_SUHAFU14_500AL,JRE_OHANE24_500L,JRH_SUHANEFU14_550L;                                  \
3765              D=R;
3766            C=JRF_EH500_10,8-12*(6:KOKIF|KOKIC),10*KOKIC;                                                 \
3767              D=R;
3768            C=JR_ED79_50,JR_ED79_50,9-12*KOKIA,9-12*KOKIB;                                                \
3769              D=R;
3770          $ENDPATH
3771        $ENDSCENE
3772  #..........................................................................
3773  # 307
3774        $SCENE                                                                                            \
3775            NAME=FU307;                                                                                   \
3776            DX=1000; DY=150; YDIR=U;                                                                      \
3777            BG=(STREET01:..;ST_TOKYOMONO2B:<0+50,97; SCENE_KAMINARIB);
3778          $PATH Y=6; LC=3;
3779            C=TRUCK_SAGAWAL;                                                                              \
3780              D=L;
3781            C=CAR_D5;                                                                                     \
3782              D=L;
3783          $ENDPATH
3784          $PATH Y=67; LC=2;                                                                               \
3785              BG=(FIELD01:..,-61; RAIL_TOKYOMONO:..,-61);                                                 \
3786              FG=ST_TOKYOMONO2F:<0,-61;
3787            M=OPEN;                                                                                       \
3788              C=<TAMA_1000ADL,TAMA_1000BD,TAMA_1000BD,TAMA_1000CD;                                        \
3789              D=L; P=>0+272; TB=STORM;
3790          $ENDPATH
3791          $PATH Y=67; LC=2;
3792            M=STOP;                                                                                       \
3793              C=<TAMA_1000ADL,TAMA_1000BD,TAMA_1000BD,TAMA_1000CD;                                        \
3794              D=R; P=>0+280;
3795          $ENDPATH
3796          $PATH Y=6; LC=3;
3797            C=BUS_TACHIKAWA;                                                                              \
3798              D=R;
3799            C=TRANS_YAMATO;                                                                               \
3800              D=R;
3801          $ENDPATH
3802        $ENDSCENE
3803  #..........................................................................
3804  # 310
3805        $SCENE                                                                                            \
3806            NAME=FU310;                                                                                   \
3807            DX=1000; DY=180; YDIR=U;                                                                      \
3808            BG=MATSUZUMITYOBG_B;                                                                  \
3809            FG=MATSUZUMITYOBG_F;
3810          $PATH Y=77; LC=2;
3811            C=JRE_TC208_500MAL,JRE_M208_500MA,JRE_M209_500MB,JRE_T209_500MA,JRE_T209_500MA,               \
3812                JRE_T209_500MA,JRE_M208_500MA,JRE_M209_500MB,JRE_T209_500MA,JRE_TC209_500MA;              \
3813              D=L;
3814            C=JRE_TC230_0ML,JRE_M230_0M,JRE_M231_0M,JRE_T231_0M,JRE_T231_0M,JRE_T230_0M,JRE_M230_0M,      \
3815                JRE_M231_0M,JRE_T231_0M,JRE_TC231_0M;                                                     \
3816              D=L;
3817            C=JRE_103TCS1L,(<JRE_102MS,JRE_103MS),JRE_102TS,(<JRE_102MS,JRE_103MS),JRE_102TS,             \
3818                (<JRE_102MS,JRE_103MS),JRE_103TCS2;                                                       \
3819              D=L;
3820          $ENDPATH
3821          $PATH Y=77; LC=2;                                                                               \
3822              BG=SIG_J4:<0+18,-5;
3823            C=JRE_103TCS2,(<JRE_102MS,JRE_103MS),JRE_102TS,(<JRE_102MS,JRE_103MS),JRE_102TS,              \
3824                (<JRE_102MS,JRE_103MS),JRE_103TCS1L;                                                      \
3825              D=R;
3826            C=JRE_TC209_500MA,JRE_T209_500MA,JRE_M209_500MB,JRE_M208_500MA,JRE_T209_500MA,                \
3827                JRE_T209_500MA,JRE_T209_500MA,JRE_M209_500MB,JRE_M208_500MA,JRE_TC208_500MAL;             \
3828              D=R;
3829            C=JRE_TC231_0M,JRE_T231_0M,JRE_M231_0M,JRE_M230_0M,JRE_T230_0M,JRE_T231_0M,JRE_T231_0M,       \
3830                JRE_M231_0M,JRE_M230_0M,JRE_TC230_0ML;                                                    \
3831              D=R;
3832          $ENDPATH
3833        $ENDSCENE
3834  #..........................................................................
3835  # 344
3836        $SCENE                                                                                            \
3837            NAME=FU344;                                                                                   \
3838            DX=1000; DY=180; YDIR=U;                                                                      \
3839            BG=CENTRALARCHB;                                                                      \
3840            FG=CENTRALARCHF;
3841          $PATH Y=29; LC=2;
3842            C=CHIBA_1000N2;                                                                               \
3843              D=L;
3844            C=CHIBA_1000N3;                                                                               \
3845              D=L;
3846            C=CHIBA_1000N,CHIBA_1000N;                                                                    \
3847              D=L;
3848            C=CHIBA_1000N;                                                                                \
3849              D=L;
3850            C=CHIBA_1000N,CHIBA_1000N;                                                                    \
3851              D=L;
3852          $ENDPATH
3853          $PATH Y=29; LC=2;
3854            C=CHIBA_1000N;                                                                                \
3855              D=R;
3856            C=CHIBA_1000N,CHIBA_1000N;                                                                    \
3857              D=R;
3858            C=CHIBA_1000N2;                                                                               \
3859              D=R;
3860            C=CHIBA_1000N3;                                                                               \
3861              D=R;
3862            C=CHIBA_1000N,CHIBA_1000N;                                                                    \
3863              D=R;
3864          $ENDPATH
3865        $ENDSCENE
3866  #..........................................................................
3867  # 354
3868        $SCENE                                                                                            \
3869            NAME=FU354;                                                                                   \
3870            DX=1000; DY=150; YDIR=U;                                                                      \
3871            BG=KOKUBUNJISTB;                                                                      \
3872            FG=(FL_J9:..,5,266; KOKUBUNJISTMF);
3873          $PATH Y=9; LC=2;                                                                                \
3874              BG=(TRBED43:..,^0;KOKUBUNJISTM:<0+0,^141);
3875            C=<JRE_TCE351_1000BL,JRE_ME350_1000B,JRE_ME351_1000B,JRE_TSE351_1000B,JRE_TE351_1000B,        \
3876                JRE_ME350_1100B,JRE_ME351_1100B,JRE_TCE351_1300B,JRE_TCE351_1200BL,JRE_ME350_1000B,       \
3877                JRE_ME351_1100B,JRE_TCE351_1100B;                                                         \
3878              D=R; V=9; TB=25;
3879          $ENDPATH
3880          $PATH Y=9; LC=2;                                                                                \
3881              BG=KOKUBUNJISTMB:,-9;
3882            M=OPEN;                                                                                       \
3883              C=JRE_TC201_0TAA,JRE_M201_0TAS,JRE_M200_0TA,JRE_TC200_0TAAL,JRE_TC201_0TAA,JRE_M201_0TAS,   \
3884                JRE_M200_0TA,JRE_M201_0TAS,JRE_M200_0TA,JRE_TC200_0TAAL;                                  \
3885              D=R; P=<50+-100;
3886            M=OPEN;                                                                                       \
3887              C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),            \
3888                (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);                                    \
3889              D=R; P=<50+-100;
3890          $ENDPATH
3891          $PATH Y=9; LC=2;
3892            M=BACK;                                                                                       \
3893              C=SEIBU_2000TC,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000M,SEIBU_2000MP,SEIBU_2000TCL;             \
3894              D=R; P=<50+300; T=12;
3895            M=BACK;                                                                                       \
3896              C=<SEIBU_4AL,SEIBU_4B,SEIBU_4C,SEIBU_4D;                                                    \
3897              D=R; P=<50+300; T=12;
3898          $ENDPATH
3899        $ENDSCENE
3900  #..........................................................................
3901  # 355
3902        $SCENE                                                                                            \
3903            NAME=FU355;                                                                                   \
3904            DX=1000; DY=150; YDIR=U;                                                                      \
3905            BG=KOKUBUNJIST2B;                                                                     \
3906            FG=(FL_J9:..,5,266;KOKUBUNJIST2M);
3907          $PATH Y=82; LC=2; ENV=[M=BACK][P=>50+-175][T=12][TE=15];
3908            C=<SEIBU_351A2L,SEIBU_351B2,SEIBU_351A2;                                                      \
3909              D=R;
3910            C=<SEIBU_601AL,SEIBU_601B,SEIBU_601C,SEIBU_601A;                                              \
3911              D=R;
3912            C=<SEIBU_1411AL,SEIBU_1411B,SEIBU_1411A;                                                      \
3913              D=R;
3914          $ENDPATH
3915          $PATH Y=9; LC=2;                                                                                \
3916              BG=(TRBED43:..,^0;KOKUBUNJIST2F:<0+0,^141);                                 \
3917              ENV=[TB=25];
3918            M=STOP;                                                                                       \
3919              C=JR_EF13,JR_SUHAFU42B1,JNR_SUHA43B1L,JNR_SUHA43B2L,JNR_SUHA43B1L,JR_SUHAFU42B1L,           \
3920                JNR_SUHA43B1L,JNR_SUHA43B2L,JR_SUHAFU42B1L;                                               \
3921              D=L; P=<0-100;
3922            C=JR_EF15,JR_YO3500~OP,2*JR_G2,2*JR_G2,2*JR_G2,2*JR_G2,2*JR_G2,2*JR_G2,JR_YO3500~OP;          \
3923              D=L;
3924            M=STOP;                                                                                       \
3925              C=JNR_TC103OL,(<JNR_M102O,JNR_M103O),JNR_T103O,(<JNR_M102O,JNR_M103O),JNR_T103O,            \
3926                (<JNR_M102O,JNR_M103O),JNR_TC103O;                                                        \
3927              D=L; P=<0-100;
3928          $ENDPATH
3929          $PATH Y=9; LC=2; ENV=[TE=25];
3930            M=OPEN;                                                                                       \
3931              C=JNR_TC103O,(<JNR_M102O,JNR_M103O),JNR_T103O,(<JNR_M102O,JNR_M103O),JNR_T103O,             \
3932                (<JNR_M102O,JNR_M103O),JNR_TC103OL;                                                       \
3933              D=R; P=>100+100;
3934            M=OPEN;                                                                                       \
3935              C=JR_EF13,JR_SUHAFU42B1L,JNR_SUHA43B1L,JR_SUHAFU42B1,JR_SUHAFU42B1L,JNR_SUHA43B2L,          \
3936                JNR_SUHA43B1L,JNR_SUHA43B1L,JR_SUHAFU42B1;                                                \
3937              D=R; P=>100+100;
3938            C=JR_EF15,JR_YO3500~OP,2*JR_G2,2*JR_G2,2*JR_G2,2*JR_G2,2*JR_G2,2*JR_G2,JR_YO3500~OP;          \
3939              D=R;
3940          $ENDPATH
3941        $ENDSCENE
3942  #..........................................................................
3943  # 357
3944        $DEF GRAV_A=GRAV6|GRAV14|GRAV7|GRAV18|GRAV3|GRAV17|GRAV8|GRAV11|GRAV5|GRAV13|GRAV10|GRAV2|GRAV9|  \
3945            GRAV16|GRAV4|GRAV1|GRAV12|GRAV15
3946        $DEF CHI_WOKI3F=CHI_WOKI3[O:GRAV_A,15,29][O:GRAV_A,35,29][O:GRAV_A,55,29]
3947        $DEF CHI_WOKI4F=CHI_WOKI4[O:GRAV_A,15,29][O:GRAV_A,35,29][O:GRAV_A,55,29]
3948
3949        $GROUP                                                                                            \
3950            NAME=FU357;                                                                                   \
3951            DX=1000; AB=-5; BL=127;                                                                       \
3952            BG=ARAKAWACHICHIBUBG_B:,-127;                                                 \
3953            FG=ARAKAWACHICHIBUBG_F:,-127;                                                 \
3954            ENV=[D=X];
3955          C=<CHI_TC1000L,CHI_M1000,CHI_MC1000;                                                            \
3956            V=6;
3957          AP=[D=L][C=CHI_500,(<9*CHI_WOKI3,CHI_WOKI4),(<9*CHI_WOKI3,CHI_WOKI4)][V=6]|                     \
3958              [D=R][C=CHI_500,(<9*CHI_WOKI3F,CHI_WOKI4F),(<9*CHI_WOKI3F,CHI_WOKI4F)][V=6];
3959          C=<CHI_TC1000YL,CHI_M1000Y,CHI_MC1000Y;                                                         \
3960            V=6;
3961        $ENDGROUP
3962  #..........................................................................
3963  # 363
3964        $POOL N=KAN363; F=FPX;
3965          C=JRF_EF210,JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                  \
3966              JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                          \
3967              JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                          \
3968              JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                          \
3969              JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                          \
3970              JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                          \
3971              JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                          \
3972              JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                          \
3973              JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61],                          \
3974              JR_KOKI200L~OP[C1:CT61][C3:CT61],JR_KOKI200L~OP[C1:CT61][C3:CT61];                          \
3975            V=4-7;                                                                                        \
3976            F=F;
3977          C=JRF_EF64_1008,10*KOKIC,3*KOKIC,2*KOKIC,                                                       \
3978              KOKI_1[C1:C37_25B][C2:C37_25B][C3:C37_25B][C4:C37_25B][C5:C37_25B];                         \
3979            V=4-7;                                                                                        \
3980            F=F;
3981          C=JR_EF65_500F,2*JR_WAMU380000A,2*JR_WAMU380000A,2*JR_WAMU380000A,2*JR_WAMU380000A,             \
3982              2*JR_WAMU380000A,2*JR_WAMU380000A,2*JR_WAMU380000A,2*JR_WAMU380000A,2*JR_WAMU380000A,       \
3983              2*JR_WAMU380000A;                                                                           \
3984            V=4-7;                                                                                        \
3985            F=F;
3986          C=JRF_EF65_1000B,(<JRE_KUTS1L,JRE_KUTS2,JRE_KUTS3L,JRE_KUTS3,JRE_KUTS4,JRE_KUTS1);              \
3987            V=7-9;                                                                                        \
3988            F=X;
3989          C=JRF_EF65_21B,JR_TAKI1000O2L,JR_TAKI1000O2L,JR_TAKI1000O2L,JR_TAKI1000O2L,JR_TAKI1000O2L,      \
3990              JR_TAKI1000O2L,JR_TAKI1000O1L,JR_TAKI1000O1L;                                               \
3991            V=4-7;                                                                                        \
3992            F=F;
3993          C=<JRE_TC205ML,3*(JRE_M204ML,JRE_M205ML),JRE_TC205M;                                            \
3994            V=6-9;                                                                                        \
3995            F=P;
3996          C=JRF_EH500_10[PDU],9-12*KOKIB,8-11*KOKI55,KOKIE;                                               \
3997            V=4-7;                                                                                        \
3998            F=F;
3999          C=JRF_EF66,10*KOKI15,3*KOKIC;                                                                   \
4000            V=4-7;                                                                                        \
4001            F=F;
4002          C=JRF_EH200_2L,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,           \
4003              JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL;                      \
4004            V=4-7;                                                                                        \
4005            F=F;
4006        $ENDPOOL
4007
4008        $SCENE                                                                                            \
4009            NAME=FU363;                                                                                   \
4010            DX=1000; DY=180; YDIR=U;                                                                      \
4011            BG=NISHIURAWA_B;                                                                      \
4012            FG=NISHIURAWA_F;                                                                      \
4013            LT=120;                                                                                       \
4014            FIN=W;                                                                                        \
4015            IMGY=51;
4016          $PATH Y=46;
4017            POOL=KAN363:#X; D=L; TE=30;
4018          $ENDPATH
4019          $PATH Y=46;                                                                                     \
4020              BG=NISHIURAWA_M:,-46;
4021            POOL=KAN363:#X; D=R; TB=20; TE=10;
4022          $ENDPATH
4023          $PATH Y=43;
4024            POOL=KAN363:#P; D=R; TB=10; TE=20;
4025          $ENDPATH
4026          $PATH Y=127;
4027            POOL=KAN363:#P; D=L; TB=30;
4028          $ENDPATH
4029        $ENDSCENE
4030  #..........................................................................
4031  # 370
4032        $GROUP                                                                                            \
4033            NAME=FU370;                                                                                   \
4034            DX=1000; AB=43; BL=79;                                                                        \
4035            BG=CHIBAKAIDOBG_B:,-79;                                                               \
4036            FG=CHIBAKAIDOBG_F:,-79;
4037          C=<JRE_KIYAE193L,JRE_KIYAE192,JRE_KIYAE491;                                                     \
4038            V=2;
4039          AP=[D=L][C=JNR_DE10L,4*JR_TIKI,4*JR_TIKI,4*JR_TIKI][V=3]|                                       \
4040              [D=R][C=JNR_DE10L,2*JR_TIKI2,2*JR_TIKI2,2*JR_TIKI2][V=3];
4041          AP=[D=L][C=JNR_DD51_500FD,(8-11*KOKI55,KOKIE)][V=3]|[D=R][C=JNR_DD51_500FD,9-12*KOKIA][V=3];
4042          C=<JNR_DE10L,JR_DD51_500A;                                                                      \
4043            V=2;
4044          AP=[D=L][C=JNR_D51WRBL,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1)][V=2]|                  \
4045              [D=R][C=JNR_D51WRB,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1)][V=2];
4046        $ENDGROUP
4047  #..........................................................................
4048  # 371
4049        $SCENE                                                                                            \
4050            NAME=FU371;                                                                                   \
4051            DX=1000; DY=150; YDIR=U;                                                                      \
4052            BG=YOTSUYAST_B;                                                                       \
4053            FG=YOTSUYAST_F;
4054          $PATH Y=66; LC=2;                                                                               \
4055              BG=YOTSUYAST_M:<0+0,^84;
4056            M=STOP;                                                                                       \
4057              C=<TOKYO_500A1L,TOKYO_500B1,TOKYO_500A1L,TOKYO_500B1,TOKYO_500A1L,TOKYO_500B1;              \
4058              D=L; P=<50+450;
4059          $ENDPATH
4060          $PATH Y=66; LC=2;
4061            M=STOP;                                                                                       \
4062              C=<TOKYO_500A1L,TOKYO_500B1,TOKYO_500A1L,TOKYO_500B1,TOKYO_500A1L,TOKYO_500B1;              \
4063              D=R; P=<50+300;
4064          $ENDPATH
4065        $ENDSCENE
4066  #..........................................................................
4067  # 401 ZSZ_TK:1000
4068        $SCENE                                                                                            \
4069            NAME=FU401;                                                                                   \
4070            DX=1000; DY=180; YDIR=U;                                                                      \
4071            BG=KISOGAWA1BG_B;                                                                     \
4072            FG=KISOGAWA1BG_F;
4073          $PATH Y=39; LC=2;                                                                               \
4074              BG=KISOGAWA1BG_M:,^141;
4075            C=JNR_TC381_0NL,JNR_M381NC,JNR_M380NA,JNR_M381NC,JNR_M380NA,JNR_TS381NA,JNR_M381NC,           \
4076                JNR_M380NA,JNR_TC381_0N;                                                                  \
4077              D=L;
4078            C=JR_EF64~OP,JR_NAHANEFU22BL,JR_NAHANE20B,JR_NAHANE20B,JR_SUHAFU12,JR_SUHAFU12L,JR_OHA12,     \
4079                JR_OHA12,JR_OHA12,JR_OHA12,JR_SUHAFU12;                                                   \
4080              D=L;
4081            C=JRF_EF64,JRF_EF64,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JL,               \
4082                JR_TAKI1000JL,JR_TAKI1000O2L,JR_TAKI1000O2L,JR_TAKI1000O2L,JR_TAKI1000O2L,                \
4083                JR_TAKI1000O2L,JR_TAKI1000O2L,JR_TAKI1000O3L,JR_TAKI1000O3L,JR_TAKI1000O3L,               \
4084                JR_TAKI1000O3L,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000O2L,JR_TAKI1000O2L; \
4085              D=L;
4086            C=JRC_313_1500MCL,JRC_312_1500TC;                                                             \
4087              D=L;
4088            C=JRC_TC210_5000B1L,JRC_M210_5000B1,JRC_MC211_5000B1;                                         \
4089              D=L;
4090          $ENDPATH
4091          $PATH Y=44; LC=2;
4092            C=JRC_312_1500TC,JRC_313_1500MCL;                                                             \
4093              D=R;
4094            C=JRC_MC211_5000B1,JRC_M210_5000B1,JRC_TC210_5000B1L;                                         \
4095              D=R;
4096            C=JNR_TC381_0N,JNR_M380NA,JNR_M381NC,JNR_TS381NA,JNR_M380NA,JNR_M381NC,JNR_M380NA,            \
4097                JNR_M381NC,JNR_TC381_0NL;                                                                 \
4098              D=R;
4099            C=JR_EF64~OP,JR_SUHAFU12,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHA12,JR_SUHAFU12L,JR_SUHAFU12,        \
4100                JR_NAHANE20B,JR_NAHANE20B,JR_NAHANEFU22BL;                                                \
4101              D=R;
4102            C=JRF_EF64,JRF_EF64,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,              \
4103                JR_TAKI1000JEL,JR_TAKI1000O3L,JR_TAKI1000O3L,JR_TAKI1000O3L,JR_TAKI1000O3L,               \
4104                JR_TAKI1000O1L,JR_TAKI1000O1L,JR_TAKI1000O1L,JR_TAKI1000O1L,JR_TAKI1000O1L,               \
4105                JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL;   \
4106              D=R;
4107          $ENDPATH
4108        $ENDSCENE
4109  #..........................................................................
4110  # 428
4111        $GROUP                                                                                            \
4112            NAME=FU428;                                                                                   \
4113            DX=1000; AB=74; BL=18;                                                                        \
4114            BG=(YOKESAWABGB:,-18;SIG_J3:<50+400,-5;TRBED43:..,^0);                                \
4115            FG=(SIG_J3R:<0+100,-5;YOKESAWABGF:,-18);                                              \
4116            WP=(0+999,>TB:BG.SIGR;0+1,<TB:FG.SIGR);                                                       \
4117            ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3];
4118          C=<JRE_TC115_1000SUKAJBCL,JRE_M114_1000SUKAB,JRE_MC115_1000SUKAJB;
4119          C=<JRE_TCE351_1000BL,JRE_ME350_1000B,JRE_E351_1000F,JRE_TSE351_1000B,JRE_TE351_1000B,           \
4120              JRE_ME350_1100B,JRE_ME351_1000B,JRE_TCE351_1100B;
4121          C=<JNR_TC165CXL,JNR_M164_0CX,JNR_M165CL,JNR_TC165CX;
4122          C=<JRE_E126_100FL,JRE_E127_100F;
4123        $ENDGROUP
4124  #..........................................................................
4125  # 434
4126        $GROUP                                                                                            \
4127            NAME=FU434;                                                                                   \
4128            DX=1000; AB=67; BL=55; D=X;                                                                   \
4129            BG=TAKAHARA2B:,-55;                                                                   \
4130            FG=TAKAHARA2F:,-55;
4131          C=KAMI_150;
4132          AP=[D=L]                                                                                        \
4133              [C=JNR_DE10L,JRF_DE10L,KOKI55,JR_TAKI6250F,JR_TAKI6250F,JR_TAKI6250F,                       \
4134              JR_KOKI200L~OP[C1:C2T_J(01|O2|O3)][C3:C2T_J(01|O2|O3)],                                     \
4135              JR_KOKI200L~OP[C1:C2T_J(01|O2|O3)][C3:C2T_J(01|O2|O3)]][V=5]|                               \
4136              [D=R]                                                                                       \
4137              [C=JRF_DE10L,JNR_DE10L,JR_KOKI200L~OP[C1:C2T_J(01|O2|O3)][C3:C2T_J(01|O2|O3)],              \
4138              JR_KOKI200L~OP[C1:C2T_J(01|O2|O3)][C3:C2T_J(01|O2|O3)],JR_TAKI6250F,JR_TAKI6250F,           \
4139              JR_TAKI6250F,KOKI55][V=5];
4140          AP=[D=L][C=JNR_DE10L,JNR_DE10L,KOKI55,JR_TAKI6250F,JR_TAKI6250F,JR_TAKI6250F][V=5]|             \
4141              [D=R][C=JNR_DE10L,JNR_DE10L,JR_TAKI6250F,JR_TAKI6250F,JR_TAKI6250F,KOKI55][V=5];
4142          C=KAMI_100;
4143          AP=[D=L]                                                                                        \
4144              [C=JNR_DE10L,JNR_DE10L,JR_TAKI6250F,JR_TAKI6250F,JR_TAKI6250F,                              \
4145              JR_KOKI200L~OP[C1:C2T_J(01|O2|O3)][C3:C2T_J(01|O2|O3)],                                     \
4146              JR_KOKI200L~OP[C1:C2T_J(01|O2|O3)][C3:C2T_J(01|O2|O3)]][V=5]|                               \
4147              [D=R]                                                                                       \
4148              [C=JNR_DE10L,JNR_DE10L,JR_KOKI200L~OP[C1:C2T_J(01|O2|O3)][C3:C2T_J(01|O2|O3)],              \
4149              JR_KOKI200L~OP[C1:C2T_J(01|O2|O3)][C3:C2T_J(01|O2|O3)],JR_TAKI6250F,JR_TAKI6250F,           \
4150              JR_TAKI6250F][V=5];
4151        $ENDGROUP
4152  #..........................................................................
4153  # 436
4154        $SCENE                                                                                            \
4155            NAME=FU436;                                                                                   \
4156            DX=1000; DY=130; YDIR=U;                                                                      \
4157            BG=GEROST_B;                                                                          \
4158            FG=GEROST_F;
4159          $PATH Y=9; LC=2;                                                                                \
4160              BG=TRBED43:..,^0;
4161            C=JRC_DC85_0FL,JRC_DC84_0F,JRC_DC85_0FP,JRC_DC85_0FP,JRC_DC85_200FL,JRC_DC84_0FG,             \
4162                JRC_DC84_300F,JRC_DC85_0F;                                                                \
4163              D=L;
4164            M=STOP;                                                                                       \
4165              C=JNR_DC58CL,JNR_DC28_2000,JNR_DC58CL,JNR_KIRO28G1,JNR_DC28_2000L,JNR_KIHA58C;              \
4166              D=L; P=<50-450;
4167            C=JRC_DC48_5800AL,JRC_DC40_6300;                                                              \
4168              D=L;
4169            M=STOP;                                                                                       \
4170              C=JRC_DC48_5800AL,JRC_DC48_5800B;                                                           \
4171              D=L; P=<50-450;
4172          $ENDPATH
4173          $PATH Y=9; LC=2;
4174            M=STOP;                                                                                       \
4175              C=JRC_DC48_5800B,JRC_DC48_5800AL;                                                           \
4176              D=R; P=<50-400;
4177            C=JRC_DC85_0F,JRC_DC84_300F,JRC_DC84_0FG,JRC_DC85_200FL,JRC_DC85_0FP,JRC_DC85_0FP,            \
4178                JRC_DC84_0F,JRC_DC85_0FL;                                                                 \
4179              D=R;
4180            M=STOP;                                                                                       \
4181              C=JNR_KIHA58C,JNR_DC28_2000L,JNR_KIRO28G1,JNR_DC58CL,JNR_DC28_2000,JNR_DC58CL;              \
4182              D=R; P=<50-400;
4183            M=STOP;                                                                                       \
4184              C=JRC_DC40_6300,JRC_DC48_5800AL;                                                            \
4185              D=R; P=<50-400;
4186          $ENDPATH
4187        $ENDSCENE
4188  #..........................................................................
4189  # 437
4190        $GROUP                                                                                            \
4191            NAME=FU437;                                                                                   \
4192            DX=1000; AB=93; BL=29; D=X;                                                                   \
4193            BG=OBAMAWAN_B:,-29;                                                                   \
4194            FG=OBAMAWAN_F:,-29;
4195          C=JRW_MC125_2F;                                                                                 \
4196            V=6;
4197          C=<JRW_TC183_700L,JRW_M182_201,JRW_MC183_201;                                                   \
4198            V=6;
4199          C=<JRK_KH26L,JRK_KH26;
4200          C=<JRW_MC125_2F,JRW_MC125_2F;                                                                   \
4201            V=6;
4202        $ENDGROUP
4203  #..........................................................................
4204  # 459
4205        $GROUP                                                                                            \
4206            NAME=FU459;                                                                                   \
4207            LC=2; DX=1000; AB=52; BL=40; D=X;                                                             \
4208            BG=IBIGAWATOKAIDO01_B:,-40;                                                           \
4209            FG=IBIGAWATOKAIDO01_F:,-40;
4210          AP=[D=L]                                                                                        \
4211              [C=JNR_1AL,                                                                                 \
4212              (<J_CLASSICY6,J_CLASSICY7,J_CLASSICY8,J_CLASSICY8,J_CLASSICY9,J_CLASSICY9,J_CLASSICY9)]     \
4213              [V=3]|                                                                                      \
4214              [D=R]                                                                                       \
4215              [C=JNR_1A,                                                                                  \
4216              (<J_CLASSICY6,J_CLASSICY7,J_CLASSICY8,J_CLASSICY8,J_CLASSICY9,J_CLASSICY9,J_CLASSICY9)]     \
4217              [V=3];
4218        $ENDGROUP
4219  #..........................................................................
4220  # 462
4221        $GROUP                                                                                            \
4222            NAME=FU462;                                                                                   \
4223            DX=1000; AB=-5; BL=127; D=X;                                                                  \
4224            BG=TENRYUGAWABG_B1:,-127;                                                             \
4225            FG=TENRYUGAWABG_F:,-127;
4226          C=<JRC_TC118_5300CL,JRC_MC119_5000C;                                                            \
4227            V=5;
4228          C=JRC_MC119_5100C;                                                                              \
4229            V=5;
4230          C=<JRC_TC372_0BL,JRC_T373_0B,JRC_MC373_0B;                                                      \
4231            V=5;
4232          C=<JRC_MC119_5100C,JRC_TC118_5300CL,JRC_MC119_5000C;                                            \
4233            V=5;
4234          C=<JNR_KH86OL,JNR_M80O,JNR_SH87O,JNR_KH86O;                                                     \
4235            V=5;
4236        $ENDGROUP
4237  #..........................................................................
4238  # 518
4239        $SCENE                                                                                            \
4240            NAME=FU518;                                                                                   \
4241            DX=1000; DY=180; YDIR=U;                                                                      \
4242            BG=NAKAZAIKE01B;                                                                      \
4243            FG=TRBED14:..,0;
4244          $PATH Y=9; LC=2; ENV=[M=BACK][P=>50+80][T=6][D=L];
4245            C=JRW_DC120KANSAI,JRW_DC120KANSAI;
4246            C=JRW_DC120KANSAI;
4247          $ENDPATH
4248          $PATH Y=9; LC=2;
4249            C=<JRW_DC752AL,JRW_DC752A;                                                                    \
4250              D=X; TB=12; TE=3;
4251          $ENDPATH
4252        $ENDSCENE
4253  #..........................................................................
4254  # 520
4255        $SCENE                                                                                            \
4256            NAME=FU520;                                                                                   \
4257            DX=1000; DY=180; YDIR=U;                                                                      \
4258            BG=TOUJIB;                                                                            \
4259            FG=(82,POLE5,232:..,,0; FENCE_13:..,,0);
4260          $PATH Y=6; LC=2; TE=8;
4261            C=<JRC_784_9001L,JRC_787_9501L,JRC_786_9201L,JRC_785_9501L,JRC_785_9601L,JRC_786_9701L,       \
4262                JRC_777_9001L,JRC_776_9001L,JRC_775_9001L,JRC_787_9401L,JRC_786_9001L,JRC_785_9301L,      \
4263                JRC_785_9001L,JRC_785_9501L,JRC_787_9001L,JRC_783_9001;                                   \
4264              D=L; V=15;
4265            C=<JRW_724_3001L,JRW_727_3501L,JRW_726_3201L,JRW_725_3501L,JRW_725_3601L,JRW_726_3701L,       \
4266                JRW_717_3001L,JRW_719_3001L,JRW_718_3001L,JRW_727_3401L,JRW_726_3001L,JRW_725_3301L,      \
4267                JRW_725_3001L,JRW_726_3501L,JRW_727_3001L,JRW_723_3001;                                   \
4268              D=L; V=15;
4269          $ENDPATH
4270          $PATH Y=6; LC=2; TB=8;
4271            C=<JRW_724_3001L,JRW_727_3501L,JRW_726_3201L,JRW_725_3501L,JRW_725_3601L,JRW_726_3701L,       \
4272                JRW_717_3001L,JRW_719_3001L,JRW_718_3001L,JRW_727_3401L,JRW_726_3001L,JRW_725_3301L,      \
4273                JRW_725_3001L,JRW_726_3501L,JRW_727_3001L,JRW_723_3001;                                   \
4274              D=R; V=15;
4275            C=<JRC_784_9001L,JRC_787_9501L,JRC_786_9201L,JRC_785_9501L,JRC_785_9601L,JRC_786_9701L,       \
4276                JRC_777_9001L,JRC_776_9001L,JRC_775_9001L,JRC_787_9401L,JRC_786_9001L,JRC_785_9301L,      \
4277                JRC_785_9001L,JRC_785_9501L,JRC_787_9001L,JRC_783_9001;                                   \
4278              D=R; V=15;
4279          $ENDPATH
4280        $ENDSCENE
4281  #..........................................................................
4282  # 528
4283        $GROUP                                                                                            \
4284            NAME=FU528;                                                                                   \
4285            LC=2; DX=1000; AB=70; BL=52; D=X;                                                             \
4286            BG=HODUKAWABG_B:,-52;                                                         \
4287            FG=HODUKAWABG_F:,-52;
4288          M=STOP;                                                                                         \
4289            C=<JNR_SAGANO1,JNR_SAGANO2,JNR_SAGANO3,JNR_SAGANO4,JNR_SAGANO5,JNR_DE10_SAGANO2;              \
4290            V=2; P=>50+300;
4291        $ENDGROUP
4292  #..........................................................................
4293  # 529
4294        $GROUP                                                                                            \
4295            NAME=FU529;                                                                                   \
4296            LC=2; DX=1000; AB=-7; BL=129; D=X;                                                            \
4297            BG=TRUCKHODUKYOST_B:,-129;                                                            \
4298            FG=TRUCKHODUKYOST_F:,-129;
4299          M=STOP;                                                                                         \
4300            C=<JNR_DE10_SAGANO2L,(<JNR_SAGANO5L,JNR_SAGANO4L,JNR_SAGANO3L,JNR_SAGANO2L,JNR_SAGANO1L);     \
4301            V=2; A=0.003; B=0.002; P=<50-450;
4302        $ENDGROUP
4303  #..........................................................................
4304  # 815
4305        $GROUP                                                                                            \
4306            NAME=FU815;                                                                                   \
4307            LC=2; DX=1000; AB=19; BL=73; D=X;                                                             \
4308            BG=GOKASE1BGB:,-73;                                                                   \
4309            TB=3;                                                                                         \
4310            TE=3;
4311          C=TAKA_TR100;                                                                                   \
4312            V=5;
4313        $ENDGROUP
4314  #..........................................................................
4315  # 816
4316        $GROUP                                                                                            \
4317            NAME=FU816;                                                                                   \
4318            LC=2; DX=1000; AB=-7; BL=99; D=X;                                                             \
4319            BG=GOKASE2BGB:,-99;                                                                   \
4320            TB=3;                                                                                         \
4321            TE=3;
4322          C=2*TAKA_TR100;                                                                                 \
4323            V=5;
4324        $ENDGROUP
4325  #..........................................................................
4326  # 820
4327        $GROUP                                                                                            \
4328            NAME=FU820;                                                                                   \
4329            DX=1000; AB=50; BL=42;                                                                        \
4330            BG=GOKASE4BGB:,-42;                                                                   \
4331            FG=GOKASE4BGF:,-42;                                                                   \
4332            TE=3;
4333          C=TAKA_TR100;                                                                                   \
4334            V=4;
4335        $ENDGROUP
4336  #..........................................................................
4337  # 821
4338        $SCENE                                                                                            \
4339            NAME=FU821;                                                                                   \
4340            DX=1000; DY=150; YDIR=U;                                                                      \
4341            BG=(CROSS_J2B:<0+193,9;HINOKAGEONSENSTB);
4342          $PATH Y=9; LC=2;                                                                                \
4343              BG=(TRBED43:..,^0; HINOKAGEONSENSTM:<0+0,^141);                                     \
4344              ENV=[M=STOP][P=<0+400][T=12];
4345            C=TAKA_TR300BL,TAKA_TR100;                                                                    \
4346              D=L;
4347            C=<TAKA_TR300AL,TAKA_TR300A;                                                                  \
4348              D=L;
4349            C=TAKA_TR100;                                                                                 \
4350              D=L;
4351            C=TAKA_TR100,TAKA_TR100;                                                                      \
4352              D=L;
4353            C=<TAKA_TR400B1L,TAKA_TR400A1;                                                                \
4354              D=L;
4355          $ENDPATH
4356          $PATH Y=9; LC=2; TB=XDOWN,5; WP=0+280,>TE:XUP; ENV=[M=STOP][P=<0+430][T=12];
4357            C=TAKA_TR100,TAKA_TR100;                                                                      \
4358              D=R;
4359            C=<TAKA_TR400B1L,TAKA_TR400A1;                                                                \
4360              D=R;
4361            C=TAKA_TR100,TAKA_TR300BL;                                                                    \
4362              D=R;
4363            C=<TAKA_TR300AL,TAKA_TR300A;                                                                  \
4364              D=R;
4365            C=TAKA_TR100;                                                                                 \
4366              D=R;
4367          $ENDPATH
4368        $ENDSCENE
4369  #..........................................................................
4370      $ENDSECTION
4371  #----------------------------------------------------------------------------
4372      $SECTION LC=1;
4373  #
4374  # 800
4375  #
4376        $SECTION                                                                                          \
4377            NAME=FUK800;                                                                                  \
4378            DIS=20; %SECFIN;%FOOTER(© fukayatanteijimusyo http://www.geocities.jp/kantentomaccha/);
4379  #..........................................................................
4380  # 111
4381          $GROUP                                                                                          \
4382              NAME=FU111;                                                                                 \
4383              LC=2; DX=800; AB=63; BL=9;                                                                  \
4384              BG=(SHIRAKABABIKO_B:,-9;TRBED43:..,^0);                                             \
4385              FG=SHIRAKABABIKO_F:,-9;
4386            C=DUP_TRUCK(01|02|03|04|05);                                                                  \
4387              V=2.5-3.5;
4388          $ENDGROUP
4389  #..........................................................................
4390  # 114
4391          $SCENE                                                                                          \
4392              NAME=FU114;                                                                                 \
4393              DX=800; DY=180; YDIR=U;                                                                     \
4394              BG=BIEI_B;                                                                          \
4395              FG=FIELD02:<0+43,0;
4396            $PATH Y=9; LC=2;                                                                              \
4397                BG=TRBED43:..,^0;                                                                         \
4398                ENV=[TB=8][V=3.5-4.5];
4399              C=JRH_DE15_FURANO2L,JRH_NOR_OHATEFU510_51,JRH_NOR_NAHA29003,JRH_NOR_OHATEFU510_2,JRH_C11171; \
4400                D=L;
4401              C=JRH_DE15_FURANOL,JRH_NOR_OHATEFU510_51,JRH_NOR_NAHA29003,JRH_NOR_OHATEFU510_2;            \
4402                D=L;
4403              C=JRH_C11171,JRH_DE15_FURANO2L,JRH_NOR_OHATEFU510_51,JRH_NOR_NAHA29003,JRH_NOR_OHATEFU510_2; \
4404                D=L;
4405              C=JRH_KH150F1,JRH_KH150F1;                                                                  \
4406                D=L;
4407              C=JRH_DE15_FURANO2L,JRH_NOR_OHATEFU510_51,JRH_NOR_NAHA29003,JRH_NOR_NAHA29002,              \
4408                  JRH_NOR_OHATEFU510_2;                                                                   \
4409                D=L;
4410            $ENDPATH
4411            $PATH Y=9; LC=2; ENV=[TE=8][V=3.5-4.5];
4412              C=JRH_KH150F1,JRH_KH150F1;                                                                  \
4413                D=R;
4414              C=JRH_NOR_OHATEFU510_2,JRH_NOR_NAHA29002,JRH_NOR_NAHA29003,JRH_NOR_OHATEFU510_51,           \
4415                  JRH_DE15_FURANO2L;                                                                      \
4416                D=R;
4417              C=JRH_C11171,JRH_NOR_OHATEFU510_2,JRH_NOR_NAHA29003,JRH_NOR_OHATEFU510_51,JRH_DE15_FURANO2L; \
4418                D=R;
4419              C=JRH_NOR_OHATEFU510_2,JRH_NOR_NAHA29003,JRH_NOR_OHATEFU510_51,JRH_DE15_FURANOL;            \
4420                D=R;
4421              C=JRH_NOR_OHATEFU510_2,JRH_NOR_NAHA29003,JRH_NOR_OHATEFU510_51,JRH_DE15_FURANO2L,JRH_C11171; \
4422                D=R;
4423            $ENDPATH
4424          $ENDSCENE
4425  #..........................................................................
4426  # 121
4427          $GROUP                                                                                          \
4428              NAME=FU121;                                                                                 \
4429              DX=800; AB=-7; BL=79;                                                                       \
4430              BG=TAUSYUBETSUBG_B:,-79;
4431            C=JRH_KH22SYU,JRH_KH22SYU;                                                                    \
4432              D=R;
4433            C=JRH_KH22SYU;                                                                                \
4434              D=L;
4435            C=JNR_9600DF,JNR_WAFU29500,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),2*JR_G3,2*JR_G3,  \
4436                JR_TORA60000A,JR_TORA60000A,JR_TORA60000A,JR_TORA60000A,JR_YO2000;                        \
4437              D=R;
4438            C=JNR_9600DFL,JR_YO2000,JR_TOM3,JR_TOM3,JR_TOM3,JR_TOM3,2*JR_G3,2*JR_G3,                      \
4439                (<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JNR_WAFU29500;                           \
4440              D=L;
4441          $ENDGROUP
4442  #..........................................................................
4443  # 128
4444          $GROUP                                                                                          \
4445              NAME=FU128;                                                                                 \
4446              DX=800; AB=113; BL=9;                                                                       \
4447              BG=(SHARIDAKEMT_B:,-9;TRBED41:..,^0);
4448            C=J_DC03C;                                                                                    \
4449              V=4;
4450            C=JNR_KH22E;                                                                                  \
4451              V=5;
4452          $ENDGROUP
4453  #..........................................................................
4454  # 129
4455          $GROUP                                                                                          \
4456              NAME=FU129;                                                                                 \
4457              DX=800; AB=73; BL=49;                                                                       \
4458              BG=DAI3URYUGAWABG_B:,-49;                                                           \
4459              FG=(BRIDGE_URYUGAWA3:<0+195,-16; HANDRAIL04A:0..0+206,-4,0; HANDRAIL04A:0+621..100,-4,0);
4460            C=JRH_DC53DL;                                                                                 \
4461              D=L; V=4;
4462            C=JRH_DC53D;                                                                                  \
4463              D=R; V=4;
4464          $ENDGROUP
4465  #..........................................................................
4466  # 136
4467          $SCENE                                                                                          \
4468              NAME=FU136;                                                                                 \
4469              DX=800; DY=180; YDIR=U;                                                                     \
4470              BG=MAKOMANAIHH_B;
4471            $PATH Y=49; LC=2;                                                                             \
4472                BG=MAKOMANAIHH_M:<0+0,^131;
4473              C=<SAP_3000ADL,SAP_3000BD,SAP_3000CD,SAP_3000BD,SAP_3000CD,SAP_3000BD,SAP_3000CD,SAP_3000DD; \
4474                D=L;
4475            $ENDPATH
4476            $PATH Y=49; LC=2;
4477              C=<SAP_3000ADL,SAP_3000BD,SAP_3000CD,SAP_3000BD,SAP_3000CD,SAP_3000BD,SAP_3000CD,SAP_3000DD; \
4478                D=R;
4479            $ENDPATH
4480          $ENDSCENE
4481  #..........................................................................
4482  # 218
4483          $GROUP                                                                                          \
4484              NAME=FU218;                                                                                 \
4485              DX=800; BL=139;                                                                             \
4486              BG=YONESHIRO13B:,-139;
4487            AP=[D=L]                                                                                      \
4488                [C=JNR_8620DFL,2*JR_G4,JR_GO1,JR_TORA60000A,JR_TORA60000A,JR_GO1,JR_GO1,JNR_WAFU29500]    \
4489                [V=5]|                                                                                    \
4490                [D=R]                                                                                     \
4491                [C=JNR_8620DF,JNR_WAFU29500,JR_GO1,JR_GO1,JR_TORA60000A,JR_TORA60000A,JR_GO1,2*JR_G4]     \
4492                [V=4];
4493            C=<JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA28L,JNR_KIHA58A;                                           \
4494              V=7; TE=6;
4495            C=<JNR_KH52,JNR_KH52,JNR_KH52,JNR_KIHAYUNI26;                                                 \
4496              V=7;
4497          $ENDGROUP
4498  #..........................................................................
4499  # 222
4500          $GROUP                                                                                          \
4501              NAME=FU222;                                                                                 \
4502              DX=800; BL=127;                                                                             \
4503              BG=NIKKAWABG_B:,-127;                                                               \
4504              FG=(SIG_J3R:<0+10,-5;NIKKAWABG_F:,-127);                                            \
4505              WP=0+1,<TB:FG.SIGR;                                                                         \
4506              ENV=[TB=<FG.SIGG,>FG.SIGR,3];
4507            C=<JNR_TC455AL,JNR_M470A,JNR_MC471B,JNR_TS455A,JNR_M470A,JNR_MC471B;                          \
4508              V=7;
4509            C=(<JRE_MC719L,JRE_TC71),(<JRE_MC719L,JRE_TC71),(<JRE_MC719L,JRE_TC71);                       \
4510              V=7;
4511            AP=[D=L][C=JRE_ED78A,JRE_ED78A,9-12*KOKIA][V=5]|                                              \
4512                [D=R][C=JRE_ED78AL,JRE_ED78AL,9-12*KOKIA][V=5];
4513            C=(<JRE_E721L,JRE_E720),(<JRE_E721L,JRE_E720);                                                \
4514              V=7;
4515            C=<(<JRE_KH48KAZEKKO1L,JRE_KH48KAZEKKO2),JNR_DC52_100,JNR_KIHA58C;                            \
4516              V=4;
4517          $ENDGROUP
4518  #..........................................................................
4519  # 228
4520          $GROUP                                                                                          \
4521              NAME=FU228;                                                                                 \
4522              LC=2; DX=800; IMGY=80; AB=104; BL=18; D=X;                                                  \
4523              BG=OSHIKADOST_B:,-18;
4524            M=STOP;                                                                                       \
4525              C=DUP_JNR_KIHA52_100A1P;                                                                    \
4526              P=*55;
4527          $ENDGROUP
4528  #..........................................................................
4529  # 234
4530          $GROUP                                                                                          \
4531              NAME=FU234;                                                                                 \
4532              DX=800; AB=113; BL=9;                                                                       \
4533              BG=MASUKATAST_B:,-9;                                                                \
4534              FG=SCENE_MASUKATAST:,-9;
4535            M=OPEN;                                                                                       \
4536              C=JRE_DC110RIKU,JRE_DC110RIKU;                                                              \
4537              V=5; P=>0+195;
4538            M=OPEN;                                                                                       \
4539              C=JRE_DC110RIKU;                                                                            \
4540              V=5; P=>0+195;
4541            M=OPEN;                                                                                       \
4542              C=<JNR_KIHA58L,JNR_KIRO28G1,JNR_KIHA58A;                                                    \
4543              V=6; P=>0+195;
4544            M=STOP;                                                                                       \
4545              C=JNR_KH40_2000;                                                                            \
4546              V=5; P=>0+195;
4547          $ENDGROUP
4548  #..........................................................................
4549  # 239
4550          $SCENE                                                                                          \
4551              NAME=FU239;                                                                                 \
4552              DX=800; DY=180; YDIR=U;                                                                     \
4553              BG=YURTECSTADIUM_B;                                                         \
4554              FG=YURTECSTADIUM_F;
4555            $PATH Y=49; LC=2;
4556              C=<SEND_1000AL,SEND_1000B,SEND_1000C,SEND_1000D;                                            \
4557                D=L; TE=2;
4558            $ENDPATH
4559            $PATH Y=49; LC=2;
4560              C=<SEND_1000AL,SEND_1000B,SEND_1000C,SEND_1000D;                                            \
4561                D=R; TE=2;
4562            $ENDPATH
4563          $ENDSCENE
4564  #..........................................................................
4565  # 242
4566          $GROUP                                                                                          \
4567              NAME=FU242;                                                                                 \
4568              DX=800; AB=33; BL=89;                                                                       \
4569              BG=TAKASAKISANNDOBG_B:,-89;                                                 \
4570              FG=TAKASAKISANNDOBG_F:,-89;
4571            AP=[D=L][C=JR_C11325MOKAL,JR_SUHAFU42K1,JNR_OHA35CK1,JR_SUHA32BKL,JNR_DE10L][V=4]|            \
4572                [D=R][C=JR_C11325MOKAL,JR_SUHA32BKL,JNR_OHA35CK1,JR_SUHAFU42K1,142][V=4];
4573            C=<JRE_KH111AL,JRE_KH111A,JRE_KH112A;                                                         \
4574              V=5;
4575            C=<JNR_KIHA58L,JNR_KIHA28,JNR_KIHA58A;                                                        \
4576              V=6;
4577            C=JNR_DE10L;                                                                                  \
4578              V=3;
4579            C=<JRE_KH111A,JRE_KH112A;                                                                     \
4580              V=5;
4581          $ENDGROUP
4582  #..........................................................................
4583  # 311
4584          $SCENE                                                                                          \
4585              NAME=FU311;                                                                                 \
4586              DX=800; DY=180; YDIR=U;                                                                     \
4587              BG=KANDAGAWABG_B;                                                                   \
4588              FG=KANDAGAWABG_F;
4589            $PATH Y=126; LC=2;
4590              C=JRE_TC208_500MAL,JRE_M208_500MA,JRE_M209_500MB,JRE_T209_500MA,JRE_T209_500MA,             \
4591                  JRE_T209_500MA,JRE_M208_500MA,JRE_M209_500MB,JRE_T209_500MA,JRE_TC209_500MA;            \
4592                D=L;
4593              C=JRE_TC230_0ML,JRE_M230_0M,JRE_M231_0M,JRE_T231_0M,JRE_T231_0M,JRE_T230_0M,JRE_M230_0M,    \
4594                  JRE_M231_0M,JRE_T231_0M,JRE_TC231_0M;                                                   \
4595                D=L;
4596              C=<JRE_TCE256_500AL,JRE_ME257_1500A,JRE_ME256_500A,JRE_ME257_500A,JRE_TCE257_500A;          \
4597                D=L;
4598            $ENDPATH
4599            $PATH Y=126; LC=2;                                                                            \
4600                BG=SIG_J4:<50+299,-5;
4601              C=<JRE_TCE256_500AL,JRE_ME257_1500A,JRE_ME256_500A,JRE_ME257_500A,JRE_TCE257_500A;          \
4602                D=R;
4603              C=JRE_TC209_500MA,JRE_T209_500MA,JRE_M209_500MB,JRE_M208_500MA,JRE_T209_500MA,              \
4604                  JRE_T209_500MA,JRE_T209_500MA,JRE_M209_500MB,JRE_M208_500MA,JRE_TC208_500MAL;           \
4605                D=R;
4606              C=JRE_TC231_0M,JRE_T231_0M,JRE_M231_0M,JRE_M230_0M,JRE_T230_0M,JRE_T231_0M,JRE_T231_0M,     \
4607                  JRE_M231_0M,JRE_M230_0M,JRE_TC230_0ML;                                                  \
4608                D=R;
4609            $ENDPATH
4610          $ENDSCENE
4611  #..........................................................................
4612  # 372
4613          $SCENE                                                                                          \
4614              NAME=FU372;                                                                                 \
4615              DX=800; DY=150; YDIR=U;                                                                     \
4616              BG=SHINYASHIKIBG_B;                                                         \
4617              FG=(SHINYASHIKIBG_F; SIG_TYUKEI:50-250,112);
4618            $PATH Y=79; LC=2; WP=0+0,<TB:SCFG1.SIGR;
4619              C=JRE_TC230_0ML,JRE_M230_0M,JRE_M231_0M,JRE_T231_0M,JRE_T231_0M,JRE_T230_0M,JRE_M230_0M,    \
4620                  JRE_M231_0M,JRE_T231_0M,JRE_TC231_0M;                                                   \
4621                D=L; TB=SIGG,3; TE=8,SCFG1.SIGY,8,SCFG1.SIGG,3;
4622            $ENDPATH
4623            $PATH Y=79; LC=2;
4624              C=JRE_TC231_0M,JRE_T231_0M,JRE_M231_0M,JRE_M230_0M,JRE_T230_0M,JRE_T231_0M,JRE_T231_0M,     \
4625                  JRE_M231_0M,JRE_M230_0M,JRE_TC230_0ML;                                                  \
4626                D=R; TB=22;
4627            $ENDPATH
4628            $PATH Y=79; LC=3; TB=10; TE=8;
4629              C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),                                    \
4630                  (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);          \
4631                D=L;
4632              C=JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TAS,JRE_M200_0TA,JRE_M201_0TAS,JRE_TC201_0TAA,     \
4633                  JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TAS,JRE_TC201_0TAA;                              \
4634                D=L;
4635              C=<JRE_TCE257_0AL,JRE_ME256_0A,JRE_ME257_100A,JRE_THSE257_0A,JRE_TE257_0A,JRE_ME257_1000A,  \
4636                  JRE_ME256_0A,JRE_ME257_0A,JRE_TCE257_100A;                                              \
4637                D=L;
4638            $ENDPATH
4639            $PATH Y=79; LC=2; TB=18; TE=1;
4640              C=<JRE_TCE257_0AL,JRE_ME256_0A,JRE_ME257_100A,JRE_THSE257_0A,JRE_TE257_0A,JRE_ME257_1000A,  \
4641                  JRE_ME256_0A,JRE_ME257_0A,JRE_TCE257_100A;                                              \
4642                D=R;
4643              C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),            \
4644                  (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);                                  \
4645                D=R;
4646              C=JRE_TC201_0TAA,JRE_M201_0TAS,JRE_M200_0TA,JRE_TC200_0TAAL,JRE_TC201_0TAA,JRE_M201_0TAS,   \
4647                  JRE_M200_0TA,JRE_M201_0TAS,JRE_M200_0TA,JRE_TC200_0TAAL;                                \
4648                D=R;
4649            $ENDPATH
4650          $ENDSCENE
4651  #..........................................................................
4652  # 446
4653          $SCENE                                                                                          \
4654              NAME=FU446;                                                                                 \
4655              DX=800; DY=150; YDIR=U;                                                                     \
4656              BG=KISOGAWADUTSUMIST_B;                                                             \
4657              FG=KISOGAWADUTSUMIST_F;
4658            $PATH Y=39; LC=2;
4659              C=<MEI_3700FL,MEI_3850FL,MEI_3750F,MEI_3800F;                                               \
4660                D=L;
4661              M=STOP;                                                                                     \
4662                C=<MEI_3700FL,MEI_3850FL,MEI_3750F,MEI_3800F;                                             \
4663                D=L; P=*50;
4664              C=(<MEI_3200FL,MEI_3100F),(<MEI_3700FL,MEI_3850FL,MEI_3750F,MEI_3800F);                     \
4665                D=L;
4666              M=STOP;                                                                                     \
4667                C=<MEI_3200FL,MEI_3100F;                                                                  \
4668                D=L; P=<50-400;
4669              C=<MEI_3700FL,MEI_3850FL,MEI_3750F,MEI_3800F;                                               \
4670                D=L;
4671            $ENDPATH
4672            $PATH Y=39; LC=2;
4673              M=STOP;                                                                                     \
4674                C=<MEI_3200FL,MEI_3100F;                                                                  \
4675                D=R; P=>50;
4676              C=<MEI_3700FL,MEI_3850FL,MEI_3750F,MEI_3800F;                                               \
4677                D=R;
4678              M=STOP;                                                                                     \
4679                C=<MEI_3700FL,MEI_3850FL,MEI_3750F,MEI_3800F;                                             \
4680                D=R; P=*50;
4681              C=<MEI_3700FL,MEI_3850FL,MEI_3750F,MEI_3800F;                                               \
4682                D=R;
4683              C=(<MEI_3700FL,MEI_3850FL,MEI_3750F,MEI_3800F),(<MEI_3200FL,MEI_3100F);                     \
4684                D=R;
4685            $ENDPATH
4686          $ENDSCENE
4687  #..........................................................................
4688  # 447
4689          $GROUP                                                                                          \
4690              NAME=FU447;                                                                                 \
4691              LC=2; DX=800; AB=-17; BL=139; D=X;                                                          \
4692              BG=YOMIKAKI_B:,-139;                                                                \
4693              FG=YOMIKAKI_F:,-139;
4694            AP=[D=L]                                                                                      \
4695                [C=JNR_D51HVL,JNR_MANI35AL,JR_SUHAFU42K1,JNR_SUHA43K1L,JR_SUHAFU42K1L,JR_SUHAFU42K1,      \
4696                JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1L][V=4]|                                         \
4697                [D=R]                                                                                     \
4698                [C=JNR_D51HV,JR_SUHAFU42K1L,JNR_SUHA43K1L,JNR_SUHA43K1L,JR_SUHAFU42K1,JR_SUHAFU42K1L,     \
4699                JNR_SUHA43K1L,JR_SUHAFU42K1,JNR_MANI35AL][V=4];
4700            C=<JR_DC181_0JL,JR_DS180_0BA,JR_KISASHI180FL,JR_D180_0BA,JR_D180_0BA,JR_D180_0BA,             \
4701                JR_DC181_0J,JR_D180_0BA,JR_DC181_0J;
4702            C=<JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA58L,JNR_KIHA58L,JNR_KIRO28G1,JNR_KIRO28G1,JNR_KIHA58A,     \
4703                JNR_KIHA58A,JNR_KIHA58L,JNR_KIHA58A,JNR_KIHA58L,JNR_KIHA58A;
4704            AP=[D=L]                                                                                      \
4705                [C=JNR_D51HVL,JR_YO3500~OP,JR_HOKI800F,JR_HOKI800F,2*JR_G3,2*JR_G3,JR_TOM3,JR_TOM3,       \
4706                JR_TOKI15000A,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G4,2*JR_G3,2*JR_G4,2*JR_G4,KOKIH,2*JR_G4,      \
4707                JR_TAKI3000A,JR_TAKI3000A,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),2*JR_G4,       \
4708                JR_YO3500~OP][V=4]|                                                                       \
4709                [D=R]                                                                                     \
4710                [C=JNR_D51HV,JR_YO3500~OP,2*JR_G4,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),       \
4711                JR_TAKI3000A,JR_TAKI3000A,2*JR_G4,KOKIH,2*JR_G4,2*JR_G4,2*JR_G3,2*JR_G4,2*JR_G4,2*JR_G4,  \
4712                2*JR_G4,JR_TOKI15000A,JR_TOM3,JR_TOM3,2*JR_G3,2*JR_G3,JR_HOKI800F,JR_HOKI800F,            \
4713                JR_YO3500~OP][V=4];
4714            C=<JNR_KH17_0L,JNR_KH17_0;
4715          $ENDGROUP
4716  #..........................................................................
4717  # 451
4718          $SCENE                                                                                          \
4719              NAME=FU451;                                                                                 \
4720              DX=800; DY=180; YDIR=U;                                                                     \
4721              BG=KOGATAYAMABG_B;                                                                  \
4722              FG=KOGATAYAMABG_F;
4723            $PATH Y=39; LC=1;
4724              C=J_MLX01_901A,J_MLX01_22,J_MLX01_11,J_MLX01_4;                                             \
4725                D=L; V=30;
4726            $ENDPATH
4727            $PATH Y=39; LC=1; TB=6; LE=2;
4728              C=J_MLX01_4,J_MLX01_11,J_MLX01_22,J_MLX01_901A;                                             \
4729                D=R; V=30;
4730            $ENDPATH
4731          $ENDSCENE
4732  #..........................................................................
4733  # 454
4734          $GROUP                                                                                          \
4735              NAME=FU454;                                                                                 \
4736              LC=2; DX=800; AB=3; BL=119; D=X;                                                            \
4737              BG=SHINANOGAWABG_B:,-119;
4738            AP=[D=L][C=JRW_C56160L,JR_G4,JR_TOM3,JR_TOM3,JR_TOM3,2*JR_G4,JNR_WAFU29500][V=4]|             \
4739                [D=R][C=JRW_C56160,JNR_WAFU29500,2*JR_G4,JR_TOM3,JR_TOM3,JR_TOM3,JR_G4][V=4];
4740            C=JRE_KH100;                                                                                  \
4741              V=5;
4742            C=<JNR_KIHA58L,JNR_KIHA58A;                                                                   \
4743              V=5;
4744            AP=[D=L][C=JRW_C56160L,JR_HOKI800F,2*JR_G3,JR_YO2000][V=4]|                                   \
4745                [D=R][C=JRW_C56160,JR_YO2000,2*JR_G3,JR_HOKI800F][V=4];
4746            C=<JRE_KH111A,JRE_KH112A;                                                                     \
4747              V=5;
4748          $ENDGROUP
4749  #..........................................................................
4750        $ENDSECTION
4751  #----------------------------------------------------------------------------
4752  #
4753  # 600
4754  #
4755        $SECTION                                                                                          \
4756            NAME=FUK600;                                                                                  \
4757            DIS=20; %SECFIN;%FOOTER(© fukayatanteijimusyo http://www.geocities.jp/kantentomaccha/);
4758  #..........................................................................
4759  # 124
4760          $GROUP                                                                                          \
4761              NAME=FU124;                                                                                 \
4762              DX=600; AB=113; BL=9;                                                                       \
4763              BG=(SYOWASHINMT_B:,-9;TRBED43:..,^0);
4764            C=JNR_KH22F;
4765            C=JRH_DC40_100;                                                                               \
4766              V=6;
4767            C=JR_KH23;                                                                                    \
4768              V=6;
4769            C=JNR_9600DFL,JNR_WAFU29500L,JR_TOM3,JR_TOM3,JR_TOM3,JR_TOM3,JR_G4;                           \
4770              D=L; V=5;
4771            C=JNR_9600DF,JR_G4,JR_TOM3,JR_TOM3,JR_TOM3,JR_TOM3,JNR_WAFU29500L;                            \
4772              D=R; V=5;
4773          $ENDGROUP
4774  #..........................................................................
4775  # 127
4776          $GROUP                                                                                          \
4777              NAME=FU127;                                                                                 \
4778              DX=600; AB=113; BL=9;                                                                       \
4779              BG=(KOUFUKUST_B:,-9;TRBED41:..,^0);
4780            M=STOP;                                                                                       \
4781              C=JRH_DC40_100L,JRH_DC40_100L;                                                              \
4782              V=9; P=*50;
4783            M=STOP;                                                                                       \
4784              C=JRH_KH22SYU;                                                                              \
4785              D=X; V=5; P=*50;
4786            C=$DIR(JNR_9600L,JNR_9600),                                                                   \
4787                (<JR_YO2000,JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1,JNR_WAFU29500);                 \
4788              V=4;
4789          $ENDGROUP
4790  #..........................................................................
4791  # 130
4792          $GROUP                                                                                          \
4793              NAME=FU130;                                                                                 \
4794              DX=600; AB=113; BL=9;                                                                       \
4795              BG=(HOKUSHINST_B:,-9; TRBED41:..,^0);                                               \
4796              ENV=[TB=SNOW,4];
4797            M=BACK;                                                                                       \
4798              C=JRH_DC40_100S;                                                                            \
4799              D=R; P=>0+400;
4800            M=BACK;                                                                                       \
4801              C=JNR_DC56_0ADCSL,JRH_KH27_0ADCS;                                                           \
4802              D=R; P=>0+400;
4803          $ENDGROUP
4804  #..........................................................................
4805  # 229
4806          $GROUP                                                                                          \
4807              NAME=FU229;                                                                                 \
4808              SEQ=F; DX=600; AB=53; BL=69;                                                                \
4809              BG=600[A:(P1=0;P2=1;P3=2),SCENE_OHAMAGAWAB,0,0,600]:,-69;
4810            C=<JNR_KIHA58L,JNR_KIHA28,JNR_KIHA58A;                                                        \
4811              D=R; TB=1,P2,P1,3;
4812            C=<JRE_KIHA40_2000MORIOKAL,JRE_KIHA40_2000MORIOKA;                                            \
4813              D=L; V=4;
4814            M=NONE; TB=P2,8;
4815            C=JNR_DE10L,JR_HOKI800F,JR_HOKI800F,JR_HOKI800F;                                              \
4816              D=R; V=4; TB=P3,3;
4817            C=<JNR_KH40_2000L,JNR_KH40_2000,JRE_KH48_0;                                                   \
4818              D=L; V=5;
4819          $ENDGROUP
4820  #..........................................................................
4821  # 230
4822          $SCENE                                                                                          \
4823              NAME=FU230;                                                                                 \
4824              DX=600; DY=180; YDIR=U;                                                                     \
4825              BG=TYOKAIMT_B;                                                                      \
4826              FG=TYOKAIMT_F;
4827            $PATH Y=29; LC=2;
4828              C=JNR_EF81D,9-12*KOKIA;                                                                     \
4829                D=L;
4830              C=JNR_TC481_0BAL,JNR_M485AAL,JNR_M484_0AAL,JNR_M485AAL,JNR_M484_0AAL,JNR_TD481AL,           \
4831                  JNR_M485AAL,JNR_M484_0AAL,JNR_M485AAL,JNR_M484_0AAL,JNR_TS481_0BAL,JNR_TC481_0BA;       \
4832                D=L;
4833              C=JRE_DC40NGT,JRE_DC40NGT;                                                                  \
4834                D=L;
4835              C=JNR_EF81D,JRE_KANI24AL,JRE_ORONE24,JRE_OHANEFU24,JRE_OHANE24,JRE_OHANE24,JRE_OHANE24,     \
4836                  JRE_OHANE24,JRE_OHANE24,JRE_OHANE24,JRE_OHANEFU24,JRE_OHANE24,JRE_OHANEFU24;            \
4837                D=L;
4838            $ENDPATH
4839            $PATH Y=29; LC=2;
4840              C=JRE_DC40NGT,JRE_DC40NGT;                                                                  \
4841                D=R;
4842              C=JNR_EF81D,JRE_OHANEFU24,JRE_OHANE24,JRE_OHANEFU24,JRE_OHANE24,JRE_OHANE24,JRE_OHANE24,    \
4843                  JRE_OHANE24,JRE_OHANE24,JRE_OHANE24,JRE_OHANEFU24,JRE_ORONE24,JRE_KANI24AL;             \
4844                D=R;
4845              C=JNR_EF81D,9-12*KOKIA;                                                                     \
4846                D=R;
4847              C=JNR_TC481_0BA,JNR_TS481_0BAL,JNR_M484_0AAL,JNR_M485AAL,JNR_M484_0AAL,JNR_M485AAL,         \
4848                  JNR_TD481AL,JNR_M484_0AAL,JNR_M485AAL,JNR_M484_0AAL,JNR_M485AAL,JNR_TC481_0BAL;         \
4849                D=R;
4850            $ENDPATH
4851          $ENDSCENE
4852  #..........................................................................
4853  # 241
4854          $GROUP                                                                                          \
4855              NAME=FU241;                                                                                 \
4856              DX=600; AB=-17; BL=139;                                                                     \
4857              BG=KURAGAWABG_B:,-139;
4858            AP=[D=L]                                                                                      \
4859                [C=JR_C11325MOKAL,JR_YO3500~OP,JR_TORA60000A,JR_TORA60000A,JR_TORA60000A,JR_TORA60000A]   \
4860                [V=4]|[D=R][C=JR_C11325MOKA,JR_TOM3,JR_TOM3,JR_TOM3,JR_TOM3,JR_YO3500~OP][V=4];
4861            C=<JNR_KH40_2000,JNR_KIHA28;                                                                  \
4862              V=5;
4863            C=JNR_KH52;                                                                                   \
4864              V=6;
4865            AP=[D=L][C=JR_C11325MOKAL,JNR_WAFU29500L][V=4]|[D=R][C=JR_C11325MOKA,JNR_WAFU29500L][V=4];
4866          $ENDGROUP
4867  #..........................................................................
4868  # 246
4869          $GROUP                                                                                          \
4870              NAME=FU246;                                                                                 \
4871              DX=600; AB=53; BL=69;                                                                       \
4872              BG=TANBOISHINOMAKI_B:,-69;
4873            C=JR_C11325MOKAL,(<JR_SUHAFU42K1,JNR_OHA35CK1,JR_SUHA32BKL);                                  \
4874              V=4;
4875            C=<JRE_KH40TOHOKU,JRE_KH48TOHOKUL,JRE_KH48TOHOKU;                                             \
4876              V=5;
4877            C=<JNR_DE10L,JRH_SUHAFU14_550L,JRE_OHA14_0C,JRE_OHA14_0CL,JRE_OHA14_0C,JRE_SUHAFU14_0BAR,     \
4878                JNR_DE10L;                                                                                \
4879              V=5;
4880            C=JNR_DE10L,10-14*KOKI55,KOKIE;                                                               \
4881              V=4;
4882          $ENDGROUP
4883  #..........................................................................
4884  # 359
4885          $SCENE                                                                                          \
4886              NAME=FU359;                                                                                 \
4887              DX=600; DY=150; YDIR=U;                                                                     \
4888              BG=TACHIKAWARITTAI_B;                                                               \
4889              FG=TACHIKAWARITTAI_F;                                                               \
4890              LT=110;                                                                                     \
4891              FIN=W;
4892            $PATH Y=93; ENV=[TE=35];
4893              C=JRF_EH200_2,(8-11*KOKI55,KOKIE);                                                          \
4894                D=L;
4895              C=JRF_EF210_100BL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,              \
4896                  JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,             \
4897                  JR_TAKI1000JEL;                                                                         \
4898                D=L;
4899              C=JRE_TC205NL,(<JRE_M204N,JRE_M205N),(<JRE_M204N,JRE_M205N),JRE_TC205N;                     \
4900                D=L;
4901            $ENDPATH
4902            $PATH Y=93;                                                                                   \
4903                BG=TACHIKAWARITTAI_M:,-93;                                                        \
4904                ENV=[TB=20][TE=20];
4905              C=JRF_EH200_2,9-12*KOKIA;                                                                   \
4906                D=R;
4907              C=JRE_TC205N,(<JRE_M204N,JRE_M205N),(<JRE_M204N,JRE_M205N),JRE_TC205NL;                     \
4908                D=R;
4909              C=JRF_EF210_100BL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,              \
4910                  JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,             \
4911                  JR_TAKI1000JEL;                                                                         \
4912                D=R;
4913            $ENDPATH
4914            $PATH Y=93; ENV=[TB=10][TE=30];
4915              C=<JRE_TCE351_1000BL,JRE_ME350_1000B,JRE_ME351_1000B,JRE_TSE351_1000B,JRE_TE351_1000B,      \
4916                  JRE_ME350_1100B,JRE_ME351_1100B,JRE_TCE351_1300B,JRE_TCE351_1200BL,JRE_ME350_1000B,     \
4917                  JRE_ME351_1100B,JRE_TCE351_1100B;                                                       \
4918                D=L;
4919              C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),                                    \
4920                  (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);          \
4921                D=L;
4922            $ENDPATH
4923            $PATH Y=93; ENV=[TB=30][TE=10];
4924              C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),            \
4925                  (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);                                  \
4926                D=R;
4927              C=<JRE_TCE351_1000BL,JRE_ME350_1000B,JRE_ME351_1000B,JRE_TSE351_1000B,JRE_TE351_1000B,      \
4928                  JRE_ME350_1100B,JRE_ME351_1100B,JRE_TCE351_1300B,JRE_TCE351_1200BL,JRE_ME350_1000B,     \
4929                  JRE_ME351_1100B,JRE_TCE351_1100B;                                                       \
4930                D=R;
4931            $ENDPATH
4932          $ENDSCENE
4933  #..........................................................................
4934  # 448
4935          $SCENE                                                                                          \
4936              NAME=FU448;                                                                                 \
4937              DX=600; DY=180; YDIR=U;                                                                     \
4938              BG=IRAGOMISAKI_B;                                                                   \
4939              FG=J_LIGHTHOUSE1:<0;
4940            $PATH Y=13; LC=2; TE=15; V=2; IMGY=60;
4941              C=TOBAMARU2;
4942            $ENDPATH
4943            $PATH Y=53; LC=2; TB=15; V=1; IMGY=120;
4944              C=TOBAMARU1;
4945            $ENDPATH
4946          $ENDSCENE
4947  #..........................................................................
4948  # 453
4949          $GROUP                                                                                          \
4950              NAME=FU453;                                                                                 \
4951              LC=2; DX=600; AB=63; BL=59; D=X;                                                            \
4952              BG=KUMAKIBG_B:,-59;                                                         \
4953              FG=KUMAKIBG_F:,-59;
4954            AP=[D=L][C=JRW_C56160L,2*JR_G3,JR_G4,JR_YO3500~OP][V=4]|                                      \
4955                [D=R][C=JRW_C56160,JR_YO3500~OP,JR_G4,2*JR_G3][V=4];
4956            C=<JNR_KH17_0L,JNR_KH17_0,JNR_KH17_0DHPGA,JNR_KH17_19DPGA;                                    \
4957              V=5;
4958            C=<JNR_KIHA58L,JNR_KIRO28G1,JNR_KIHA28,JNR_KIHA58A;                                           \
4959              V=5;
4960            AP=[D=L][C=JRW_C56160L,JR_MAITE39_11KL,JR_SUHAFU12L,JR_OHA12,JR_OHA12,JR_OHAFU13][V=4]|       \
4961                [D=R][C=JRW_C56160,JR_OHAFU13,JR_OHA12,JR_OHA12,JR_SUHAFU12L,JR_MAITE39_11KL][V=4];
4962            AP=[D=L][C=JRW_C56160L,JR_TOM3,JR_G4,JNR_WAFU29500,JR_G4][V=4]|                               \
4963                [D=R][C=JRW_C56160,JR_G4,JNR_WAFU29500,JR_G4,JR_TOM3][V=4];
4964          $ENDGROUP
4965  #..........................................................................
4966  # 456
4967          $GROUP                                                                                          \
4968              NAME=FU456;                                                                                 \
4969              DX=600; AB=113; BL=9; D=X;                                                                  \
4970              BG=(IOUZEN_B:,-9;TRBED43:..,^0);
4971            C=JRC_DC40_2000HIMI;                                                                          \
4972              V=5;
4973            C=<JRC_DC47HIMIL,JRC_DC47HIMI;                                                                \
4974              V=5;
4975            AP=[D=L][C=JNR_DE10L,JR_OHAFU33CB2,JNR_OHA46B1L,JNR_OHA35CK1,JR_OHAFU33CB2L][V=5]|            \
4976                [D=R][C=JNR_DE10L,JR_OHAFU33CB2L,JNR_OHA35CK1,JNR_OHA46B1L,JR_OHAFU33CB2][V=5];
4977            C=JNR_KH40_2000;                                                                              \
4978              V=5;
4979            C=<JNR_DC45SYUAL,JNR_DC30SYU,JNR_DC30SYU,JNR_DC45SYUB;                                        \
4980              V=5;
4981          $ENDGROUP
4982  #..........................................................................
4983  # 457
4984          $GROUP                                                                                          \
4985              NAME=FU457;                                                                                 \
4986              DX=600; AB=83; BL=9; D=X;                                                                   \
4987              BG=(CHIYOST_B:,-9;TRBED43:..,^0);                                                   \
4988              FG=SCENE_AF_GRASS:<50-1100,-9;
4989            M=STOP;                                                                                       \
4990              C=<JRC_TC118_5300CL,JRC_MC119_5000C;                                                        \
4991              V=5; P=<50-150;
4992            C=<JRC_TC372_0BL,JRC_T373_0B,JRC_MC373_0B;                                                    \
4993              V=5;
4994            M=STOP;                                                                                       \
4995              C=JRC_MC119_5100C;                                                                          \
4996              V=5; P=<50-150;
4997            M=STOP;                                                                                       \
4998              C=<JRC_MC119_5100C,JRC_TC118_5300CL,JRC_MC119_5000C;                                        \
4999              V=5; P=<50-150;
5000            C=<JNR_TC165CXL,JNR_M164_0CX,JNR_MC165CX;                                                     \
5001              V=5;
5002          $ENDGROUP
5003  #..........................................................................
5004        $ENDSECTION
5005  #----------------------------------------------------------------------------
5006  #
5007  # Short
5008  #
5009        $SECTION                                                                                          \
5010            NAME=FUKNARROW;                                                                               \
5011            DIS=20; %SECFIN;%FOOTER(© fukayatanteijimusyo http://www.geocities.jp/kantentomaccha/);
5012  #..........................................................................
5013  # 126
5014          $GROUP                                                                                          \
5015              NAME=FU126;                                                                                 \
5016              DX=500; AB=83; BL=9;                                                                        \
5017              BG=(TOMIUCHIST_B:,-9;TRBED43:..,^0);
5018            C=JNR_KH21_0A;                                                                                \
5019              V=9;
5020            C=JRH_KH22SYU;                                                                                \
5021              V=5;
5022            AP=[D=L][C=JNR_D51HKDL,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_YO3500~OP][V=4]|   \
5023                [D=R][C=JNR_D51HKD,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_YO3500~OP][V=4];
5024            C=JNR_DD13C,JNR_WAFU29500L;                                                                   \
5025              V=5;
5026          $ENDGROUP
5027  #..........................................................................
5028  # 243
5029          $GROUP                                                                                          \
5030              NAME=FU243;                                                                                 \
5031              DX=300; AB=113; BL=9;                                                                       \
5032              BG=KOYOSHIST_B:,-9;                                                         \
5033              FG=KOYOSHIST_F:,-9;
5034            M=STOP;                                                                                       \
5035              C=<JRE_KH48_0L,JNR_KIHA58A;                                                                 \
5036              V=5; P=<0+0;
5037            M=STOP;                                                                                       \
5038              C=<JNR_KH22E,JNR_KH17_0L,JNR_KH17_0;                                                        \
5039              V=6; P=<0+0;
5040            AP=[D=L][C=JR_C11325MOKAL,JR_YO3500~OP,2*JR_G4,2*JR_G3,2*JR_G4,JR_TOM3][V=4]|                 \
5041                [D=R][C=JR_C11325MOKAL,2*JR_G4,2*JR_G3,2*JR_G3,JR_TOM3,JR_YO3500~OP][V=4];
5042            M=STOP;                                                                                       \
5043              C=JR_C11325MOKAL,JNR_WAFU29500L;                                                            \
5044              V=4; P=<0+0;
5045          $ENDGROUP
5046  #..........................................................................
5047  # 244
5048          $SCENE                                                                                          \
5049              NAME=FU244;                                                                                 \
5050              DX=300; DY=180; YDIR=U;                                                                     \
5051              BG=YAKUSHIDOST_B;
5052            $PATH Y=9; LC=2;                                                                              \
5053                BG=YAKUSHIDOST_M:,-9;
5054              M=STOP;                                                                                     \
5055                C=YURI_1500D;                                                                             \
5056                D=L; P=<0; TE=5;
5057              M=STOP;                                                                                     \
5058                C=YURI_1500D;                                                                             \
5059                D=R; P=<0; TB=4;
5060            $ENDPATH
5061            $PATH Y=9; LC=2;
5062              C=JRF_EF81D,8-12*KOKID;                                                                     \
5063                D=L;
5064            $ENDPATH
5065            $PATH Y=9; LC=2;
5066              C=JRF_EF81D,8-12*KOKID;                                                                     \
5067                D=R;
5068            $ENDPATH
5069          $ENDSCENE
5070  #..........................................................................
5071  # 245
5072          $GROUP                                                                                          \
5073              NAME=FU245;                                                                                 \
5074              DX=400; AB=43; BL=79;                                                                       \
5075              BG=HEIGAWA14B:,-79;                                                         \
5076              FG=HEIGAWA14F:,-79;
5077            AP=[D=L]                                                                                      \
5078                [C=JNR_C58HL,JNR_WAFU29500L,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),2*JR_G4,     \
5079                JR_YO3500~OP][V=4]|                                                                       \
5080                [D=R]                                                                                     \
5081                [C=JNR_C58H,JR_YO3500~OP,2*JR_G4,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),        \
5082                JNR_WAFU29500L][V=4];
5083            C=<JRE_KH111AL,JRE_KH111A,JRE_KH112A;                                                         \
5084              V=5;
5085            C=<JNR_KIHA58L,JNR_KIHA28,JNR_KIHA58A;                                                        \
5086              V=6;
5087            C=<JNR_KIHA58L,JNR_DC52_100;                                                                  \
5088              V=5;
5089            C=<JRE_KH111A,JRE_KH112A;                                                                     \
5090              V=5;
5091          $ENDGROUP
5092  #..........................................................................
5093  # 248
5094          $SCENE                                                                                          \
5095              NAME=FU248;                                                                                 \
5096              DX=300; DY=180; YDIR=U;                                                                     \
5097              BG=AOIMORIPARK_B;
5098            $PATH Y=4; LC=4;
5099              C=DUP_TOYOTA_PRIUS_2004;                                                                    \
5100                D=L; TB=2;
5101              C=DUP_SUZUKI_ALTO;                                                                          \
5102                D=L;
5103              C=DUP_BUS_AOMORI1L;                                                                         \
5104                D=L;
5105            $ENDPATH
5106            $PATH Y=9; LC=4;
5107              C=DUP_BUS_AOMORI1;                                                                          \
5108                D=R;
5109              C=DUP_TOYOTA_PRIUS_2004;                                                                    \
5110                D=R;
5111              C=DUP_SUZUKI_ALTO;                                                                          \
5112                D=R;
5113            $ENDPATH
5114          $ENDSCENE
5115  #..........................................................................
5116  # 442
5117          $SCENE                                                                                          \
5118              NAME=FU442;                                                                                 \
5119              DX=300; DY=180; YDIR=U;                                                                     \
5120              BG=ICHINOMACHIBG_B;                                                         \
5121              FG=ICHINOMACHIBG_F;
5122            $PATH Y=79; LC=2;                                                                             \
5123                BG=ICHINOMACHIBG_M:<50-150,^101;                                                  \
5124                TB=8;
5125              C=JRF_EF64_1028L,24-30*(JR_HOKI9500YAHASHI1[O:GRAVEL(3|4|5|9),,24]|JR_HOKI9500YAHASHI2);    \
5126                D=L;
5127              M=STOP;                                                                                     \
5128                C=JRC_313_1500MCL,JRC_313_1500TL,JRC_313_1500M2L,JRC_313_1500TL,JRC_313_1500M2L,          \
5129                  JRC_312_1500TC;                                                                         \
5130                D=L; P=<50-50;
5131              C=JNR_TC481_0BAL,JNR_M485AAL,JNR_M484_0ADCAL,JNR_T481_0AAL,JNR_M485AAL,JNR_M484_0ADCAL,     \
5132                  JNR_TD481AL,JNR_TS481_0BAL,JNR_TS481_0BAL,JNR_M485AAL,JNR_M484_0ADCAL,JNR_TC481_0BA;    \
5133                D=L;
5134              M=STOP;                                                                                     \
5135                C=JRC_313_1500MCL,JRC_313_1500TL,JRC_313_1500M2L,JRC_312_1500TC;                          \
5136                D=L; P=<50+50;
5137              C=JRF_EF200_11N,3*KOKIC,8-12*(6:KOKIF|KOKIC),3*KOKIC,8-12*(10:KOKI24|3:KOKI23|1:KOKI22);    \
5138                D=L;
5139            $ENDPATH
5140            $PATH Y=79; LC=2; TE=8;
5141              M=STOP;                                                                                     \
5142                C=JRC_312_1500TC,JRC_313_1500M2L,JRC_313_1500TL,JRC_313_1500MCL;                          \
5143                D=R; P=<50-100;
5144              C=JRF_EF200_11N,10*KOKI15,10*KOKIC,3*KOKIC,3*KOKIC;                                         \
5145                D=R;
5146              C=JRF_EF64_1028L,24-30*(JR_HOKI9500YAHASHI1[O:GRAVEL(3|4|5|9),,24]|JR_HOKI9500YAHASHI2);    \
5147                D=R;
5148              M=STOP;                                                                                     \
5149                C=JRC_312_1500TC,JRC_313_1500M2L,JRC_313_1500TL,JRC_313_1500M2L,JRC_313_1500TL,           \
5150                  JRC_313_1500MCL;                                                                        \
5151                D=R; P=<50+50;
5152              C=JNR_TC481_0BA,JNR_M484_0ADCAL,JNR_M485AAL,JNR_TS481_0BAL,JNR_TS481_0BAL,JNR_TD481AL,      \
5153                  JNR_M484_0ADCAL,JNR_M485AAL,JNR_T481_0AAL,JNR_M484_0ADCAL,JNR_M485AAL,JNR_TC481_0BAL;   \
5154                D=R;
5155            $ENDPATH
5156          $ENDSCENE
5157  #..........................................................................
5158  # 444
5159          $SCENE                                                                                          \
5160              NAME=FU444;                                                                                 \
5161              DX=500; DY=180; YDIR=U;                                                                     \
5162              BG=KOUDAIMONBG_B;                                                                   \
5163              FG=KOUDAIMONBG_F;                                                                   \
5164              IMGY=83;
5165            $PATH Y=97; LC=2; TB=12; V=10;
5166              C=DUP_JNR_EF66B,19*DUP_JRF_RESA10000,DUP_JRF_REMUFU10000,3*DUP_JRF_RESA10000,               \
5167                  DUP_JRF_REMUFU10000;                                                                    \
5168                D=L;
5169              C=DUP_JNR_EF66B,DUP_JNR_EF66B;                                                              \
5170                D=L;
5171              C=DUP_JNR_EF66B,18-22*DUP_JRF_RESA10000,DUP_JRF_REMUFU10000;                                \
5172                D=L;
5173            $ENDPATH
5174            $PATH Y=97; LC=2; TE=12; V=12;
5175              C=DUP_JNR_EF66B,DUP_JNR_EF66B;                                                              \
5176                D=R;
5177              C=DUP_JNR_EF66B,19*DUP_JRF_RESA10000,DUP_JRF_REMUFU10000,3*DUP_JRF_RESA10000,               \
5178                  DUP_JRF_REMUFU10000;                                                                    \
5179                D=R;
5180              C=DUP_JNR_EF66B,18-22*DUP_JRF_RESA10000,DUP_JRF_REMUFU10000;                                \
5181                D=R;
5182            $ENDPATH
5183          $ENDSCENE
5184  #..........................................................................
5185  # 452
5186          $GROUP                                                                                          \
5187              NAME=FU452;                                                                                 \
5188              LC=2; DX=300; AB=113; BL=9; D=X;                                                            \
5189              BG=(ONNAIWA_B:,-9;TRBED43:..,^0);
5190            AP=[D=L][C=JRW_C56160,JR_SUHAFU12L,JR_OHA12,JR_OHA12,JR_OHAFU13][V=4]|                        \
5191                [D=R][C=JRW_C56160,JR_OHAFU13,JR_OHA12,JR_OHA12,JR_SUHAFU12L][V=4];
5192            C=JRC_DC40_2000HIMI;                                                                          \
5193              V=5;
5194            C=<JRC_DC47HIMIL,JRC_DC47HIMI;                                                                \
5195              V=5;
5196            C=JRW_C56160,1;                                                                               \
5197              V=4;
5198            C=<JRC_DC47HIMIL,JRC_DC47HIMI,JRC_DC40_2000HIMI;                                              \
5199              V=5;
5200          $ENDGROUP
5201  #..........................................................................
5202  # 458
5203          $GROUP                                                                                          \
5204              NAME=FU458;                                                                                 \
5205              LC=2; DX=300; AB=83; BL=9; D=R;                                                             \
5206              BG=(KAMISUWAST_B:,-9;TRBED14:..,^0);                                                \
5207              B=0.002;                                                                                    \
5208              TE=4;
5209            M=STOP;                                                                                       \
5210              C=<JRE_TC115_1000HL,JRE_M114_1000H,JRE_MC115_1000H;                                         \
5211              P=<50;
5212            M=STOP;                                                                                       \
5213              C=<JRE_TCE351_1000BL,JRE_ME350_1000B,JRE_ME351_1000B,JRE_TSE351_1000B,JRE_TE351_1000B,      \
5214                JRE_ME350_1100B,JRE_ME351_1100B,JRE_TCE351_1300B,JRE_TCE351_1200BL,JRE_ME350_1000B,       \
5215                JRE_ME351_1100B,JRE_TCE351_1100B;                                                         \
5216              D=R; P=*50;
5217            M=STOP;                                                                                       \
5218              C=JRF_EH200_2,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,   \
5219                JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,               \
5220                JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL,               \
5221                JR_TAKI1000JEL,JR_TAKI1000JEL,JR_TAKI1000JEL;                                             \
5222              P=*50;
5223            M=STOP;                                                                                       \
5224              C=<JRE_TCE257_0AL,JRE_ME256_0A,JRE_ME257_100A,JRE_THSE257_0A,JRE_TE257_0A,JRE_ME257_1000A,  \
5225                JRE_ME256_0A,JRE_ME257_0A,JRE_TCE257_100A;                                                \
5226              P=*50;
5227            M=STOP;                                                                                       \
5228              C=JNR_MC165CX,JNR_M164_0CX47,JNR_TS165C,JNR_TS165C,JNR_TB165_0A,JNR_MC165CX,                \
5229                JNR_M164_0CX47,JNR_TC165CXL,JNR_MC165CX,JNR_M164_0CX47,JNR_TC165CXL,JNR_TC165CXL;         \
5230              P=*50;
5231          $ENDGROUP
5232  #..............................................................................
5233        $ENDSECTION
5234  #------------------------------------------------------------------------------
5235  #
5236  # Other authors
5237  #
5238        $SECTION LC=1;
5239  #..............................................................................
5240          $SCENE                                                                                          \
5241              NAME=TKJ2;                                                                                  \
5242              DX=1600; DY=130; YDIR=U;                                                                    \
5243              BG=(TRBED14:..; SIG_J4:0+480,4; CROSS_J4B:0+566,4; SCENE_KOMAGATAKE3:<0,9);                 \
5244              FG=(SIG_J4R:0+675,4; CROSS_J4F:0+536,4; CROSS_ROAD1:0+552,^9; 20*PLF_J2A,PLF_J2B:<0-14,4;   \
5245              106*(PLF_J2I,PLF_J2H):<0-2,17; FL_J3F:..,4,0);                                              \
5246              LG=XC:D1,U1,D2,U2:XDOWN,XUP;
5247            $PATH Y=9; LC=2;                                                                              \
5248                BG=(PLF_J2E:<0+27,8; 10*PLF_J2F:<0,41;PLF_J2D:0+238,8;PLF_J2C:0+257,8);                   \
5249                WP=0+500,<TB:SCFG1.SIGR;
5250              M=STOP; POOL=JP_ECH; D=L; P=>0+380; TB=SCFG1.SIGYG,D1,4; T=U1,7;
5251            $ENDPATH
5252            $PATH Y=9; LC=2; WP=(0+650,>TE:U2;0+580,>TB:SCBG.SIGR);
5253              M=STOP; POOL=JP_ECH; D=R; P=>0+395; TE=U2,4; T=5,D2,3,SCBG.SIGG,5;
5254            $ENDPATH
5255          $ENDSCENE
5256  #..............................................................................
5257          $GROUP                                                                                          \
5258              NAME=TKJ1;                                                                                  \
5259              LC=3; DX=1600; IMGY=75; AB=63; BL=9;                                                        \
5260              BG=(SCENE_A1008:<0; SIG_J2:<0+595,-5; FL_J3B:..,-5,-9; CROSS_J4B:<0+495,-5; TRBED41:..,^0); \
5261              FG=(SIG_J2[M]:<0+730,-5; CROSS_ROAD1:<0+491,^0; CROSS_J4F:<0+465,-5; PLF_J2E:<0+27,8;       \
5262              10*PLF_J2F:<0,41; PLF_J2D:0+238,8; PLF_J2C:0+257,8; 106*(PLF_J2I,PLF_J2H):<0-2,8;           \
5263              20*PLF_J2A,PLF_J2B:<0-14,-5);                                                               \
5264              WP=(0+700,>TE:XUP; 0+620,<TB:FG.SIGR);
5265            M=STOP; POOL=JP_ECH; D=L; P=>0+380; TB=FG.SIGG,2,XDOWN,4; T=XUP,7;
5266            M=STOP; POOL=JP_ECH; D=R; P=>0+380; TB=BG.SIGG; T=5,XDOWN,5;
5267          $ENDGROUP
5268  #..............................................................................
5269        $ENDSECTION
5270      $ENDSECTION
5271  #------------------------------------------------------------------------------
5272  #
5273  # Long
5274  #
5275      $SECTION                                                                                            \
5276          NAME=FUKWIDE;                                                                                   \
5277          LC=1; %FOOTER(© fukayatanteijimusyo https://fukayoid.main.jp/trainkit.htm);
5278  #..............................................................................
5279  # 116
5280  #   this scene is not long, but needs to be run alone
5281        $GROUP                                                                                            \
5282            NAME=FU116;                                                                                   \
5283            LC=6; DX=1200; AB=63; BL=9;                                                                   \
5284            BG=(SCENE_JOMONB:,-9; TRBED44:..,^0;                                                          \
5285            150[A:(A2=0;C2=1;A1=2;B1=3;C1=4;B2=5),SCENE_JOMONT,0,0,150]:<0+40,64);                        \
5286            FG=(SCENE_JOMONF2:<0+422,-9; 402[A:(AF=0;AB=1),SCENE_JOMONF1,0,0,402]:<0+20,0;                \
5287            415[A:(CF=0;CB=1),SCENE_JOMONF3,0,0,415]:<0+785,0; FIELD02:>100,-9);                          \
5288            Y=*;
5289          C=JRH_DC40_700L,JRH_DC40_700L;                                                                  \
5290            D=L; TB=A2,AB,CF,4;
5291          C=>JNR_DC183_900A,JNR_D182_900A,JNR_D182_900A,JNR_DS182_900A,JNR_D182_900A,JNR_D182_900A,       \
5292              JNR_D182_900A,JNR_D182_900A,JNR_DC183_900BL;                                                \
5293            D=R; TB=C2,AF,CF,4;
5294          C=JRH_DC54L;                                                                                    \
5295            D=R; TB=A1,AB,CB,4;
5296          C=>JNR_DC183_900A,JNR_D182_900A,JNR_D182_900A,JNR_DS182_900A,JNR_D182_900A,JNR_D182_900A,       \
5297              JNR_D182_900A,JNR_D182_900A,JNR_DC183_900BL;                                                \
5298            D=L; TB=B1,AF,CB,4;
5299          C=JRH_DC54L;                                                                                    \
5300            D=R; TB=C1,AF,CB,4;
5301          C=JR_DD51_500A,10*KOKI55,JR_DD51_500A;                                                          \
5302            D=L; TB=B2,AF,CF,4;
5303        $ENDGROUP
5304  #..........................................................................
5305  # 107 modified
5306        $GROUP                                                                                            \
5307            NAME=FU107M;                                                                                  \
5308            DX=2400; AB=83; BL=9; VM=HEAD;                                                                \
5309            BG=(FORESTW1:..; TRBED41:..,^0);                                                              \
5310            FG=(0[AR:PLF_J3(B,13*A,#B)][O:PHOTOGRAPHER1,34][O:J_STOP1,71,0]:0+180,-1;                     \
5311            0[AR:PLF_J3(B,13*A,#B)][O:PHOTOGRAPHER1,34][O:J_STOP2,71,0]:0+490,-1;                         \
5312            0[AR:PLF_J3(B,13*A,#B)][O:PHOTOGRAPHER1,34][O:J_STOP3,71,0]:0+850,-1;                         \
5313            0[AR:PLF_J3(B,13*A,#B)][O:PHOTOGRAPHER1,34][O:J_STOP4,71,0]:0+1540,-1);                       \
5314            Y=*;                                                                                          \
5315            BGC=#45B5FF;
5316          C=JR_DD53_2EL;                                                                                  \
5317            V=4; TE=3;
5318        $ENDGROUP
5319  #..........................................................................
5320  # 207
5321        $GROUP                                                                                            \
5322            NAME=FU207;                                                                                   \
5323            DX=2350; AB=-2; BL=124; VM=HEAD;                                                              \
5324            BG=TADAMI3B:,-124;                                                                    \
5325            FG=TADAMI3F:,-124;                                                                    \
5326            Y=*;
5327          C=JR_DE15SNOW1;                                                                                 \
5328            V=4;
5329          C=JNR_KH40_2000;                                                                                \
5330            V=5;
5331          C=JRE_KH40TOHOKUL;                                                                              \
5332            V=5.5;
5333          C=2*JRE_KH40TOHOKUL;                                                                            \
5334            V=5;
5335          C=<JRE_KH40TOHOKUL,JNR_KH40_2000;                                                               \
5336            V=5.5;
5337        $ENDGROUP
5338  #..........................................................................
5339  # 212
5340        $GROUP                                                                                            \
5341            NAME=FU212;                                                                                   \
5342            DX=5000; AB=80; BL=42; VM=HEAD;                                                               \
5343            BG=TADAMI8B:,-42;                                                                     \
5344            FG=TADAMI8F:,-42;                                                                     \
5345            Y=*;
5346          C=<JRE_KH48KAZEKKO1L,JRE_KH48KAZEKKO2;                                                          \
5347            V=4;
5348          C=<JR_MAYA34,JNR_DE10;                                                                          \
5349            V=4;
5350        $ENDGROUP
5351  #..........................................................................
5352  # 325
5353        $GROUP                                                                                            \
5354            NAME=FU325;                                                                                   \
5355            DX=4000; AB=74; BL=48; VM=HEAD;                                                               \
5356            BG=(SAKAWAGAWAB:,-48;SIG_J4:<0+126,-5;CROSS_J5B:<0+2841,-5);                          \
5357            FG=(SIG_J4R:<0+2600,-5;CROSS_J5F:<0+2814,-5;SAKAWAGAWAF:,-48);                        \
5358            WP=(0+226,>TB:BG.SIGR;0+2500,<TB:FG.SIGR;0+2980,>TE:XUP; 0+2800,<TE:XUP;0+300,>TB:XRIGHT);    \
5359            ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,<XLEFT,3][D=X];                                   \
5360            Y=*;
5361          C=<JNR_TC115_0SJAAL,JRE_M114_0SAA,JNR_MC115_0SJA;                                               \
5362            V=7;
5363          C=<JRC_MC371_0BL,JRC_M370_100BL,JRC_THS371_100BL,JRC_THS371_0B,JRC_M371_200B,JRC_M370_0B,       \
5364              JRC_MC371_0B;                                                                               \
5365            V=7;
5366          C=<JRC_313_1500MCL,JRC_312_1500TC;                                                              \
5367            V=6.5;
5368          C=<JNR_TC115_0SJAAL,JRE_M114_0SAA,JNR_MC115_0SJA;                                               \
5369            V=7;
5370          C=<JRC_313_1500MCL,JRC_313_1500M,JRC_312_1500TC;                                                \
5371            V=6.5;
5372        $ENDGROUP
5373  #..........................................................................
5374  # 366
5375        $SCENE                                                                                            \
5376            NAME=FU366;                                                                                   \
5377            DX=2000; DY=150; YDIR=U; VM=INDEP;                                                            \
5378            BG=SYOHEIBASHIBG_B;                                                                   \
5379            FG=SYOHEIBASHIBG_F;                                                                   \
5380            Y=*;
5381          $PATH Y=64; LC=2;                                                                               \
5382              BG=SYOHEIBASHIBG_M:<0+0,^86;                                                        \
5383              FG=SIG_J4R:<0+1500,-5;                                                                      \
5384              ENV=[TB=FG.SIGG];
5385            C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),                                      \
5386                (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);            \
5387              D=L;
5388            C=JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TAS,JRE_M200_0TA,JRE_M201_0TAS,JRE_TC201_0TAA,       \
5389                JRE_TC200_0TAAL,JRE_M200_0TA,JRE_M201_0TAS,JRE_TC201_0TAA;                                \
5390              D=L;
5391            C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),                                      \
5392                (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);            \
5393              D=L;
5394            C=JNR_TC103OL,(<JNR_M102O,JNR_M103O),JNR_T103O,(<JNR_M102O,JNR_M103O),JNR_T103O,              \
5395                (<JNR_M102O,JNR_M103O),JNR_TC103O;                                                        \
5396              D=L;
5397            C=<JRE_TCE257_0AL,JRE_ME256_0A,JRE_ME257_100A,JRE_THSE257_0A,JRE_TE257_0A,JRE_ME257_1000A,    \
5398                JRE_ME256_0A,JRE_ME257_0A,JRE_TCE257_100A;                                                \
5399              D=L;
5400          $ENDPATH
5401          $PATH Y=64; LC=2;                                                                               \
5402              BG=SIG_J4:<0+720,-5;                                                                        \
5403              ENV=[TB=15];
5404            C=JNR_TC103O,(<JNR_M102O,JNR_M103O),JNR_T103O,(<JNR_M102O,JNR_M103O),JNR_T103O,               \
5405                (<JNR_M102O,JNR_M103O),JNR_TC103OL;                                                       \
5406              D=R;
5407            C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),              \
5408                (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);                                    \
5409              D=R;
5410            C=<JRE_TCE257_0AL,JRE_ME256_0A,JRE_ME257_100A,JRE_THSE257_0A,JRE_TE257_0A,JRE_ME257_1000A,    \
5411                JRE_ME256_0A,JRE_ME257_0A,JRE_TCE257_100A;                                                \
5412              D=R;
5413            C=(<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM4,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3),              \
5414                (<JRE_E233CTC2L,JRE_E233CM3,JRE_E233CM1,JRE_E233CTC3);                                    \
5415              D=R;
5416            C=JRE_TC201_0TAA,JRE_M201_0TAS,JRE_M200_0TA,JRE_TC200_0TAAL,JRE_TC201_0TAA,JRE_M201_0TAS,     \
5417                JRE_M200_0TA,JRE_M201_0TAS,JRE_M200_0TA,JRE_TC200_0TAAL;                                  \
5418              D=R;
5419          $ENDPATH
5420        $ENDSCENE
5421  #..........................................................................
5422  # 374 TOP
5423        $SCENE                                                                                            \
5424            NAME=FU374;                                                                                   \
5425            DX=8000; DY=150; YDIR=U; VM=HEAD;                                                             \
5426            BG=ARAKAWANAKAGAWABGTOZAI_B;                                                          \
5427            FG=ARAKAWANAKAGAWABGTOZAI_F;                                                          \
5428            Y=*;
5429          $PATH Y=20; LC=2;
5430            C=<TOP_TOKYO_5000AL,TOP_TOKYO_5000B,TOP_TOKYO_5000C,TOP_TOKYO_5000B,TOP_TOKYO_5000C,          \
5431                TOP_TOKYO_5000C,TOP_TOKYO_5000B,TOP_TOKYO_5000C,TOP_TOKYO_5000B,TOP_TOKYO_5000A;          \
5432              D=L;
5433          $ENDPATH
5434          $PATH Y=60; LC=2;
5435            C=<TOP_TOKYO_5000AL,TOP_TOKYO_5000B,TOP_TOKYO_5000C,TOP_TOKYO_5000B,TOP_TOKYO_5000C,          \
5436                TOP_TOKYO_5000C,TOP_TOKYO_5000B,TOP_TOKYO_5000C,TOP_TOKYO_5000B,TOP_TOKYO_5000A;          \
5437              D=R;
5438          $ENDPATH
5439        $ENDSCENE
5440  #..........................................................................
5441  # 375
5442        $DEF TOP_C1=TOP_C1001|TOP_C1002|TOP_C1003
5443
5444        $SCENE                                                                                            \
5445            NAME=FU375;                                                                                   \
5446            DX=4000; DY=150; YDIR=U; VM=HEAD,JUMP;                                                        \
5447            BG=SHINAKITSU_B;                                                                      \
5448            FG=SHINAKITSU_F;                                                                      \
5449            Y=*;
5450          $PATH Y=59; LC=2; D=R;
5451            C=TOP_JNR_TC103O,(<TOP_JNR_M102O,TOP_JNR_M103O),(<TOP_JNR_M102O,TOP_JNR_M103O),               \
5452                (<TOP_JNR_M102O,TOP_JNR_M103O),TOP_JNR_TC103OL;
5453            C=TOP_JRF_EF66,                                                                               \
5454                18-20*TOP_JR_KOKI50000(|L)                                                                \
5455                ([C3:TOP_C1]|[C2:TOP_C1][C4:TOP_C1]|[C1:TOP_C1][C3:TOP_C1][C5:TOP_C1]|                    \
5456                [C1:TOP_C1][C2:TOP_C1][C4:TOP_C1][C5:TOP_C1]|                                             \
5457                2:[C1:TOP_C1][C2:TOP_C1][C3:TOP_C1][C4:TOP_C1][C5:TOP_C1]);
5458            C=TOP_JRF_EF66,                                                                               \
5459                8-10*TOP_JR_KOKI50000(|L)                                                                 \
5460                ([C3:TOP_C1]|[C2:TOP_C1][C4:TOP_C1]|[C1:TOP_C1][C3:TOP_C1][C5:TOP_C1]|                    \
5461                [C1:TOP_C1][C2:TOP_C1][C4:TOP_C1][C5:TOP_C1]|                                             \
5462                2:[C1:TOP_C1][C2:TOP_C1][C3:TOP_C1][C4:TOP_C1][C5:TOP_C1]);
5463          $ENDPATH
5464          $PATH Y=19; LC=2; D=L;
5465            C=TOP_JRF_EF66,                                                                               \
5466                18-20*TOP_JR_KOKI50000(|L)                                                                \
5467                ([C3:TOP_C1]|[C2:TOP_C1][C4:TOP_C1]|[C1:TOP_C1][C3:TOP_C1][C5:TOP_C1]|                    \
5468                [C1:TOP_C1][C2:TOP_C1][C4:TOP_C1][C5:TOP_C1]|                                             \
5469                2:[C1:TOP_C1][C2:TOP_C1][C3:TOP_C1][C4:TOP_C1][C5:TOP_C1]);
5470            C=TOP_JRF_EF66,                                                                               \
5471                8-10*TOP_JR_KOKI50000(|L)                                                                 \
5472                ([C3:TOP_C1]|[C2:TOP_C1][C4:TOP_C1]|[C1:TOP_C1][C3:TOP_C1][C5:TOP_C1]|                    \
5473                [C1:TOP_C1][C2:TOP_C1][C4:TOP_C1][C5:TOP_C1]|                                             \
5474                2:[C1:TOP_C1][C2:TOP_C1][C3:TOP_C1][C4:TOP_C1][C5:TOP_C1]);
5475            C=TOP_JNR_TC103OL,(<TOP_JNR_M102O,TOP_JNR_M103O),(<TOP_JNR_M102O,TOP_JNR_M103O),              \
5476                (<TOP_JNR_M102O,TOP_JNR_M103O),TOP_JNR_TC103O;
5477          $ENDPATH
5478        $ENDSCENE
5479  #..........................................................................
5480  # 423
5481        $GROUP                                                                                            \
5482            NAME=FU423;                                                                                   \
5483            DX=6000; AB=9; BL=113; D=X; VM=HEAD;                                                          \
5484            BG=MASHITA15B:,-113;                                                                  \
5485            FG=MASHITA15F:,-113;
5486          C=<JRC_DC85_0FL,JRC_DC84_0F,JRC_DC85_0FP,JRC_DC85_0FP,JRC_DC85_200FL,JRC_DC84_0FG,              \
5487              JRC_DC84_300F,JRC_DC85_0F;                                                                  \
5488            V=7;
5489          C=<JRC_DC40_6300,JRC_DC48_5800AL,JRC_DC48_5800B;                                                \
5490            V=6;
5491          C=<JNR_DC55FL,JRK_KH26,JNR_DC55FL,JRK_KH26,JNR_KIHA58L,JNR_KIRO28G1,JNR_KIHA28,JNR_KIHA58A;     \
5492            V=5.5;
5493          C=<JRC_DC48_5800AL,JRC_DC48_5800B;                                                              \
5494            V=6;
5495          C=<JRC_DC40_6300,JRC_DC48_5800B;                                                                \
5496            V=5;
5497        $ENDGROUP
5498  #..........................................................................
5499  # 439
5500        $GROUP                                                                                            \
5501            NAME=FU439;                                                                                   \
5502            DX=2500; AB=52; BL=40; D=X; VM=HEAD;                                                          \
5503            BG=IBIGAWATARUMIBG_B:,-40;                                                            \
5504            FG=IBIGAWATARUMIBG_F:,-40;
5505          AP=[D=L]                                                                                        \
5506              [C=JR_C11325MOKA,(<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_TAKI3000A,             \
5507              JR_TOKI15000A,JR_YO3500~OP][V=3]|                                                           \
5508              [D=R]                                                                                       \
5509              [C=JR_C11325MOKA,JR_TOKI15000A,JR_TAKI3000A,                                                \
5510              (<JR_G1,JR_GO1,JR_GT1,JR_G2,JR_G3,JR_G4,JR_REF1),JR_YO3500~OP][V=3];
5511          C=<JRE_KH48_0L,JRE_KH48_0;                                                                      \
5512            V=5;
5513          C=<JNR_KH17_0L,JNR_KH17_0;                                                                      \
5514            V=5;
5515          C=JR_C11325MOKA,JR_C11325MOKA,JR_YO3500~OP,JR_TAKI1900SUMITOMO,JR_TAKI1900SUMITOMO,             \
5516              JR_TAKI1900SUMITOMO,JR_TAKI1900SUMITOMO,JR_TAKI1900SUMITOMO,JR_TAKI1900SUMITOMO,            \
5517              JR_TAKI1900SUMITOMO,JR_TAKI1900SUMITOMO,JR_TAKI1900SUMITOMO,JR_TAKI1900SUMITOMO,            \
5518              JR_YO3500~OP;                                                                               \
5519            V=3;
5520        $ENDGROUP
5521  #..........................................................................
5522  # 440
5523        $GROUP                                                                                            \
5524            NAME=FU440;                                                                                   \
5525            LC=2; DX=3800; IMGY=51; AB=5; BL=126; D=X; VM=HEAD;                                           \
5526            BG=OINAGAREBG_B:,-126;                                                                \
5527            FG=OINAGAREBG_F:,-126;
5528          C=<JRC_TC118_5300CL,JRC_MC119_5000C;                                                            \
5529            V=5;
5530          C=JRC_MC119_5100C;                                                                              \
5531            V=5;
5532          C=<JRC_TC372_0BL,JRC_T373_0B,JRC_MC373_0B;                                                      \
5533            V=5;
5534          C=<JRC_MC119_5100C,JRC_TC118_5300CL,JRC_MC119_5000C;                                            \
5535            V=5;
5536          C=<JNR_TC165CXL,JNR_M165C,JNR_M164_0CXL,JNR_TC165CX,JNR_MC165CXL,JNR_M164_0CXL,JNR_TC165CX;     \
5537            V=5;
5538        $ENDGROUP
5539  #..........................................................................
5540  # 441
5541        $SCENE                                                                                            \
5542            NAME=FU441;                                                                                   \
5543            DX=1800; DY=150; YDIR=U; VM=HEAD;                                                             \
5544            BG=KAIKAWABG_B;                                                                       \
5545            FG=KAIKAWABG_F;
5546          $PATH Y=19; LC=2;
5547            C=JR_EF58,JRW_SUHANEFU14L,JNR_ORONE14B,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,       \
5548                JNR_OSHI14FL,JNR_OHANE14_0CL,JRW_SUHANEFU14,JRE_SUHANEFU14_0BL,JNR_OHANE14_0CL,           \
5549                JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JRE_SUHANEFU14_0B;                        \
5550              D=L;
5551            C=<JRC_312_1500TCL,JRC_313_1500M1L,JRC_313_1500T,JRC_313_1500M1L,JRC_313_1500T1,              \
5552                JRC_312_1500MC;                                                                           \
5553              D=L;
5554            C=JNR_TC189_500BL,JRE_M182_1000EF,JNR_M189_0A,JRE_M182_1000EF,JNR_M189_0A,JRE_M182_1000EF,    \
5555                JNR_M189_0A,JRE_M182_1000EF,JNR_M189_0A,JNR_TC189_0A;                                     \
5556              D=L;
5557            C=<JRC_312_1500TCL,JRC_313_1500M1L,JRC_313_1500ML,JRC_312_1500MC;                             \
5558              D=L;
5559            C=JRF_EF210,3*KOKIC,8-12*(10:KOKI24|3:KOKI23|1:KOKI22),3*KOKIC,8-12*KOKI24;                   \
5560              D=L;
5561          $ENDPATH
5562          $PATH Y=19; LC=2;
5563            C=<JRC_312_1500TCL,JRC_313_1500M1L,JRC_313_1500ML,JRC_312_1500MC;                             \
5564              D=R;
5565            C=JRF_EF210,8-12*KOKI24,8-12*(6:KOKI24|KOKI23|KOKI22|KOKI21|KOKI25),3*KOKIC,3*KOKIC;          \
5566              D=R;
5567            C=JR_EF58,JRE_SUHANEFU14_0B,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_OHANE14_0CL,  \
5568                JRE_SUHANEFU14_0BL,JRW_SUHANEFU14,JNR_OHANE14_0CL,JNR_OSHI14FL,JNR_OHANE14_0CL,           \
5569                JNR_OHANE14_0CL,JNR_OHANE14_0CL,JNR_ORONE14B,JRW_SUHANEFU14L;                             \
5570              D=R;
5571            C=<JRC_312_1500TCL,JRC_313_1500M1L,JRC_313_1500T,JRC_313_1500M1L,JRC_313_1500T1,              \
5572                JRC_312_1500MC;                                                                           \
5573              D=R;
5574            C=JNR_TC189_0A,JNR_M189_0A,JRE_M182_1000EF,JNR_M189_0A,JRE_M182_1000EF,JNR_M189_0A,           \
5575                JRE_M182_1000EF,JNR_M189_0A,JRE_M182_1000EF,JNR_TC189_500BL;                              \
5576              D=R;
5577          $ENDPATH
5578        $ENDSCENE
5579  #..........................................................................
5580  # 455
5581        $GROUP                                                                                            \
5582            NAME=FU455;                                                                                   \
5583            DX=2000; AB=-3; BL=95; D=X; VM=HEAD;                                                          \
5584            BG=YAHAGIGAWABGOKATA_B:,-95;                                                          \
5585            FG=YAHAGIGAWABGOKATA_F:,-95;
5586          C=<JNR_70B1L,JNR_70B2,JNR_70B3,JNR_70B1;
5587          C=<JRE_TC111SL,JRE_M112SL,JRE_M113S,JRE_TC111S;
5588          C=<JNR_MC165SL,JNR_M164S,JNR_TC165S;
5589          AP=[D=L]                                                                                        \
5590              [C=JNR_EF60,JR_YO3500~OP,JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,            \
5591              JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,    \
5592              JR_YO3500~OP,JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,JR_KU5000C,  \
5593              JR_YO3500~OP][V=6]|                                                                         \
5594              [D=R]                                                                                       \
5595              [C=JNR_EF60,JR_YO3500~OP,JR_KU5000D,JR_KU5000D,JR_KU5000D,JR_KU5000D,JR_KU5000D,            \
5596              JR_KU5000D,JR_KU5000D,JR_YO3500~OP,JR_KU5000E,JR_KU5000E,JR_KU5000E,JR_KU5000E,JR_KU5000E,  \
5597              JR_KU5000E,JR_KU5000E,JR_KU5000E,JR_KU5000E,JR_KU5000E,JR_KU5000E,JR_KU5000E,JR_KU5000E,    \
5598              JR_YO3500~OP][V=6];
5599          AP=[D=L][C=JR_EF58_61FL,(<JR_461,JR_330,JR_1,JR_340,JR_460)][V=6]|                              \
5600              [D=R][C=JR_EF58_61F,(<JR_461,JR_330,JR_1,JR_340,JR_460)][V=6];
5601        $ENDGROUP
5602  #..........................................................................
5603  # 509
5604        $SCENE                                                                                            \
5605            NAME=FU509;                                                                                   \
5606            DX=8000; DY=180; YDIR=U; VM=CONT,JUMP;                                                        \
5607            BG=MARUYAMAB;                                                                 \
5608            FG=MARUYAMAF;                                                                 \
5609            IMGY=51;
5610          $PATH Y=127; LC=2; TB=7;
5611            C=JNR_EF81D,JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,JRE_OHANEFU24L,JRE_OHANE24L,             \
5612                JRE_OHANE24L,JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,JRE_OHANE24L,JRE_OHANEFU24L,        \
5613                JRE_ORONE24L,JRE_KANI24A;                                                                 \
5614              D=L;
5615            C=JNR_TC481_0BAL,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_TS481_0BA,           \
5616                JNR_TD481A,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_TC481_0BA;             \
5617              D=L;
5618            C=JRW_TPC520_1L,JRW_MC521_1;                                                                  \
5619              D=L;
5620            C=JRW_TSC481_2001L,JRW_M485_501L,JRW_M484_605L,JRW_T481_601L,JRW_M485_1004L,JRW_M484_1004L,   \
5621                JRW_M485_128L,JRW_M484_232L,JRW_TC481_324;                                                \
5622              D=L;
5623            C=JRF_EF81,10*KOKI15,10*KOKIC;                                                                \
5624              D=L;
5625            C=JNR_TC455AL,JNR_M470A,JNR_MC471B,JNR_TC455AL,JNR_TS455A,JNR_TS455A,JNR_TB455A,JNR_M470A,    \
5626                JNR_MC471B,JNR_TC455AL,JNR_M470A,JNR_MC471B;                                              \
5627              D=L;
5628            C=JRF_EF510_2RTL,9-12*KOKIB,(8-11*KOKI55,KOKIE);                                              \
5629              D=L;
5630            C=JRW_TC481CL,JRW_M484C,JRW_M485C,JRW_TS485C,JRW_M484C,JRW_M485C,JRW_M484C,JRW_M485C,         \
5631                JRW_TC481C;                                                                               \
5632              D=L;
5633            C=JRW_TC419_0JBL,JRW_M418_0JB,JRW_MC419_0JB;                                                  \
5634              D=L;
5635            C=JRW_EF81_TWILIGHT,                                                                          \
5636                (<JRH_TES9L,JRH_TES8L,JRH_TES7L,JRH_TES6L,JRH_TES5L,JRH_TES5L,JRH_TES4L,JRH_TES3L,        \
5637                JRH_TES2,JRH_TES1);                                                                       \
5638              D=L;
5639            C=JRW_TSC681_1000TBCL,JRW_TP680_1100TBC,JRW_M681_1050TBC,JRW_TP680_1300TBC,JRW_M681_1100TBC,  \
5640                JRW_TC681_1500TBC,JRW_TPC680_1500TBCL,JRW_M681_1300TBC,JRW_TC680_1200TBC;                 \
5641              D=L;
5642            C=JRW_TC581L,JRW_M582,JRW_M583,JRW_M582,JRW_M583,JRW_TS581,JRW_TSN581,JRW_M582,JRW_M583,      \
5643                JRW_TC581;                                                                                \
5644              D=L;
5645          $ENDPATH
5646          $PATH Y=127; LC=2; TE=7;
5647            C=JRF_EF510_2RTL,(8-11*KOKI55,KOKIE),9-12*KOKIB;                                              \
5648              D=R;
5649            C=JRW_TC481C,JRW_M485C,JRW_M484C,JRW_M485C,JRW_M484C,JRW_TS485C,JRW_M485C,JRW_M484C,          \
5650                JRW_TC481CL;                                                                              \
5651              D=R;
5652            C=JRW_MC419_0JB,JRW_M418_0JB,JRW_TC419_0JBL;                                                  \
5653              D=R;
5654            C=JRW_EF81_TWILIGHT,                                                                          \
5655                (<JRH_TES9L,JRH_TES8L,JRH_TES7L,JRH_TES6L,JRH_TES5L,JRH_TES5L,JRH_TES4L,JRH_TES3L,        \
5656                JRH_TES2,JRH_TES1);                                                                       \
5657              D=R;
5658            C=JRW_TC680_1200TBC,JRW_M681_1300TBC,JRW_TPC680_1500TBCL,JRW_TC681_1500TBC,JRW_M681_1100TBC,  \
5659                JRW_TP680_1300TBC,JRW_M681_1050TBC,JRW_TP680_1100TBC,JRW_TSC681_1000TBCL;                 \
5660              D=R;
5661            C=JRW_TC581,JRW_M583,JRW_M582,JRW_TSN581,JRW_TS581,JRW_M583,JRW_M582,JRW_M583,JRW_M582,       \
5662                JRW_TC581L;                                                                               \
5663              D=R;
5664            C=JNR_EF81D,JRE_KANI24A,JRE_ORONE24L,JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,JRE_OHANE24L,   \
5665                JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,JRE_OHANEFU24L,JRE_OHANE24L,JRE_OHANE24L,        \
5666                JRE_OHANEFU24L;                                                                           \
5667              D=R;
5668            C=JNR_TC481_0BA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_TD481A,               \
5669                JNR_TS481_0BA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_TC481_0BAL;         \
5670              D=R;
5671            C=JRW_MC521_1,JRW_TPC520_1L;                                                                  \
5672              D=R;
5673            C=JRW_TC481_324,JRW_M484_232L,JRW_M485_128L,JRW_M484_1004L,JRW_M485_1004L,JRW_T481_601L,      \
5674                JRW_M484_605L,JRW_M485_501L,JRW_TSC481_2001L;                                             \
5675              D=R;
5676            C=JRF_EF81,10*KOKIC,10*KOKIC;                                                                 \
5677              D=R;
5678            C=JNR_MC471B,JNR_M470A,JNR_TC455AL,JNR_MC471B,JNR_M470A,JNR_TB455A,JNR_TS455A,JNR_TS455A,     \
5679                JNR_TC455AL,JNR_MC471B,JNR_M470A,JNR_TC455AL;                                             \
5680              D=R;
5681          $ENDPATH
5682        $ENDSCENE
5683  #..........................................................................
5684  # 805
5685        $GROUP                                                                                            \
5686            NAME=FU805;                                                                                   \
5687            DX=2000; AB=65; BL=57; VM=CONT,JUMP;                                                          \
5688            BG=(TATARA2B:,-57;SIG_J4:<0+100,-5);                                                  \
5689            FG=(SIG_J4R:<0+1200,-5;TATARA2F:,-57);                                                \
5690            WP=(0+200,>TB:BG.SIGR;0+1100,<TB:FG.SIGR);                                                    \
5691            ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,3];                                               \
5692            Y=*;
5693          C=JRF_EF81_453,9-12*KOKIB;                                                                      \
5694            V=4;
5695          AP=[D=L][C=JRF_EF81_400,2*KOKIC,2*KOKI23][V=4]|                                                 \
5696              [D=R][C=JRF_EF81_400,2*JR_KOKI104L~OP,2*JR_KOKI104L~OP][V=4];
5697          AP=[D=L][C=JRF_EF81_453,JRF_EF81_500][V=4]|[D=R][C=JRF_EF81_400,JRF_EF81_303][V=4];
5698        $ENDGROUP
5699  #..........................................................................
5700  # 809
5701        $GROUP                                                                                            \
5702            NAME=FU809;                                                                                   \
5703            LC=2; DX=2500; AB=-13; BL=135; D=X; VM=CONT;                                                  \
5704            BG=KURIKINOB:,-135;                                                                   \
5705            FG=KURIKINOF:,-135;                                                                   \
5706            Y=*;
5707          C=JRK_KH125C;                                                                                   \
5708            V=6;
5709          C=JRK_KH140;                                                                                    \
5710            V=5;
5711          C=<JRK_KH47L,JRK_KH47;                                                                          \
5712            V=5.5;
5713          C=JRK_KH125C;                                                                                   \
5714            V=6;
5715          C=JRK_KH140,JRK_KH140;                                                                          \
5716            V=5.5;
5717        $ENDGROUP
5718  #..........................................................................
5719  # 817
5720        $GROUP                                                                                            \
5721            NAME=FU817;                                                                                   \
5722            LC=2; DX=3700; AB=-3; BL=95; D=X; VM=CONT,JUMP;                                               \
5723            BG=TSUNANOSEBGB:,-95;                                                         \
5724            FG=(SIG_J3R:<0+760,-5;TSUNANOSEBGF:,-95);                                             \
5725            WP=0+660,<TB:FG.SIGR;                                                                         \
5726            ENV=[TB=<FG.SIGG,>FG.SIGR,3][V=4-6];                                                          \
5727            Y=*;
5728          C=<TAKA_TR400B1L,TAKA_TR400A1;
5729          C=<TAKA_TR100,(<TAKA_TR400B1L,TAKA_TR400A1);
5730          C=TAKA_TR100,TAKA_TR100,TAKA_TR100;
5731          C=TAKA_TR100,TAKA_TR100;
5732          C=TAKA_TR100;
5733        $ENDGROUP
5734  #..........................................................................
5735  # 819
5736        $GROUP                                                                                            \
5737            NAME=FU819;                                                                                   \
5738            LC=2; DX=4000; AB=4; BL=118; D=X; VM=HEAD,JUMP;                                               \
5739            BG=(GOKASE3BGB:,-118; CROSS_J4B:<0+3300,-5; SIG_J3:<0+3270,-5);                       \
5740            FG=(SIG_J3R:<0+2700,-5; CROSS_J4F:<0+3300,-5; GOKASE3BGF:,-118);                      \
5741            WP=(0+3370,>TB:BG.SIGR;0+2600,<TB:FG.SIGR;0+3200,<TE:XUP;0+3507,>TE:XUP);                     \
5742            ENV=[TB=>BG.SIGG,<BG.SIGR,<FG.SIGG,>FG.SIGR,>XRIGHT,<XLEFT,3];                                \
5743            Y=*;                                                                                          \
5744            TE=4;
5745          C=<TAKA_TR400B1L,TAKA_TR400A1;
5746        $ENDGROUP
5747  #..........................................................................
5748      $ENDSECTION
5749  #----------------------------------------------------------------------------
5750  #
5751  # Long from other authors
5752  #
5753      $SECTION LC=1;
5754        $GROUP                                                                                            \
5755            NAME=OPX01;                                                                                   \
5756            DX=3000; IMGY=49; BL=31; VM=HEAD;                                                             \
5757            BG=SCENE_MODELROCKYB:,-31;                                                                    \
5758            FG=SCENE_MODELROCKYF:<0+748,-15;
5759          C=(DRGW_47(3|3Y|6|8),DS_(BOX3,26,25,24,23,22,21))(|L)|(DRGW_475,DS_3(4,3,2,1));
5760        $ENDGROUP
5761      $ENDSECTION
5762  #----------------------------------------------------------------------------
5763  #
5764  # Ueno
5765  #
5766      $SECTION FUKUENO; %SECFIN;%FOOTER(© fukayatanteijimusyo https://fukayoid.main.jp/trainkit.htm);
5767  #..........................................................................
5768  # 346
5769        $GROUP                                                                                            \
5770            NAME=FU346;                                                                                   \
5771            LC=2; DX=1600; AB=83; BL=9; VM=HEAD;                                                          \
5772            BG=UENOST13B:,-9;                                                                     \
5773            ENV=[V=3][B=0.003][T=12][P=<0+105];                                                           \
5774            Y=*;
5775          M=BACK;                                                                                         \
5776            C=100,JRE_OHANEFU24_GORONL,JRE_OHANE25,JRE_OHANE25,JRE_OHANEFU25L,JRE_OHANE24_550,            \
5777              JRE_OHANE24_550,JRE_SURONE24_550;                                                           \
5778            D=L;
5779          M=BACK;                                                                                         \
5780            C=100,JRW_SUHANEFU14L,JRW_SUHANE14_700,JRW_ORONE14_700,JRW_SUHANE14_750,JRW_SUHANEFU14,       \
5781              JRW_SUHANE14_750,JNR_OHANE14_0CL;                                                           \
5782            D=L;
5783          M=BACK;                                                                                         \
5784            C=100,JNR_MANI37A,JR_OYU10,JR_SUHAFU12L,JR_OHA12,JR_OHA12,JR_OHA12,JR_OHAFU13;                \
5785            D=L;
5786          M=BACK;                                                                                         \
5787            C=100,                                                                                        \
5788              (<JRE_SRNFE26_1,JRE_SRNE26_1,JRE_MSE26_1,JRE_SRNE27_100,JRE_SRNE27_400,JRE_SRNE27_300,      \
5789              JRE_SRNE27_300,JRE_SRNE27_1,JRE_SRNE27_400,JRE_SRNE27_300,JRE_SRNE27_300,JRE_KHFE26_1);     \
5790            D=L;
5791          M=BACK;                                                                                         \
5792            C=100,                                                                                        \
5793              (<JRH_KANI24,JRH_HOKU_B,JRH_HOKU_SA1B2,JRH_HOKU_SA1B1,JRH_HOKU_A2,JRH_HOKU_D,               \
5794              JRH_HOKU_B1_L,JRH_HOKU_B1,JRH_HOKU_B2,JRH_HOKU_B2,JRH_HOKU_B2,JRH_HOKU_BC),100,             \
5795              (<JRH_KANI24,JRH_HOKU_B,JRH_HOKU_SA1B2,JRH_HOKU_SA1B1,JRH_HOKU_A2,JRH_HOKU_D,               \
5796              JRH_HOKU_B1_L,JRH_HOKU_B1,JRH_HOKU_B2,JRH_HOKU_B2,JRH_HOKU_B2,JRH_HOKU_BC);                 \
5797            D=L;
5798        $ENDGROUP
5799  #..........................................................................
5800  # 347
5801        $SCENE                                                                                            \
5802            NAME=FU347;                                                                                   \
5803            DX=1600; DY=150; YDIR=U;                                                                      \
5804            BG=UENOST14B;                                                                 \
5805            Y=*;                                                                                          \
5806            ENV=[M=BACK][P=<50-550][TB=[WI:N=I0;B=1;]][TE=[SI:N=I0]][V=4][B=0.003];
5807          $PATH Y=9;                                                                                      \
5808              BG=UENOST14MF:<0+0,-9;
5809            M=BACK;                                                                                       \
5810              C=JNR_TC165CXL,JNR_M164_0CX,JNR_MC165CX,JNR_TS165C,JNR_TS165C,JNR_TC165CXL,JNR_M164_0CX;    \
5811              D=L;
5812          $ENDPATH
5813          $PATH Y=9;                                                                                      \
5814              BG=UENOST14MB:<0+0,-9;
5815            M=BACK;                                                                                       \
5816              C=JRE_MC211_1000AL,JRE_M210_1000AL,JRE_T211_1000AL,JRE_T211_1000AL,JRE_TC210_1000A,         \
5817                JRE_MC211_1000AL,JRE_M210_1000AL;                                                         \
5818              D=L; T=OPEN,10,CLOSE,W,1;
5819            M=BACK;                                                                                       \
5820              C=JR_SUNI41AL,JR_SUHAFU12L,JR_OHA12,JR_OHA12,JR_SUHAFU12L,JR_OHA12,JR_OHA12;                \
5821              D=L; T=OPEN,10,CLOSE,W,1;
5822          $ENDPATH
5823          $PATH Y=9;
5824            M=BACK;                                                                                       \
5825              C=JRE_TC115_1000SJBAL,JRE_M114_1000SB,JRE_M115_1000SB,JRE_TC115_1100SJB,                    \
5826                JRE_TC115_1000SJBAL,JRE_M114_1000SB,JRE_M115_1000SB;                                      \
5827              D=L; T=OPEN,10,CLOSE,W,1;
5828          $ENDPATH
5829        $ENDSCENE
5830  #..........................................................................
5831  # 348
5832        $SCENE                                                                                            \
5833            NAME=FU348;                                                                                   \
5834            DX=1600; DY=150; YDIR=U; VM=INDEP;                                                            \
5835            BG=UENOST15B;                                                                 \
5836            FG=UENOST15F;                                                                 \
5837            Y=*;                                                                                          \
5838            ENV=[M=BACK][P=<50-550][V=4][B=0.003];
5839          $PATH Y=9;                                                                                      \
5840              BG=UENOST15M:,-9;
5841            C=JRE_TC185_200OOAL,JRE_M185_200OOAL,JRE_M184_200OOBL,JRE_M185_200OOAL,JRE_M184_200OOBL,      \
5842                JRE_TS185_200OOAL,JRE_TC185_200OOB;                                                       \
5843              D=L; TB=[WI:N=I0;B=1;]; TE=[SI:N=I0]; T=12;
5844          $ENDPATH
5845          $PATH Y=97; LC=2;
5846            C=JRE_TC230_0JAL,JRE_M230_0JA,JRE_M231_0JA,JRE_T231_0JA,JRE_T231_0JA,JRE_T231_0JA,            \
5847                JRE_M230_0JA;                                                                             \
5848              D=L; V=4; B=0.003; TB=40; T=12;
5849          $ENDPATH
5850          $PATH Y=9;
5851            C=JNR_OHANEFU12A,JNR_SUHANE16AL,JR_SUROFU62D,JNR_ORONE10B1L,JNR_SUHANE16AL,JR_SUHAFU12L,      \
5852                JR_OHA12;                                                                                 \
5853              D=L; TB=[WI:N=I0;B=1;]; TE=[SI:N=I0]; T=OPEN,10,CLOSE,W,1;
5854            C=JRE_TCE230_8000AL,JRE_ME230_3500C,JRE_ME231_1000A,JRE_TE231_1000A,JRE_TE231_1000A,          \
5855                JRE_TE231_6000A,JRE_ME230_1000A;                                                          \
5856              D=L; TB=[WI:N=I0;B=1;]; TE=[SI:N=I0]; T=OPEN,10,CLOSE,W,1;
5857          $ENDPATH
5858        $ENDSCENE
5859  #..........................................................................
5860  # 349
5861        $SCENE                                                                                            \
5862            NAME=FU349;                                                                                   \
5863            DX=1600; DY=150; YDIR=U; VM=INDEP;                                                            \
5864            BG=UENOST12B;                                                                 \
5865            FG=UENOST15F;                                                                 \
5866            Y=*;                                                                                          \
5867            ENV=[M=BACK][P=<50-550][V=4][B=0.003];
5868          $PATH Y=9;
5869            C=JNR_TC481_0BAL,JNR_M484_0ADCA,JNR_M485AA,JNR_M484_0ADCA,JNR_M485AA,JNR_TS481_0BA,JNR_TD481A; \
5870              D=L; T=12;
5871            C=JNR_TC455AL,JNR_M454AA,JNR_MC455A,JNR_TS455A,JNR_M454AA,JNR_MC455A,JNR_TC455AL;             \
5872              D=L; T=12;
5873            C=JNR_TC583AL,JNR_M582A,JNR_M583A,JNR_M582A,JNR_M583A,JNR_TS581A,JNR_TB581;                   \
5874              D=L; T=12;
5875          $ENDPATH
5876          $PATH Y=97;                                                                                     \
5877              BG=UENOST12M:,-97;
5878            C=JRE_TCA103B1L,(<JRE_M102B1L,JRE_M103B1L),JRE_T103B1,(<JRE_M102B1L,JRE_M103B1L),JRE_T103B1;  \
5879              D=L; TB=[WI:N=I0;B=1;],20; TE=[SI:N=I0]; T=12;
5880          $ENDPATH
5881          $PATH Y=97;
5882            C=JRE_TC230_0JAL,JRE_M230_0JA,JRE_M231_0JA,JRE_T231_0JA,JRE_T231_0JA,JRE_T231_0JA,            \
5883                JRE_M230_0JA;                                                                             \
5884              D=L; TB=[WI:N=I0;B=1;],20; TE=[SI:N=I0]; T=OPEN,12,CLOSE,W;
5885          $ENDPATH
5886        $ENDSCENE
5887  #..........................................................................
5888  # 350
5889        $SCENE                                                                                            \
5890            NAME=FU350;                                                                                   \
5891            DX=1600; DY=150; YDIR=U; VM=INDEP;                                                            \
5892            BG=UENOST10B;                                                                 \
5893            Y=*;                                                                                          \
5894            ENV=[M=BACK][P=<50-550][V=4][B=0.003][TB=[WI:N=I0;B=1;],20][TE=[SI:N=I0]];
5895          $PATH Y=97; LC=2;                                                                               \
5896              BG=UENOST10M:,-97;
5897            C=JNR_KIHA28L,JNR_KIHA28,JNR_KIHA58L,JNR_KIHA28,JNR_KIHA28L,JNR_KIHA28L,JNR_KIRO28G1;         \
5898              D=L; T=12;
5899            C=JRE_531TCL,JRE_531M,JRE_531MP,JRE_531T,JRE_531T,JRE_531T,JRE_531M,JRE_531MP,JRE_531T;       \
5900              D=L; T=OPEN,12,CLOSE,W;
5901          $ENDPATH
5902          $PATH Y=97; LC=2;
5903            C=JRE_KANI24AL,JRE_OHANEFU25_0A,JRE_OHANE25,JRE_OHANE25,JRE_OHANE25,JRE_OHANE25,              \
5904                JRE_OHANEFU25_0A,JRE_OHANE25;                                                             \
5905              D=L; T=OPEN,12,CLOSE,W;
5906            C=JRE_TC411_1600EAL,JRE_M414_1500EA,JRE_M415_1500EA,JRE_T411_1700EA,JRE_M414_1500EA,          \
5907                JRE_M414_1500EA,JRE_TC411_1500EA;                                                         \
5908              D=L; T=12;
5909          $ENDPATH
5910        $ENDSCENE
5911  #..........................................................................
5912      $ENDSECTION
5913
5914    $ENDSECTION
5915  #----------------------------------------------------------------------------
5916  $ENDSECTION