太閤立志伝５イベントソース

チャプター:{
イベント:寄騎昇進願い{
属性:何度でも
発生契機:室内画面表示後(主人公居城,主人公評定)
発生条件:{
調査:(人物::主人公.身分)==(大名)
代入大名家Ａ:(人物::主人公.所属大名家)
}

スクリプト:{

コンテナ設定:(人物,カテゴリ,武将)
コンテナ除外:(人物,死亡フラグ,死亡)
コンテナ除外:(人物,出現フラグ,未出現)
コンテナ除外:(人物,人物番号,主人公)
コンテナ絞り込み:(人物,所属大名家,大名家Ａ)
コンテナ絞り込み:(人物,立場,寄騎)
コンテナソート:(人物,武士勲功,降順)
調査:(コンテナカウンタ)>(0)
コンテナ複写:(退避)

ループ:{

コンテナ複写:(復帰)
コンテナ選択:(人物Ａ,先頭)
代入城Ａ:(人物::人物Ａ.所属拠点)
調査:(城::城Ａ.戦闘フラグ)==(平常)
代入人物Ｂ:(城::城Ａ.城主)

ＯＲ調査:{
ＡＮＤ調査:{
	調査:(人物::人物Ａ.武士勲功)>=(3000)
	調査:(人物::人物Ａ.身分)==(部将)
	}
}

分岐：(真){
	会話:(主人公,勲功家臣)[[では、評定を始める]]
	会話:(勲功家臣,主人公)[[{二人称}、<城Ａ>城城主<人物Ｂ>より\n寄騎武将・<人物Ａ>の昇進願いが\n届けられておりまする]]
	ウェイト:(0.2)
	会話:(主人公,勲功家臣)[[ふむ、{人物Ａ.名前}が家老職に昇進か…\nもはや寄騎部将という地位では\n忠義に充分な恩賞も出せぬな…]]
	会話選択:(勲功家臣,主人公)[[{人物Ａ.名前}を家老に昇進させ{ます}か？\n一度、寄騎職を解き本城に召還の上に\nなり{ます}が…]]
	ウェイト:(0.2)
	選択:[[<人物Ａ>を家老に昇進させる]][[<人物Ａ>の昇進を見合わせる]]
	分岐:([[<人物Ａ>を家老に昇進させる]]){
	ウェイト:(0.3)
	ＳＥスタート:(勝利ファンファーレ・合戦)
	会話:(主人公,勲功家臣)[[ならば<人物Ａ>の家老昇進を許そう\n(勲功家臣.名)、(人物Ａ.名)には一度本城へ戻る様にと\n沙汰を申し付けておけい]]
	会話:(勲功家臣,主人公)[[御意]]
	ウェイト:(0.5)
	ナレーション:[[<人物Ａ>は家老に昇進しました\n<人物Ｂ>の寄騎職は解任されます]]
	代入拠点Ａ:(人物::人物Ａ.所属拠点)
	代入国Ａ:(拠点::拠点Ａ.所属国)
	コンテナ設定:(町,所属国,国Ａ)
	コンテナ選択:(町Ａ,先頭)
	代入ａ:(人物::人物Ａ.武士勲功)
	人物解雇:(人物Ａ,町Ａ,出現済み)
	更新:(人物::人物Ａ.武士勲功)(ａ)
	人物登用:(人物Ａ,直臣,主人公)
	コンテナ除外:(人物,人物番号,人物Ａ)
	コンテナ選択:(人物Ａ,先頭)
	ブロック脱出:
	}
		分岐:([[<人物Ａ>の昇進を見合わせる]]){
		会話:(主人公,勲功家臣)[[何、<人物Ａ>が家老に、か…\n\n\n此度は彼の者の昇進は見合わせよう\nそのように(人物Ｂ.名)へ沙汰を申し付けて\nおけい]]
		会話:(勲功家臣,主人公)[[左様にござりまするか…\nされど、勲功を挙げた家臣を賞さぬは\n傾国の兆しと申しまするぞ]]
		会話:(主人公,勲功家臣)[[今は故あって昇進出来ぬだけじゃ\nおいおい、論功して遣わそうぞ]]
		会話:(勲功家臣,主人公)[[御意]]
		コンテナ除外:(人物,人物番号,人物Ａ)
		コンテナ選択:(人物Ａ,先頭)
		ブロック脱出:
			}
		}
ＯＲ調査:{
	ＡＮＤ調査:{
	調査:(人物::人物Ａ.武士勲功)>=(1400)
	調査:(人物::人物Ａ.身分)==(侍大将)
			}
		}
	分岐：(真){
	会話:(主人公,勲功家臣)[[では、評定を始める]]
	会話:(勲功家臣,主人公)[[{二人称}、<城Ａ>城主<人物Ｂ>より\n寄騎武将・<人物Ａ>の昇進願いが\n届けられておりまする]]
	ウェイト:(0.2)
	会話選択:(勲功家臣,主人公)[[{人物Ａ.名前}を部将に昇進させ{ます}か？]]
	ウェイト:(0.2)
	選択:[[<人物Ａ>を部将に昇進させる]][[<人物Ａ>の昇進を見合わせる]]

		分岐:([[<人物Ａ>を部将に昇進させる]]){
		ウェイト:(0.3)
		ＳＥスタート:(勝利ファンファーレ・合戦)
		会話:(主人公,勲功家臣)[[ならば<人物Ａ>の部将昇進を許そう\n(勲功家臣.名)、そのように(人物Ｂ.名)へ沙汰を申し付けて\nおけい]]
		会話:(勲功家臣,主人公)[[御意]]
		代入拠点Ａ:(人物::人物Ａ.所属拠点)
		代入国Ａ:(拠点::拠点Ａ.所属国)
		コンテナ設定:(町,所属国,国Ａ)
		コンテナ選択:(町Ａ,先頭)
		代入ａ:(人物::人物Ａ.武士勲功)
		人物解雇:(人物Ａ,町Ａ,出現済み)
		更新:(人物::人物Ａ.武士勲功)(ａ)
		人物登用:(人物Ａ,寄騎,人物Ｂ)
		コンテナ除外:(人物,人物番号,人物Ａ)
		コンテナ選択:(人物Ａ,先頭)
		ブロック脱出:
			}
		分岐:([[<人物Ａ>の昇進を見合わせる]]){
		会話:(主人公,勲功家臣)[[何、<人物Ａ>が部将に、か…\n\n\n此度は彼の者の昇進は見合わせよう\nそのように(人物Ｂ.名)へ沙汰を申し付けて\nおけい]]
		会話:(勲功家臣,主人公)[[左様にござりまするか…\nされど、勲功を挙げた家臣を賞さぬは\n傾国の兆しと申しまするぞ]]
		会話:(主人公,勲功家臣)[[今は故あって昇進出来ぬだけじゃ\nおいおい、論功して遣わそうぞ]]
		会話:(勲功家臣,主人公)[[御意]]
		コンテナ除外:(人物,人物番号,人物Ａ)
		コンテナ選択:(人物Ａ,先頭)
		ブロック脱出:
			}
		}

	ＯＲ調査:{
		ＡＮＤ調査:{
		調査:(人物::人物Ａ.武士勲功)>=(600)
		調査:(人物::人物Ａ.身分)==(足軽大将)
				}
			}
	分岐：(真){
	会話:(主人公,勲功家臣)[[では、評定を始める]]
	会話:(勲功家臣,主人公)[[{二人称}、<城Ａ>城主<人物Ｂ>より\n寄騎武将・<人物Ａ>の昇進願いが\n届けられておりまする]]
	ウェイト:(0.2)
	会話選択:(勲功家臣,主人公)[[{人物Ａ.名前}を侍大将に昇進させ{ます}か？]]
	ウェイト:(0.2)
	選択:[[<人物Ａ>を侍大将に昇進させる]][[<人物Ａ>の昇進を見合わせる]]

	分岐:([[<人物Ａ>を侍大将に昇進させる]]){
	ウェイト:(0.3)
	ＳＥスタート:(勝利ファンファーレ・合戦)
	会話:(主人公,勲功家臣)[[ならば<人物Ａ>の侍大将昇進を許そう\n(勲功家臣.名)、そのように(人物Ｂ.名)へ沙汰を申し付けて\nおけい]]
	会話:(勲功家臣,主人公)[[御意]]
	代入拠点Ａ:(人物::人物Ａ.所属拠点)
	代入国Ａ:(拠点::拠点Ａ.所属国)
	コンテナ設定:(町,所属国,国Ａ)
	コンテナ選択:(町Ａ,先頭)
	代入ａ:(人物::人物Ａ.武士勲功)
	人物解雇:(人物Ａ,町Ａ,出現済み)
	更新:(人物::人物Ａ.武士勲功)(ａ)
	人物登用:(人物Ａ,寄騎,人物Ｂ)
	コンテナ除外:(人物,人物番号,人物Ａ)
	コンテナ選択:(人物Ａ,先頭)
	ブロック脱出:
		}

		分岐:([[<人物Ａ>の昇進を見合わせる]]){
		会話:(主人公,勲功家臣)[[何、<人物Ａ>が侍大将に、か…\n\n\n此度は彼の者の昇進は見合わせよう\nそのように(人物Ｂ.名)へ沙汰を申し付けて\nおけい]]
		会話:(勲功家臣,主人公)[[左様にござりまするか…\nされど、勲功を挙げた家臣を賞さぬは\n傾国の兆しと申しまするぞ]]
		会話:(主人公,勲功家臣)[[今は故あって昇進出来ぬだけじゃ\nおいおい、論功して遣わそうぞ]]
		会話:(勲功家臣,主人公)[[御意]]
		コンテナ除外:(人物,人物番号,人物Ａ)
		コンテナ選択:(人物Ａ,先頭)
		ブロック脱出:
			}
		}

ＯＲ調査:{
ＡＮＤ調査:{
	調査:(人物::人物Ａ.武士勲功)>=(200)
	調査:(人物::人物Ａ.身分)==(足軽組頭))
			}
		}
	分岐:(真){
	会話:(主人公,勲功家臣)[[では、評定を始める]]
	会話:(勲功家臣,主人公)[[{二人称}、<城Ａ>城主<人物Ｂ>より\n寄騎武将・<人物Ａ>の昇進願いが\n届けられておりまする]]
	ウェイト:(0.2)
	会話選択:(勲功家臣,主人公)[[{人物Ａ.名前}を足軽大将に昇進させ{ます}か？]]
	ウェイト:(0.2)
	選択:[[<人物Ａ>を足軽大将に昇進させる]][[<人物Ａ>の昇進を見合わせる]]

	分岐:([[<人物Ａ>を足軽大将に昇進させる]]){
	ウェイト:(0.3)
	ＳＥスタート:(勝利ファンファーレ・合戦)
	会話:(主人公,勲功家臣)[[ならば<人物Ａ>の足軽大将昇進を許そう\n(勲功家臣.名)、そのように(人物Ｂ.名)へ沙汰を申し付けて\nおけい]]
	会話:(勲功家臣,主人公)[[御意]]
	代入拠点Ａ:(人物::人物Ａ.所属拠点)
	代入国Ａ:(拠点::拠点Ａ.所属国)
	コンテナ設定:(町,所属国,国Ａ)
	コンテナ選択:(町Ａ,先頭)
	代入ａ:(人物::人物Ａ.武士勲功)
	人物解雇:(人物Ａ,町Ａ,出現済み)
	更新:(人物::人物Ａ.武士勲功)(ａ)
	人物登用:(人物Ａ,寄騎,人物Ｂ)
	コンテナ除外:(人物,人物番号,人物Ａ)
	コンテナ選択:(人物Ａ,先頭)
	ブロック脱出:
	}
		分岐:([[<人物Ａ>の昇進を見合わせる]]){
		会話:(主人公,勲功家臣)[[何、<人物Ａ>が足軽大将に、か…\n\n\n此度は彼の者の昇進は見合わせよう\nそのように(人物Ｂ.名)へ沙汰を申し付けておけい]]
		会話:(勲功家臣,主人公)[[左様にござりまするか…\nされど、勲功を挙げた家臣を賞さぬは\n傾国の兆しと申しまするぞ]]
		会話:(主人公,勲功家臣)[[今は故あって昇進出来ぬだけじゃ\nおいおい、論功して遣わそうぞ]]
		会話:(勲功家臣,主人公)[[御意]]
		コンテナ除外:(人物,人物番号,人物Ａ)
		コンテナ選択:(人物Ａ,先頭)
		ブロック脱出:
			}
		}

			コンテナ除外:(人物,人物番号,人物Ａ)
			調査:(コンテナカウンタ)>(0)
			ブロック脱出:(偽)
			コンテナ選択:(人物Ａ,先頭)
			コンテナ複写:(退避)
						}
ブロック脱出:
			}
		}
	}
}