太閤立志伝５イベントソース
////////////////////////////////////////////////////////////////////////
//イベント名：ポケットマネーで勝手に他大名軍政
//
//■発生条件■
//@主人公の身分が家老以下（身分により可能な軍政が異なる）
//A同盟関係（同盟・従属・支配）にある他大名の城に入ると発生
//
//■結果■
//発生拠点の
//城増築・城修理・治安向上・訓練・徴兵・兵糧援助を行う
//結果は主人公の政務値に従う（政務％の結果になる。兵糧援助を除く）
//１ヶ月に１回のみ（兵糧援助を除く）。但し月を跨ぐ作業をすると次の月は実行できない。
//主人公の所持金３０００・７０００を消費。足りない場合は警告。
//
//各軍務の結果（政務１００の場合）
//城増築１〜５上昇（最大３０）
//城修理１０〜４５上昇（最大：規模×８＋１０）
//治安向上５〜２１上昇（最大１００）
//訓練５〜１４上昇（最大１００）
//徴兵５００〜２５００人増加（最大５００００）
//兵糧援助：主人公の所持金が７０００貫以上の時、兵糧１００００石を援助する。
//
//使用変数
//大名家Ａ：主人公大名家 大名家Ｂ：発生拠点（城）の所属大名家
//城Ａ：主人公の拠点城 城Ｂ：発生拠点（城）
//ａ：主人公の政務値 ｇ：主人公の所持金 ｘ：主人公身分値（足軽組頭＝１〜家老＝５）
//ｂ〜ｉ：計算用変数（全て整数型変数） ｙ：軍政可能身分値 ｚ：消費金額
//
////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////
//イベント名：ポケットマネーで勝手に支配下里軍政
//
//■発生条件■
//@主人公の身分が家老以下（身分により可能な軍政が異なる）
//A支配下にある忍者衆の里に入ると発生
//
//■結果■
//発生拠点の
//増築・修理・訓練・徴兵・兵糧援助を行う
//自分の影武者（能力同じ）を呼び出して命じる設定
//結果は主人公の政務値に従う（政務％の結果になる。兵糧援助を除く）
//１ヶ月に１回のみ（兵糧援助を除く）。
//主人公の所持金３０００・７０００を消費。足りない場合は警告。
//
//各軍務の結果（政務１００の場合）
//増築１〜５上昇（最大２２）
//修理１０〜４５上昇（最大：規模×８＋１０）
//訓練５〜１４上昇（最大１００）
//徴兵５００〜２５００人増加（最大５００００）
//兵糧援助：主人公の所持金が７０００貫以上の時、兵糧１００００石を援助する。
//
//使用変数
//大名家Ａ：主人公大名家 忍者衆Ａ：発生拠点（里）の所属忍者衆
//城Ａ：主人公の拠点城 里Ａ：発生拠点（里）
//ａ：主人公の政務値 ｇ：主人公の所持金 ｘ：主人公身分値（足軽組頭＝１〜家老＝５）
//ｂ〜ｉ：計算用変数（全て整数型変数） ｙ：軍政可能身分値 ｚ：消費金額
//
////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////
//イベント名：ポケットマネーで勝手に支配下砦軍政
//
//■発生条件■
//@主人公の身分が家老以下（身分により可能な軍政が異なる）
//A支配下にある海賊衆の砦に入ると発生
//
//■結果■
//発生拠点の
//増築・修理・訓練・関船建造・大型船建造・鉄甲船建造・兵糧援助を行う
//自分の影武者（能力同じ）を呼び出して命じる設定
//結果は主人公の政務値に従う（政務％の結果になる。兵糧援助を除く）
//１ヶ月に１回のみ（兵糧援助を除く）。
//主人公の所持金３０００・７０００・１００００を消費。足りない場合は警告。
//
//各軍務の結果（政務１００の場合）
//増築１〜５上昇（最大２２）
//修理１０〜４５上昇（最大：規模×８＋１０）
//訓練５〜１４上昇（最大１００）
//関船建造５０〜２５０隻増加（最大５０００）
//大型船建造１〜５隻増加（最大５００）
//鉄甲船建造１〜４隻増加（最大５００）
//兵糧援助：主人公の所持金が７０００貫以上の時、兵糧１００００石を援助する。
//
//使用変数
//大名家Ａ：主人公大名家 海賊衆Ａ：発生拠点（砦）の所属海賊衆
//城Ａ：主人公の拠点城 砦Ａ：発生拠点（砦）
//ａ：主人公の政務値 ｇ：主人公の所持金 ｘ：主人公身分値（足軽組頭＝１〜家老＝５）
//ｂ〜ｉ：計算用変数（全て整数型変数） ｙ：軍政可能身分値 ｚ：消費金額
//
//関船建造：侍大将以上（ｙ＞＝３）
//大型船建造：部将以上（ｙ＞＝４）
//鉄甲船建造：家老以上（ｙ＞＝５）
////////////////////////////////////////////////////////////////////////
チャプター:{
イベント:ポケットマネーで勝手に他大名軍政{
属性:何度でも
発生契機:拠点内画面表示後(無効)
発生条件:{
調査:(拠点::発生拠点.拠点タイプ)==(城)
調査:(イベントフラグ::勝手に軍政ＰＭ)==(不成立)
ＯＲ調査:{
調査:(人物::主人公.身分)==(家老)
調査:(人物::主人公.身分)==(部将)
調査:(人物::主人公.身分)==(侍大将)
調査:(人物::主人公.身分)==(足軽大将)
調査:(人物::主人公.身分)==(足軽組頭)
}//ＯＲ調査
}//発生条件
スクリプト:{
条件ブロック:(人物::主人公.身分)==(足軽組頭){
代入ｘ:(1)
}
条件ブロック:(人物::主人公.身分)==(足軽大将){
代入ｘ:(2)
}
条件ブロック:(人物::主人公.身分)==(侍大将){
代入ｘ:(3)
}
条件ブロック:(人物::主人公.身分)==(部将){
代入ｘ:(4)
}
条件ブロック:(人物::主人公.身分)==(家老){
代入ｘ:(5)
}
代入大名家Ａ:(大名家::主人公大名家)
代入ａ:(人物::主人公.政務)
代入ｇ:(人物::主人公.所持金)
代入城Ｂ:(拠点::発生拠点)
代入大名家Ｂ:(城::城Ｂ.所属大名家)
ＯＲ調査:{
調査:(大名家::大名家Ａ.外交同盟(大名家Ｂ))==(同盟)
調査:(大名家::大名家Ａ.外交同盟(大名家Ｂ))==(支配)
調査:(大名家::大名家Ａ.外交同盟(大名家Ｂ))==(従属)
}//ＯＲ調査
分岐:(真){
ひとりごと:[[所持金に余裕があるな\nここは勝手に軍政を進めてしまおう]]
ナレーション可否選択:[[軍政を実行しますか？]]
分岐:(可){
ナレーション選択:[[どの軍政を行いますか？]]
選択:[[城増築]][[城修理]][[治安向上]][[訓練]][[徴兵]][[兵糧援助]]
分岐:([[城増築]]){
代入ｙ:(5)
代入ｚ:(3000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(城::城Ｂ.規模)
代入ｃ:(Ｒｎｄ)%(5)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(1)
代入ｉ:(ｅ)+(1)
調査:(ｆ)>(30)
分岐:(真){
代入ｆ:(30)
}
更新:(城::城Ｂ.規模)(ｆ)
ナレーション:[[<城Ｂ>の規模は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が3000消費されました]]
更新:(イベントフラグ::勝手に軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[増築が可能な身分でないか、\n所持金が不足しています]]
}
}
分岐:([[城修理]]){
代入ｙ:(4)
代入ｚ:(3000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(城::城Ｂ.防御度)
代入ｃ:(Ｒｎｄ)%(35)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(10)
代入ｉ:(ｅ)+(10)
代入ｈ:(城::城Ｂ.規模)*(8)
代入ｈ:(ｈ)+(10)
調査:(ｆ)>(ｈ)
分岐:(真){
代入ｆ:(ｈ)
}
更新:(城::城Ｂ.防御度)(ｆ)
ナレーション:[[<城Ｂ>の防御度は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が3000消費されました]]
更新:(イベントフラグ::勝手に軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[修理が可能な身分でないか、\n所持金が不足しています]]
}
}
分岐:([[治安向上]]){
代入ｙ:(3)
代入ｚ:(3000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(城::城Ｂ.住民安定度)
代入ｃ:(Ｒｎｄ)%(16)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(5)
代入ｉ:(ｅ)+(5)
調査:(ｆ)>(100)
分岐:(真){
代入ｆ:(100)
}
更新:(城::城Ｂ.住民安定度)(ｆ)
ナレーション:[[<城Ｂ>の住民安定度は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が3000消費されました]]
更新:(イベントフラグ::勝手に軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[治安向上が可能な身分でないか、\n所持金が不足しています]]
}
}
分岐:([[訓練]]){
代入ｙ:(2)
調査:(ｘ)>=(ｙ)
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(城::城Ｂ.訓練度)
代入ｃ:(Ｒｎｄ)%(9)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(5)
代入ｉ:(ｅ)+(5)
調査:(ｆ)>(100)
分岐:(真){
代入ｆ:(100)
}
更新:(城::城Ｂ.訓練度)(ｆ)
ナレーション:[[<城Ｂ>の訓練度は<ｉ>増えて<ｆ>になりました]]
更新:(イベントフラグ::勝手に軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[訓練が可能な身分ではありません]]
}
}
分岐:([[徴兵]]){
代入ｙ:(3)
代入ｚ:(3000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(城::城Ｂ.兵士数)
代入ｃ:(Ｒｎｄ)%(2000)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(500)
代入ｉ:(ｅ)+(500)
代入ｊ:(ｉ)/(100)
代入ｋ:(城::城Ｂ.住民安定度)
代入ｋ:(ｋ)-(ｊ)
調査:(ｆ)>(50000)
分岐:(真){
代入ｆ:(50000)
}
調査:(ｋ)<(0)
分岐:(真){
代入ｋ:(0)
}
更新:(城::城Ｂ.兵士数)(ｆ)
更新:(城::城Ｂ.住民安定度)(ｋ)
ナレーション:[[<城Ｂ>の兵士数は<ｉ>増えて<ｆ>になりました]]
ナレーション:[[<城Ｂ>の住民安定度は<ｊ>減って<ｋ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が3000消費されました]]
更新:(イベントフラグ::勝手に軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[徴兵が可能な身分でないか、\n所持金が不足しています]]
}
}
分岐:([[兵糧援助]]){
代入ｚ:(7000)
調査:(ｇ)>=(ｚ)
分岐:(真){
代入ｂ:(城::城Ｂ.兵糧)
ひとりごと可否選択:[[この城の兵糧は<ｂ>石しかない。\n援助いたすか]]
分岐:(可){
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
代入ｄ:(城::城Ｂ.兵糧)+(10000)
更新:(城::城Ｂ.兵糧)(ｄ)
ひとりごと:[[これでよい]]
ＳＥスタート:(成功音)
}//分岐:(可)
分岐:(否){
ひとりごと:[[・・・やめておこう]]
ＳＥスタート:(失敗音)
}//分岐:(否)
}//分岐:(真)
分岐:(偽){
ナレーション:[[所持金が不足しています]]
ＳＥスタート:(失敗音)
}//分岐:(偽)
}//分岐:([[兵糧援助]])
}//分岐可
分岐:(否){
ひとりごと:[[止めておこう]]
}//分岐否
}//分岐:(真)
}//スクリプト
}//イベント
イベント:ポケットマネーで勝手に他大名軍政フラグクリア{
属性:何度でも
発生契機:毎月処理の最後絶対
発生条件:{
調査:(イベントフラグ::勝手に軍政ＰＭ)==(成立)
}//発生条件
スクリプト:{
更新:(イベントフラグ::勝手に軍政ＰＭ)(不成立)
}//スクリプト
}//イベント
イベント:ポケットマネーで勝手に支配下里軍政{
属性:何度でも
発生契機:拠点内画面表示後(無効)
発生条件:{
調査:(拠点::発生拠点.拠点タイプ)==(里)
調査:(イベントフラグ::勝手に里軍政ＰＭ)==(不成立)
ＯＲ調査:{
調査:(人物::主人公.身分)==(家老)
調査:(人物::主人公.身分)==(部将)
調査:(人物::主人公.身分)==(侍大将)
調査:(人物::主人公.身分)==(足軽大将)
調査:(人物::主人公.身分)==(足軽組頭)
}//ＯＲ調査
}//発生条件
スクリプト:{
条件ブロック:(人物::主人公.身分)==(足軽組頭){
代入ｘ:(1)
}
条件ブロック:(人物::主人公.身分)==(足軽大将){
代入ｘ:(2)
}
条件ブロック:(人物::主人公.身分)==(侍大将){
代入ｘ:(3)
}
条件ブロック:(人物::主人公.身分)==(部将){
代入ｘ:(4)
}
条件ブロック:(人物::主人公.身分)==(家老){
代入ｘ:(5)
}
代入大名家Ａ:(大名家::主人公大名家)
代入ａ:(人物::主人公.政務)
代入ｇ:(人物::主人公.所持金)
代入里Ａ:(拠点::発生拠点)
代入忍者衆Ａ:(里::里Ａ.所属忍者衆)
調査:(大名家::大名家Ａ.外交同盟(忍者衆Ａ))==(支配)
分岐:(真){
ひとりごと:[[所持金に余裕があるな\nここは勝手に軍政を進めてしまおう]]
ナレーション可否選択:[[軍政を実行しますか？]]
分岐:(可){
ナレーション選択:[[どの軍政を行いますか？]]
選択:[[増築]][[修理]][[訓練]][[徴兵]][[兵糧援助]]
分岐:([[増築]]){
代入ｙ:(5)
代入ｚ:(3000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(里::里Ａ.規模)
代入ｃ:(Ｒｎｄ)%(5)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(1)
代入ｉ:(ｅ)+(1)
調査:(ｆ)>(22)
分岐:(真){
代入ｆ:(22)
}
更新:(里::里Ａ.規模)(ｆ)
ナレーション:[[<里Ａ>の規模は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が3000消費されました]]
更新:(イベントフラグ::勝手に里軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[増築が可能な身分でないか、\n所持金が不足しています]]
}
}
分岐:([[修理]]){
代入ｙ:(4)
代入ｚ:(3000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(里::里Ａ.防御度)
代入ｃ:(Ｒｎｄ)%(35)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(10)
代入ｉ:(ｅ)+(10)
代入ｈ:(里::里Ａ.規模)*(8)
代入ｈ:(ｈ)+(10)
調査:(ｆ)>(ｈ)
分岐:(真){
代入ｆ:(ｈ)
}
更新:(里::里Ａ.防御度)(ｆ)
ナレーション:[[<里Ａ>の防御度は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が3000消費されました]]
更新:(イベントフラグ::勝手に里軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[修理が可能な身分でないか、\n所持金が不足しています]]
}
}
分岐:([[訓練]]){
代入ｙ:(2)
調査:(ｘ)>=(ｙ)
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(里::里Ａ.訓練度)
代入ｃ:(Ｒｎｄ)%(9)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(5)
代入ｉ:(ｅ)+(5)
調査:(ｆ)>(100)
分岐:(真){
代入ｆ:(100)
}
更新:(里::里Ａ.訓練度)(ｆ)
ナレーション:[[<里Ａ>の訓練度は<ｉ>増えて<ｆ>になりました]]
更新:(イベントフラグ::勝手に里軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[訓練が可能な身分ではありません]]
}
}
分岐:([[徴兵]]){
代入ｙ:(3)
代入ｚ:(3000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(里::里Ａ.兵士数)
代入ｃ:(Ｒｎｄ)%(2000)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(500)
代入ｉ:(ｅ)+(500)
調査:(ｆ)>(50000)
分岐:(真){
代入ｆ:(50000)
}
更新:(里::里Ａ.兵士数)(ｆ)
ナレーション:[[<里Ａ>の兵士数は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が3000消費されました]]
更新:(イベントフラグ::勝手に里軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[徴兵が可能な身分ではありません]]
}
}
分岐:([[兵糧援助]]){
代入ｚ:(7000)
調査:(ｇ)>=(ｚ)
分岐:(真){
代入ｂ:(里::里Ａ.兵糧)
ひとりごと可否選択:[[この里の兵糧は<ｂ>石しかない。\n援助いたすか]]
分岐:(可){
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
代入ｄ:(里::里Ａ.兵糧)+(10000)
更新:(里::里Ａ.兵糧)(ｄ)
ひとりごと:[[これでよい]]
ＳＥスタート:(成功音)
}//分岐:(可)
分岐:(否){
ひとりごと:[[・・・やめておこう]]
ＳＥスタート:(失敗音)
}//分岐:(否)
}//分岐:(真)
分岐:(偽){
ナレーション:[[所持金が不足しています]]
ＳＥスタート:(失敗音)
}//分岐:(偽)
}//分岐:([[兵糧援助]])
}//分岐可
分岐:(否){
ひとりごと:[[止めておこう]]
}//分岐否
}//分岐:(真)
}//スクリプト
}//イベント
イベント:ポケットマネーで勝手に支配下里軍政フラグクリア{
属性:何度でも
発生契機:毎月処理の最後絶対
発生条件:{
調査:(イベントフラグ::勝手に里軍政ＰＭ)==(成立)
}//発生条件
スクリプト:{
更新:(イベントフラグ::勝手に里軍政ＰＭ)(不成立)
}//スクリプト
}//イベント
イベント:ポケットマネーで勝手に支配下砦軍政{
属性:何度でも
発生契機:拠点内画面表示後(無効)
発生条件:{
調査:(拠点::発生拠点.拠点タイプ)==(砦)
調査:(イベントフラグ::勝手に砦軍政ＰＭ)==(不成立)
ＯＲ調査:{
調査:(人物::主人公.身分)==(家老)
調査:(人物::主人公.身分)==(部将)
調査:(人物::主人公.身分)==(侍大将)
調査:(人物::主人公.身分)==(足軽大将)
調査:(人物::主人公.身分)==(足軽組頭)
}//ＯＲ調査
}//発生条件
スクリプト:{
条件ブロック:(人物::主人公.身分)==(足軽組頭){
代入ｘ:(1)
}
条件ブロック:(人物::主人公.身分)==(足軽大将){
代入ｘ:(2)
}
条件ブロック:(人物::主人公.身分)==(侍大将){
代入ｘ:(3)
}
条件ブロック:(人物::主人公.身分)==(部将){
代入ｘ:(4)
}
条件ブロック:(人物::主人公.身分)==(家老){
代入ｘ:(5)
}
代入大名家Ａ:(大名家::主人公大名家)
代入ａ:(人物::主人公.政務)
代入ｇ:(人物::主人公.所持金)
代入砦Ａ:(拠点::発生拠点)
代入海賊衆Ａ:(砦::砦Ａ.所属海賊衆)
調査:(大名家::大名家Ａ.外交同盟(海賊衆Ａ))==(支配)
分岐:(真){
ひとりごと:[[所持金に余裕があるな\nここは勝手に軍政を進めてしまおう]]
ナレーション可否選択:[[軍政を実行しますか？]]
分岐:(可){
ナレーション選択:[[どの軍政を行いますか？]]
選択:[[増築]][[修理]][[訓練]][[関船建造]][[大型船建造]][[鉄甲船建造]][[兵糧援助]]
分岐:([[増築]]){
代入ｙ:(5)
代入ｚ:(3000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(砦::砦Ａ.規模)
代入ｃ:(Ｒｎｄ)%(5)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(1)
代入ｉ:(ｅ)+(1)
調査:(ｆ)>(22)
分岐:(真){
代入ｆ:(22)
}
更新:(砦::砦Ａ.規模)(ｆ)
ナレーション:[[<砦Ａ>の規模は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が3000消費されました]]
更新:(イベントフラグ::勝手に砦軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[増築が可能な身分でないか、\n所持金が不足しています]]
}
}
分岐:([[修理]]){
代入ｙ:(4)
代入ｚ:(3000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(砦::砦Ａ.防御度)
代入ｃ:(Ｒｎｄ)%(35)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(10)
代入ｉ:(ｅ)+(10)
代入ｈ:(砦::砦Ａ.規模)*(8)
代入ｈ:(ｈ)+(10)
調査:(ｆ)>(ｈ)
分岐:(真){
代入ｆ:(ｈ)
}
更新:(砦::砦Ａ.防御度)(ｆ)
ナレーション:[[<砦Ａ>の防御度は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が3000消費されました]]
更新:(イベントフラグ::勝手に砦軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[修理が可能な身分でないか、\n所持金が不足しています]]
}
}
分岐:([[訓練]]){
代入ｙ:(2)
調査:(ｘ)>=(ｙ)
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(砦::砦Ａ.訓練度)
代入ｃ:(Ｒｎｄ)%(9)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(5)
代入ｉ:(ｅ)+(5)
調査:(ｆ)>(100)
分岐:(真){
代入ｆ:(100)
}
更新:(砦::砦Ａ.訓練度)(ｆ)
ナレーション:[[<砦Ａ>の訓練度は<ｉ>増えて<ｆ>になりました]]
更新:(イベントフラグ::勝手に砦軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[訓練が可能な身分ではありません]]
}
}
分岐:([[関船建造]]){
代入ｙ:(3)
代入ｚ:(3000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(砦::砦Ａ.所有船舶数)
代入ｃ:(Ｒｎｄ)%(200)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(50)
代入ｉ:(ｅ)+(50)
調査:(ｆ)>(5000)
分岐:(真){
代入ｆ:(5000)
}
更新:(砦::砦Ａ.所有船舶数)(ｆ)
ナレーション:[[<砦Ａ>の関船数は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が3000消費されました]]
更新:(イベントフラグ::勝手に砦軍政ＰＭ)(成立)
}
}
分岐:(偽){
ナレーション:[[関船建造が可能な身分でないか、\n所持金が不足しています]]
}
}
分岐:([[大型船建造]]){
代入ｙ:(4)
代入ｚ:(10000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
ＯＲ調査:{
調査:(海賊衆::海賊衆Ａ.大型船建造技術)==(可能)
調査:(海賊衆::海賊衆Ａ.大型船建造技術)==(量産可能)
}
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(砦::砦Ａ.大型船舶数)
代入ｃ:(Ｒｎｄ)%(4)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(1)
代入ｉ:(ｅ)+(1)
調査:(ｆ)>(500)
分岐:(真){
代入ｆ:(500)
}
更新:(砦::砦Ａ.大型船舶数)(ｆ)
ナレーション:[[<砦Ａ>の大型船舶数は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が10000消費されました]]
更新:(イベントフラグ::勝手に砦軍政ＰＭ)(成立)
}
分岐:(否){
}
}
分岐:(偽){
ナレーション:[[大型船建造技術がない、\n身分が低い、所持金不足の何れかです]]
}
}
分岐:([[鉄甲船建造]]){
代入ｙ:(5)
代入ｚ:(10000)
ＡＮＤ調査:{
調査:(ｘ)>=(ｙ)
調査:(ｇ)>=(ｚ)
ＯＲ調査:{
調査:(海賊衆::海賊衆Ａ.大型船建造技術)==(可能)
調査:(海賊衆::海賊衆Ａ.大型船建造技術)==(量産可能)
}
}
分岐:(真){
ナレーション可否選択:[[よろしいですか？]]
分岐:(可){
代入ｂ:(砦::砦Ａ.鉄甲船数)
代入ｃ:(Ｒｎｄ)%(3)
代入ｄ:(ａ)*(ｃ)
代入ｅ:(ｄ)/(100)
代入ｆ:(ｂ)+(ｅ)
代入ｆ:(ｆ)+(1)
代入ｉ:(ｅ)+(1)
調査:(ｆ)>(500)
分岐:(真){
代入ｆ:(500)
}
更新:(砦::砦Ａ.鉄甲船数)(ｆ)
ナレーション:[[<砦Ａ>の鉄甲船数は<ｉ>増えて<ｆ>になりました]]
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
ナレーション:[[所持金が10000消費されました]]
更新:(イベントフラグ::勝手に砦軍政ＰＭ)(成立)
}
分岐:(否){
}
}
分岐:(偽){
ナレーション:[[鉄甲船建造技術がない、\n身分が低い、所持金不足の何れかです]]
}
}
分岐:([[兵糧援助]]){
代入ｚ:(7000)
調査:(ｇ)>=(ｚ)
分岐:(真){
代入ｂ:(砦::砦Ａ.兵糧)
ひとりごと可否選択:[[この砦の兵糧は<ｂ>石しかない。\n援助いたすか]]
分岐:(可){
代入ｇ:(人物::主人公.所持金)-(ｚ)
更新:(人物::主人公.所持金)(ｇ)
代入ｄ:(砦::砦Ａ.兵糧)+(10000)
更新:(砦::砦Ａ.兵糧)(ｄ)
ひとりごと:[[これでよい]]
ＳＥスタート:(成功音)
}//分岐:(可)
分岐:(否){
ひとりごと:[[・・・やめておこう]]
ＳＥスタート:(失敗音)
}//分岐:(否)
}//分岐:(真)
分岐:(偽){
ナレーション:[[所持金が不足しています]]
ＳＥスタート:(失敗音)
}//分岐:(偽)
}//分岐:([[兵糧援助]])
}//分岐可
分岐:(否){
ひとりごと:[[止めておこう]]
}//分岐否
}//分岐:(真)
}//スクリプト
}//イベント
イベント:ポケットマネーで勝手に支配下砦軍政フラグクリア{
属性:何度でも
発生契機:毎月処理の最後絶対
発生条件:{
調査:(イベントフラグ::勝手に砦軍政ＰＭ)==(成立)
}//発生条件
スクリプト:{
更新:(イベントフラグ::勝手に砦軍政ＰＭ)(不成立)
}//スクリプト
}//イベント
}//チャプター
戻る