太閤立志伝５イベントソース
//
//	滅亡大名切腹回避 ver.2.1
//
//	イベント::滅亡大名切腹回避・初期設定
//	イベント::滅亡大名切腹回避
//
//	イベントフラグ::滅亡大名切腹回避・ＯＮ
//	イベントフラグ::滅亡大名切腹回避・能力値依存
//	イベントフラグ::滅亡大名切腹回避・大名高飛び
//

チャプター:{

	イベント:滅亡大名切腹回避・初期設定{
		属性:一度だけ
		発生契機:ゲームスタート時
		発生条件:{
		}
		スクリプト:{
			ナレーション選択:[[滅亡当主切腹防止機能をＯＮにしますか？]]
			選択:[[ＯＮ]][[ＯＦＦ]]
			分岐:(0){
				更新:(イベントフラグ::滅亡大名切腹回避・ＯＮ)(成立)
				ナレーション選択:[[すべての当主の切腹を防止しますか？\nそれとも、切腹するか否かを\n滅亡側当主の能力値に依存させますか？]]
				選択:[[すべて防止]][[依存させる]]
				分岐:([[依存させる]]){
					更新:(イベントフラグ::滅亡大名切腹回避・能力値依存)(成立)
				}
				ナレーション選択:[[滅亡した当主が一定の条件で\n友好関係にある他大名家へと逃れる機能を\nＯＮにしますか？]]
				選択:[[ＯＮ]][[ＯＦＦ]]
				分岐:(0){
					更新:(イベントフラグ::滅亡大名切腹回避・大名高飛び)(成立)
				}
			}
		}
	}

	イベント:滅亡大名切腹回避{
		属性:何度でも
		発生契機:攻城戦終了時(無効,無効,決着)
		発生条件:{
			調査:(イベントフラグ::滅亡大名切腹回避・ＯＮ)
			ＯＲ調査:{
				ＡＮＤ調査:{
					調査:(軍団::軍団１.結果)==(勝利)
					調査:(軍団::軍団２.結果)==(敗北)
					代入軍団Ａ:(軍団::軍団２)
					代入軍団Ｂ:(軍団::軍団１)
				}
				ＡＮＤ調査:{
					調査:(軍団::軍団１.結果)==(敗北)
					調査:(軍団::軍団２.結果)==(勝利)
					代入軍団Ａ:(軍団::軍団１)
					代入軍団Ｂ:(軍団::軍団２)
				}
			}
			//
			//	軍団Ａ　	敗北側の勢力
			//	軍団Ｂ　	勝利側の勢力
			//
			代入勢力Ａ:(軍団::軍団Ａ.所属勢力)
			//
			//	自勢力滅亡時の動作はまだ作成中
			//
			調査:(勢力::勢力Ａ)!=(人物::主人公.所属勢力)
			//
			//	攻城戦が敗北側勢力の本拠で発生したのでなければイベント発生せず
			//
			調査:(拠点::発生拠点)==(勢力::勢力Ａ.本拠)
			//
			//	人物Ａ　	守備側の当主
			//	勢力Ａ　	守備側の勢力
			//	大名家Ａ	守備側の大名家
			//	忍者衆Ａ	守備側の忍者衆
			//	海賊衆Ａ	守備側の海賊衆
			//	発生拠点	守備側の勢力の本拠、すなわち最後の拠点
			//	城Ａ　　	守備側の大名家の本城、すなわち最後の城
			//	里Ａ　　	守備側の忍者衆の本拠、すなわち最後の里
			//	砦Ａ　　	守備側の海賊衆の本拠、すなわち最後の砦
			//	町Ａ　　	発生拠点と同じ国にある町、すなわち滅亡側の人間が浪人するとしたらこの町
			//	人物Ｂ　	（最初は）攻撃側の軍団長
			//	人物Ｂ　	（途中から）守備側家臣が攻撃側に仕えるとしたらこの人物が上司
			//	勢力Ｂ　	攻撃側の勢力
			//	大名家Ｂ	攻撃側の大名家、または攻撃側勢力の支持大名家
			//	忍者衆Ｂ	攻撃側の忍者衆
			//	海賊衆Ｂ	攻撃側の海賊衆
			//	人物Ｃ　	新しい拠点主
			//	大名家Ｃ	高飛び先の大名家
			//
			代入人物Ａ:(勢力::勢力Ａ.当主)
			//
			//	攻城側軍団の所属勢力と攻城側軍団長の所属勢力が違っていれば
			//	他のイベントによる特殊な攻城戦と思われるためイベント発生せず
			//
			代入勢力Ｂ:(軍団::軍団Ｂ.所属勢力)
			代入人物Ｂ:(軍団::軍団Ｂ.軍団長)
			調査:(人物::人物Ｂ.所属勢力)==(勢力::勢力Ｂ)
			代入ｚ:(0)
			代入ｐ:(0)
			条件ブロック:(勢力::勢力Ａ.勢力タイプ)==(大名家){
				条件ブロック:(拠点::発生拠点.拠点種類)==(城){
					代入ｐ:(1)
					代入大名家Ａ:(人物::人物Ａ.所属大名家)
					代入城Ａ:(拠点::発生拠点)
					場合別:(拠点::発生拠点.拠点タイプ){
						場合分岐:(0){
							文字列設定:(文字列Ａ)[[城]]
						}
						場合分岐:(1){
							文字列設定:(文字列Ａ)[[寺]]
						}
						場合分岐:(2){
							文字列設定:(文字列Ａ)[[館]]
						}
					}
				}
			}
			条件ブロック:(ｐ){
				条件ブロック:(大名家::大名家Ａ.城数)<=(1){
					条件ブロック:(勢力::勢力Ｂ.勢力タイプ)==(大名家){
						代入大名家Ｂ:(人物::人物Ｂ.所属大名家)
						代入ｚ:(1)
					}
					条件ブロック:(勢力::勢力Ｂ.勢力タイプ)==(忍者衆){
						代入忍者衆Ｂ:(人物::人物Ｂ.所属忍者衆)
						条件ブロック:(忍者衆::忍者衆Ｂ.支持大名家)!=(無効){
							代入人物Ｂ:(忍者衆::忍者衆Ｂ.当主)
							代入大名家Ｂ:(忍者衆::忍者衆Ｂ.支持大名家)
							代入人物Ｃ:(大名家::大名家Ｂ.当主)
							代入ｚ:(2)
						}
					}
					条件ブロック:(勢力::勢力Ｂ.勢力タイプ)==(海賊衆){
						代入海賊衆Ｂ:(人物::人物Ｂ.所属海賊衆)
						条件ブロック:(海賊衆::海賊衆Ｂ.支持大名家)!=(無効){
							代入人物Ｂ:(海賊衆::海賊衆Ｂ.当主)
							代入大名家Ｂ:(海賊衆::海賊衆Ｂ.支持大名家)
							代入人物Ｃ:(大名家::大名家Ｂ.当主)
							代入ｚ:(3)
						}
					}
				}
			}
			条件ブロック:(勢力::勢力Ａ.勢力タイプ)==(忍者衆){
				条件ブロック:(勢力::勢力Ｂ.勢力タイプ)==(忍者衆){
					条件ブロック:(拠点::発生拠点.拠点種類)==(里){
						代入里Ａ:(拠点::発生拠点)
						文字列設定:(文字列Ａ)[[里]]
						代入忍者衆Ａ:(人物::人物Ａ.所属忍者衆)
						代入忍者衆Ｂ:(人物::人物Ｂ.所属忍者衆)
						代入人物Ｂ:(忍者衆::忍者衆Ｂ.当主)
						代入人物Ｃ:(忍者衆::忍者衆Ｂ.当主)
						条件ブロック:(忍者衆::忍者衆Ａ.支配力)<=(1){
							代入ｚ:(4)
						}
					}
				}
			}
			条件ブロック:(勢力::勢力Ａ.勢力タイプ)==(海賊衆){
				条件ブロック:(勢力::勢力Ｂ.勢力タイプ)==(海賊衆){
					条件ブロック:(拠点::発生拠点.拠点種類)==(砦){
						代入砦Ａ:(拠点::発生拠点)
						文字列設定:(文字列Ａ)[[砦]]
						代入海賊衆Ａ:(人物::人物Ａ.所属海賊衆)
						代入海賊衆Ｂ:(人物::人物Ｂ.所属海賊衆)
						代入人物Ｂ:(海賊衆::海賊衆Ｂ.当主)
						代入人物Ｃ:(海賊衆::海賊衆Ｂ.当主)
						条件ブロック:(海賊衆::海賊衆Ａ.支配力)<=(1){
							代入ｚ:(5)
						}
					}
				}
			}
			//
			//	変数(ｚ)
			//	(1)	大名家が大名家を滅ぼした
			//	(2)	支持大名家を持つ忍者衆が大名家を滅ぼした
			//	(3)	支持大名家を持つ海賊衆が大名家を滅ぼした
			//	(4)	忍者衆が忍者衆を滅ぼした
			//	(5)	海賊衆が海賊衆を滅ぼした
			//
			//	以上のどれかでない場合はイベント発生せず
			//
			調査:(ｚ)
			//
			//	滅亡側軍団に主人公が参加している場合
			//	攻城戦の終了様式（落城か、交渉による和議か）をユーザに指定してもらう
			//	（ただし本丸陥落時は落城と判定できるので選択肢が出ない）
			//
			条件ブロック:(軍団::軍団Ａ)==(軍団::主人公軍団){
				代入ａ:(0)
				場合別:(ｚ){
					場合分岐:(4){
						条件ブロック:(里::里Ａ.防御度){
							代入ａ:(1)
						}
					}
					場合分岐:(5){
						条件ブロック:(砦::砦Ａ.防御度){
							代入ａ:(1)
						}
					}
					場合分岐:{
						条件ブロック:(城::城Ａ.防御度){
							代入ａ:(1)
						}
					}
				}
				条件ブロック:(ａ){
					画面効果:(ダークアウト)
					ＳＥスタート:(アラシ知らせる)
					ナレーション:[[滅亡大名切腹回避イベント…\n攻城戦がどう終わったか指定してください\n（『交渉』と『落城』から選択）]]
					ナレーション:[[『交渉』を選ぶと切腹防止処理が発動せず\n　以後の結果は和議の内容通りになります\n（落城したのに選ぶと当主が死亡します）]]
					文字列設定:(文字列Ｂ)[[]]
					条件ブロック:(イベントフラグ::滅亡大名切腹回避・大名高飛び){
						文字列設定:(文字列Ｂ)[[\n（他の大名家の元へ逃れることも可能です）]]
					}
					ナレーション:[[『落城』で切腹防止処理が発動します<文字列Ｂ>]]
					ナレーション選択:[[攻城戦がどう終わったか指定してください]]
					選択:[[交渉]][[落城]]
					//
					//	[[交渉]]が選ばれた場合イベント発生せず
					//
					画面効果:(ダークイン)
				}
			}
			//
			//	攻城側軍団に主人公が参加している場合
			//	本丸陥落後の滅亡側高飛びという以外の形ではイベント発動せず
			//	（本丸陥落以外の場合、交渉による和議の可能性を排除できない）
			//
			条件ブロック:(軍団::軍団Ｂ)==(軍団::主人公軍団){
				場合別:(ｚ){
					場合分岐:(4){
						調査:(里::里Ａ.防御度)==(0)
					}
					場合分岐:(5){
						調査:(砦::砦Ａ.防御度)==(0)
					}
					場合分岐:{
						調査:(城::城Ａ.防御度)==(0)
					}
				}
			}
			代入国Ａ:(拠点::発生拠点.所属国)
			コンテナ設定:(町,所属国,国Ａ)
			コンテナ選択:(町Ａ,先頭)
			条件ブロック:(ｚ)==(1){
				//
				//	攻撃側・守備側ともに大名家所属
				//
				//	滅亡側家臣団は人物Ｂの家臣になるとする
				//	攻撃側軍団長（旧人物Ｂ）の身分が城主以上なら軍団長が人物Ｂ
				//	攻撃側軍団長が城主未満で軍団長の上司が城主以上ならその上司が人物Ｂ
				//	攻撃側軍団長が城主未満で軍団長の上司が城主未満なら攻撃側大名が人物Ｂ
				//	（例えば、城主就任前の秀吉の陪臣である半兵衛が攻撃側軍団長だった場合は信長）
				//
				条件ブロック:(人物::人物Ｂ.身分)<(城主){
					代入人物Ｂ:(人物::人物Ｂ.所属上司)
					条件ブロック:(人物::人物Ｂ.身分)<(城主){
						代入人物Ｂ:(大名家::大名家Ｂ.当主)
					}
				}
				//
				//	落ちた城が人物Ｃのものになるとする
				//	人物Ｂの身分が国主で主命に基づく攻撃ならその国主が人物Ｃ
				//	それ以外では攻撃側大名が人物Ｃ
				//
			}
			条件ブロック:(ｚ)==(1){
				代入人物Ｃ:(大名家::大名家Ｂ.当主)
				条件ブロック:(人物::人物Ｂ.身分)==(国主){
					条件ブロック:(人物::人物Ｂ.主命状態)!=(主命なし){
						場合別:(人物::人物Ｂ.実行主命){
							場合分岐:(主命::拠点攻略（武士）){
								代入城Ｅ:(人物::人物Ｂ.主命ターゲット)
								条件ブロック:(城::城Ｅ)==(城::城Ａ){
									代入人物Ｃ:(人物::人物Ｂ)
								}
							}
							場合分岐:(主命::国攻略（武士）){
								代入国Ｅ:(人物::人物Ｂ.主命ターゲット)
								条件ブロック:(国::国Ｅ)==(国::国Ａ){
									代入人物Ｃ:(人物::人物Ｂ)
								}
							}
							場合分岐:(主命::勢力攻略（武士）){
								代入大名家Ｅ:(人物::人物Ｂ.主命ターゲット)
								条件ブロック:(大名家::大名家Ｅ)==(大名家::大名家Ａ){
									代入人物Ｃ:(人物::人物Ｂ)
								}
							}
							場合分岐:(主命::地方攻略（武士）){
								代入地方Ｅ:(人物::人物Ｂ.主命ターゲット)
								条件ブロック:(地方::地方Ｅ)==(城::城Ａ.所在地方){
									代入人物Ｃ:(人物::人物Ｂ)
								}
							}
						}
					}
				}
			}
			//
			//	変数(ｘ)
			//	(0)	主人公が捕虜の処遇の決定権者でない
			//	(1)	主人公が捕虜の処遇の決定権者である
			//
			代入ｘ:(0)
			条件ブロック:(人物::人物Ｂ)==(人物::主人公){
				条件ブロック:(人物::主人公)==(軍団::軍団Ｂ.軍団長){
					代入ｘ:(1)
				}
			}
			//
			//	変数(ｙ)
			//	(0)	イベント発生せず
			//	(1)	イベント発生成否未決定、種類未決定
			//	(2)	イベント発生する→登用される
			//	(3)	イベント発生する→浪人する
			//	(4)	イベント発生する→高飛びする
			//
			代入ｙ:(1)
			//
			//	特定の方法で滅亡させたい当主があればここで指定する
			//	滅亡側と攻撃側の組み合わせなどの条件に依存させることも可能
			//	例えば専用の滅亡イベントがある場合はここでイベント不発生を指定
			//	また例えば六角承禎・義治が織田信長に滅ぼされれば必ず浪人するなど
			//	ここで高飛びを設定された大名は初期設定を無視して必ず高飛びする
			//	（ただし高飛び先の指定がなく高飛びできる先がなければしない）
			//
			代入大名家Ｃ:(大名家::無効)
			条件ブロック:(ｚ)<(4){
				条件ブロック:(大名家::大名家Ａ)==(大名家::浅井長政){
					条件ブロック:(大名家::大名家Ｂ)==(大名家::織田信長){
						代入ｙ:(0)
					}
				}
			}
			条件ブロック:(ｚ)<(4){
				条件ブロック:(大名家::大名家Ａ)==(大名家::朝倉義景){
					代入ｙ:(0)
				}
			}
			条件ブロック:(ｚ)<(4){
				条件ブロック:(大名家::大名家Ａ)==(大名家::足利義昭){
					代入ｙ:(0)
				}
			}
			条件ブロック:(ｚ)<(4){
				条件ブロック:(大名家::大名家Ａ)==(大名家::今川氏真){
					条件ブロック:(大名家::北条氏康.存在){
						条件ブロック:(大名家::大名家Ｂ)!=(大名家::北条氏康){
							代入大名家Ｃ:(大名家::北条氏康)
							代入ｙ:(4)
						}
					}
					条件ブロック:(大名家::北条氏康.存在)==(偽){
						条件ブロック:(大名家::北条氏政.存在){
							条件ブロック:(大名家::大名家Ｂ)!=(大名家::北条氏政){
								代入大名家Ｃ:(大名家::北条氏政)
								代入ｙ:(4)
							}
						}
					}
				}
			}
			条件ブロック:(ｚ)<(4){
				条件ブロック:(大名家::大名家Ａ)==(大名家::斎藤龍興){
					条件ブロック:(大名家::大名家Ｂ)==(大名家::織田信長){
						代入ｙ:(0)
					}
				}
			}
			条件ブロック:(ｚ)<(4){
				条件ブロック:(大名家::大名家Ａ)==(大名家::柴田勝家){
					条件ブロック:(大名家::大名家Ｂ)==(大名家::豊臣秀吉){
						代入ｙ:(0)
					}
				}
			}
			条件ブロック:(ｚ)<(4){
				条件ブロック:(大名家::大名家Ａ)==(大名家::武田勝頼){
					条件ブロック:(大名家::大名家Ｂ)==(大名家::織田信長){
						代入ｙ:(0)
					}
				}
			}
			条件ブロック:(ｚ)<(4){
				条件ブロック:(大名家::大名家Ａ)==(大名家::六角承禎){
					条件ブロック:(大名家::大名家Ｂ)==(大名家::織田信長){
						代入ｙ:(3)
					}
				}
				条件ブロック:(大名家::大名家Ａ)==(大名家::六角義治){
					条件ブロック:(大名家::大名家Ｂ)==(大名家::織田信長){
						代入ｙ:(3)
					}
				}
			}
			//
			//	初期設定によりイベント発生を滅亡側当主の能力値に依存させる場合はここで計算
			//	ただし上でイベント発生種類を指定している場合は依存させない
			//
			条件ブロック:(イベントフラグ::滅亡大名切腹回避・能力値依存){
				条件ブロック:(ｙ)==(1){
					//
					//	判定のための数値(ａ)をここで計算
					//	ここでは仮の例として人物の野心・気性・精神・主義による式を挙げておく
					//	（今川氏真、北畠具教、小田氏治あたりは死なない、
					//	　武田信玄、上杉謙信、北条氏康、柴田勝家あたりは死ぬ）
					//	ユーザ各位でお好みにカスタマイズされたし
					//
					代入ａ:(人物::人物Ａ.野心)-(50)
					代入ｂ:(人物::人物Ａ.主義)*(5)
					代入ａ:(ａ)-(ｂ)
					代入ｂ:(人物::人物Ａ.気性)+(1)
					代入ａ:(ａ)*(ｂ)
					代入ｂ:(人物::人物Ａ.精神)+(3)
					代入ａ:(ａ)*(ｂ)
					//
					//	上で計算した(ａ)について次の式を満たすときイベント発生せず
					//	ユーザ各位でお好みにカスタマイズされたし
					//
					条件ブロック:(ａ)>=(200){
						代入ｙ:(0)
					}
				}
			}
			//
			//	以上の指定や結果は滅亡側当主が主人公でない場合に限って有効
			//
			条件ブロック:(人物::人物Ａ)==(人物::主人公){
				代入ｙ:(1)
			}
			//
			//	イベント不発生を指定してある場合イベント発生せず
			//
			調査:(ｙ)
		}
		スクリプト:{
			代入ｗ:(0)
			//
			//	滅亡側当主が主人公の場合に高飛びするか否かを決定
			//
			調査:(人物::人物Ａ)==(人物::主人公)
			分岐:(1){
				ＢＧＭ変更:(イベント危機)
				背景変更:（場面,評定の間,回転ワイプ）
				代入人物Ｄ:(軍団::軍団Ａ.武将２)
				場合別:(人物::人物Ｄ){
					場合分岐:(人物::備大将){
						会話:(人物Ｄ,主人公)[[大殿！\n敵はもうすぐそこまで迫っております！]]
					}
					場合分岐:(人物::忍者){
						会話:(人物Ｄ,主人公)[[お頭！\n敵はもうすぐそこまで迫っております！]]
					}
					場合分岐:(人物::海賊){
						会話:(人物Ｄ,主人公)[[頭領！\n敵はもうすぐそこまで迫っております！]]
					}
					場合分岐:{
						会話:(人物Ｄ,主人公)[[{二人称名前}！\n敵はもうすぐそこまで迫っております！]]
					}
				}
				ひとりごと:[[もはやこれまでか…\n無念…]]
				代入ａ:(1)
				調査:(イベントフラグ::滅亡大名切腹回避・大名高飛び)
				ＯＲ調査:{
					ＡＮＤ調査:{
						調査:(ｚ)<=(3)
						代入大名家Ｃ:(大名家::無効)
						文字列設定:(文字列Ｂ)[[他家]]
					}
					ＡＮＤ調査:{
						調査:(ｚ)==(4)
						調査:(忍者衆::忍者衆Ａ.支持大名家)!=(大名家::無効)
						代入大名家Ｃ:(忍者衆::忍者衆Ａ.支持大名家)
						調査:(大名家::大名家Ｃ.外交感情(忍者衆Ａ))>=(2)
						文字列設定:(文字列Ｂ)[[<大名家Ｃ>]]
					}
					ＡＮＤ調査:{
						調査:(ｚ)==(5)
						調査:(海賊衆::海賊衆Ａ.支持大名家)!=(大名家::無効)
						代入大名家Ｃ:(海賊衆::海賊衆Ａ.支持大名家)
						調査:(大名家::大名家Ｃ.外交感情(海賊衆Ａ))>=(2)
						文字列設定:(文字列Ｂ)[[<大名家Ｃ>]]
					}
				}
				分岐:(1){
					調査:(人物::主人公.性別)
					分岐:(0){
						文字列設定:(文字列Ｃ)[[求めるか]]
					}
					分岐:(1){
						文字列設定:(文字列Ｃ)[[求めようかしら]]
					}
					ひとりごと可否選択:[[…このまま大人しく敵の捕虜と\nなるくらいならば、逃亡して\n<文字列Ｂ>に保護を<文字列Ｃ>？]]
					分岐:(1){
						調査:(ｚ)>=(4)
						分岐:(1){
							代入ｙ:(4)
							代入ｗ:(1)
							背景戻す:（回転ワイプ）
						}
						分岐:(0){
							代入ａ:(0)
						}
					}
				}
				調査:(ａ)
				分岐:(0){
					コンテナ設定:(人物,身分,大名)
					コンテナ除外:(人物,出現フラグ,0)
					コンテナ除外:(人物,死亡フラグ,1)
					コンテナ除外:(人物,人物番号,人物Ａ)
					代入人物Ｄ:(人物::人物Ｂ.所属当主)
					コンテナ除外:(人物,人物番号,人物Ｄ)
					代入ｐ:(0)
					条件ループ:(ｐ)<(変数::コンテナカウンタ){
						更新:(変数::コンテナポインタ)(ｐ)
						コンテナ選択:(人物Ｄ,ポインタ)
						代入大名家Ｄ:(人物::人物Ｄ.所属大名家)
						調査:(大名家::大名家Ｄ.存在)
						調査:(大名家::大名家Ｄ.外交同盟(大名家Ａ))!=(無効)
						調査:(大名家::大名家Ｄ.外交感情(大名家Ａ))!=(無効)
						ＯＲ調査:{
							調査:(大名家::大名家Ｄ.外交同盟(大名家Ａ))!=(同盟なし)
							調査:(大名家::大名家Ｄ.外交感情(大名家Ａ))>=(5)
						}
						分岐:(1){
							代入ｐ:(ｐ)+(1)
						}
						分岐:(0){
							コンテナ除外:(人物,人物番号,人物Ｄ)
						}
					}
					調査:(変数::コンテナカウンタ)
					分岐:(1){
						ナレーション:[[次の大名とは良好な関係にあるため\n保護を求めることができます\n逃亡先の大名を選んでください]]
						代入ａ:(1)
						条件ループ:(ａ){
							代入人物Ｄ:(人物::無効)
							背景戻す:（効果なし）
							//
							//	一度背景を戻さないと人物選択ができないらしい
							//
							コンテナ選択:(人物Ｄ,人物選択)
							背景変更:（場面,評定の間,効果なし）
							調査:(人物::人物Ｄ)==(人物::無効)
							分岐:(0){
								ナレーション可否選択:[[<人物Ｄ>に保護を求めますか？]]
								分岐:(1){
									代入ａ:(0)
									代入ｙ:(4)
									代入ｗ:(1)
									代入大名家Ｃ:(人物::人物Ｄ.所属大名家)
									背景戻す:（回転ワイプ）
								}
							}
							分岐:(1){
								ナレーション可否選択:[[逃亡を断念しますか？]]
								分岐:(1){
									代入ａ:(0)
								}
							}
						}
					}
					分岐:(0){
						ナレーション:[[保護を求められるほど親密な\n大名家が存在しません]]
					}
				}
				調査:(ｙ)==(1)
				分岐:(1){
					調査:(ａ)<(2)
					調査:(イベントフラグ::滅亡大名切腹回避・大名高飛び)
					分岐:(1){
						文字列設定:(文字列Ｂ)[[]]
						条件ブロック:(ａ)==(0){
							文字列設定:(文字列Ｂ)[[やはり]]
						}
						調査:(人物::主人公.性別)
						分岐:(0){
							文字列設定:(文字列Ｂ)[[<文字列Ｂ>よそう]]
						}
						分岐:(1){
							文字列設定:(文字列Ｂ)[[<文字列Ｂ>よしましょう]]
						}
						ひとりごと:[[…{いいえ}\n<文字列Ａ>を失っておめおめと逃げのびるなど\n見苦しいことは<文字列Ｂ>]]
					}
					ひとりごと選択:[[かくなる上はいさぎよく…]]
					選択:[[投降する]][[自害する]]
					分岐:(0){
						背景戻す:（回転ワイプ）
						ＢＧＭ変更:(軍団移動)
					}
					分岐:(1){
						ＢＧＭ変更:(イベント悲しい)
						コンテナ設定:(人物,所属上司,主人公)
						コンテナ除外:(人物,出現フラグ,0)
						コンテナ除外:(人物,死亡フラグ,1)
						コンテナソート:(人物,武士勲功,降順)
						調査:(変数::コンテナカウンタ)
						分岐:(1){
							コンテナ選択:(人物Ｄ,先頭)
							会話:(人物Ｄ,主人公)[[{二人称}…！]]
							会話:(主人公,人物Ｄ)[[{二人称名前}…\nこれまでよく尽くしてくれ{ました}{な}\n礼を{いう}{ぞ}]]
						}
						分岐:(0){
							調査:(ｚ)<=(3)
							分岐:(1){
								会話:(小姓,主人公)[[大殿…！]]
								会話:(主人公,小姓)[[これまでよく尽くしてくれ{ました}{な}\n礼を{いう}{ぞ}]]
								会話:(小姓,主人公)[[うう…！]]
							}
						}
						代入人物Ｄ:(軍団::軍団Ａ.武将２)
						代入人物Ｅ:(人物::主人公.奥さん)
						調査:(人物::人物Ｅ)!=(人物::無効)
						分岐:(1){
							会話:(人物Ｅ,主人公)[[{二人称}…！]]
							会話:(主人公,人物Ｅ)[[(人物Ｅ.名)…\n{一人称}が不甲斐ないばかりに\n辛い思いをさせた{な}…]]
							会話:(人物Ｅ,主人公)[[{いいえ}！\n{一人称}は幸せ{だった}…！]]
							会話:(主人公,人物Ｅ)[[ふふ…\n{二人称}に天下をくれてやるという約束は\nどうやら果たせそうにない{な}]]
							会話:(人物Ｅ,主人公)[[……ああッ…！]]
							場合別:(人物::人物Ｄ){
								場合分岐:(人物::備大将){
									会話:(人物Ｄ,主人公)[[大殿…\nもう時間が{ない}]]
								}
								場合分岐:(人物::忍者){
									会話:(人物Ｄ,主人公)[[お頭…\nもう時間が{ない}]]
								}
								場合分岐:(人物::海賊){
									会話:(人物Ｄ,主人公)[[頭領…\nもう時間が{ない}]]
								}
								場合分岐:{
									会話:(人物Ｄ,主人公)[[{二人称名前}…\nもう時間が{ない}]]
								}
							}
						}
						ひとりごと:[[…そろそろ腹を切るとするか]]
						会話:(人物Ｄ,主人公)[[…それでは\n{一人称}が介錯{しよう}…]]
						ひとりごと:[[{はい}……]]
						ひとりごと:[[…いざ…！]]
						調査:(人物::主人公.性別)
						分岐:(0){
							ＳＥスタート:(うめき声（男）)
						}
						分岐:(1){
							ＳＥスタート:(うめき声（女）)
						}
						ウェイト:(0.3)
						ＳＥスタート:(刀で斬られる２)
						代入ａ:(人物::主人公.年齢)
						ナレーション:[[<年>年<月>月…\n(主人公)は自害を遂げた\n享年<ａ>…]]
						ナレーション:[[こうして<勢力Ａ>は滅び去った…]]
						メッセージ閉じる:
						ゲーム中断:(偽)
					}
				}
			}
			//
			//	イベント種類未決定の場合
			//	ここで滅亡側勢力が高飛びするか否か判定
			//	初期設定で高飛びがＯＦＦになっている場合は先に個別指定したもの以外は否
			//	先の個別指定で高飛びが指定されているが高飛び先が指定されていない場合
			//	ここで決定、しかし高飛びできる先がなければ高飛びせず
			//	汎用ライバルは大名家に仕えられないので高飛びしない
			//
			条件ブロック:(人物::人物Ａ.カテゴリ){
				代入ｙ:(1)
			}
			調査:(人物::人物Ａ)!=(人物::主人公)
			調査:(人物::人物Ａ.カテゴリ)==(0)
			ＯＲ調査:{
				ＡＮＤ調査:{
					調査:(ｙ)==(1)
					調査:(イベントフラグ::滅亡大名切腹回避・大名高飛び)
				}
				ＡＮＤ調査:{
					調査:(ｙ)==(4)
					調査:(大名家::大名家Ｃ)==(大名家::無効)
				}
			}
			分岐:(1){
				調査:(ｙ)==(1)
				分岐:(1){
					//
					//	高飛びするか否か判定
					//
					代入ａ:(人物::人物Ａ.精神)+(3)
					代入ａ:(ａ)*(2)
					代入ａ:(ａ)*(人物::人物Ａ.野心)
					代入ａ:(ａ)+(人物::人物Ａ.統率力)
					代入ａ:(ａ)+(人物::人物Ａ.知謀)
					代入ａ:(ａ)+(人物::人物Ａ.魅力)
					代入ｂ:(変数::Ｒｎｄ１００)*(3)
					代入ａ:(ａ)+(ｂ)
					条件ブロック:(ａ)>=(450){
						代入ｙ:(4)
					}
				}
				調査:(ｙ)==(4)
				ブロック脱出:(0)
				//
				//	高飛びする場合の高飛び先大名を決定
				//	高飛びできる先がなければ高飛びしない
				//
				調査:(ｚ)<=(3)
				分岐:(1){
					コンテナ設定:(大名家,存在,1)
					コンテナ絞り込み:(大名家,外交同盟(大名家Ａ),支配)
					調査:(変数::コンテナカウンタ)
					分岐:(0){
						コンテナ設定:(大名家,外交感情(大名家Ａ),6)
						コンテナ絞り込み:(大名家,存在,1)
						コンテナ除外:(大名家,外交同盟(大名家Ａ),無効)
						コンテナ除外:(大名家,外交同盟(大名家Ａ),同盟なし)
						条件ブロック:(ｚ)==(1){
							コンテナ除外:(大名家,大名家番号,大名家Ｂ)
						}
					}
					調査:(変数::コンテナカウンタ)
					分岐:(0){
						コンテナ設定:(大名家,外交感情(大名家Ａ),5)
						コンテナ絞り込み:(大名家,存在,1)
						コンテナ除外:(大名家,外交同盟(大名家Ａ),無効)
						コンテナ除外:(大名家,外交同盟(大名家Ａ),同盟なし)
						条件ブロック:(ｚ)==(1){
							コンテナ除外:(大名家,大名家番号,大名家Ｂ)
						}
					}
					調査:(変数::コンテナカウンタ)
					分岐:(0){
						コンテナ設定:(大名家,外交感情(大名家Ａ),4)
						コンテナ絞り込み:(大名家,存在,1)
						コンテナ除外:(大名家,外交同盟(大名家Ａ),無効)
						コンテナ除外:(大名家,外交同盟(大名家Ａ),同盟なし)
						条件ブロック:(ｚ)==(1){
							コンテナ除外:(大名家,大名家番号,大名家Ｂ)
						}
					}
					調査:(変数::コンテナカウンタ)
					分岐:(0){
						コンテナ設定:(大名家,外交感情(大名家Ａ),6)
						コンテナ絞り込み:(大名家,存在,1)
						コンテナ絞り込み:(大名家,外交同盟(大名家Ａ),同盟なし)
						条件ブロック:(ｚ)==(1){
							コンテナ除外:(大名家,大名家番号,大名家Ｂ)
						}
					}
					調査:(変数::コンテナカウンタ)
					分岐:(0){
						コンテナ設定:(大名家,外交感情(大名家Ａ),3)
						コンテナ絞り込み:(大名家,存在,1)
						コンテナ除外:(大名家,外交同盟(大名家Ａ),無効)
						コンテナ除外:(大名家,外交同盟(大名家Ａ),同盟なし)
						条件ブロック:(ｚ)==(1){
							コンテナ除外:(大名家,大名家番号,大名家Ｂ)
						}
					}
					調査:(変数::コンテナカウンタ)
					分岐:(0){
						コンテナ設定:(大名家,外交感情(大名家Ａ),5)
						コンテナ絞り込み:(大名家,存在,1)
						コンテナ絞り込み:(大名家,外交同盟(大名家Ａ),同盟なし)
						条件ブロック:(ｚ)==(1){
							コンテナ除外:(大名家,大名家番号,大名家Ｂ)
						}
					}
					調査:(変数::コンテナカウンタ)
					分岐:(0){
						コンテナ設定:(大名家,外交感情(大名家Ａ),2)
						コンテナ絞り込み:(大名家,存在,1)
						コンテナ除外:(大名家,外交同盟(大名家Ａ),無効)
						コンテナ除外:(大名家,外交同盟(大名家Ａ),同盟なし)
						条件ブロック:(ｚ)==(1){
							コンテナ除外:(大名家,大名家番号,大名家Ｂ)
						}
					}
					調査:(変数::コンテナカウンタ)
					分岐:(1){
						コンテナソート:(大名家,支配力,降順)
						コンテナ選択:(大名家Ｃ,先頭)
					}
					分岐:(0){
						代入ｙ:(1)
					}
				}
				条件ブロック:(ｚ)==(4){
					調査:(忍者衆::忍者衆Ａ.支持大名家)!=(大名家::無効)
					代入大名家Ｃ:(忍者衆::忍者衆Ａ.支持大名家)
					調査:(大名家::大名家Ｃ.外交感情(忍者衆Ａ))>=(2)
					分岐:(0){
						代入ｙ:(1)
					}
				}
				条件ブロック:(ｚ)==(5){
					調査:(海賊衆::海賊衆Ａ.支持大名家)!=(大名家::無効)
					代入大名家Ｃ:(海賊衆::海賊衆Ａ.支持大名家)
					調査:(大名家::大名家Ｃ.外交感情(海賊衆Ａ))>=(2)
					分岐:(0){
						代入ｙ:(1)
					}
				}
			}
			調査:(人物::人物Ａ)!=(人物::主人公)
			調査:(人物::人物Ａ)==(人物::主人公当主)
			分岐:(1){
				調査:(ｙ)==(4)
				分岐:(1){
					背景変更:(場面,戦況画面,回転ワイプ)
					代入人物Ｄ:(大名家::大名家Ｃ.当主)
					会話:(人物Ａ,主人公)[[草稿]]
					会話:(人物Ａ,主人公)[[これ以上の抵抗は無意味{であろう}{な}…\n{人物Ｄ.名前}を頼って\n落ち延びると{しよう}]]
					調査:(人物::人物Ａ)==(人物::主人公.所属上司)
					分岐:(1){
						会話:(人物Ａ,主人公)[[{二人称名前}、よく戦ってくれ{ました}{な}…\nこれからも<大名家Ｃ>のもとで{一人称}に\n仕えてくれ{ません}か？]]
						ナレーション可否選択:[[(人物Ａ)に従いますか？]]
						分岐:(可){
							会話:(人物Ａ,主人公)[[感謝して{いる}{ぞ}、{二人称名前}！]]
							代入ａ:(人物::人物Ａ.親密度)+(20)
							更新:(人物::人物Ａ.親密度)(ａ)
							更新:(人物::主人公.死刑フラグ)(通常)
							代入ｗ:(1)
						}
						分岐:(否){
							会話:(人物Ａ,主人公)[[…恨み事は{いう}まい…\nこれまで大儀{だった}]]
							会話:(人物Ａ,主人公)[[次に会うときは敵同士かもしれ{ません}が\n達者でいて{くれ}]]
							更新:(人物::主人公.死刑フラグ)(死刑)
						}
					}
					分岐:(0){
						//
						//	主人公が滅亡側の陪臣のとき
						//	主人公の上司（人物Ｄ）が投降するかどうか判定
						//	人物Ｄは以下の条件が成り立つとき投降する
						//
						代入人物Ｄ:(人物::主人公.所属上司)
						代入ａ:(人物::人物Ｄ.義理)+(2)
						代入ａ:(ａ)*(人物::人物Ｄ.忠誠度)
						代入ａ:(ａ)+(人物::人物Ａ.魅力)
						代入ａ:(ａ)-(人物::人物Ｂ.魅力)
						代入ａ:(ａ)+(Ｒｎｄ１００)
						ＯＲ調査:{
							調査:(人物::人物Ｄ.カテゴリ)==(汎用ライバル)
							調査:(ａ)<=(200)
						}
						分岐:(1){
							更新:(人物::人物Ｄ.死刑フラグ)(死刑)
							会話:(人物Ｄ,主人公)[[{二人称名前}、よく戦ってくれ{ました}{な}…\n{一人称}はこれ以上{人物Ａ.名前}に従わず\n<勢力Ｂ>に投降することに{いたした}]]
						}
						分岐:(0){
							更新:(人物::人物Ｄ.死刑フラグ)(通常)
							会話:(人物Ｄ,主人公)[[{二人称名前}、よく戦ってくれ{ました}{な}…\n{一人称}は{人物Ａ.名前}に従うことにした]]
							会話:(人物Ｄ,主人公)[[今後{一人称}は陪臣になるので\n{二人称}を家臣とすることはでき{ません}が]]
							会話:(人物Ｄ,主人公)[[{二人称}が望むなら{一人称}から\n{人物Ａ.名前}にとりなしを{しよう}\nどうじゃ？]]
							ナレーション可否選択:[[(人物Ａ)に従いますか？]]
							分岐:(可){
								会話:(人物Ｄ,主人公)[[これまでは{一人称}の家臣として\n大儀{だった}{な}\n今後も{一人称}と力を合わせて{くれ}]]
								更新:(人物::主人公.死刑フラグ)(通常)
								代入ｗ:(1)
							}
							分岐:(否){
								会話:(人物Ｄ,主人公)[[…これまで大儀{だった}{な}\n次に会うときは敵同士かもしれ{ません}が\n達者でいて{くれ}]]
								更新:(人物::主人公.死刑フラグ)(死刑)
							}
						}
					}
				}
				分岐:(0){
					背景変更:(場面,戦況画面,フェード)
					会話:(人物Ａ,主人公)[[これ以上の抵抗は無意味{であろう}{な}…\n無念{だ}が\n<人物Ｂ>に降伏{しよう}]]
				}
			}
			調査:(ｙ)==(4)
			分岐:(1){
				調査:(大名家::大名家Ｃ.当主)==(人物::主人公)
				分岐:(1){
					調査:(状況::拠点)==(拠点::主人公拠点)
					分岐:(1){
						コンテナ設定:(人物,所属上司,主人公)
						コンテナ絞り込み:(人物,所属拠点,主人公拠点)
						コンテナ除外:(人物,留守フラグ,1)
						コンテナ除外:(人物,出現フラグ,0)
						コンテナ除外:(人物,死亡フラグ,1)
						コンテナソート:(人物,武士勲功,降順)
						調査:(変数::コンテナカウンタ)
						分岐:(1){
							コンテナ選択:(人物Ｅ,先頭)
						}
						分岐:(0){
							代入人物Ｅ:(人物::小姓)
						}
					}
					分岐:(0){
						調査:(軍団::主人公軍団.使用状況)==(使用中)
						分岐:(1){
							代入人物Ｅ:(軍団::主人公軍団.武将２)
						}
						分岐:(0){
							代入人物Ｅ:(人物::忍者)
							ＳＥスタート:(忍者報告)
						}
					}
					会話:(人物Ｅ,主人公)[[{二人称名前}、{人物Ｂ.姓名}に攻められた\n{人物Ａ.姓名}とその郎党が<文字列Ａ>を捨て、\n当家を頼って落ち延びて{参った}{ぞ}]]
				}
				//
				//	攻撃側大名と高飛び先大名の交渉
				//
				//	変数(ａ)
				//	(0)	交渉なし
				//	(1)	交渉あり
				//
				調査:(ｘ)
				分岐:(1){
					//
					//	主人公が捕虜の処遇の決定権者である場合
					//
					代入人物Ｅ:(軍団::軍団Ｂ.武将２)
					会話:(人物Ｅ,主人公)[[{二人称名前}！　面目{ない}、\n{人物Ａ.姓名}を取り逃がして\nしまったよう{だ}]]
					代入人物Ｄ:(大名家::大名家Ｃ.当主)
					ＯＲ調査:{
						ＡＮＤ調査:{
							調査:(勢力::勢力Ｂ.勢力タイプ)==(0)
							調査:(大名家::大名家Ｂ.外交同盟(大名家Ｃ))==(2)
						}
						ＡＮＤ調査:{
							調査:(勢力::勢力Ｂ.勢力タイプ)>=(2)
							調査:(大名家::大名家Ｂ)==(大名家::大名家Ｃ)
						}
					}
					分岐:(1){
						会話:(人物Ｅ,主人公)[[<文字列Ａ>が落ちる直前に\n{人物Ｄ.姓名}を頼って\n落ち延びていったとのこと{だ}]]
						会話:(主人公,人物Ｅ)[[<大名家Ｃ>に逃げ込まれては\nこちらには手の出しようが\n{ない}{な}]]
						代入ａ:(0)
					}
					分岐:(0){
						会話:(人物Ｅ,主人公)[[<文字列Ａ>が落ちる直前に\n{人物Ｄ.姓名}を頼って\n落ち延びていったとのこと{だ}が]]
						会話選択:(人物Ｅ,主人公)[[いかが{しよう}、\n{人物Ａ.名前}の郎党をこちらに引き渡すよう\n<大名家Ｃ>に申し入れ{ます}か？]]
						選択:([[申し入れる]][[放っておく]])
						分岐:(0){
							代入ａ:(1)
							会話:(人物Ｅ,主人公)[[{心得た}\nではそう{しよう}]]
							画面効果:(フェードアウト)
							画面効果:(フェードイン)
						}
						分岐:(1){
							代入ａ:(0)
							会話:(人物Ｅ,主人公)[[{心得た}\nではそう{しよう}]]
						}
					}
				}
				分岐:(0){
					ＯＲ調査:{
						ＡＮＤ調査:{
							調査:(勢力::勢力Ｂ.勢力タイプ)==(0)
							調査:(勢力::勢力Ｂ.大義名分(勢力Ａ))>=(18)
							調査:(大名家::大名家Ｂ.外交同盟(大名家Ｃ))!=(2)
						}
						ＡＮＤ調査:{
							調査:(勢力::勢力Ｂ.勢力タイプ)>=(2)
							調査:(勢力::勢力Ｂ.外交感情(勢力Ａ))<=(1)
							調査:(大名家::大名家Ｂ)!=(大名家::大名家Ｃ)
						}
					}
					分岐:(1){
						代入ａ:(1)
					}
					分岐:(0){
						代入ａ:(0)
					}
				}
				調査:(ａ)
				分岐:(1){
					//
					//	引渡し交渉開始
					//
					//	変数(ｃ)
					//	(1)	高飛び先大名が高飛び勢力と同盟あり、攻撃側勢力と同盟なし
					//	(0)	それ以外
					//
					調査:(大名家::大名家Ｃ.外交同盟(勢力Ａ))!=(同盟なし)
					ＯＲ調査:{
						調査:(勢力::勢力Ｂ.勢力タイプ)!=(大名家)
						調査:(大名家::大名家Ｃ.外交同盟(大名家Ｂ))==(同盟なし)
					}
					分岐:(1){
						代入ｃ:(1)
					}
					分岐:(0){
						代入ｃ:(0)
					}
					//
					//	変数(ｄ)
					//	攻撃側勢力の支配力
					//
					場合別:(勢力::勢力Ｂ.勢力タイプ){
						場合分岐:(0){
							代入ｄ:(大名家::大名家Ｂ.支配力)
						}
						場合分岐:(2){
							代入ｄ:(忍者衆::忍者衆Ｂ.支配力)*(600)
						}
						場合分岐:(3){
							代入ｄ:(海賊衆::海賊衆Ｂ.支配力)*(400)
						}
					}
					代入人物Ｄ:(大名家::大名家Ｃ.当主)
					調査:(人物::人物Ｄ)==(人物::主人公)
					分岐:(1){
						会話選択:(人物Ｅ,主人公)[[それにつき、{人物Ａ.名前}を引き渡せと\n{人物Ｂ.名前}より申し入れて{参った}が\nいかが{しよう}？]]
						選択:([[引き渡す]][[引き渡さない]])
						分岐:(0){
							代入ａ:(1)
							会話:(人物Ｅ,主人公)[[{心得た}\nではそう{しよう}]]
						}
						分岐:(1){
							代入ａ:(0)
							会話:(人物Ｅ,主人公)[[{心得た}\nではそう{しよう}]]
							文字列設定:(文字列Ｂ)[[]]
							条件ブロック:(勢力::勢力Ｂ.大義名分(勢力Ａ))>(6){
								文字列設定:(文字列Ｂ)[[\n<勢力Ｂ>が<大名家Ｃ>に攻めこむ\n名分が立ちました]]
							}
							ナレーション:[[<勢力Ｂ>と<大名家Ｃ>の関係が悪化しました<文字列Ｂ>]]
							調査:(状況::拠点)==(拠点::主人公拠点)
							分岐:(1){
								会話:(人物Ｅ,主人公)[[それでは{人物Ａ.名前}を\n評定の間にお連れ{しよう}]]
							}
							分岐:(0){
								調査:(軍団::主人公軍団.使用状況)==(使用中)
								分岐:(1){
									会話:(人物Ｅ,主人公)[[それでは{人物Ａ.名前}を\nお連れ{しよう}]]
								}
							}
						}
					}
					分岐:(0){
						代入ａ:(人物::人物Ｄ.主義)+(0.5)
						調査:(ｃ)
						分岐:(1){
							代入ａ:(ａ)*(80)
						}
						分岐:(0){
							代入ａ:(ａ)*(40)
						}
						代入ｂ:(大名家::大名家Ｃ.外交感情(勢力Ａ))-(大名家::大名家Ｃ.外交感情(勢力Ｂ))
						代入ｂ:(ｂ)*(20)
						代入ａ:(ａ)+(ｂ)
						代入ａ:(ａ)+(人物::人物Ａ.知謀)
						代入ａ:(ａ)+(人物::人物Ａ.魅力)
						代入ａ:(ａ)+(人物::人物Ａ.名声)
						代入ａ:(ａ)-(人物::人物Ａ.悪名)
						代入ａ:(ａ)+(変数::Ｒｎｄ１００)
						代入ｂ:(人物::人物Ａ.義理)+(2)
						代入ａ:(ａ)*(ｂ)
						代入ｂ:(人物::人物Ｄ.精神)
						代入ｂ:(5)-(ｂ)
						代入ｂ:(ｂ)*(ｄ)
						代入ｂ:(ｂ)*(75)
						代入ｂ:(ｂ)/(大名家::大名家Ｃ.支配力)
						//
						//	変数(ａ)
						//	(0)	引き渡さない
						//	(1)	引き渡す
						//
						代入ａ:(ｂ)>(ａ)
					}
					代入ｂ:(ｄ)/(大名家::大名家Ｃ.支配力)
					調査:(ｂ)>=(2)
					分岐:(1){
						代入ｂ:(2)
					}
					分岐:(0){
						代入ｂ:(1)
					}
					調査:(ａ)
					分岐:(1){
						//
						//	交渉の結果引き渡すことに
						//
						調査:(ｃ)
						分岐:(1){
							代入ｂ:(30)/(ｂ)
						}
						分岐:(0){
							代入ｂ:(10)/(ｂ)
						}
						代入ｂ:(人物::人物Ｄ.名声)-(ｂ)
						条件ブロック:(ｂ)<(0){
							代入ｂ:(0)
						}
						更新:(人物::人物Ｄ.名声)(ｂ)
						代入ａ:(勢力::勢力Ｂ.外交感情(大名家Ｃ))+(1)
						条件ブロック:(ａ)>(6){
							代入ａ:(6)
						}
						更新:(勢力::勢力Ｂ.外交感情(大名家Ｃ))(ａ)
						更新:(勢力::大名家Ｃ.外交感情(勢力Ｂ))(ａ)
						条件ブロック:(ｘ){
							会話:(人物Ｅ,主人公)[[引渡してき{ました}{ぞ}]]
						}
						条件ブロック:(勢力::勢力Ａ)==(人物::主人公.所属勢力){
							ナレーション:[[草稿：<大名家Ｃ>は\n(人物Ｂ)の申し入れを受け容れ、\n(人物Ａ)とその郎党を引き渡しました]]
							条件ブロック:(ｗ){
								会話:(人物Ａ,主人公)[[なんということ{であろう}…\n{一人称}の目は節穴{だった}か\n皆の者、申し訳{ない}…]]
							}
						}
						代入ｙ:(1)
						コンテナ設定:(人物,所属勢力,勢力Ａ)
						コンテナ除外:(人物,死刑フラグ,通常)
						条件ループ:(変数::コンテナカウンタ){
							コンテナ選択:(人物Ｄ,先頭)
							コンテナ選抜:(削る,1)
							更新:(人物::人物Ｄ.死刑フラグ)(通常)
						}
					}
					分岐:(0){
						//
						//	交渉の結果引き渡さないことに
						//
						調査:(ｃ)
						分岐:(1){
							代入ｂ:(5)*(ｂ)
						}
						分岐:(0){
							代入ｂ:(10)*(ｂ)
						}
						代入ｂ:(人物::人物Ｄ.名声)+(ｂ)
						条件ブロック:(ｂ)>(100){
							代入ｂ:(100)
						}
						更新:(人物::人物Ｄ.名声)(ｂ)
						代入ａ:(勢力::勢力Ｂ.外交感情(大名家Ｃ))-(2)
						条件ブロック:(ａ)<(0){
							代入ａ:(0)
						}
						更新:(勢力::勢力Ｂ.外交感情(大名家Ｃ))(ａ)
						更新:(勢力::大名家Ｃ.外交感情(勢力Ｂ))(ａ)
						代入ａ:(勢力::勢力Ｂ.大義名分(勢力Ａ))-(6)
						条件ブロック:(ａ)>(0){
							更新:(勢力::勢力Ｂ.大義名分(大名家Ｃ))(ａ)
						}
						条件ブロック:(ｘ){
							会話:(人物Ｅ,主人公)[[…拒否され{ました}{ぞ}]]
							文字列設定:(文字列Ｂ)[[]]
							条件ブロック:(ａ)>(0){
								文字列設定:(文字列Ｂ)[[\n<勢力Ｂ>が<大名家Ｃ>に攻めこむ\n名分が立ちました]]
							}
							ナレーション:[[<勢力Ｂ>と<大名家Ｃ>の関係が悪化しました<文字列Ｂ>]]
						}
					}
				}
				分岐:(0){
					//
					//	交渉なしで高飛び
					//
					調査:(大名家::大名家Ｃ.当主)==(人物::主人公)
					調査:(状況::拠点)==(拠点::主人公拠点)
					分岐:(1){
						会話:(人物Ｅ,主人公)[[早速、評定の間へ\nお連れ{しよう}]]
					}
				}
			}
			//
			//	主人公が捕虜の処遇の決定権者であり、かつ守備側が高飛びしない場合は
			//	イベント発生せず
			//
			調査:(ｘ)
			調査:(ｙ)!=(4)
			ブロック脱出:(1)
			//
			//	滅亡勢力が忍者衆または海賊衆で
			//	高飛びする（その場合頭・頭領は必ず苗字つき武将）か、
			//	高飛びしなくとも頭・頭領が苗字つき武将の場合、
			//	不死身の苗字なし武将を人物Ｅとして身代わりに立てる
			//
			調査:(ｚ)==(4)
			調査:(人物::人物Ａ.カテゴリ)==(0)
			分岐:(1){
				コンテナ設定:(人物,所属当主,人物Ａ)
				コンテナ絞り込み:(人物,カテゴリ,1)
				コンテナ除外:(人物,身分,頭)
				コンテナ除外:(人物,身分,元締)
				//
				//	滅亡忍者衆に苗字なし忍者が（拠点主を除いて）いる場合
				//	その中で一番忍者勲功の低い者が人物Ｅ
				//
				調査:(変数::コンテナカウンタ)
				分岐:(0){
					//	滅亡忍者衆に苗字なし忍者が（拠点主を除いて）いない場合
					//	他の忍者衆の苗字なし忍者の中で一番勲功の低い者が人物Ｅ
					//	ただし主人公の属する勢力は除き、攻撃側忍者衆以外を優先
					//	そのような苗字なし忍者がいなければイベント発生せず
					//
					コンテナ設定:(人物,所属勢力タイプ,忍者衆)
					コンテナ絞り込み:(人物,カテゴリ,1)
					コンテナ除外:(人物,所属当主,人物Ｃ)
					コンテナ除外:(人物,所属当主,主人公当主)
					コンテナ除外:(人物,身分,頭)
					コンテナ除外:(人物,身分,元締)
					調査:(変数::コンテナカウンタ)
					分岐:(0){
						コンテナ設定:(人物,所属当主,人物Ｃ)
						コンテナ絞り込み:(人物,カテゴリ,1)
						コンテナ除外:(人物,所属当主,主人公当主)
						コンテナ除外:(人物,身分,頭)
						コンテナ除外:(人物,身分,元締)
					}
				}
				調査:(変数::コンテナカウンタ)
				ブロック脱出:(0)
				コンテナソート:(無効,シャッフル,昇順)
				コンテナソート:(人物,忍者勲功,昇順)
				コンテナ選択:(人物Ｅ,先頭)
				代入ａ:(人物::人物Ｅ.忍者勲功)
				人物登用:(人物Ｅ,直臣,人物Ａ)
				家督を譲る:(人物Ａ,人物Ｅ)
				更新:(人物::人物Ａ.忍者勲功)(3000)
				更新:(人物::人物Ｅ.忍者勲功)(ａ)
			}
			調査:(ｚ)==(5)
			調査:(人物::人物Ａ.カテゴリ)==(0)
			分岐:(1){
				コンテナ設定:(人物,所属当主,人物Ａ)
				コンテナ絞り込み:(人物,カテゴリ,1)
				コンテナ除外:(人物,身分,頭領)
				コンテナ除外:(人物,身分,船大将)
				//
				//	滅亡海賊衆に苗字なし海賊が（拠点主を除いて）いる場合
				//	その中で一番海賊勲功の低い者が人物Ｅ
				//
				調査:(変数::コンテナカウンタ)
				分岐:(0){
					//
					//	滅亡海賊衆に苗字なし海賊が（拠点主を除いて）いない場合
					//	他の海賊衆の苗字なし海賊の中で一番勲功の低い者が人物Ｅ
					//	ただし主人公の属する勢力は除き、攻撃側海賊衆以外を優先
					//	そのような苗字なし海賊がいなければイベント発生せず
					//
					コンテナ設定:(人物,所属勢力タイプ,海賊衆)
					コンテナ絞り込み:(人物,カテゴリ,1)
					コンテナ除外:(人物,所属当主,人物Ｃ)
					コンテナ除外:(人物,所属当主,主人公当主)
					コンテナ除外:(人物,身分,頭領)
					コンテナ除外:(人物,身分,船大将)
					調査:(変数::コンテナカウンタ)
					分岐:(0){
						コンテナ設定:(人物,所属当主,人物Ｃ)
						コンテナ絞り込み:(人物,カテゴリ,1)
						コンテナ除外:(人物,所属当主,主人公当主)
						コンテナ除外:(人物,身分,頭領)
						コンテナ除外:(人物,身分,船大将)
					}
				}
				調査:(変数::コンテナカウンタ)
				ブロック脱出:(0)
				コンテナソート:(無効,シャッフル,昇順)
				コンテナソート:(人物,海賊勲功,昇順)
				コンテナ選択:(人物Ｅ,先頭)
				代入ａ:(人物::人物Ｅ.海賊勲功)
				人物登用:(人物Ｅ,直臣,人物Ａ)
				家督を譲る:(人物Ａ,人物Ｅ)
				更新:(人物::人物Ａ.海賊勲功)(3000)
				更新:(人物::人物Ｅ.海賊勲功)(ａ)
			}
			//
			//	滅亡側が大名で高飛びしないことが確定しているが
			//	大名（人物Ａ）の去就が確定していない場合
			//	人物Ａが人物Ｂに登用されるか浪人するかここで判定
			//
			調査:(ｚ)<(4)
			調査:(ｙ)==(1)
			分岐:(1){
				//
				//	変数(ｙ)
				//	(2)	登用される
				//	(3)	浪人する
				//
				代入ａ:(人物::人物Ａ.統率力)
				代入ａ:(ａ)+(人物::人物Ａ.武力)
				代入ａ:(ａ)+(人物::人物Ａ.政務)
				代入ａ:(ａ)+(人物::人物Ａ.知謀)
				代入ａ:(ａ)+(人物::人物Ａ.魅力)
				代入ａ:(ａ)+(変数::Ｒｎｄ１００)
				代入ｂ:(ａ)>=(275)
				調査:(ｂ)
				分岐:(1){
					調査:(人物::人物Ａ)==(人物::主人公)
					分岐:(1){
						会話:(人物Ｂ,主人公)[[草稿：\nお前は欲しい]]
						ナレーション可否選択:[[<人物Ｂ>に仕えますか？]]
						分岐:(1){
							代入ｙ:(2)
						}
						分岐:(0){
							代入ｙ:(3)
						}
					}
					分岐:(0){
						代入ａ:(人物::人物Ａ.野心)+(人物::人物Ｂ.魅力)
						代入ｂ:(Ｒｎｄ１００)*(2)
						調査:(ａ)>(ｂ)
						分岐:(1){
							代入ｙ:(2)
						}
						分岐:(0){
							代入ｙ:(3)
						}
					}
				}
				分岐:(0){
					代入ｙ:(3)
					調査:(人物::人物Ａ)==(人物::主人公)
					分岐:(1){
						会話:(人物Ｂ,主人公)[[草稿：\nお前は要らん]]
					}
				}
			}
			//
			//	滅亡側が主人公の属する忍者か海賊で高飛びしないことが確定している場合
			//	主人公が人物Ｂに登用されるか浪人するかここで判定
			//
			調査:(ｚ)>=(4)
			調査:(ｙ)!=(4)
			調査:(勢力::勢力Ａ)==(人物::主人公.所属勢力)
			分岐:(1){
				人物解雇:(主人公,町Ａ,出現済み)
				代入ａ:(人物::主人公.統率力)
				代入ａ:(ａ)+(人物::主人公.武力)
				代入ａ:(ａ)+(人物::主人公.政務)
				代入ａ:(ａ)+(人物::主人公.知謀)
				代入ａ:(ａ)+(人物::主人公.魅力)
				代入ａ:(ａ)+(変数::Ｒｎｄ１００)
				代入ｂ:(ａ)>=(275)
				調査:(ｂ)
				分岐:(1){
					会話:(人物Ｂ,主人公)[[草稿：\nお前は欲しい]]
					ナレーション可否選択:[[<人物Ｂ>に仕えますか？]]
					分岐:(1){
						人物登用:(主人公,直臣,人物Ｂ)
					}
				}
				分岐:(0){
					会話:(人物Ｂ,主人公)[[草稿：\nお前は要らん]]
				}
			}
			調査:(ｚ)>=(4)
			調査:(ｙ)!=(4)
			ブロック脱出:(1)
			調査:(ｙ)!=(4)
			分岐:(1){
				//
				//	滅亡側当主が高飛びしない場合、または高飛びに失敗した場合
				//
				コンテナ設定:(人物,所属上司,人物Ａ)
				コンテナ除外:(人物,人物番号,人物Ａ)
				コンテナ除外:(人物,出現フラグ,0)
				コンテナ除外:(人物,死亡フラグ,1)
				//
				//	次の条件ループの中で別のリストをコンテナに読んでいるので注意
				//
				条件ループ:(変数::コンテナカウンタ){
					コンテナ選択:(人物Ｄ,先頭)
					コンテナ選抜:(削る,1)
					コンテナ複写:(退避)
					//
					//	滅亡側大名の直臣（人物Ｄ）の登用を人物Ｂが望むか判定
					//
					代入ａ:(人物::人物Ｄ.統率力)
					代入ａ:(ａ)+(人物::人物Ｄ.武力)
					代入ａ:(ａ)+(人物::人物Ｄ.政務)
					代入ａ:(ａ)+(人物::人物Ｄ.知謀)
					代入ａ:(ａ)+(人物::人物Ｄ.魅力)
					代入ａ:(ａ)+(変数::Ｒｎｄ１００)
					代入ｂ:(ａ)>=(275)
					//
					//	以上での変数(ｂ)の意味
					//	(1)	人物Ｂが人物Ｄの登用を望む
					//	(0)	人物Ｂが人物Ｄの登用を望まない
					//
					//	これを以下では次のように変更
					//	(1)	人物Ｄが登用される
					//	(0)	人物Ｄが登用されず浪人する
					//
					調査:(ｂ)
					分岐:(1){
						//
						//	人物Ｄが人物Ｂの登用を受け入れるか判定
						//
						調査:(人物::人物Ｄ)==(人物::主人公)
						分岐:(1){
							//
							//	人物Ｄが主人公の場合
							//
							会話:(人物Ｂ,主人公)[[草稿：\nお前は欲しい]]
							ナレーション可否選択:[[<人物Ｂ>に仕えますか？]]
							分岐:(0){
								代入ｂ:(0)
							}
						}
						分岐:(0){
							//
							//	人物Ｄが主人公でない場合
							//
							ＯＲ調査:{
								//
								//	滅亡側大名が攻撃側に登用される場合
								//	人物Ｄもそれに従う
								//
								調査:(ｙ)==(2)
								//
								//	滅亡側大名が浪人する場合
								//	人物Ｄは以下の条件が成り立つとき登用される
								//
								ＡＮＤ調査:{
									代入ａ:(人物::人物Ｄ.野心)+(人物::人物Ｂ.魅力)
									代入ｂ:(人物::人物Ｄ.義理)+(2)
									代入ｂ:(人物::人物Ｄ.忠誠度)*(ｂ)
									代入ｂ:(ｂ)/(2)
									代入ａ:(ａ)-(ｂ)
									代入ｂ:(Ｒｎｄ１００)*(2)
									調査:(ａ)>(ｂ)
								}
							}
							分岐:(0){
								代入ｂ:(0)
							}
						}
					}
					分岐:(0){
						調査:(人物::人物Ｄ)==(人物::主人公)
						分岐:(1){
							会話:(人物Ｂ,主人公)[[草稿：\nお前は要らん]]
						}
					}
					調査:(ｂ)
					分岐:(1){
						//
						//	人物Ｄが人物Ｂに登用される場合
						//
						調査:(人物::人物Ｂ.所属当主)==(人物::人物Ｂ)
						分岐:(1){
							//
							//	人物Ｂが大名で人物Ｄが直臣になる場合は
							//	人物Ｄの家臣（陪臣）は望まれれば人物Ｂの家臣に
							//	ただし主人公には選択肢あり
							//
							コンテナ設定:(人物,所属上司,人物Ｄ)
							コンテナ除外:(人物,人物番号,人物Ｄ)
							コンテナ除外:(人物,出現フラグ,0)
							コンテナ除外:(人物,死亡フラグ,1)
							条件ループ:(変数::コンテナカウンタ){
								コンテナ選択:(人物Ｅ,先頭)
								コンテナ選抜:(削る,1)
								人物解雇:(人物Ｅ,町Ａ,出現済み)
								代入ａ:(人物::人物Ｅ.統率力)
								代入ａ:(ａ)+(人物::人物Ｅ.武力)
								代入ａ:(ａ)+(人物::人物Ｅ.政務)
								代入ａ:(ａ)+(人物::人物Ｅ.知謀)
								代入ａ:(ａ)+(人物::人物Ｅ.魅力)
								代入ａ:(ａ)+(変数::Ｒｎｄ１００)
								代入ｂ:(ａ)>=(275)
								//
								//	変数(ｂ)
								//	(1)	人物Ｂが人物Ｅの登用を望む
								//	(0)	人物Ｂが人物Ｅの登用を望まない
								//
								調査:(ｂ)
								分岐:(1){
									//
									//	人物Ｅが人物Ｂの登用を受け入れるか判定
									//
									調査:(人物::人物Ｅ)==(人物::主人公)
									分岐:(1){
										//
										//	人物Ｅが主人公の場合
										//
										会話:(人物Ｂ,主人公)[[草稿：\nお前は欲しい！]]
										ナレーション可否選択:[[<人物Ｂ>に仕えますか？]]
										分岐:(0){
											代入ｂ:(0)
										}
									}
									調査:(ｂ)
									分岐:(1){
										人物登用:(人物Ｅ,陪臣,人物Ｂ)
									}
								}
								分岐:(0){
									調査:(人物::人物Ｅ)==(人物::主人公)
									分岐:(1){
										会話:(人物Ｂ,主人公)[[草稿：\nお前は要らん]]
									}
								}
							}
							人物解雇:(人物Ｄ,町Ａ,出現済み)
							人物登用:(人物Ｄ,直臣,人物Ｂ)
						}
						分岐:(0){
							//
							//	人物Ｂが大名でなくて人物Ｄが陪臣になる場合は
							//	人物Ｄの家臣（陪臣）が人物Ｂに登用されるか判定
							//
							コンテナ設定:(人物,所属上司,人物Ｄ)
							コンテナ除外:(人物,人物番号,人物Ｄ)
							コンテナ除外:(人物,出現フラグ,0)
							コンテナ除外:(人物,死亡フラグ,1)
							条件ループ:(変数::コンテナカウンタ){
								コンテナ選択:(人物Ｅ,先頭)
								コンテナ選抜:(削る,1)
								人物解雇:(人物Ｅ,町Ａ,出現済み)
								代入ａ:(人物::人物Ｅ.統率力)
								代入ａ:(ａ)+(人物::人物Ｅ.武力)
								代入ａ:(ａ)+(人物::人物Ｅ.政務)
								代入ａ:(ａ)+(人物::人物Ｅ.知謀)
								代入ａ:(ａ)+(人物::人物Ｅ.魅力)
								代入ａ:(ａ)+(変数::Ｒｎｄ１００)
								代入ｂ:(ａ)>=(275)
								//
								//	変数(ｂ)
								//	(1)	人物Ｂが人物Ｅの登用を望む
								//	(0)	人物Ｂが人物Ｅの登用を望まない
								//
								調査:(ｂ)
								分岐:(1){
									//
									//	人物Ｅが人物Ｂの登用を受け入れるか判定
									//
									調査:(人物::人物Ｅ)==(人物::主人公)
									分岐:(1){
										//
										//	人物Ｅが主人公の場合
										//
										会話:(人物Ｂ,主人公)[[草稿：\nお前は欲しい！]]
										ナレーション可否選択:[[<人物Ｂ>に仕えますか？]]
										分岐:(0){
											代入ｂ:(0)
										}
									}
									分岐:(0){
										//
										//	人物Ｅが主人公でない場合
										//	人物Ｅは以下の条件が成り立つとき登用される
										//
										代入ａ:(人物::人物Ｅ.野心)+(人物::人物Ｂ.魅力)
										代入ｂ:(Ｒｎｄ１００)*(2)
										調査:(ａ)>(ｂ)
										分岐:(0){
											代入ｂ:(0)
										}
									}
									調査:(ｂ)
									分岐:(1){
										人物登用:(人物Ｅ,陪臣,人物Ｂ)
									}
								}
								分岐:(0){
									調査:(人物::人物Ｅ)==(人物::主人公)
									分岐:(1){
										会話:(人物Ｂ,主人公)[[草稿：\nお前は要らん]]
									}
								}
							}
							人物解雇:(人物Ｄ,町Ａ,出現済み)
							人物登用:(人物Ｄ,陪臣,人物Ｂ)
						}
					}
					分岐:(0){
						//
						//	人物Ｄが人物Ｂに登用されない場合
						//	人物Ｄの家臣（陪臣）が人物Ｂに登用されるか判定
						//
						コンテナ設定:(人物,所属上司,人物Ｄ)
						コンテナ除外:(人物,人物番号,人物Ｄ)
						コンテナ除外:(人物,出現フラグ,0)
						コンテナ除外:(人物,死亡フラグ,1)
						条件ループ:(変数::コンテナカウンタ){
							コンテナ選択:(人物Ｅ,先頭)
							コンテナ選抜:(削る,1)
							人物解雇:(人物Ｅ,町Ａ,出現済み)
							代入ａ:(人物::人物Ｅ.統率力)
							代入ａ:(ａ)+(人物::人物Ｅ.武力)
							代入ａ:(ａ)+(人物::人物Ｅ.政務)
							代入ａ:(ａ)+(人物::人物Ｅ.知謀)
							代入ａ:(ａ)+(人物::人物Ｅ.魅力)
							代入ａ:(ａ)+(変数::Ｒｎｄ１００)
							代入ｂ:(ａ)>=(275)
							//
							//	変数(ｂ)
							//	(1)	人物Ｂが人物Ｅの登用を望む
							//	(0)	人物Ｂが人物Ｅの登用を望まない
							//
							調査:(ｂ)
							分岐:(1){
								//
								//	人物Ｅが人物Ｂの登用を受け入れるか判定
								//
								調査:(人物::人物Ｅ)==(人物::主人公)
								分岐:(1){
									//
									//	人物Ｅが主人公の場合
									//
									会話:(人物Ｂ,主人公)[[草稿：\nお前は欲しい！]]
									ナレーション可否選択:[[<人物Ｂ>に仕えますか？]]
									分岐:(0){
										代入ｂ:(0)
									}
								}
								分岐:(0){
									//
									//	人物Ｅが主人公でない場合
									//	人物Ｅは以下の条件が成り立つとき登用される
									//
									代入ａ:(人物::人物Ｅ.野心)+(人物::人物Ｂ.魅力)
									代入ｂ:(人物::人物Ｅ.義理)+(2)
									代入ｂ:(人物::人物Ｅ.忠誠度)*(ｂ)
									代入ｂ:(ｂ)/(2)
									代入ａ:(ａ)-(ｂ)
									代入ｂ:(Ｒｎｄ１００)*(2)
									調査:(ａ)>(ｂ)
									分岐:(0){
										代入ｂ:(0)
									}
								}
								調査:(ｂ)
								分岐:(1){
									調査:(人物::人物Ｂ.所属当主)==(人物::人物Ｂ)
									分岐:(1){
										人物登用:(人物Ｅ,直臣,人物Ｂ)
									}
									分岐:(0){
										人物登用:(人物Ｅ,陪臣,人物Ｂ)
									}
								}
							}
							分岐:(0){
								調査:(人物::人物Ｅ)==(人物::主人公)
								分岐:(1){
									会話:(人物Ｂ,主人公)[[草稿：\nお前は要らん]]
								}
							}
						}
						人物解雇:(人物Ｄ,町Ａ,出現済み)
					}
					コンテナ複写:(復帰)
				}
			}
			分岐:(0){
				//
				//	滅亡側が高飛びに成功した場合
				//
				コンテナ設定:(人物,所属勢力,勢力Ａ)
				条件ループ:(変数::コンテナカウンタ){
					コンテナ選択:(人物Ｄ,先頭)
					コンテナ選抜:(削る,1)
					調査:(人物::人物Ｄ)!=(人物::主人公)
					調査:(人物::人物Ｄ)!=(人物::主人公.所属上司)
					分岐:(1){
						更新:(人物::人物Ｄ.死刑フラグ)(通常)
					}
				}
				コンテナ設定:(人物,所属上司,人物Ａ)
				コンテナ除外:(人物,人物番号,人物Ａ)
				コンテナ除外:(人物,出現フラグ,0)
				コンテナ除外:(人物,出現フラグ,0)
				コンテナソート:(人物,武士勲功,降順)
				//
				//	次の条件ループの中で別のリストをコンテナに読んでいるので注意
				//
				代入ｃ:(1)
				条件ループ:(変数::コンテナカウンタ){
					コンテナ選択:(人物Ｄ,先頭)
					コンテナ選抜:(削る,1)
					コンテナ複写:(退避)
					//
					//	滅亡側の直臣（人物Ｄ）が投降するかどうか判定
					//	人物Ｄは以下の条件が成り立つとき投降する
					//
					代入ａ:(人物::人物Ｄ.義理)+(2)
					代入ａ:(ａ)*(人物::人物Ｄ.忠誠度)
					代入ａ:(ａ)+(人物::人物Ａ.魅力)
					代入ａ:(ａ)-(人物::人物Ｂ.魅力)
					代入ａ:(ａ)+(変数::Ｒｎｄ１００)
					ＯＲ調査:{
						調査:(人物::人物Ｄ.カテゴリ)==(1)
						調査:(人物::人物Ｄ.死刑フラグ)==(死刑)
						ＡＮＤ調査:{
							調査:(人物::人物Ｄ)!=(人物::主人公)
							調査:(人物::人物Ｄ)!=(人物::主人公.所属上司)
							調査:(ａ)<=(200)
						}
					}
					分岐:(1){
						更新:(人物::人物Ｄ.死刑フラグ)(死刑)
						//
						//	人物Ｄが投降する場合その家臣（陪臣）も全員投降
						//
						文字列設定:(文字列Ｂ)[[]]
						コンテナ設定:(人物,所属上司,人物Ｄ)
						コンテナ除外:(人物,人物番号,人物Ｄ)
						コンテナ除外:(人物,出現フラグ,0)
						コンテナ除外:(人物,死亡フラグ,1)
						条件ループ:(変数::コンテナカウンタ){
							文字列設定:(文字列Ｂ)[[とその配下の者]]
							コンテナ選択:(人物Ｅ,先頭)
							コンテナ選抜:(削る,1)
							更新:(人物::人物Ｅ.死刑フラグ)(死刑)
						}
						条件ブロック:(人物::人物Ａ)==(人物::主人公){
							条件ブロック:(ｃ){
								ＳＥスタート:(バー減少)
								代入ｃ:(0)
							}
							会話:(忍者,主人公)[[(人物Ｄ)<文字列Ｂ>が\n<勢力Ａ>に投降してしまいました]]
						}
					}
					分岐:(0){
						//
						//	人物Ｄが投降しない場合その家臣（陪臣）が投降するか判定
						//
						コンテナ設定:(人物,所属上司,人物Ｄ)
						コンテナ除外:(人物,人物番号,人物Ｄ)
						コンテナ除外:(人物,人物番号,主人公)
						コンテナ除外:(人物,出現フラグ,0)
						コンテナ除外:(人物,死亡フラグ,1)
						条件ループ:(変数::コンテナカウンタ){
							コンテナ選択:(人物Ｅ,先頭)
							コンテナ選抜:(削る,1)
							代入ａ:(人物::人物Ｅ.義理)+(2)
							代入ａ:(ａ)*(人物::人物Ｅ.忠誠度)
							代入ｂ:(人物::人物Ｅ.武力)/(2)
							代入ａ:(ａ)+(ｂ)
							代入ｂ:(人物::人物Ｅ.知謀)/(2)
							代入ａ:(ａ)+(ｂ)
							代入ａ:(ａ)+(人物::人物Ｄ.魅力)
							代入ａ:(ａ)-(人物::人物Ｂ.魅力)
							条件ブロック:(人物::人物Ｄ)==(人物::主人公){
								代入ａ:(ａ)+(人物::人物Ｅ.親密度)
							}
							代入ｂ:(変数::Ｒｎｄ１００)*(2)
							代入ａ:(ａ)+(ｂ)
							調査:(ａ)>(325)
							調査:(人物::人物Ｅ.カテゴリ)!=(1)
							分岐:(0){
								更新:(人物::人物Ｅ.死刑フラグ)(死刑)
								条件ブロック:(人物::人物Ａ)==(人物::主人公){
									条件ブロック:(ｃ){
										ＳＥスタート:(バー減少)
										代入ｃ:(0)
									}
									会話:(忍者,主人公)[[(人物Ｄ)配下の(人物Ｅ)が\n<勢力Ａ>に投降してしまいました]]
								}
								条件ブロック:(人物::人物Ｄ)==(人物::主人公){
									条件ブロック:(ｃ){
										ＳＥスタート:(バー減少)
										代入ｃ:(0)
									}
									会話:(忍者,主人公)[[(人物Ｅ)が\n<勢力Ａ>に投降してしまいました]]
								}
							}
						}
					}
					コンテナ複写:(復帰)
				}
				調査:(ｘ)
				分岐:(1){
					代入人物Ｂ:(軍団::軍団Ｂ.武将２)
					コンテナ設定:(人物,所属勢力,勢力Ａ)
					コンテナ除外:(人物,人物番号,人物Ａ)
					コンテナ除外:(人物,出現フラグ,0)
					コンテナ除外:(人物,死亡フラグ,1)
					コンテナ絞り込み:(人物,死刑フラグ,死刑)
					条件ブロック:(変数::コンテナカウンタ){
						会話:(人物Ｂ,主人公)[[以下の者が{人物Ａ.名前}に従わず\n投降してき{ました}{ぞ}\n処遇を決めて{くれ}]]
					}
					条件ループ:(変数::コンテナカウンタ){
						代入人物Ｄ:(無効)
						コンテナ選択:(人物Ｄ,人物選択)
						コンテナ除外:(人物,人物番号,人物Ｄ)
						調査:(人物Ｄ)==(無効)
						分岐:(1){
							ナレーション可否選択:[[残った者は解放しますが\nよろしいですか？]]
							分岐:(可){
								コンテナ設定:(人物,所属勢力,勢力Ａ)
								コンテナ除外:(人物,人物番号,人物Ａ)
								コンテナ除外:(人物,出現フラグ,0)
								コンテナ除外:(人物,死亡フラグ,1)
								コンテナ絞り込み:(人物,死刑フラグ,死刑)
								条件ループ:(変数::コンテナカウンタ){
									コンテナ選択:(人物Ｄ,先頭)
									コンテナ選抜:(削る,1)
									更新:(人物::人物Ｄ.死刑フラグ)(通常)
									人物解雇:(人物Ｄ,町Ａ,出現済み)
								}
							}
						}
						分岐:(0){
							調査:(人物::人物Ｄ.性別)==(男)
							分岐:(1){
								文字列設定:(文字列Ｂ)[[われら]]
								文字列設定:(文字列Ｃ)[[かたじけのうござる]]
								文字列設定:(文字列Ｄ)[[うぎゃあっ！]]
								文字列設定:(文字列Ｅ)[[いらぬ]]
							}
							分岐:(0){
								文字列設定:(文字列Ｂ)[[わたしたち]]
								文字列設定:(文字列Ｃ)[[ありがとうございます]]
								文字列設定:(文字列Ｄ)[[きゃああっ！]]
								文字列設定:(文字列Ｅ)[[いりません]]
							}
							代入ａ:(-1)
							調査:(人物::人物Ｄ.主義)==(現実)
							分岐:(1){
								会話選択:(人物Ｄ,主人公)[[<文字列Ｂ>の完敗{だ}\nいさぎよく投降{いたす}]]
								選択:([[中止]][[登用する]][[解き放つ]][[自害を許す]])
								分岐:(0){
									代入ａ:(0)
								}
								分岐:(1){
									代入ａ:(1)
									会話:(人物Ｄ,主人公)[[{心得た}\nこれからは{二人称名前}に\nお仕え{しよう}]]
								}
								分岐:(2){
									代入ａ:(2)
									会話:(人物Ｄ,主人公)[[…いずれまた\nお会い{しよう}]]
								}
								分岐:(3){
									代入ａ:(3)
									会話:(人物Ｄ,主人公)[[こんなところで終わるとは{な}…]]
									ＳＥスタート:(刀で斬られる２)
									ナレーション:[[(人物Ｄ)は自害して果てました]]
								}
							}
							調査:(ａ)<(0)
							調査:(人物::人物Ｄ.精神)==(小心)
							分岐:(1){
								会話選択:(人物Ｄ,主人公)[[命ばかりはどうかお助けを…]]
								選択:([[中止]][[登用する]][[解き放つ]][[斬首する]])
								分岐:(0){
									代入ａ:(0)
								}
								分岐:(1){
									代入ａ:(1)
									会話:(人物Ｄ,主人公)[[<文字列Ｃ>！\nこれからは{二人称名前}に\nお仕え{しよう}！]]
								}
								分岐:(2){
									代入ａ:(2)
									会話:(人物Ｄ,主人公)[[<文字列Ｃ>！\nそれでは{一人称}はこれで…]]
								}
								分岐:(3){
									代入ａ:(3)
									会話:(人物Ｄ,主人公)[[<文字列Ｄ>]]
									ＳＥスタート:(刀で斬られる２)
									ナレーション:[[(人物Ｄ)は斬首され果てました]]
								}
							}
							調査:(ａ)<(0)
							分岐:(1){
								会話選択:(人物Ｄ,主人公)[[{一人称}の武運もここまでか…\n好きにして{くれ}]]
								選択:([[中止]][[登用する]][[解き放つ]][[自害を許す]])
								分岐:(0){
									代入ａ:(0)
								}
								分岐:(1){
									代入ａ:(1)
									会話:(人物Ｄ,主人公)[[{心得た}\nこれからは{二人称名前}に\nお仕え{しよう}]]
								}
								分岐:(2){
									代入ａ:(2)
									会話:(人物Ｄ,主人公)[[…いずれまた\nお会い{しよう}]]
								}
								分岐:(3){
									代入ａ:(3)
									会話:(人物Ｄ,主人公)[[介錯は<文字列Ｅ>…]]
									ＳＥスタート:(刀で斬られる２)
									ナレーション:[[(人物Ｄ)は自害して果てました]]
								}
							}
							調査:(ａ)>=(1)
							分岐:(1){
								更新:(人物::人物Ｄ.死刑フラグ)(通常)
								調査:(ａ)==(3)
								分岐:(1){
									武将死亡:(人物Ｄ)
								}
								分岐:(0){
									人物解雇:(人物Ｄ,町Ａ,出現済み)
									条件ブロック:(ａ)==(1){
										調査:(人物::人物Ｂ.所属当主)==(人物::人物Ｂ)
										分岐:(1){
											人物登用:(人物Ｄ,直臣,人物Ｂ)
										}
										分岐:(0){
											人物登用:(人物Ｄ,陪臣,人物Ｂ)
										}
									}
								}
							}
						}
						コンテナ設定:(人物,所属勢力,勢力Ａ)
						コンテナ除外:(人物,人物番号,人物Ａ)
						コンテナ除外:(人物,出現フラグ,0)
						コンテナ除外:(人物,死亡フラグ,1)
						コンテナ絞り込み:(人物,死刑フラグ,死刑)
					}
					代入人物Ｂ:(人物::主人公)
				}
				分岐:(0){
					更新:(人物::人物Ａ.死刑フラグ)(通常)
					コンテナ設定:(人物,所属勢力,勢力Ａ)
					コンテナ除外:(人物,人物番号,人物Ａ)
					コンテナ除外:(人物,出現フラグ,0)
					コンテナ除外:(人物,死亡フラグ,1)
					コンテナ絞り込み:(人物,死刑フラグ,死刑)
					条件ループ:(変数::コンテナカウンタ){
						コンテナ選択:(人物Ｄ,先頭)
						コンテナ選抜:(削る,1)
						更新:(人物::人物Ｄ.死刑フラグ)(通常)
						人物解雇:(人物Ｄ,町Ａ,出現済み)
						代入ａ:(人物::人物Ｄ.統率力)
						代入ａ:(ａ)+(人物::人物Ｄ.武力)
						代入ａ:(ａ)+(人物::人物Ｄ.政務)
						代入ａ:(ａ)+(人物::人物Ｄ.知謀)
						代入ａ:(ａ)+(人物::人物Ｄ.魅力)
						代入ａ:(ａ)+(変数::Ｒｎｄ１００)
						調査:(ａ)>=(275)
						分岐:(1){
							調査:(人物::人物Ｂ.所属当主)==(人物::人物Ｂ)
							分岐:(1){
								人物登用:(人物Ｄ,直臣,人物Ｂ)
							}
							分岐:(0){
								人物登用:(人物Ｄ,陪臣,人物Ｂ)
							}
						}
					}
				}
			}
			調査:(ｙ)==(4)
			ＯＲ調査:{
				調査:(ｗ)
				ＡＮＤ調査:{
					調査:(大名家::大名家Ｃ.当主)==(人物::主人公)
					調査:(人物::人物Ｅ)!=(人物::忍者)
				}
			}
			分岐:(1){
				代入人物Ｄ:(大名家::大名家Ｃ.当主)
				ＯＲ調査:{
					ＡＮＤ調査:{
						調査:(ｗ)
						スチル表示:(イベントスチル,大名臣従,無効,無効,フェード)
					}
					ＡＮＤ調査:{
						調査:(状況::拠点)==(拠点::主人公拠点)
						背景変更:(場面,評定の間,フェード)
					}
				}
				分岐:(1){
					ＢＧＭ変更:(評定)
				}
				分岐:(0){
					調査:(軍団::主人公軍団.使用状況)==(使用中)
					分岐:(1){
						背景変更:(場面,合戦画面,フェード)
					}
				}
				調査:(人物::人物Ｄ.性別)
				分岐:(0){
					調査:(ｚ)<=(3)
					分岐:(1){
						文字列設定:(文字列Ｄ)[[いらっしゃいました]]
						文字列設定:(文字列Ｅ)[[お蓄えくだされ]]
					}
					分岐:(0){
						文字列設定:(文字列Ｄ)[[あった]]
						文字列設定:(文字列Ｅ)[[蓄えるがよい]]
					}
				}
				分岐:(1){
					文字列設定:(文字列Ｄ)[[いらっしゃいました]]
					文字列設定:(文字列Ｅ)[[お蓄えくださいませ]]
				}
				会話:(人物Ｄ,人物Ａ)[[{おお}、{二人称名前}\nよくぞ{ご}無事で<文字列Ｄ>]]
				会話:(人物Ｄ,人物Ａ)[[こたびの難儀は\n言語に絶すること{だった}{な}\n心中お察し{いたす}]]
				会話:(人物Ａ,人物Ｄ)[[武運拙く戦に敗れながら自害もせず\nおめおめと逃げ延びてきたこと、\nまことに面目次第も{ない}…]]
				会話:(人物Ｄ,人物Ａ)[[{いいえ}、それでよいの{だ}\nいずれ捲土重来の機が熟すまで\n当家にて存分に力を<文字列Ｅ>]]
				調査:(人物::人物Ａ.性別)==(男)
				分岐:(1){
					文字列設定:(文字列Ｂ)[[ござる]]
				}
				分岐:(0){
					文字列設定:(文字列Ｂ)[[存じます]]
				}
				会話:(人物Ａ,人物Ｄ)[[{二人称名前}…かたじけのう<文字列Ｂ>\n{一人称}及ばずながら今後は<大名家Ｃ>の\n家臣として力を尽くす所存{です}]]
				調査:(ｗ)
				分岐:(1){
					代入ｂ:(人物::人物Ａ.親密度)+(20)
					更新:(人物::人物Ａ.親密度)(ｂ)
					スチル消去:(フェード)
				}
				分岐:(0){
					代入ｂ:(人物::人物Ａ.親密度)+(20)
					更新:(人物::人物Ａ.親密度)(ｂ)
					背景戻す:(フェード)
				}
			}
			調査:(ｚ)<=(3)
			分岐:(1){
				調査:(ｙ)<(4)
				分岐:(1){
					//
					//	大名登用・浪人最終処理
					//
					ＳＥスタート:(忍者報告)
					調査:(ｚ)==(1)
					分岐:(1){
						調査:(大名家::大名家Ｃ)==(大名家::無効)
						分岐:(1){
							会話:(忍者,主人公)[[<大名家Ａ>は籠城の末\n<大名家Ｂ>に降伏しました]]
						}
						分岐:(0){
							会話:(忍者,主人公)[[<大名家Ａ>は<大名家Ｂ>に攻められ\n<大名家Ｃ>のもとへ落ち延びましたが、\n<大名家Ｂ>に引き渡されました]]
						}
					}
					分岐:(0){
						調査:(大名家::大名家Ｃ)==(大名家::無効)
						分岐:(1){
							会話:(忍者,主人公)[[<大名家Ａ>は籠城の末\n<勢力Ｂ>に降伏、<城Ａ>城は\n<大名家Ｂ>のものとなりました]]
						}
						分岐:(0){
							会話:(忍者,主人公)[[<大名家Ａ>は<勢力Ｂ>に攻められ\n<大名家Ｃ>のもとへ落ち延びましたが、\n<勢力Ｂ>に引き渡されました]]
							会話:(忍者,主人公)[[<大名家Ａ>の<城Ａ>城は\n<大名家Ｂ>のものとなりました]]
						}
					}
					勢力滅亡:(大名家Ａ,大名家Ｂ)
					調査:(ｙ)==(2)
					分岐:(1){
						条件ブロック:(大名家::大名家Ｂ.当主)!=(人物::人物Ｂ){
							調査:(人物::人物Ｂ.所属当主)==(人物::人物Ｂ)
							分岐:(1){
								人物登用:(人物Ａ,直臣,人物Ｂ)
							}
							分岐:(0){
								人物登用:(人物Ａ,陪臣,人物Ｂ)
							}
						}
					}
					分岐:(0){
						人物解雇:(人物Ａ,町Ａ,出現済み)
					}
				}
				分岐:(0){
					//
					//	大名高飛び最終処理
					//
					ＳＥスタート:(忍者報告)
					調査:(ｚ)==(1)
					分岐:(1){
						会話:(忍者,主人公)[[<大名家Ａ>は<大名家Ｂ>に攻められ\n<大名家Ｃ>のもとへ落ち延びました]]
					}
					分岐:(0){
						会話:(忍者,主人公)[[<大名家Ａ>は<勢力Ｂ>に攻められ\n<大名家Ｃ>のもとへ落ち延び、<城Ａ>城は\n<大名家Ｂ>のものとなりました]]
					}
					コンテナ設定:(人物,所属大名家,大名家Ａ)
					コンテナ除外:(人物,人物番号,人物Ａ)
					コンテナ除外:(人物,出現フラグ,0)
					コンテナ除外:(人物,死亡フラグ,1)
					勢力滅亡:(大名家Ａ,大名家Ｃ)
					更新:(人物::人物Ａ.武士勲功)(6000)
					条件ループ:(変数::コンテナカウンタ){
						コンテナ選択:(人物Ｄ,先頭)
						コンテナ選抜:(削る,1)
						人物登用:(人物Ｄ,陪臣,人物Ａ)
					}
				}
				更新:(城::城Ａ.城主)(大名家::大名家Ｂ.当主)
				更新:(城::城Ａ.城主)(人物::人物Ｃ)
			}
			分岐:(0){
				//
				//	忍者衆・海賊衆高飛び最終処理
				//
				ＳＥスタート:(忍者報告)
				会話:(忍者,主人公)[[<勢力Ａ>は<勢力Ｂ>に攻められ\n<大名家Ｃ>のもとへ落ち延びました]]
				代入人物Ｃ:(大名家::大名家Ｃ.当主)
				代入ａ:(人物::人物Ａ.武士勲功)
				条件ブロック:(ａ)<(1400){
					代入ａ:(1400)
				}
				代入ｂ:(ａ)*(2)
				更新:(人物::人物Ａ.武士勲功)(ｂ)
				人物登用:(人物Ａ,直臣,人物Ｃ)
				更新:(人物::人物Ａ.武士勲功)(ａ)
				コンテナ設定:(人物,所属勢力,勢力Ａ)
				コンテナ除外:(人物,出現フラグ,0)
				コンテナ除外:(人物,死亡フラグ,1)
				コンテナ絞り込み:(人物,カテゴリ,0)
				条件ループ:(変数::コンテナカウンタ){
					コンテナ選択:(人物Ｄ,先頭)
					コンテナ選抜:(削る,1)
					代入ａ:(人物::人物Ｄ.武士勲功)
					ＯＲ調査:{
						調査:(人物::人物Ｄ.身分)==(中忍)
						調査:(人物::人物Ｄ.身分)==(水夫頭)
					}
					調査:(ａ)<(200)
					分岐:(1){
						更新:(ａ)(200)
					}
					ＯＲ調査:{
						調査:(人物::人物Ｄ.身分)==(上忍)
						調査:(人物::人物Ｄ.身分)==(船頭)
						調査:(人物::人物Ｄ.身分)==(元締)
						調査:(人物::人物Ｄ.身分)==(船大将)
					}
					調査:(ａ)<(600)
					分岐:(1){
						更新:(ａ)(600)
					}
					代入ｂ:(ａ)*(2)
					更新:(人物::人物Ｄ.武士勲功)(ｂ)
					人物登用:(人物Ｄ,陪臣,人物Ａ)
					更新:(人物::人物Ｄ.武士勲功)(ａ)
				}
			}
			メッセージ閉じる:
			調査:(ｙ)==(4)
			調査:(ｗ)
			分岐:(1){
				代入拠点Ａ:(拠点::主人公拠点)
				強制移動ワープ:(拠点Ａ)
			}
		}
	}

}