*外交で友好値が更新するたびに変わってしまう。 [#ubbcff88]
-ページ: [[罪罰改造掲示板]]
-投稿者: [[スポンサー]]
-優先順位: 緊急
-状態: 完了
-カテゴリー: エラーが出ます
-投稿日: 2004-07-08 (木) 16:01:21
-バージョン:
**メッセージ [#u2c67e7c]
サマリのとうりです。
systemでちゃんと保存してないみたいなんですが、
人の作ったものなのでわかりません。
----
-systemアップ。 -- [[スポンサー]] &new{2004-07-08 (木) 16:01:48};
-ここを修正しないと友好度が保存されないですね -- [[あくあ]] &new{2004-07-08 (木) 19:01:29};
# 国データ書き込み
sub cdat_write{
# 友好度
$cfs_temp = "";
for ($self=1;$self<6;$self++){
for ($other=1;$other<6;$other++){
$cfs_temp .= "cfs$self$other;$cfs[$self.$other],";
}}
$cdat = "cn1;$cn1,cg1;$cg1,cf1;$cf1,cs1;$cs1, ..(省略).. ,tya7;$tya7,tya8;$tya8,\n";
$cdat .= "ct1;$ct1,ct2;$ct2,ct3;$ct3,ct4;$ct4,ct5;$ct5,"; # 民統治
$cdat .= "$cfs_temp"; # 友好度
$cdatにセットする順番と代入文（.=）に注意して下の様に変更すれば保存されるのではないかと思います
# 国データ書き込み
sub cdat_write{
# 友好度
$cfs_temp = "";
for ($self=1;$self<6;$self++){
for ($other=1;$other<6;$other++){
$cfs_temp .= "cfs$self$other;$cfs[$self.$other],";
}}
$cdat = "ct1;$ct1,ct2;$ct2,ct3;$ct3,ct4;$ct4,ct5;$ct5,"; # 民統治
$cdat .= "$cfs_temp"; # 友好度
$cdat .= "cn1;$cn1,cg1;$cg1,cf1;$cf1,cs1;$cs1, ..(省略).. ,tya7;$tya7,tya8;$tya8,\n";
#comment
