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