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


チャプター:{
イベント:初期新武将設定{
属性:一度だけ
発生契機:ゲームスタート時
発生条件:{
	コンテナ設定:(人物,カテゴリ,武将)
	コンテナ除外:(人物,死亡フラグ,死亡)
	コンテナ絞り込み:(人物,出現フラグ,出現済み)
	コンテナ除外:(人物,親,無効)
	調査:(コンテナカウンタ)!=(0)
}
スクリプト:{
	
	コンテナ設定:(人物,無効,無効)
	ナレーション:[[親のいる浪人を仕官させますか？]]
	代入ｆ:(0)
	選択:([[仕官させる]][[新武将のみ仕官させる]][[仕官させない]])
	分岐:([[仕官させる]]){
		代入ｆ:(1)
	}
	分岐:([[新武将のみ仕官させる]]){
		代入ｆ:(1)
		コンテナ選抜:(削る,960)
	}

	条件ブロック:(ｆ)!=(0){
		コンテナ除外:(人物,親,無効)
		コンテナ絞り込み:(人物,身分,浪人)
		コンテナ絞り込み:(人物,出現フラグ,出現済み)
		コンテナ絞り込み:(人物,死亡フラグ,生存)
		コンテナ除外:(人物,人物番号,主人公)
		コンテナ除外:(人物,仕官傾向,その気なし)
		コンテナ除外:(人物,仕官傾向,武士以外優先)
		調査:(コンテナカウンタ)>(0)
		分岐:(真){
			//-----------------------------------------------
			// @雇用
			//-----------------------------------------------
			コンテナソート:(無効,シャッフル,降順)
			代入人物Ｄ:(無効)
			ループ:{
				調査:(コンテナカウンタ)==(0)
				ブロック脱出:(真)
				コンテナ選択:(人物Ａ,先頭)
				コンテナ選抜:(削る,1)

				代入人物Ｂ:(人物::人物Ａ.親)

				ＡＮＤ調査:{
					調査:(人物::人物Ｂ.出現フラグ)==(出現済み)
					調査:(人物::人物Ｂ.死亡フラグ)==(生存)
				}
				分岐:(真){
					条件ブロック:(人物::人物Ｂ.所属勢力タイプ)==(大名家){
						ＯＲ調査:{
							調査:(人物::主人公.所属勢力タイプ)!=(大名家)
							調査:(人物::人物Ｂ.所属大名家)!=(人物::主人公.所属大名家)
						}
						分岐:(真){
							代入人物Ｄ:(人物Ａ)
						}
						
						ＯＲ調査:{
							調査:(人物::人物Ｂ.身分)==(大名)
						}
						分岐:(真){
							調査:(人物Ａ.武士勲功)<(1400)
							分岐:(真){
								//大名の子供の場合は部将からスタート
								更新:(人物Ａ.武士勲功)(1400)
							}
							人物登用:(人物Ａ,直臣,人物Ｂ)
						}
						分岐:(偽){
							ＯＲ調査:{
								調査:(人物::人物Ｂ.立場)==(陪臣)
								調査:(人物::人物Ｂ.身分)==(足軽組頭)
							}
							分岐:(真){
								代入人物Ｃ:(人物::人物Ｂ.所属上司)
								人物登用:(人物Ａ,直臣,人物Ｃ)
							}
							分岐:(偽){
								人物登用:(人物Ａ,陪臣,人物Ｂ)
							}
						}
					}
					ＯＲ調査:{
						調査:(人物::人物Ｂ.所属勢力タイプ)==(商家)
						調査:(人物::人物Ｂ.所属勢力タイプ)==(忍者衆)
						調査:(人物::人物Ｂ.所属勢力タイプ)==(海賊衆)
					}
					分岐:(真){
						代入人物Ｃ:(人物::人物Ｂ.所属当主)
						人物登用:(人物Ａ,直臣,人物Ｃ)
					}
				}
			}
			
		}
	}
	
	ナレーション可否選択:[[新武将の設定を行いますか？]]
	分岐:(可){
		代入ａ:(0)
		代入ｂ:(0)
		代入ｃ:(0)
		代入ｄ:(0)
		代入ｅ:(0)
		代入ｆ:(0)
		代入ｇ:(0)

		ループ:{//ループその１
			コンテナ設定:(人物,カテゴリ,武将)
			コンテナソート:(人物,人物番号,昇順)
			コンテナ検索:(人物,人物番号,960)
			コンテナ選抜:(ポインタ,以上)
			コンテナ除外:(人物,死亡フラグ,死亡)
			コンテナ絞り込み:(人物,出現フラグ,出現済み)
			コンテナ絞り込み:(人物,所属勢力タイプ,浪人)
			
			調査:(コンテナカウンタ)>(0)
			ブロック脱出:(偽)
			コンテナ選択:(人物Ａ,人物選択)
			分岐:(真){
				ナレーション可否選択:[[(人物Ａ)の設定を行いますか？]]
				ブロック脱出:(否)
				
				ループ:{//ループＡ
					更新:(ｆ)(0)
					メッセージ閉じる:
					選択:[[勢力に仕官させる]][[新規大名として独立させる]][[設定しない]]//選択分岐その１
					分岐:(0){
						ナレーション:[[どの勢力に仕官させますか？]]
						選択:[[大名家]][[忍者衆]][[海賊衆]][[商家]][[親武将の所属する勢力]][[仕官させない]]
						分岐:(0){//大名家
							更新:(ｄ)(0)

							ナレーション:[[大名家を選択してください]]
							メッセージ閉じる:
							コンテナ設定:(拠点,無効,無効)
							コンテナ絞り込み:(拠点,拠点種類,城)
							ループ:{
							
								更新:(ｂ)(0)
								更新:(ｃ)(0)
								
								コンテナ選択:(城Ａ,拠点選択)
								分岐:(真){
									代入大名家Ａ:(城::城Ａ.所属大名家)
									代入城Ｂ:(大名家::大名家Ａ.本城)
									代入人物Ｂ:(大名家::大名家Ａ.当主)
										ナレーション可否選択:[[<大名家Ａ>（本拠<城Ｂ>城、当主(人物Ｂ)）\nに仕官させますか？]]
										分岐:(可){								
											ナレーション:[[どの身分で仕官させますか？]]
											選択::[[家老]][[部将]][[侍大将]][[足軽大将]][[足軽頭]]
											分岐:(0){										
												更新:(人物::人物Ａ.武士勲功)(3000)
												ナレーション:[[(人物Ａ)を\n家老の身分で仕官させました]]
											}
											分岐:(1){
												更新:(人物::人物Ａ.武士勲功)(1400)
												ナレーション:[[(人物Ａ)を\n部将の身分で仕官させました]]
											}
											分岐:(2){
												更新:(人物::人物Ａ.武士勲功)(600)
												ナレーション:[[(人物Ａ)を\n侍大将の身分で仕官させました]]
											}
											分岐:(3){
												更新:(人物::人物Ａ.武士勲功)(200)
												ナレーション:[[(人物Ａ)を\n足軽大将の身分で仕官させました]]
											}
											分岐:(4){
												ナレーション:[[(人物Ａ)を\n足軽組頭の身分で仕官させました]]
											}
											人物登用:(人物Ａ,直臣,人物Ｂ)
											
										}
										分岐:(否){
											更新:(ｂ)(1)
										}
									}
									分岐:(偽){
										ナレーション:[[選択されていません]]
									}
									条件ブロック:(ｂ)==(1){
									ナレーション可否選択:[[続けますか？]]
									分岐:(否){
										更新:(ｃ)(1)
									}
								}
								調査:(ｃ)==(0)
								ブロック脱出:(偽)

								調査:(人物::人物Ａ.所属勢力タイプ)==(浪人)
								ブロック脱出:(偽)

								ナレーション可否選択:[[大名家に仕官させるのをやめますか？]]
								分岐:(可){
									更新:(ｄ)(1)
									メッセージ閉じる:
								}
								調査:(ｄ)==(0)
								ブロック脱出:(偽)
							}//ループ終端
						}//大名家終端

						分岐:(1){//忍者衆
							ナレーション:[[忍者衆を選択してください]]
							メッセージ閉じる:
							コンテナ設定:(拠点,拠点種類,里)
							ループ:{
								コンテナ選択:(里Ａ,拠点選択)
								分岐:(真){
									代入忍者衆Ａ:(里::里Ａ.所属忍者衆)
									代入人物Ｂ:(忍者衆::忍者衆Ａ.当主)
									ナレーション可否選択:[[<忍者衆Ａ>（当主(人物Ｂ)）\nに仕官させますか？]]
									分岐:(可){
										ナレーション:[[どの身分で仕官させますか？]]
										選択:[[上忍]][[中忍]][[下忍]]
										分岐:(0){
											更新:(人物::人物Ａ.忍者勲功)(1500)
											更新:(人物::人物Ａ.悪名)(10)
											ナレーション:[[(人物Ａ)を<忍者衆Ａ>に\n上忍として仕官させました]]
											}
										分岐:(1){
											更新:(人物::人物Ａ.忍者勲功)(300)
											更新:(人物::人物Ａ.悪名)(10)
											ナレーション:[[(人物Ａ)を<忍者衆Ａ>に\n中忍として仕官させました]]
											}
										分岐:(2){
											ナレーション::[[(人物Ａ)を<忍者衆Ａ>に\n下忍として仕官させました]]
											}
										人物登用:(人物Ａ,直臣,人物Ｂ)
									}
								}
								分岐:(偽){
									ナレーション:[[選択されていません]]
								}
								調査:(人物::人物Ａ.所属勢力タイプ)==(浪人)
								ブロック脱出:(偽)

								ナレーション可否選択:[[続けますか？]]
								ブロック脱出:(否)
							}//ループ終端
						}//忍者衆終端

						分岐:(2){//海賊衆
							ナレーション:[[海賊衆を選択してください]]
							メッセージ閉じる:
							コンテナ設定:(拠点,拠点種類,砦)
							ループ:{
								コンテナ選択:(砦Ａ,拠点選択)
								分岐:(真){
									代入海賊衆Ａ:(砦::砦Ａ.所属海賊衆)
									代入人物Ｂ:(海賊衆::海賊衆Ａ.当主)
									ナレーション可否選択:[[<海賊衆Ａ>（当主(人物Ｂ)）\nに仕官させますか？]]
									分岐:(可){
										ナレーション:[[どの身分で仕官させますか？]]
										選択:[[船頭]][[水夫頭]][[水夫]]
										分岐:(0){
											更新:(人物::人物Ａ.海賊勲功)(1500)
											ナレーション:[[(人物Ａ)を<海賊衆Ａ>に\n船頭として仕官させました]]
											}
										分岐:(1){
											更新:(人物::人物Ａ.海賊勲功)(300)
											ナレーション:[[(人物Ａ)を<海賊衆Ａ>に\n水夫頭として仕官させました]]
											}
										分岐:(2){
											ナレーション::[[(人物Ａ)を<海賊衆Ａ>に\n水夫として仕官させました]]
											}
										人物登用:(人物Ａ,直臣,人物Ｂ)
									}
								}
								分岐:(偽){
									ナレーション:[[選択されていません]]
								}
								調査:(人物::人物Ａ.所属勢力タイプ)==(浪人)
								ブロック脱出:(偽)

								ナレーション可否選択:[[続けますか？]]
								ブロック脱出:(否)
							}//ループ終端
						}//海賊衆終端

						分岐:(3){//商家
							ナレーション:[[商家を選択してください]]
							メッセージ閉じる:
							コンテナ設定:(人物,所属勢力タイプ,商家)
							コンテナ除外:(人物,死亡フラグ,死亡)
							コンテナ絞り込み:(人物,出現フラグ,出現済み)
							コンテナ絞り込み:(人物,身分,当主)

							ループ:{
								コンテナ選択:(人物Ｂ,人物選択)
								分岐:(真){
									代入商家Ａ:(人物::人物Ａ.所属商家)
									代入町Ａ:(商家::商家Ａ.本店)
										ナレーション可否選択:[[<商家Ａ>（本店<町Ａ>、当主(人物Ｂ)）\nに仕官させますか？]]
										分岐:(可){
											ナレーション:[[どの身分で仕官させますか？]]
											選択:[[番頭]][[手代]][[見習い]]
											分岐:(0){
												更新:(人物::人物Ａ.商人勲功)(1500)
												ナレーション:[[(人物Ａ)を<商家Ａ>に\n番頭として仕官させました]]
												}
											分岐:(1){
												更新:(人物::人物Ａ.商人勲功)(300)
												ナレーション:[[(人物Ａ)を<商家Ａ>に\n手代として仕官させました]]
												}
											分岐:(2){
												ナレーション::[[(人物Ａ)を<商家Ａ>に\n見習いとして仕官させました]]
												}
											人物登用:(人物Ａ,直臣,人物Ｂ)
										}
								}
								分岐:(偽){
									ナレーション:[[選択されていません]]
								}
								調査:(人物::人物Ａ.所属勢力タイプ)==(浪人)
								ブロック脱出:(偽)

								ナレーション可否選択:[[続けますか？]]
								ブロック脱出:(否)
							}//ループ終端
						}//商家終端

						分岐:(4){//親武将の所属する勢力
							条件ブロック:(人物::人物Ａ.親)==(無効){
								ナレーション:[[親武将が設定されていません]]
							}
							調査:(人物::人物Ａ.親)!=(無効)
							ブロック脱出:(偽)

							代入人物Ｂ:(人物::人物Ａ.親)
							代入人物Ｃ:(人物::人物Ｂ.所属当主)

							条件ブロック:(人物::人物Ｂ.所属勢力タイプ)==(浪人){
								ナレーション:[[(人物Ａ)の親武将(人物Ｂ)は\n勢力に属していません]]
							}
							
							調査:(人物::人物Ｂ.所属勢力タイプ)!=(浪人)
							ブロック脱出:(偽)

							調査:(人物::人物Ｃ.所属勢力タイプ)==(大名家)
							分岐:(真){
								ナレーション可否選択:[[(人物Ａ)を(人物Ｂ)の所属する\n(人物Ｃ.姓)家に仕官させますか？]]
								分岐:(可){
									ナレーション:[[どの身分で仕官させますか？]]
									選択:[[家老]][[部将]][[侍大将]][[足軽大将]][[足軽組頭]]
									分岐:(0){
										更新:(人物::人物Ａ.武士勲功)(3000)
										ナレーション:[[(人物Ａ)を(人物Ｃ.姓)家に\n家老として仕官させました]]
									}
									分岐:(1){
										更新:(人物::人物Ａ.武士勲功)(1400)
										ナレーション:[[(人物Ａ)を(人物Ｃ.姓)家に\n部将として仕官させました]]
									}
									分岐:(2){
										更新:(人物::人物Ａ.武士勲功)(600)
										ナレーション:[[(人物Ａ)を(人物Ｃ.姓)家に\n侍大将として仕官させました]]
									}
									分岐:(3){
										更新:(人物::人物Ａ.武士勲功)(200)
										ナレーション:[[(人物Ａ)を(人物Ｃ.姓)家に\n足軽大将として仕官させました]]
									}
									分岐:(4){
										ナレーション:[[(人物Ａ)を(人物Ｃ.姓)家に\n足軽組頭として仕官させました]]
									}
									人物登用:(人物Ａ,直臣,人物Ｃ)
								}
							}//分岐真終端
							分岐:(偽){//分岐偽その１
								調査:(人物::人物Ｃ.所属勢力タイプ)==(海賊衆)
								分岐:(真){
									代入海賊衆Ａ:(人物::人物Ｃ.所属海賊衆)
									ナレーション可否選択:[[(人物Ａ)を(人物Ｂ)の所属する\n<海賊衆Ａ>に仕官させますか？]]
									分岐:(可){
										ナレーション:[[どの身分で仕官させますか？]]
										選択:[[船頭]][[水夫頭]][[水夫]]
										分岐:(0){
											更新:(人物::人物Ａ.海賊勲功)(1500)
											ナレーション:[[(人物Ａ)を<海賊衆Ａ>に\n船頭として仕官させました]]
										}
										分岐:(1){
											更新:(人物::人物Ａ.海賊勲功)(300)
											ナレーション:[[(人物Ａ)を<海賊衆Ａ>に\n水夫頭として仕官させました]]
										}
										分岐:(2){
											ナレーション:[[(人物Ａ)を<海賊衆Ａ>に\n水夫として仕官させました]]
										}
										人物登用:(人物Ａ,直臣,人物Ｃ)
									}//分岐可終端
								}//分岐真終端
								分岐:(偽){//分岐偽その２
									調査:(人物::人物Ｃ.所属勢力タイプ)==(忍者衆)
									分岐:(真){
										代入忍者衆Ａ:(人物::人物Ｃ.所属忍者衆)
										ナレーション可否選択:[[(人物Ａ)を(人物Ｂ)の所属する\n<忍者衆Ａ>に仕官させますか？]]
										分岐:(可){
											ナレーション:[[どの身分で仕官させますか？]]
											選択:[[上忍]][[中忍]][[下忍]]
											分岐:(0){
												更新:(人物::人物Ａ.忍者勲功)(1500)
												更新:(人物::人物Ａ.悪名)(10)
												ナレーション:[[(人物Ａ)を<忍者衆Ａ>に\n上忍として仕官させました]]
											}
											分岐:(1){
												更新:(人物::人物Ａ.忍者勲功)(300)
												更新:(人物::人物Ａ.悪名)(10)
												ナレーション:[[(人物Ａ)を<忍者衆Ａ>に\n中忍として仕官させました]]
											}
											分岐:(2){
												ナレーション:[[(人物Ａ)を<忍者衆Ａ>に\n下忍として仕官させました]]
											}
											人物登用:(人物Ａ,直臣,人物Ｃ)
										}//分岐可終端
									}//分岐真終端
									分岐:(偽){//分岐偽その３
										代入商家Ａ:(人物::人物Ｃ.所属商家)
										ナレーション可否選択:[[(人物Ａ)を(人物Ｂ)の所属する\n<商家Ａ>に仕官させますか？]]
										分岐:(可){
											ナレーション:[[どの身分で仕官させますか？]]
											選択:[[番頭]][[手代]][[見習い]]
											分岐:(0){
												更新:(人物::人物Ａ.商人勲功)(1500)
												ナレーション:[[(人物Ａ)を<商家Ａ>に\n番頭として仕官させました]]
											}
											分岐:(1){
												更新:(人物::人物Ａ.商人勲功)(300)
												ナレーション:[[(人物Ａ)を<商家Ａ>に\n手代として仕官させました]]
											}
											分岐:(2){
												ナレーション:[[(人物Ａ)を<商家Ａ>に\n見習いとして仕官させました]]
											}
											人物登用:(人物Ａ,直臣,人物Ｃ)
										}//分岐可終端
									}//分岐偽その３終端
								}//分岐偽その２終端
							}//分岐偽その１終端
						}//親武将の所属する勢力終端
						
						分岐:(5){//仕官させない
						}
					}//勢力に仕官させる終端（選択分岐その１）

					分岐:(1){//新規大名として独立させる
						調査:(状況::空き大名家数)>=(2)
						分岐:(真){
							ナレーション:[[独立する城を選択してください]]
							メッセージ閉じる:
							コンテナ設定:(城,無効,無効)
							ループ:{
								コンテナ選択:(城Ａ,拠点選択)
								分岐:(真){
									代入大名家Ａ:(城::城Ａ.所属大名家)
									代入城Ｂ:(大名家::大名家Ａ.本城)
									調査:(城Ａ)==(城Ｂ)
									分岐:(真){
										ナレーション:[[<城Ａ>城は大名居城です\n他の城を選んでください]]
									}
									分岐:(偽){
										ナレーション可否選択:[[<城Ａ>城（<大名家Ａ>所属）です\nこの城で独立しますか？]]
										分岐:(可){
											独立:(人物Ａ,城Ａ,陪臣のみ)
										}
									}
								}
								分岐:(偽){
									ナレーション:[[選択されていません]]
								}
								調査:(人物::人物Ａ.武士勲功)==(0)
								ブロック脱出:(偽)

								ナレーション可否選択:[[続けますか？]]
								ブロック脱出:(否)
							}
							条件ブロック:(人物::人物Ａ.武士勲功)!=(0)){
								ナレーション可否選択:[[配下を付けますか？]]
								分岐:(可){
									ループ:{
										コンテナ設定:(人物,カテゴリ,武将)
										コンテナ絞り込み:(人物,出現フラグ,出現済み)
										コンテナ除外:(人物,死亡フラグ,死亡)
										コンテナ絞り込み:(人物,所属勢力タイプ,浪人)
										コンテナ絞り込み:(人物,剣術流派,無効)
										コンテナ絞り込み:(人物,外出禁止フラグ,偽)
										調査:(コンテナカウンタ)==(0)
										分岐:(真){
											ナレーション:[[配下に付けられる人物がいません]]
										}
										分岐:(偽){
											コンテナ選択:(人物Ｂ,人物選択)
											分岐:(真){
												ナレーション可否選択:[[(人物Ｂ)を配下にしますか？]]
												分岐:(可){
													ナレーション:[[身分を設定してください]]
													選択:[[家老]][[部将]][[侍大将]][[足軽大将]][[足軽頭]]
													分岐:(0){
														更新:(人物::人物Ｂ.武士勲功)(3000)
														ナレーション:[[(人物Ｂ)を\n家老の身分で仕官させました]]
													}
													分岐:(1){
														更新:(人物::人物Ｂ.武士勲功)(1400)
														ナレーション:[[(人物Ｂ)を\n部将の身分で仕官させました]]
													}
													分岐:(2){
														更新:(人物::人物Ｂ.武士勲功)(600)
														ナレーション:[[(人物Ｂ)を\n侍大将の身分で仕官させました]]
													}
													分岐:(3){
														更新:(人物::人物Ｂ.武士勲功)(200)
														ナレーション:[[(人物Ｂ)を\n足軽大将の身分で仕官させました]]
													}
													分岐:(4){
														ナレーション:[[(人物Ｂ)を\n足軽頭の身分で仕官させました]]
													}
													人物登用:(人物Ｂ,直臣,人物Ａ)
												}
											}
											分岐:(偽){
												ナレーション:[[選択されていません]]
											}
										}//分岐偽終端
										ナレーション可否選択:[[続けますか？]]
										ブロック脱出:(否)
									}//ループ終端
								}//分岐可終端
							}
							
							調査:(人物::人物Ａ.武士勲功)==(0)
							ブロック脱出:(偽)

							ナレーション可否選択:[[独立設定を終了しますか？]]
							ブロック脱出:(可)

							ＡＮＤ調査:{
								調査:(人物Ａ)==(主人公)
								調査:(人物::人物Ａ.所属勢力タイプ)!=(浪人)
							}
							分岐:(真){
								更新:(イベントフラグ::主人公強制移動ワープ)(成立)
							}
						}
						分岐:(偽){
							ナレーション:[[空き大名数が0のため、新規大名として独立できません。]]
						}
					}//新規大名として独立させる（選択分岐その１）終端

					分岐:(2){//設定しない
						更新:(ｆ)(1)
					}
					調査:(人物::人物Ａ.所属勢力タイプ)==(浪人)
					ブロック脱出:(偽)

					調査:(ｆ)==(0)
					ブロック脱出:(偽)
				}//ループＡ終端
			}
			分岐:(偽){
				ナレーション:[[選択されていません]]
			}

			ナレーション可否選択:[[他の武将の設定を行いますか？]]
			分岐:(否){
				更新:(ｅ)(1)
			}

			調査:(ｅ)==(0)
			ブロック脱出:(偽)
		}//ループその１終端
		ナレーション:[[新武将の設定を終了します]]
	}//可否選択「新武将の設定を行いますか？」分岐可終端

	条件ブロック:(イベントフラグ::主人公強制移動ワープ)==(成立){
		強制移動ワープ:(主人公拠点)
	}

}//スクリプト終端
}//イベント終端
}//チャプター終端