太閤立志伝５イベントソース
チャプター:{
イベント:新武将元服{
	属性:何度でも
	発生契機:毎月処理の最後
	発生条件:{
		調査:(状況::月)==(1)
		}
	スクリプト:{
		コンテナ設定:(人物,カテゴリ,武将)
		コンテナソート:(人物,人物番号,昇順)
		コンテナ検索:(人物,人物番号,799)
		コンテナ選抜:(ポインタ,以上)
		コンテナ除外:(人物,死亡フラグ,死亡)
		コンテナ絞り込み:(人物,出現フラグ,未出現)
		コンテナ絞り込み:(人物,年齢,15)
		調査:(コンテナカウンタ)>(0)
		ブロック脱出:(偽)

		代入人物Ｃ:(人物::主人公.所属当主)

		ループ:{
			コンテナ選択:(人物Ａ,先頭)
			代入人物Ｂ:(人物::人物Ａ.親)
			代入拠点Ａ:(人物::人物Ａ.所属拠点)
			調査:(人物Ｂ)!=(無効)
			調査:(人物::人物Ｂ.死亡フラグ)!=(死亡)
			調査:(人物::人物Ｂ.出現フラグ)!=(未出現)
			調査:(人物::人物Ｂ.所属勢力タイプ)!=(浪人)
			調査:(人物Ｂ)!=(主人公)
			分岐:(真){
				調査:(人物::人物Ｂ.身分)!=(足軽組頭)
				調査:(人物::人物Ｂ.身分)!=(水夫)
				調査:(人物::人物Ｂ.身分)!=(下忍)
				調査:(人物::人物Ｂ.身分)!=(見習い)
				分岐:(真){
					調査:(人物::人物Ａ.所属当主)==(人物Ｃ)
					分岐:(真){
						人物解雇:(人物Ａ,拠点Ａ,出現済み)
						人物登用:(人物Ａ,陪臣,人物Ｂ)
						会話:(忍者,主人公)[[<人物Ｂ>の子、<人物Ａ>が元服しました]]
						}
					分岐:(偽){
						人物解雇:(人物Ａ,拠点Ａ,出現済み)
						人物登用:(人物Ａ,陪臣,人物Ｂ)
						}
					}
				分岐:(偽){
					人物解雇:(人物Ａ,拠点Ａ,出現済み)
					}
				}
			分岐:(偽){
				人物解雇:(人物Ａ,拠点Ａ,出現済み)
				}
			コンテナ選抜:(削る,1)
			調査:(コンテナカウンタ)>(0)
			ブロック脱出:(偽)
			}
		}
	}
}