/*start   
/*%number%=1001
/*%name%=2_
/*%shape%=L
/*%point%=2
/*%hokan%=LL
/*%reverse%=1
/*honbun                                                                         
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
#IF($N%2!=0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
#IF($N==1)
   0 ZT     Ӑ L^  1 Đ  0ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
#IF($N!=1)
   0 ZT     Ӑ L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
#ENDIF                                                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                        
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
#IF($N%2==0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG2,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
   0 ZT     Ӌt L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂   ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                   
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end


/*start   
/*%number%=1002
/*%name%=3_
/*%shape%=L
/*%point%=3
/*%hokan%=LLL
/*%reverse%=1
/*honbun
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
#IF($N%2!=0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
#IF($N==1)
   0 ZT     Ӑ L^  1 Đ  0ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
#IF($N!=1)
   0 ZT     Ӑ L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
#ENDIF                                                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
#IF($N%2==0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG3,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
   0 ZT     Ӌt L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂   ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                   
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end


/*start   
/*%number%=1003
/*%name%=4_
/*%shape%=L
/*%point%=4
/*%hokan%=LLLL
/*%reverse%=1
/*honbun
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
#IF($N%2!=0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
#IF($N==1)
   0 ZT     Ӑ L^  1 Đ  0ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
#IF($N!=1)
   0 ZT     Ӑ L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
#ENDIF                                                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG4,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
#IF($N%2==0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG4,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
   0 ZT     Ӌt L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂   ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                   
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end


/*start   
/*%number%=1004
/*%name%=8_
/*%shape%=L
/*%point%=8
/*%hokan%=LLLLLLLL
/*%reverse%=1
/*honbun
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
#IF($N%2!=0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
#IF($N==1)
   0 ZT     Ӑ L^  1 Đ  0ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
#IF($N!=1)
   0 ZT     Ӑ L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
#ENDIF                                                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG4,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG5,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG6,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG7,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG8,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
#IF($N%2==0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG8,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
   0 ZT     Ӌt L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
   0 dw   Aڼ޽++$REG7,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG6,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG5,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG4,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂   ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                   
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end


/*start   
/*%number%=1005
/*%name%=5_
/*%shape%=L
/*%point%=5
/*%hokan%=LLLLL
/*%reverse%=1
/*honbun
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
#IF($N%2!=0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
#IF($N==1)
   0 ZT     Ӑ L^  1 Đ  0ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
#IF($N!=1)
   0 ZT     Ӑ L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
#ENDIF                                                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG4,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG5,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
#IF($N%2==0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG5,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
   0 ZT     Ӌt L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
   0 dw   Aڼ޽++$REG4,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂   ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                   
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end


/*start   
/*%number%=1006
/*%name%=6_
/*%shape%=L
/*%point%=6
/*%hokan%=LLLLLL
/*%reverse%=1
/*honbun
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
#IF($N%2!=0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
#IF($N==1)
   0 ZT     Ӑ L^  1 Đ  0ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
#IF($N!=1)
   0 ZT     Ӑ L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
#ENDIF                                                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG4,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG5,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG6,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
#IF($N%2==0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG6,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
   0 ZT     Ӌt L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
   0 dw   Aڼ޽++$REG5,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG4,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂   ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                   
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end


/*start   
/*%number%=1007
/*%name%=7_
/*%shape%=L
/*%point%=7
/*%hokan%=LLLLLLL
/*%reverse%=1
/*honbun
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
#IF($N%2!=0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
#IF($N==1)
   0 ZT     Ӑ L^  1 Đ  0ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
#IF($N!=1)
   0 ZT     Ӑ L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
#ENDIF                                                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG4,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG5,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG6,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG7,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
#IF($N%2==0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 CVtg ߁@Y++$CSSFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG7,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
   0 ZT     Ӌt L^  0 Đ  1ێ                                      
                {1.00      ++$CSSFTY'EEE,4,2++                                       
   0 dw   Aڼ޽++$REG6,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG5,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG4,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG3,3,0++   x100 ߽2                                      
   0 dw   Aڼ޽++$REG2,3,0++   x100 ߽2                                      
   0 CVtg ߁@Y++$CESFTY'EEE,4,2++                                            
   0 dw   Aڼ޽++$REG1,3,0++   x100 ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 CVtg                                                         
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂   ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                   
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end



/*start   
/*%number%=2001
/*%name%=޽5_
/*%shape%=C
/*%point%=5
/*%hokan%=LCCCC
/*%reverse%=1
/*honbun
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)
#IF($N%2!=0)                                                             
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 dw   Aڼ޽++$REG1,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
#IF($N==1)
   0 ZT     Ӑ L^  1 Đ  0ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
#IF($N!=1)
   0 ZT     Ӑ L^  0 Đ  1ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
   0 dw~ʂQ   Aڼ޽++$REG2,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG3,3,0++         ߽2                                      
   0 dw~ʂQ   Aڼ޽++$REG4,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG5,3,0++         ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
#IF($N%2==0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 dw   Aڼ޽++$REG5,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
   0 ZT     Ӌt L^  0 Đ  1ێ                                      
                {1.00      0.00                                       
   0 dw~ʂQ   Aڼ޽++$REG4,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG3,3,0++         ߽2                                      
   0 dw~ʂQ   Aڼ޽++$REG2,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG1,3,0++         ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
$N=$N+1                                                                       
$EEE=$EEE+1                                                                   
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end

/*start   
/*%number%=2002
/*%name%=޽9_
/*%shape%=C
/*%point%=9
/*%hokan%=LCCCCCCCC
/*%reverse%=1
/*honbun
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)
#IF($N%2!=0)                                                             
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 dw   Aڼ޽++$REG1,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
#IF($N==1)
   0 ZT     Ӑ L^  1 Đ  0ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
#IF($N!=1)
   0 ZT     Ӑ L^  0 Đ  1ێ                                      
                {1.00      0.00                                       
#ENDIF                                                                      
   0 dw~ʂQ   Aڼ޽++$REG2,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG3,3,0++         ߽2                                      
   0 dw~ʂQ   Aڼ޽++$REG4,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG5,3,0++         ߽2                                      
   0 dw~ʂQ   Aڼ޽++$REG6,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG7,3,0++         ߽2                                      
   0 dw~ʂQ   Aڼ޽++$REG8,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG9,3,0++         ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
#IF($N%2==0)
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 c[Vtg Η2    e                                             
                                       X++$SFTX'EEE,4,2++ Y++$SFTY'EEE,4,2++ Z++$SFTZ'EEE,4,2++ 
                                       A++$SFTA'EEE,3,2++ B++$SFTB'EEE,3,2++ C       0.00 
   0 dw   Aڼ޽++$REG9,3,0++   x F4 ߽2                                      
   0 n       ++$CUR'EEE,3,0++A++$VOL'EEE,2,1++V x++$SPD'EEE,3,0++  
                            0.0b d++$PWD'EEE,1,0++                                       
   0 EB[u     X  ++$WINC'EEE,1,1++ ]  ++$WROT'EEE,1,1++                                      
         A U  ++$WAMP'EEE,2,1++  ++$WFRQ'EEE,2,1++Hz 0.00                                       
   0 ZT     ␳  X  ++$ALRT'EEE,2,0++ A: ++$ALRC'EEE,2,0++  Z   ++$AUDT'EEE,2,0++ A:++$AUDC'EEE,2,0++             
   0 ZT     Ӌt L^  0 Đ  1ێ                                      
                {1.00      0.00                                       
   0 dw~ʂQ   Aڼ޽++$REG8,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG7,3,0++         ߽2                                      
   0 dw~ʂQ   Aڼ޽++$REG6,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG5,3,0++         ߽2                                      
   0 dw~ʂQ   Aڼ޽++$REG4,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG3,3,0++         ߽2                                      
   0 dw~ʂQ   Aڼ޽++$REG2,3,0++ x100                                           
   0 dw~ʂR   Aڼ޽++$REG1,3,0++         ߽2                                      
   0 nڏI         ++$CCUR'EEE,3,0++ A ++$CVOL'EEE,2,1++ V ++$CTIM'EEE,1,1++ b                 
                        ␳ر 0 d++$PWD'EEE,2,0++                                      
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z     -20.00 
   0 ԑ҂      ++$WAIT'EEE,3,1++b                                                     
#IF($NOZL'EEE>0)
   0 u     Η      x100 ߽2                                      
                                       X       0.00 Y       0.00 Z    -100.00 
   0 ~                                                                     
   0 x     0 [ɽِ|            ]                                      
#ENDIF                                                                      
#ENDIF                                                                   
$N=$N+1                                                                       
$EEE=$EEE+1                                                                   
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end

/*start   
/*%number%=3001
/*%name%=i5|Cg
/*%shape%=U
/*%point%=2
/*%hokan%=LU
/*%reverse%=0
/*honbun                                                                         
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 ZbgWX^ ڼ޽++$REG1,3,0++  ڼ޽101                            
   0 ZbgWX^ ڼ޽++$REG2,3,0++  ڼ޽102                            
   0 WX^ 11  ڼ޽102 | ڼ޽101                                    
   0 ZbgJE^ l   100   1                                         
   0 WX^ 12  ڼ޽  11      1                                    
   0 ZbgJE^  Iڼ޽ 12                                            
                           2                                            
   0 ZbgJE^ l++$WEVU_'EEE,3,2++   3                                         
   0 JE^  4      2      3                                    
   0 WX^ 13  ڼ޽  11      4                                    
   0 ZbgWX^ Η   Iڼ޽ 14                                      
                                       X       0.00 Y       0.00 Z       0.00 
                                       A       0.00 B       0.00 C       0.00 
   0 ZbgWX^ ڼޗvf                                                   
                    ڼ޽ 14  ڼ޽ 13                                      
         XYZABCRSTUVWJKL:000111000000000                                      
   0 ZbgJE^ l     1   5                                         
   0 ZbgJE^ l     0   6                                         
   0 ZbgWX^ Η   Iڼ޽ 21                                      
                                       X++$WEVX1_'EEE,4,2++ Y++$WEVY1_'EEE,4,2++ Z++$WEVZ1_'EEE,4,2++ 
                                       A++$WEVA1_'EEE,4,2++ B       0.00 C       0.00 
   0 ZbgWX^ Η   Iڼ޽ 22                                      
                                       X++$WEVX2_'EEE,4,2++ Y++$WEVY2_'EEE,4,2++ Z++$WEVZ2_'EEE,4,2++ 
                                       A++$WEVA2_'EEE,4,2++ B       0.00 C       0.00 
   0 ZbgWX^ Η   Iڼ޽ 23                                      
                                       X++$WEVX3_'EEE,4,2++ Y++$WEVY3_'EEE,4,2++ Z++$WEVZ3_'EEE,4,2++ 
                                       A++$WEVA3_'EEE,4,2++ B       0.00 C       0.00 
   0 ZbgWX^ Η   Iڼ޽ 24                                      
                                       X++$WEVX4_'EEE,4,2++ Y++$WEVY4_'EEE,4,2++ Z++$WEVZ4_'EEE,4,2++ 
                                       A++$WEVA4_'EEE,4,2++ B       0.00 C       0.00 
   0 ZbgWX^ Η   Iڼ޽ 25                                      
                                       X++$WEVX5_'EEE,4,2++ Y++$WEVY5_'EEE,4,2++ Z++$WEVZ5_'EEE,4,2++ 
                                       A++$WEVA5_'EEE,4,2++ B       0.00 C       0.00 
   0 x  ++$LABEL,4,0++ [                    ]                                      
   0 WX^ 31  ڼ޽101 { ڼ޽  21                                    
   0 WX^ 32  ڼ޽101 { ڼ޽  22                                    
   0 WX^ 33  ڼ޽101 { ڼ޽  23                                    
   0 WX^ 34  ڼ޽101 { ڼ޽  24                                    
   0 WX^ 35  ڼ޽101 { ڼ޽  25                                    
   0 dw   Aڼ޽ 31   x100 ߽1                                      
   0 ԑ҂       ++$WEVT1_'EEE,2,1++b                                              
   0 n       ++$CUR_'EEE,3,0++A++$VOL_'EEE,2,1++V x++$SPD_'EEE,3,0++  
                            0.0b d++$PWD_'EEE,1,0++                                       
   0 dw   Aڼ޽ 32   x100 ߽1                                      
   0 ԑ҂       ++$WEVT2_'EEE,2,1++b                                     
   0 dw   Aڼ޽ 33   x100 ߽1                                      
   0 ԑ҂       ++$WEVT3_'EEE,2,1++b                                     
   0 dw   Aڼ޽ 34   x100 ߽1                                      
   0 ԑ҂       ++$WEVT4_'EEE,2,1++b                                             
   0 dw   Aڼ޽ 35   x100 ߽1                                      
   0 ԑ҂       ++$WEVT5_'EEE,2,1++b                                                     
   0 dw   Aڼ޽ 31   x100 ߽1                                      
   0 WX^101  ڼ޽101 { ڼ޽ 13                                    
   0 JE^  6      6 {     5                                    
   0          4      6                                          
                                ++$LABEL,4,0++                                      
   0 nڏI         ++$CUR_'EEE,3,0++A   ++$VOL_'EEE,2,1++V   1.0 b                                      
                        ␳ر 1 d++$PWD_'EEE,2,0++                                      
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end

/*start   
/*%number%=3002
/*%name%=i2|Cg
/*%shape%=U
/*%point%=2
/*%hokan%=LU
/*%reverse%=0
/*honbun                                                                         
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 ZbgWX^ ڼ޽++$REG1,3,0++  ڼ޽101                            
   0 ZbgWX^ ڼ޽++$REG2,3,0++  ڼ޽102                            
   0 WX^ 11  ڼ޽102 | ڼ޽101                                    
   0 ZbgJE^ l   100   1                                         
   0 WX^ 12  ڼ޽  11      1                                    
   0 ZbgJE^  Iڼ޽ 12                                            
                           2                                            
   0 ZbgJE^ l++$WEVU_'EEE,3,2++   3                                         
   0 JE^  4      2      3                                    
   0 WX^ 13  ڼ޽  11      4                                    
   0 ZbgWX^ Η   Iڼ޽ 14                                      
                                       X       0.00 Y       0.00 Z       0.00 
                                       A       0.00 B       0.00 C       0.00 
   0 ZbgWX^ ڼޗvf                                                   
                    ڼ޽ 14  ڼ޽ 13                                      
         XYZABCRSTUVWJKL:000111000000000                                      
   0 ZbgJE^ l     1   5                                         
   0 ZbgJE^ l     0   6                                         
   0 ZbgWX^ Η   Iڼ޽ 21                                      
                                       X++$WEVX1_'EEE,4,2++ Y++$WEVY1_'EEE,4,2++ Z++$WEVZ1_'EEE,4,2++ 
                                       A++$WEVA1_'EEE,4,2++ B       0.00 C       0.00 
   0 ZbgWX^ Η   Iڼ޽ 22                                      
                                       X++$WEVX2_'EEE,4,2++ Y++$WEVY2_'EEE,4,2++ Z++$WEVZ2_'EEE,4,2++ 
                                       A++$WEVA2_'EEE,4,2++ B       0.00 C       0.00 
   0 x  ++$LABEL,4,0++ [                    ]                                      
   0 WX^ 31  ڼ޽101 { ڼ޽  21                                    
   0 WX^ 32  ڼ޽101 { ڼ޽  22                                    
   0 dw   Aڼ޽ 31   x100 ߽1                                      
   0 ԑ҂       ++$WEVT1_'EEE,2,1++b                                              
   0 n       ++$CUR_'EEE,3,0++A++$VOL_'EEE,2,1++V x++$SPD_'EEE,3,0++  
                            0.0b d++$PWD_'EEE,1,0++                                       
   0 dw   Aڼ޽ 32   x100 ߽1                                      
   0 ԑ҂       ++$WEVT2_'EEE,2,1++b                                     
   0 dw   Aڼ޽ 31   x100 ߽1                                      
   0 WX^101  ڼ޽101 { ڼ޽ 13                                    
   0 JE^  6      6 {     5                                    
   0          4      6                                          
                                ++$LABEL,4,0++                                      
   0 nڏI         ++$CUR_'EEE,3,0++A   ++$VOL_'EEE,2,1++V   1.0 b                                      
                        ␳ر 1 d++$PWD_'EEE,2,0++                                      
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end

/*start   
/*%number%=3003
/*%name%=i3|Cg
/*%shape%=U
/*%point%=2
/*%hokan%=LU
/*%reverse%=0
/*honbun                                                                         
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 ZbgWX^ ڼ޽++$REG1,3,0++  ڼ޽101                            
   0 ZbgWX^ ڼ޽++$REG2,3,0++  ڼ޽102                            
   0 WX^ 11  ڼ޽102 | ڼ޽101                                    
   0 ZbgJE^ l   100   1                                         
   0 WX^ 12  ڼ޽  11      1                                    
   0 ZbgJE^  Iڼ޽ 12                                            
                           2                                            
   0 ZbgJE^ l++$WEVU_'EEE,3,2++   3                                         
   0 JE^  4      2      3                                    
   0 WX^ 13  ڼ޽  11      4                                    
   0 ZbgWX^ Η   Iڼ޽ 14                                      
                                       X       0.00 Y       0.00 Z       0.00 
                                       A       0.00 B       0.00 C       0.00 
   0 ZbgWX^ ڼޗvf                                                   
                    ڼ޽ 14  ڼ޽ 13                                      
         XYZABCRSTUVWJKL:000111000000000                                      
   0 ZbgJE^ l     1   5                                         
   0 ZbgJE^ l     0   6                                         
   0 ZbgWX^ Η   Iڼ޽ 21                                      
                                       X++$WEVX1_'EEE,4,2++ Y++$WEVY1_'EEE,4,2++ Z++$WEVZ1_'EEE,4,2++ 
                                       A++$WEVA1_'EEE,4,2++ B       0.00 C       0.00 
   0 ZbgWX^ Η   Iڼ޽ 22                                      
                                       X++$WEVX2_'EEE,4,2++ Y++$WEVY2_'EEE,4,2++ Z++$WEVZ2_'EEE,4,2++ 
                                       A++$WEVA2_'EEE,4,2++ B       0.00 C       0.00 
   0 ZbgWX^ Η   Iڼ޽ 23                                      
                                       X++$WEVX3_'EEE,4,2++ Y++$WEVY3_'EEE,4,2++ Z++$WEVZ3_'EEE,4,2++ 
                                       A++$WEVA3_'EEE,4,2++ B       0.00 C       0.00 
   0 x  ++$LABEL,4,0++ [                    ]                                      
   0 WX^ 31  ڼ޽101 { ڼ޽  21                                    
   0 WX^ 32  ڼ޽101 { ڼ޽  22                                    
   0 WX^ 33  ڼ޽101 { ڼ޽  23                                    
   0 dw   Aڼ޽ 31   x100 ߽1                                      
   0 ԑ҂       ++$WEVT1_'EEE,2,1++b                                              
   0 n       ++$CUR_'EEE,3,0++A++$VOL_'EEE,2,1++V x++$SPD_'EEE,3,0++  
                            0.0b d++$PWD_'EEE,1,0++                                       
   0 dw   Aڼ޽ 32   x100 ߽1                                      
   0 ԑ҂       ++$WEVT2_'EEE,2,1++b                                     
   0 dw   Aڼ޽ 33   x100 ߽1                                      
   0 ԑ҂       ++$WEVT3_'EEE,2,1++b                                     
   0 dw   Aڼ޽ 31   x100 ߽1                                      
   0 WX^101  ڼ޽101 { ڼ޽ 13                                    
   0 JE^  6      6 {     5                                    
   0          4      6                                          
                                ++$LABEL,4,0++                                      
   0 nڏI         ++$CUR_'EEE,3,0++A   ++$VOL_'EEE,2,1++V   1.0 b                                      
                        ␳ر 1 d++$PWD_'EEE,2,0++                                      
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end

/*start   
/*%number%=3004
/*%name%=i4|Cg
/*%shape%=U
/*%point%=2
/*%hokan%=LU
/*%reverse%=0
/*honbun                                                                         
$N=1                                                                          
$EEE=1                                                                        
   0 x 0 [#SWeld#             ]                    
#WHILE($STRSTART<=$STRCNT)
   0 x 0 [$++$STRSTART,1,0++$                      ]                    
   $STRSTART=$STRSTART+1
#WEND
$DCNT=1
#WHILE($DCNT<=$REGCNT)
   0 x 0 [$++$REGSTART,3,0++$ ++$REGISTER'DCNT,3,0++                ]                    
   $DCNT=$DCNT+1
   $REGSTART=$REGSTART+1
#WEND
#WHILE($N<=$PASS)                                                             
   0 x     ++$N,1,0++ [%++$N,1,0++%                 ]                    
   0 ZbgWX^ ڼ޽++$REG1,3,0++  ڼ޽101                            
   0 ZbgWX^ ڼ޽++$REG2,3,0++  ڼ޽102                            
   0 WX^ 11  ڼ޽102 | ڼ޽101                                    
   0 ZbgJE^ l   100   1                                         
   0 WX^ 12  ڼ޽  11      1                                    
   0 ZbgJE^  Iڼ޽ 12                                            
                           2                                            
   0 ZbgJE^ l++$WEVU_'EEE,3,2++   3                                         
   0 JE^  4      2      3                                    
   0 WX^ 13  ڼ޽  11      4                                    
   0 ZbgWX^ Η   Iڼ޽ 14                                      
                                       X       0.00 Y       0.00 Z       0.00 
                                       A       0.00 B       0.00 C       0.00 
   0 ZbgWX^ ڼޗvf                                                   
                    ڼ޽ 14  ڼ޽ 13                                      
         XYZABCRSTUVWJKL:000111000000000                                      
   0 ZbgJE^ l     1   5                                         
   0 ZbgJE^ l     0   6                                         
   0 ZbgWX^ Η   Iڼ޽ 21                                      
                                       X++$WEVX1_'EEE,4,2++ Y++$WEVY1_'EEE,4,2++ Z++$WEVZ1_'EEE,4,2++ 
                                       A++$WEVA1_'EEE,4,2++ B       0.00 C       0.00 
   0 ZbgWX^ Η   Iڼ޽ 22                                      
                                       X++$WEVX2_'EEE,4,2++ Y++$WEVY2_'EEE,4,2++ Z++$WEVZ2_'EEE,4,2++ 
                                       A++$WEVA2_'EEE,4,2++ B       0.00 C       0.00 
   0 ZbgWX^ Η   Iڼ޽ 23                                      
                                       X++$WEVX3_'EEE,4,2++ Y++$WEVY3_'EEE,4,2++ Z++$WEVZ3_'EEE,4,2++ 
                                       A++$WEVA3_'EEE,4,2++ B       0.00 C       0.00 
   0 ZbgWX^ Η   Iڼ޽ 24                                      
                                       X++$WEVX4_'EEE,4,2++ Y++$WEVY4_'EEE,4,2++ Z++$WEVZ4_'EEE,4,2++ 
                                       A++$WEVA4_'EEE,4,2++ B       0.00 C       0.00 
   0 x  ++$LABEL,4,0++ [                    ]                                      
   0 WX^ 31  ڼ޽101 { ڼ޽  21                                    
   0 WX^ 32  ڼ޽101 { ڼ޽  22                                    
   0 WX^ 33  ڼ޽101 { ڼ޽  23                                    
   0 WX^ 34  ڼ޽101 { ڼ޽  24                                    
   0 dw   Aڼ޽ 31   x100 ߽1                                      
   0 ԑ҂       ++$WEVT1_'EEE,2,1++b                                              
   0 n       ++$CUR_'EEE,3,0++A++$VOL_'EEE,2,1++V x++$SPD_'EEE,3,0++  
                            0.0b d++$PWD_'EEE,1,0++                                       
   0 dw   Aڼ޽ 32   x100 ߽1                                      
   0 ԑ҂       ++$WEVT2_'EEE,2,1++b                                     
   0 dw   Aڼ޽ 33   x100 ߽1                                      
   0 ԑ҂       ++$WEVT3_'EEE,2,1++b                                     
   0 dw   Aڼ޽ 34   x100 ߽1                                      
   0 ԑ҂       ++$WEVT4_'EEE,2,1++b                                             
   0 dw   Aڼ޽ 31   x100 ߽1                                      
   0 WX^101  ڼ޽101 { ڼ޽ 13                                    
   0 JE^  6      6 {     5                                    
   0          4      6                                          
                                ++$LABEL,4,0++                                      
   0 nڏI         ++$CUR_'EEE,3,0++A   ++$VOL_'EEE,2,1++V   1.0 b                                      
                        ␳ر 1 d++$PWD_'EEE,2,0++                                      
$N=$N+1                                                                       
$EEE=$EEE+1
#WEND                                                                         
   0 x 0 [#EWeld#             ]                    
   0 I                                                                   
/*end



