//自動手紙
//stabucky.com
//2005-02-15 ver.1.00
//2005-02-23 ver.1.01

function doit(){
	var aite=document.mf.namefrom.value;
	var jibun=document.mf.nameto.value;
	var myobj=document.getElementsByTagName('div');
	myobj[0].innerHTML=makemail(aite,jibun);
}

function makemail(aite,jibun){
	if(aite=="")aite="差出人";
	if(jibun=="")jibun="宛先人";

	hajime=new Array(
"【自分】さん、こんにちは。お元気ですか。",
"こんにちは、【自分】さん。お久しぶりです。",
"ご無沙汰しています。【相手】です。",
"【自分】さん、お元気ですか。【相手】です。",
"【自分】さんへ。お久しぶりです。",
"ずいぶんとご無沙汰してごめんなさい。【相手】です。",
"【自分】さん。ご無沙汰して申し訳ありません。");

	honbun=new Array(
"突然ですが、今度、結婚することになりました。相手は【職業】です。新居は【場所】になります。【結婚挨拶】",
"先日、【場所】に引越しました。【引越挨拶】",
"【自分】さんのアドバイス通り、来月、【職業】をやめることになりました。次は【職業2】でもやろうかな、と思っています。そのときはまたよろしくお願いします。",
"この度、結婚いたしまして、【場所】にささやかな新居を構えることとなりました。",
"今度、【場所】から【場所2】に引っ越すことになりましたのでご連絡します。【引越挨拶】",
"子供ができました。もう性別も分かっています。名前はあなたと同じ【自分】にするつもりです。",
"今度、仕事を始めることになりました。【職業】です。【職業挨拶】場所は【場所】です。【引越挨拶】",
"ついに、結婚することになりました。相手は【職業】なんですよ。当面、【場所】で暮らします。【結婚挨拶】",
"結婚します。新居は【場所】です。共通の友人の紹介で知り合いました。【職業】なんですよ。【結婚挨拶】",
"今度、【職業】をやめて、【職業2】になります。【職業挨拶】",
"来月、結婚します。相手は【職業】の仕事をしています。【場所】で暮らすことになります。【結婚挨拶】",
"【職業】などいろいろ転職しましたが、ついに【職業2】になります。【職業挨拶】",
"子供が生れました。名前はあなたと同じ【自分】にしました。",
"突然のことで驚かれることとは存じますが、今月はじめに結婚いたしました。相手は同じ職場で働いていた人で【職業】です。",
"さて突然ではありますが、念願の子供ができました。病院に行ったところ、妊娠3か月、順調とのことです。つわりもなく、元気ですので安心してください。",
"今度、【場所】に引っ越します。【職業】を始めようと思います。【引越挨拶】",
"突然のことで驚かれることとは存じますが、念願の子供ができました。将来は【職業】にさせたいです。");

	owari=new Array(
"それでは、また。",
"また連絡します。さようなら。",
"とりあえず、連絡まで。",
"とりあえず、ご連絡まで。",
"それでは、ごきげんよう。");

	basho=new Array("コネチカット","ユタ","オハイオ","ワイオミング","ハワイ","オーストラリア","イラク","パプアニューギニア","カムチャツカ半島","アーカンソー","北海道","青森","岩手","宮城","秋田","山形","福島","茨城","栃木","群馬","埼玉","千葉","東京都","神奈川","新潟","富山","石川","福井","山梨","長野","岐阜","静岡","愛知","三重","滋賀","京都","大阪","兵庫","奈良","和歌山","鳥取","島根","岡山","広島","山口","徳島","香川","愛媛","高知","福岡","佐賀","長崎","熊本","大分","宮崎","鹿児島","沖縄");

	shokugyo=new Array("インテリアコーディネーター","メジャーリーガー","Ｊリーガー","客室乗務員","実業家","地主","小説家","映画評論家","漫才師","落語家","軍事評論家","服飾評論家","華道の家元","茶道の家元","格闘家","料理研究家","料理人","気象予報士","芸術家","画家","バイオリニスト","ギタリスト","歌手","ピアニスト","作曲家","作詞家","シンガーソングライター","舞踊家","バレリーナ","軍事アナリスト","経済アナリスト","アナウンサー","俳優","温泉掘削員","長距離トラックの運転手","ソムリエ","三味線演奏家","ディズニーランドのダンサー","建築家","歯科医師","医師","漫画家","脳外科医","ゆりかもめの運転手","長野新幹線の運転手","警察官","消防士","歯科衛生士","声楽家","司会者","弁護士","裁判官","姓名判断研究家","風水師","陰陽師","手品師","大道芸人","指揮者","振付師","フラメンコダンサー","美容師");

	kekkonaisatsu=new Array(
"事情があって、内輪だけで挙式を済ませました。",
"まだまだ未熟な二人ですが、これからも一層の御鞭撻をお願い申上げます。",
"これから二人で力を合わせてがんばっていきたいと思います。",
"応援よろしくお願いいたします。",
"これからも応援をおねがいいたします。",
"応援をおねがいいたします。",
"落ち着きましたら、久しぶりにご挨拶かたがたお訪ねしたいと思っています。そのときはよろしくお願いいたします。",
"これからもよろしくお願いします。");

	hikkoshiaisatsu=new Array(
"近くに来たときは是非、お立ち寄りください。",
"ご近所にお越しの際には、ぜひお立ち寄り下さいませ。",
"是非、遊びに来てください。",
"落ち着いたら連絡します。",
"お近くにお越しの際は遊びに来てください。",
"近くまで来るときは連絡してください。");

	shokugyoaisatsu=new Array(
"夢が叶いました。",
"これで長年の夢が叶います。",
"子供の頃からの夢でした。",
"今まで本当にお世話になりました。",
"【自分】さんのおかげです。",
"これも【自分】さんのおかげだと思っています。",
"ようやく、といった気持ちです。",
"期待してください。");

	var tmpaite=0;
	for(var iii=0;iii<aite.length;iii++){
		tmpaite=tmpaite+aite.charCodeAt(iii);
	}

	var tmpjibun=0;
	for(var iii=0;iii<jibun.length;iii++){
		tmpjibun=tmpjibun+jibun.charCodeAt(iii);
	}

	var strshokugyo=shokugyo[tmpaite%shokugyo.length];
	var strshokugyo2=shokugyo[tmpjibun%shokugyo.length];
	var strbasho=basho[tmpaite%basho.length];
	var strbasho2=basho[tmpjibun%basho.length];
	var strshokugyoaisatsu=shokugyoaisatsu[tmpaite%shokugyoaisatsu.length];
	var strkekkonaisatsu=kekkonaisatsu[tmpaite%kekkonaisatsu.length];
	var strhikkoshiaisatsu=hikkoshiaisatsu[tmpaite%hikkoshiaisatsu.length];

	var bunsho=hajime[tmpaite%hajime.length]+"<br>"+honbun[tmpaite%honbun.length]+"<br>"+owari[tmpaite%owari.length];
	bunsho=bunsho.replace(/【職業】/g,strshokugyo);
	bunsho=bunsho.replace(/【場所】/g,strbasho);
	bunsho=bunsho.replace(/【職業2】/g,strshokugyo2);
	bunsho=bunsho.replace(/【場所2】/g,strbasho2);
	bunsho=bunsho.replace(/【引越挨拶】/g,strhikkoshiaisatsu);
	bunsho=bunsho.replace(/【結婚挨拶】/g,strkekkonaisatsu);
	bunsho=bunsho.replace(/【職業挨拶】/g,strshokugyoaisatsu);
	bunsho=bunsho.replace(/【自分】/g,jibun);
	bunsho=bunsho.replace(/【相手】/g,aite);

	return bunsho;
}