ドイツ語ったー

/**
 * Copyright masamunet ( http://wonderfl.net/user/masamunet )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/mfV0
 */

// forked from masamunet's Twitter占いの基本パックっぽいもの
/*
 * ドイツ語の参考は
 * http://www.21germany.com/
 * こちらのページを参考にさせて頂きました！感謝！
 */
package {
    import flash.display.*;
	import flash.events.*;
	import flash.text.*;
	import flash.net.*;
	import flash.utils.*;
    public class FlashTest extends Sprite {
		private const TITLE:String = "ドイツ語";
		private const URL:String = "http://wonderfl.net/code/9bfc8239d6f2542b3bff17bbdf72cc32dd62a396";
		private const RESULT:/*String*/Array = [
			"グーテン モルゲン",
			"ゼーア　エアフロイト",
			"イッヒ　フロイエ　ミッヒ　ズィー　ツー　ゼーエン",
			"イッヒ　メヒテ　ダス　ゲペック　アプゲーベン",
			"バス　イスト　ダス?",
			"ヴィー　シュペート　イスト　エス　イェッツト?",
			"ビッテ　ヴェクセルン　ズィー　ダス　イン　オイロ",
			"カン　イッヒ　イェット　アインチェッケン？",
			"ヴォー　イスト　デア　　デューティ･フリー･ショップ？",
			"ムス　イッヒ　アイネ　ノイエ　ファーカルテ　カウフェン?",
			"デア　プライス　イスト　アンダース　アルス　アム　タクサメーター　アンゲツァイクト",
			"ハーベン　ズィー　アイネン　ネッツプラーン　デア　ウー･バーン?",
			"ギープト　エス　アイネ　ターゲストゥーア　（ハルプタークストゥーア）?",
			"ヴァス　ケネン　ズィー　ミア　アルス　ターゲスアウスフルーク　エンプフェーレン?",
			"フォン　ヴォー　カン　イッヒ　デン　ブス　ネーメン?",
			"ヴォー　イスト　ダス　ゲシェフト?",
			"ギプト　エス　アイン　ゲシェフト　ヴォー　イェマント　エングリッシュ　シュプリヒト?",
			"ヴィー　ランゲ　ダウエアト　エス?",
			"ハーベン　ズィー　アイン　ツィマー　フュア　ホイテ　ナハト　フライ?",
			"インクルシーヴェ　フリューシュテュック?",
			"ディー　レヒヌング　ビッテ",
			"カン　イッチ　ミット　ディーザー　クライドゥング　アイントレーテン?",
			"ツァーレン　ビット",
			"ヴォー　イスト　ディー　トアレット？",
			"ヒア　シュプリヒト　ヤマダ",
			"イッヒ　ヴェルデ　ズィー　ノッホ　　アインマール　アンルーフェン",
			"ナーハ　ヤーパン　パー　ルフトポステ　ビッテ",
			"ヴィー　フィール　グラート　ハット　エス?",
			"エス　ヴィルト　バルト　レーグネン",
			"イッヒ　ホッフェ　ダス　エス　シェーン　ヴィルト",
			"ダス　ヴァール　アイン　グーテス　トーア",
			"ヴォー　カン　イッヒ　アイン　ティーシャート　カウフェン?",
			"ギプト　エス　イン　デア　ネーエ　アイン　ローカル　イン　デム　イッヒ　エッセン　カン?",
			"イッヒ　ハーベ　アイネ　ライゼフェアズィッヒェルング",
			"カン　イッヒ　ビッテ　アイン　アテスト　ハーベン?",
			"ディー　レヒヌング　ビッテ",
			"イッヒ　ハーベ　マイネン　タッシュ　イム　タクスィ　リーゲン　ラッセン",
			"ヴァス　フュア　アイネ　タッシュ　ハーベン　ズィー　フェアローレン?",
			"アイネ　シュヴァルツェ　タッシュ",
			"カン　イッヒ　マイン　ゲペック　アウフゲーベン?",
			"ヴィア　シュタイゲン　アウス",
			"ダス　イスト　ニヒト　マイネ　シュルト"
		];
        public function FlashTest() {
            // write as3 code here..
            addEventListener(Event.ADDED_TO_STAGE, function(e:Event):void {
				var t0:TextField = new TextField();
				t0.text = TITLE + "ったー";
				t0.x = 0.0;
				t0.y = 0.0;
				t0.width = stage.stageWidth;
				addChild(t0);
				var t1:TextField = new TextField();
				t1.text = "あなたのTwitterのIDをここに入れてみよう。";
				t1.x = 0.0;
				t1.y = 20.0;
				t1.width = stage.stageWidth;
				addChild(t1);
				var t2:TextField = new TextField();
				t2.x = 0.0;
				t2.y = 40.0;
				t2.width = 50.0;
				t2.text = "id:";
				addChild(t2);
				
				
				var inputId:TextField = new TextField();
				inputId.width = 150.0;
				inputId.height = 20.0;
				inputId.x = 50.0;
				inputId.y = 40.0;
				inputId.border = true;
				inputId.type = TextFieldType.INPUT;
				inputId.maxChars = 50;
				addChild(inputId);
				
				var t:TextField = new TextField();
				t.width = stage.stageWidth - 1.0;
				t.height = 60.0
				t.y = 100.0;
				t.border = true;
				t.multiline = true;
				t.text = "ここにあなたにぴったりのドイツ語が表示されるよ";
				addChild(t);
				
				var submitButton:Sprite = createButton("ドイツ？");
				submitButton.x = 50.0;
				submitButton.y = 70.0;
				addChild(submitButton);
				var str:String;
				submitButton.addEventListener(MouseEvent.CLICK, function(e:MouseEvent):void {
					if(inputId.text.length !== 0){
						var r:int;
						var l:int = inputId.text.length;
						for (var i:int = 0; i < l; i++) 
						{
							r += inputId.text.charCodeAt(i);
						}
						str = RESULT[r % RESULT.length];
						t.text = "あなたにぴったりの " + TITLE + " は\r" + str + " です！";
					}else {
						t.text = "あわてずにまずはTwitterのIDを入れてね！";
					}
				});
				
				var twitter:Sprite = createButton("結果をTwitterでつぶやく");
				twitter.x = (stage.stageWidth - twitter.width) * 0.5;
				twitter.y = 170.0;
				addChild(twitter);
				twitter.addEventListener(MouseEvent.CLICK, function(e:MouseEvent):void {
					if(inputId.text.length !== 0){
						var param:String = ".@" + inputId.text + "さんにぴったりの " + TITLE + " は " + str + " です。 [" + TITLE + "ったー] " + URL;
						navigateToURL(new URLRequest("http://twitter.com/home?status=" + escapeMultiByte(param)), "_blank");
					}
				});
			});
        }
		private function createButton(txt:String):Sprite {
			var sp:Sprite = new Sprite();
			var t:TextField = new TextField();
			t.selectable = false;
			t.autoSize = TextFieldAutoSize.LEFT
			t.text = txt;
			sp.addChild(t);
			var g:Graphics = sp.graphics;
			g.beginFill(0xCCCCCC);
			g.drawRect(0, 0, t.width, t.height);
			g.endFill();
			return sp;
		}
    }
}