"（２）とは別々に Doit してください。"
| aMoneyKansanGraphView |
		"マネー換算マネージャの初期化"
			MoneyMng initialize.
		"６５５３５円を換算"
			MoneyMng money do:65535.

		"マネー換算グラフビューを生成"
 	       aMoneyKansanGraphView := MoneyKansanGraphView new.
		"各種パラメータの設定"
	        aMoneyKansanGraphView label: 'マネー換算プログラム　グラフ表示'.
	        aMoneyKansanGraphView maximumSize: 644 @ 484.
	        aMoneyKansanGraphView minimumSize: 644 @ 484.
	        aMoneyKansanGraphView borderWidth: 2.
	        aMoneyKansanGraphView backgroundColor: Color white.
		"マネー換算マネージャ内のモデルとグラフビューを関連付け"
			MoneyMng View:aMoneyKansanGraphView.
"(２)"
| aMoneyKansanTextView |
		"マネー換算テキストビューを生成"
	        aMoneyKansanTextView:= MoneyKansanTextView new.

		"各種パラメータの設定"
	        aMoneyKansanTextView model: aMoneyKansan.
	        aMoneyKansanTextView label: 'マネー換算プログラム　テキスト表示'.
	        aMoneyKansanTextView maximumSize: 320 @ 320.
	        aMoneyKansanTextView minimumSize: 320 @ 320.
 	       aMoneyKansanTextView borderWidth: 2.
 	       aMoneyKansanTextView backgroundColor: Color white.

		"マネー換算マネージャ内のモデルとテキストビューを関連付け"
			MoneyMng View:aMoneyKansanTextView.