sample.basを強化

プロトタイプとしての機能は大体そろった。