太閤立志伝５イベントソース
//Ver1.01

//※千階堂必須イベントです
//

チャプター:{

イベント:寄騎・陪臣身分管理{
属性:何度でも
発生契機:毎月処理の最後絶対
発生条件:{
代入ｘ:(状況::月)%(2)
調査:(ｘ)==(1)
調査:(人物::主人公.所属勢力タイプ)==(大名家)
代入拠点Ａ:(人物::主人公.所属拠点)
代入大名家Ａ:(人物::主人公.所属大名家)

コンテナ設定:(人物,所属大名家,大名家Ａ)
コンテナ除外:(人物,人物番号,主人公)
コンテナ除外:(人物,身分,大名)
コンテナ除外:(人物,イベント参加可能,偽)
コンテナ除外:(人物,カテゴリ,イベント人物)
コンテナ除外:(人物,立場,直臣)
コンテナ除外:(人物,所属上司,主人公)
調査:(コンテナカウンタ)>(0)

}//条件〆

スクリプト:{

コンテナソート:(人物,武士勲功,降順)

ループ:{
	代入ｘ:(0)
	コンテナ選択:(人物Ａ,先頭)
	ブロック脱出:(偽)

	代入ｎ:(人物::人物Ａ.武士勲功)

	調査:(ｎ)>=(200)
	ブロック脱出:(偽)

	コンテナ複写:(退避)

	代入人物Ｂ:(人物::人物Ａ.所属上司)

	調査:(人物::人物Ａ.立場)==(陪臣)
	分岐:(真){
		文字列設定:(文字列Ａ)[[陪臣]]
	}
	分岐:(偽){
		文字列設定:(文字列Ａ)[[寄騎]]
	}

	ＡＮＤ調査:{
		調査:(ｎ)>=(200)
		調査:(ｎ)<(600)
		調査:(人物::人物Ａ.身分)<(足軽大将)
	}
	分岐:(真){
		代入ｘ:(1)
		文字列設定:(文字列Ｂ)[[足軽大将]]
		文字列設定:(Ｅｍｐｔｙ)[[＠千＠更新＠人物：：人物Ａ。身分＠2]]
	}

	ＡＮＤ調査:{
		調査:(ｎ)>=(600)
		調査:(ｎ)<(1400)
		調査:(人物::人物Ａ.身分)<(侍大将)
	}
	分岐:(真){
		代入ｘ:(1)
		文字列設定:(文字列Ｂ)[[侍大将]]
		文字列設定:(Ｅｍｐｔｙ)[[＠千＠更新＠人物：：人物Ａ。身分＠3]]
	}

	ＡＮＤ調査:{
		調査:(ｎ)>=(1400)
		調査:(ｎ)<(3000)
		調査:(人物::人物Ａ.身分)<(部将)
	}
	分岐:(真){
		代入ｘ:(1)
		文字列設定:(文字列Ｂ)[[部将]]
		文字列設定:(Ｅｍｐｔｙ)[[＠千＠更新＠人物：：人物Ａ。身分＠4]]
	}

	ＡＮＤ調査:{
		調査:(ｎ)>=(3000)
		調査:(ｎ)<(4000)
		調査:(人物::人物Ａ.立場)==(寄騎)
		調査:(人物::人物Ａ.身分)<(家老)
	}
	分岐:(真){
		代入ｘ:(1)
		文字列設定:(文字列Ｂ)[[家老]]
		文字列設定:(Ｅｍｐｔｙ)[[＠千＠更新＠人物：：人物Ａ。身分＠5]]
	}

	ＡＮＤ調査:{
		調査:(ｎ)>=(4000)
		調査:(人物::人物Ａ.立場)==(寄騎)
		調査:(人物::主人公.身分)!=(大名)
	}
	分岐:(真){
		代入ｘ:(0)
		代入人物Ｃ:(大名家::大名家Ａ.当主)
		会話:(忍者,主人公)[[<人物Ｂ>殿の寄騎、<人物Ａ>殿が\n{人物Ｃ.名前}に\n直臣として呼び戻されました]]
		文字列設定:(Ｅｍｐｔｙ)[[＠千＠立場変更＠人物Ａ＠1＠人物Ｃ]]

		コンテナ設定:(人物,所属上司,人物Ｃ)
		コンテナ除外:(人物,人物番号,主人公)
		コンテナ除外:(人物,人物番号,人物Ａ)
		コンテナ除外:(人物,イベント参加可能,偽)
		コンテナ除外:(人物,親,人物Ｃ)
		コンテナ除外:(人物,人物番号,人物::人物Ｃ.親)
		コンテナ除外:(人物,身分,国主)
		コンテナ除外:(人物,身分,城主)
		コンテナ除外:(人物,身分,家老)

		調査:(コンテナカウンタ)>(4)
		ブロック脱出:(偽)

		コンテナソート:(無効,シャッフル,降順)
		コンテナソート:(人物,忠誠度,昇順)
		コンテナ選択:(人物Ｅ,先頭)

		会話:(忍者,主人公)[[代わりに<人物Ｅ>殿が\n<人物Ｂ>殿の寄騎となりました]]
		文字列設定:(Ｅｍｐｔｙ)[[＠千＠立場変更＠人物Ｅ＠3＠人物Ｂ]]

	}

	条件ブロック:(ｘ)==(1){
		会話:(忍者,主人公)[[<人物Ｂ>殿の<文字列Ａ>\n<人物Ａ>殿が、働きを認められ\n<文字列Ｂ>に昇進{した}]]
	}

	コンテナ複写:(復帰)
	コンテナ選抜:(削る,1)
}//ループ〆

調査:(人物::主人公.身分)!=(大名)
ブロック脱出:(偽)

コンテナ設定:(人物,所属大名家,大名家Ａ)
コンテナ除外:(人物,人物番号,主人公)
コンテナ除外:(人物,身分,大名)
コンテナ除外:(人物,身分,足軽組頭)
コンテナ除外:(人物,身分,足軽大将)
コンテナ除外:(人物,身分,侍大将)
コンテナ除外:(人物,身分,部将)
コンテナ除外:(人物,身分,家老)
コンテナ除外:(人物,イベント参加可能,偽)
コンテナ除外:(人物,カテゴリ,イベント人物)
コンテナソート:(人物,武士勲功,降順)
コンテナソート:(人物,忠誠度,降順)

ループ:{
	コンテナ選択:(人物Ａ,先頭)
	ブロック脱出:(偽)

	コンテナ複写:(退避)

	コンテナ設定:(人物,所属上司,人物Ａ)
	コンテナ除外:(人物,出現フラグ,未出現)
	コンテナ除外:(人物,死亡フラグ,死亡)

	代入ｃ:(コンテナカウンタ)
	調査:(ｃ)<(4)
	分岐:(真){
		代入人物Ｃ:(大名家::大名家Ａ.当主)
		コンテナ設定:(人物,所属上司,人物Ｃ)
		コンテナ除外:(人物,人物番号,主人公)
		コンテナ除外:(人物,人物番号,人物Ａ)
		コンテナ除外:(人物,イベント参加可能,偽)
		コンテナ除外:(人物,親,人物Ｃ)
		コンテナ除外:(人物,人物番号,人物::人物Ｃ.親)
		コンテナ除外:(人物,身分,国主)
		コンテナ除外:(人物,身分,城主)
		コンテナ除外:(人物,身分,家老)

		調査:(コンテナカウンタ)>(4)
		ブロック脱出:(偽)

		ＯＲ調査:{
			ＡＮＤ調査:{
				調査:(人物::人物Ａ.武士勲功)>=(4000)
				調査:(ｃ)<(2)
			}
			ＡＮＤ調査:{
				調査:(人物::人物Ａ.武士勲功)>=(5000)
				調査:(ｃ)<(3)
			}
			ＡＮＤ調査:{
				調査:(人物::人物Ａ.武士勲功)>=(6000)
				調査:(ｃ)<(4)
			}
		}
		ブロック脱出:(偽)

		コンテナソート:(無効,シャッフル,降順)
		コンテナソート:(人物,忠誠度,昇順)
		コンテナ選択:(人物Ｅ,先頭)

		会話:(忍者,主人公)[[<人物Ｅ>殿が、新たに\n<人物Ａ>殿の寄騎となりました]]
		文字列設定:(Ｅｍｐｔｙ)[[＠千＠立場変更＠人物Ｅ＠3＠人物Ａ]]

	}

	コンテナ複写:(復帰)
	コンテナ選抜:(削る,1)
}

}//スクリプト〆
}//イベント〆
//----------------------------------------------------------------------------------------------------------------------

}//チャプター〆