とある世界のタクシー料金横へな 2015.4.18 問題

問題

とある世界のタクシーの運賃を計算してほしい。
何もかもだと大変なので、円來市と炭州市という2つの市の範囲だけでよい。
乗り降りする場所はA〜Gだけを考える。
右図の通り。
経路は客が指定する。理不尽な経路（例 : ABABCBA）でも気にしない。

で。
料金体系が円來市と炭州市で異なる。下表の通り。

市	初乗り	距離加算
円來市	995m までは 400円	200m 進むごとに 60円加算
炭州市	845m までは 350円	200m 進むごとに 50円加算

細かいことを書くと。

乗車地点での自治体で初乗りの距離と値段が決まる。
　例 : C→D→E という経路だと、円來市の C で乗ったので初乗り995m となる。
初乗りの距離が終わったタイミングで加算。
加算される位置の自治体で加算の値段が決まる。

ということになっている。

例えば。
A→D→F→C
という経路について考える。

A は円來市なので、初乗り 995m / 400 円。
初乗りでDからFに向かって455 m の所まで来る。ここでメーターアップ。
DとF の間なので炭州市。50円。
そのまま 200m 進むと F から C に向かって145 m地点。ここでメーターアップ。
F とC の間なので円來市。60円。
合計 510円。

この、510 という値を求めるプログラムを書くのが今回の課題。

入力

入力は、乗車位置と降車位置を含む経路を示す文字列。
ADFC
こんな感じ。
見ての通り、区切り文字などはない。

出力

タクシー料金を普通に10進数で出力する。
510
こんな感じ。
「円」とかはつけない。

補足

不正な入力に対処する必要はない。
AGD のような、隣接していない地点が並んだ経路のことは考慮しなくて良い。
本物のタクシーには「時速が10km以下である時間について、1分45秒ごとに90円加算」のようなルールがあるが、この問題ではそういうルールはないものとする。
実装ができた方は Qiitaの記事のコメント欄からリンクを張っていただくと見つけやすくて助かります。
この問題は2015年4月18日に開催される第30回オフラインリアルタイムどう書くの問題です。イベントについては Doorkeeper のページの方を御覧下さい。

サンプルデータ

#	入力	期待
0	`ADFC`	`510`
1	`CFDA`	`500`
2	`AB`	`460`
3	`BA`	`460`
4	`CD`	`400`
5	`DC`	`350`
6	`BG`	`520`
7	`GB`	`530`
8	`FDA`	`450`
9	`ADF`	`450`
10	`FDACB`	`750`
11	`BCADF`	`710`
12	`EDACB`	`800`
13	`BCADE`	`810`
14	`EGFCADE`	`920`
15	`EDACFGE`	`910`
16	`ABCDA`	`960`
17	`ADCBA`	`1000`
18	`BADCFGB`	`1180`
19	`BGFCDAB`	`1180`
20	`CDFC`	`460`
21	`CFDC`	`450`
22	`ABGEDA`	`1420`
23	`ADEGBA`	`1470`
24	`CFGB`	`640`
25	`BGFC`	`630`
26	`ABGEDFC`	`1480`
27	`CFDEGBA`	`1520`
28	`CDFGEDABG`	`1770`
29	`GBADEGFDC`	`1680`

C/C++/Java 用のテストデータ

/*0*/ test( "ADFC", "510" );    
/*1*/ test( "CFDA", "500" );    
/*2*/ test( "AB", "460" );    
/*3*/ test( "BA", "460" );    
/*4*/ test( "CD", "400" );    
/*5*/ test( "DC", "350" );    
/*6*/ test( "BG", "520" );    
/*7*/ test( "GB", "530" );    
/*8*/ test( "FDA", "450" );    
/*9*/ test( "ADF", "450" );    
/*10*/ test( "FDACB", "750" );    
/*11*/ test( "BCADF", "710" );    
/*12*/ test( "EDACB", "800" );    
/*13*/ test( "BCADE", "810" );    
/*14*/ test( "EGFCADE", "920" );    
/*15*/ test( "EDACFGE", "910" );    
/*16*/ test( "ABCDA", "960" );    
/*17*/ test( "ADCBA", "1000" );    
/*18*/ test( "BADCFGB", "1180" );    
/*19*/ test( "BGFCDAB", "1180" );    
/*20*/ test( "CDFC", "460" );    
/*21*/ test( "CFDC", "450" );    
/*22*/ test( "ABGEDA", "1420" );    
/*23*/ test( "ADEGBA", "1470" );    
/*24*/ test( "CFGB", "640" );    
/*25*/ test( "BGFC", "630" );    
/*26*/ test( "ABGEDFC", "1480" );    
/*27*/ test( "CFDEGBA", "1520" );    
/*28*/ test( "CDFGEDABG", "1770" );    
/*29*/ test( "GBADEGFDC", "1680" );

とある世界のタクシー料金 横へな 2015.4.18 問題

問題

入力

出力

補足

サンプルデータ

C/C++/Java 用のテストデータ

とある世界のタクシー料金横へな 2015.4.18 問題