sub get_unit {
##################パーツ情報の定義（ここで定義されたパーツは管理者メニューの「街のレイアウト作成」に現れます。
	%unit = (
#画像のみのパーツ（自分の好きなパーツ画像を増やしたい場合は、このフォーマットを参考に追加してください。画像データはimgフォルダに入れてください。画像は全て32px × 32pxに統一する必要があります。パーツ定義はこのままで画像データのみを同じファイル名の任意の画像に差し替えてもOKです）
#　"記号" => "<td><img src=$img_dir/画像ファイル名></td>",
#　※「記号」は識別しやすい任意の文字をつけて構いませんが、あまり長くならないようにしましょう（できるだけ２文字以内）。また他とダブらないように注意してください。

#ver.1.30	パーツのhtml記述をいくつか省略化
"交差" => "<td><img src=$img_dir/kousa_r.gif></td>",
"道横" => "<td><img src=$img_dir/yoko_r.gif></td>",
"道縦" => "<td><img src=$img_dir/tate_r.gif></td>",
"木1" => "<td><img src=$img_dir/tree1.gif></td>",
"木2" => "<td><img src=$img_dir/tree2.gif></td>",
"木3" => "<td><img src=$img_dir/tree3.gif></td>",
"木4" => "<td><img src=$img_dir/tree4.gif></td>",
"海" => "<td><img src=$img_dir/umi.gif></td>",

#リンク用パーツ（姉妹都市など街から他のURLへリンクを貼る場合のフォーマットです。新たに追加する場合は、このフォーマットをコピーしてから、記号、URL、説明、必要ならば画像ファイル名を変更してください）
#　"記号" => "<td><a href=\"リンク先のURL\" target=_blank><img src='$img_dir/画像名'  width=32 height=32 border=0  onMouseOver='onMes5(\"マウスをのせたとき表示される説明\")' onMouseOut='onMes5(\"\")'></a></td>",
#　下は書き方のサンプルです。実際にこれを街に設置しないでください。

"リンク" => "<td><a href=\"http://brassiere.jp/03com/town2/town_maker.cgi\" target=_blank><img src='$img_dir/link.gif'  width=32 height=32 border=0  onMouseOver='onMes5(\"テスト参加用のサンプル設置プログラムです。\")' onMouseOut='onMes5(\"\")'></a></td>",

#機能をもったパーツ（以下は、それぞれ機能をもった建物などへのリンクになりますので、基本的に変更はしないでください。必要であれば、説明、画像ファイル名（src='$img_dir/○○.gifの部分）の変更は可）

"役場" => "<form method=POST action=\"admin.cgi\"><td height=32 width=32><input type=hidden name=mode value=yakuba><input type=hidden name=name value=$name><input type=hidden name=pass value=$pass><input type=hidden name=k_id value=$k_id><input type=hidden name=town_no value=$in{'town_no'}><input type=image src='$img_dir/yakuba.gif'  onMouseOver='onMes5(\"役場です。新規に住民登録された方やランキングを見ることができます。\")' onMouseOut='onMes5(\"\")'></td></form>",		#ver.1.40

"銀行" => "<form method=POST action=\"basic.cgi\"><input type=hidden name=mode value=ginkou><input type=hidden name=name value=$name><input type=hidden name=pass value=$pass><input type=hidden name=k_id value=$k_id><input type=hidden name=town_no value=$in{'town_no'}><td height=32 width=32><input type=image src='$img_dir/bank.gif'  onMouseOver='onMes5(\"銀行です。お金を預けたり引き出したりできます。\")' onMouseOut='onMes5(\"\")'></td></form>",		#ver.1.40

"病院" => "<form method=POST action=\"basic.cgi\"><input type=hidden name=mode value=byouin><input type=hidden name=name value=$name><input type=hidden name=pass value=$pass><input type=hidden name=k_id value=$k_id><input type=hidden name=town_no value=$in{'town_no'}><td height=32 width=32><input type=image src='$img_dir/hospital.gif'  onMouseOver='onMes5(\"病院です。費用は高めですが、ほとんどの病気を全快させます。\")' onMouseOut='onMes5(\"\")'></td></form>",		#ver.1.40

"カード" => "<form method=POST action=\"basic.cgi\"><input type=hidden name=mode value=donus><input type=hidden name=name value=$name><input type=hidden name=pass value=$pass><input type=hidden name=k_id value=$k_id><input type=hidden name=town_no value=$in{'town_no'}><td height=32 width=32><input type=image src='$img_dir/donuts_tate.gif'  onMouseOver='onMes5(\"前の人が引いたカードと同じ数字を出さないようにするカードゲームです。\")' onMouseOut='onMes5(\"\")'></td></form>",		#ver.1.40

"食堂" => "<form method=POST action=\"$script\"><td height=32 width=32><input type=hidden name=mode value=syokudou><input type=hidden name=name value=$name><input type=hidden name=pass value=$pass><input type=hidden name=k_id value=$k_id><input type=hidden name=town_no value=$in{'town_no'}><input type=image src='$img_dir/syokudou.gif'  onMouseOver='onMes5(\"セントラル食堂です。種類は豊富ですが、値段は高めで在庫も少なめです。\")' onMouseOut='onMes5(\"\")'></td></form>",

"デパ" => "<form method=POST action=\"$script\"><td height=32 width=32><input type=hidden name=mode value=depart_gamen><input type=hidden name=name value=$name><input type=hidden name=pass value=$pass><input type=hidden name=k_id value=$k_id><input type=hidden name=town_no value=$in{'town_no'}><input type=image src='$img_dir/depart.gif'  onMouseOver='onMes5(\"中央デパートです。種類は豊富ですが、値段は高めで在庫も少なめです。\")' onMouseOut='onMes5(\"\")'></td></form>",

"ジム" => "<form method=POST action=\"$script\"><td height=32 width=32><input type=hidden name=mode value=gym><input type=hidden name=name value=$name><input type=hidden name=pass value=$pass><input type=hidden name=k_id value=$k_id><input type=hidden name=town_no value=$in{'town_no'}><input type=image src='$img_dir/gym.gif'  onMouseOver='onMes5(\"スポーツジムです。体を鍛えることができます。\")' onMouseOut='onMes5(\"\")'></td></form>",

"学校" => "<form method=POST action=\"$script\"><td height=32 width=32><input type=hidden name=mode value=school><input type=hidden name=name value=$name><input type=hidden name=pass value=$pass><input type=hidden name=k_id value=$k_id><input type=hidden name=town_no value=$in{'town_no'}><input type=image src='$img_dir/school.gif'    onMouseOver='onMes5(\"スクールです。特定の能\力を伸ばすのに大きな効果がありますが、1日1レッスンです。\")' onMouseOut='onMes5(\"\")'></td></form>",

"職安" => "<form method=POST action=\"basic.cgi\"><td height=32 width=32><input type=hidden name=mode value=job_change><input type=hidden name=name value=$name><input type=hidden name=pass value=$pass><input type=hidden name=k_id value=$k_id><input type=hidden name=town_no value=$in{'town_no'}><input type=image src='$img_dir/work.gif'  width=32 height=32 border=0  onMouseOver='onMes5(\"職業安定所です。就職、転職などはこちらへ。\")' onMouseOut='onMes5(\"\")'></td></form>",		#ver.1.40

"空地" => "<td><img src=$img_dir/akiti.gif onMouseOver='onMes5(\"この場所に家を建てることができます。\")' onMouseOut='onMes5(\"\")'></td>",

"問屋" => "<form method=POST action=\"$script\"><td height=32 width=32><input type=hidden name=mode value=orosi><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=hidden name=town_no value=$in{'town_no'}><input type=image src=\"$img_dir/tonya.gif\" onMouseOver='onMes5(\"商店や企業を持っている人は、ここで商品を仕入れることができます。\")' onMouseOut='onMes5(\"\")'></td></form>",

"建築" => "<form method=POST action=\"$script\"><td height=32 width=32><input type=hidden name=mode value=kentiku><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=hidden name=town_no value=$in{'town_no'}><input type=image src=\"$img_dir/kentiku.gif\"  onMouseOver='onMes5(\"建設会社です。家を建てたいときはここに依頼します。\")' onMouseOut='onMes5(\"\")'></td></form>",

"競馬" => "<form method=POST action=\"basic.cgi\"><td height=32 width=32><input type=hidden name=mode value=keiba><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=hidden name=town_no value=$in{'town_no'}><input type=image src=\"$img_dir/keiba.gif\"  onMouseOver='onMes5(\"競馬場です。\")' onMouseOut='onMes5(\"\")'></td></form>",			#ver.1.40

"プロフ" => "<form method=POST action=\"basic.cgi\"><td height=32 width=32><input type=hidden name=mode value=prof><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=hidden name=town_no value=$in{'town_no'}><input type=image src=\"$img_dir/prof.gif\"  onMouseOver='onMes5(\"住民の実際のプロフィールを登録するところです。\")' onMouseOut='onMes5(\"\")'></td></form>",		#ver.1.40

"キャラ" => "<form method=POST action=\"game.cgi\"><td height=32 width=32><input type=hidden name=mode value=c_league><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=hidden name=town_no value=$in{'town_no'}><input type=image src=\"$img_dir/chara_battle.gif\"  onMouseOver='onMes5(\"最強のキャラクターを決める『Cリーグ』会場です。\")' onMouseOut='onMes5(\"\")'></td></form>",		#ver.1.40

"街コン" => "<form method=POST action=\"./mati_contest.cgi\"><td height=32 width=32><input type=hidden name=mode value=matikon><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=hidden name=town_no value=$in{'town_no'}><input type=image src=\"$img_dir/matikon.gif\"  onMouseOver='onMes5(\"街の名誉をかけて競う『週間街コンテスト』です。\")' onMouseOut='onMes5(\"\")'></td></form>",		#ver.1.40

"地" => "<td><img src=$img_dir/kentiku_yotei.gif width=32 height=32  width=32 height=32 border=0 onMouseOver='onMes5(\"建築予\定地です。\")' onMouseOut='onMes5(\"\")'></td>",

#バージョンアップ等により新しい機能パーツを個別に追加する場合、「ここから」～「ここまで」の間に追加してください。
####「ここから」
#ver.1.1追加
"温泉" => "<form method=POST action=\"basic.cgi\"><td height=32 width=32><input type=hidden name=mode value=onsen><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=hidden name=town_no value=$in{'town_no'}><input type=image src=\"$img_dir/onsen.gif\"  onMouseOver='onMes5(\"温泉です。疲れた体を癒しましょう。入浴料は$nyuuyokuryou円です。\")' onMouseOut='onMes5(\"\")'></td></form>",	#ver.1.40

#ver.1.3追加
"斡旋" => "<form method=POST action=\"kekkon.cgi\"><td height=32 width=32><input type=hidden name=mode value=assenjo><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=hidden name=town_no value=$in{'town_no'}><input type=image src=\"$img_dir/assenjo.gif\"  onMouseOver='onMes5(\"恋人斡旋所です。バーチャルな恋愛や結婚をしたい方はこちらへ登録してください。\")' onMouseOut='onMes5(\"\")'></td></form>",		#ver.1.40

####「ここまで」
);

################パーツ情報の定義ここまで
}

sub kozin_house {
#個人の家情報をunitハッシュに代入
	open(OI,"$ori_ie_list") || &error("Open Error : $ori_ie_list");
	@ori_ie_hairetu = <OI>;
	foreach (@ori_ie_hairetu) {
			&ori_ie_sprit($_);
			$unit{"$ori_k_id"} = "<form method=POST action=\"original_house.cgi\"><td><input type=hidden name=mode value=houmon><input type=hidden name=ori_ie_id value=$ori_k_id><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=hidden name=town_no value=$in{'town_no'}><input type=image src=\"$ori_ie_image\"   onMouseOver='onMes5(\"$ori_ie_setumei\")' onMouseOut='onMes5(\"\")'></td></form>";		#ver.1.40
	}
	close(OI);
}

sub simaitosi {
#他の街へのリンク情報をunitハッシュに代入
	$i=0;
	$i2=1;
	foreach (@town_hairetu) {
			$unit{"街$i2"} = "<form method=POST action=\"$script\"><input type=hidden name=mode value=login_view><input type=hidden name=command value=mati_idou><td height=32 width=32><input type=hidden name=town_no value=$i><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=image src=\"$img_dir/mati_link.gif\"    onMouseOver='onMes5(\"$_へ移動\")' onMouseOut='onMes5(\"\")'></td></form>";
			$i ++;
			$i2 ++;
	}
}

sub admin_parts {
#管理者作成BBSへのリンク情報をunitハッシュに代入
	$i=1;
	$i2=0;
	foreach (@admin_bbs_syurui) {
			$unit{"掲$i"} = "<form method=POST action=\"original_house.cgi\"><td height=32 width=32><input type=hidden name=mode value=normal_bbs><input type=hidden name=ori_ie_id value=admin><input type=hidden name=bbs_num value=$i2><input type=hidden name=name value=$in{'name'}><input type=hidden name=pass value=$in{'pass'}><input type=hidden name=town_no value=$in{'town_no'}><input type=image src=\"$img_dir/$admin_bbs_gazou[$i2]\"   onMouseOver='onMes5(\"$_\")' onMouseOut='onMes5(\"\")'></td></form>";		#ver.1.40
			$i ++;
			$i2 ++;
	}
}

1;