太閤立志伝５イベントソース
//
//スクリプト名：勲功城主
//
//城主になることなしに武士勲功が8000を超えた場合
//直轄領が１つあれば無条件で城主に昇格できる
//戦嫌いな大名用（陪臣であっても可）
//
//
チャプター:{
イベント:勲功城主{
属性:一度だけ
発生契機:評定開始時(主人公当主)
発生条件:{
調査:(人物::主人公.所属勢力タイプ)==(大名家)
調査:(人物::主人公.身分)<=(家老)
調査:(人物::主人公.武士勲功)>=(8000)
}//発生条件
スクリプト:{
コンテナ設定:(城,城主,主人公当主)
//コンテナ除外:(城,城番号,主人公当主居城)
//代入ａ:(コンテナカウンタ)
//ナレーション:[[コンテナカウンタは<ａ>です]]
代入ｂ:(0)//条件ループ脱出用
コンテナソート:(城,防御度,昇順)
コンテナソート:(城,規模,昇順)
条件ループ:(コンテナカウンタ)>=(1){
	コンテナ選択:(城Ａ,先頭)
	調査:(大名家::主人公大名家.本城)!=(城Ａ)
	分岐:(真){
		城主任命:(主人公,城Ａ)
		会話:(主人公当主,主人公)[[では、今月は新たに城主を任命致す。(主人公)！前に出よ]]
		会話:(主人公,主人公当主)[[はっ！！]]
		会話:(主人公当主,主人公)[[お前を<城Ａ>の城主に任じる。早速出立し、城を治めよ。]]
		会話:(主人公,主人公当主)[[ははっ！有難き幸せ！！]]
		会話:(主人公当主,主人公)[[命令は追って伝える]]
		ナレーション:[[(主人公)は勲功が8000に達した為、\n特例により<城Ａ>の城主になりました。]]
		代入ｂ:(1)
		外に出す://外に出ないと主命選択を実行してしまう（主命あり状態が解消されなくなる）
	}//分岐:(真)
	コンテナ選抜:(削る,1)
	調査:(ｂ)==(1)
	ブロック脱出:(真)
}//条件ループ
}//スクリプト
}//イベント

}//チャプター