罪と罰++二律背反
罪罰/外交/友好度低下
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
] [
リンク元
]
開始行:
[[罪罰外交]]
*戦争で友好度を低下させる [#j8a64b9f]
-罪罰外交が必要
# }else{
# $ck=$tnm='';
# $log .= "$cmp[$v]に攻め込みます<br>\n";
# }
#-------------------------------この辺↑↑を目印に↓↓を追加
# 戦争を行うと友好度低下
if($v>$camp){
$cfs[$v.$camp]-=int(rand(5)+5);
$cfs[$v.$camp]=0 if ($cfs[$v.$camp]<1);
if( $cfs[$v.$camp]<int(rand(30)) && $cfs[...
$cfs[$camp.$v]=2; # 交戦
$log.="$cmp[$v]と$cmp[$camp]は、$...
$wr_mes="$date $cmp[$v]と$cmp[$ca...
&hist_write;
}
} elsif ($v<$camp){
$cfs[$camp.$v]-=int(rand(5)+5);
$cfs[$camp.$v]=0 if ($cfs[$camp.$v]<1);
if( $cfs[$camp.$v]<int(rand(30)) && $cfs[...
$cfs[$v.$camp]=2; # 交戦
$log.="$cmp[$v]と$cmp[$camp]は、$...
$wr_mes="$date $cmp[$v]と$cmp[$ca...
&hist_write;
}
}
終了行:
[[罪罰外交]]
*戦争で友好度を低下させる [#j8a64b9f]
-罪罰外交が必要
# }else{
# $ck=$tnm='';
# $log .= "$cmp[$v]に攻め込みます<br>\n";
# }
#-------------------------------この辺↑↑を目印に↓↓を追加
# 戦争を行うと友好度低下
if($v>$camp){
$cfs[$v.$camp]-=int(rand(5)+5);
$cfs[$v.$camp]=0 if ($cfs[$v.$camp]<1);
if( $cfs[$v.$camp]<int(rand(30)) && $cfs[...
$cfs[$camp.$v]=2; # 交戦
$log.="$cmp[$v]と$cmp[$camp]は、$...
$wr_mes="$date $cmp[$v]と$cmp[$ca...
&hist_write;
}
} elsif ($v<$camp){
$cfs[$camp.$v]-=int(rand(5)+5);
$cfs[$camp.$v]=0 if ($cfs[$camp.$v]<1);
if( $cfs[$camp.$v]<int(rand(30)) && $cfs[...
$cfs[$v.$camp]=2; # 交戦
$log.="$cmp[$v]と$cmp[$camp]は、$...
$wr_mes="$date $cmp[$v]と$cmp[$ca...
&hist_write;
}
}
ページ名: