罪と罰++二律背反
罪罰改造掲示板/16
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
] [
リンク元
]
開始行:
*
-ページ: [[罪罰改造掲示板]]
-投稿者: [[kururu]]
-優先順位: 普通
-状態: 完了
-カテゴリー: 設置できません
-投稿日: 2004-04-19 (月) 22:24:15
-バージョン:
**罪罰/外交が動作しない [#g84aedce]
初めまして。突然失礼いたします。
許文龍さんと同じく外交に関しての質問なのですが横から書く...
僕も宣戦布告しても「交戦」状態になりません。
保存もされていませんのでore_sub-system.cgiを見直したので...
もしよろしければ見てはいただけないでしょうか??
http://mikaran.hp.infoseek.co.jp/ore_sub-system.txt
----
-はじめまして、kururuさん。スクリプト見せてもらいます。ま...
# 国データ&キャラデータ書き込み
sub write_data{
&cdat_write;
&dat_write;
$cdat = $cfs_temp; # 友好度
}
# 友好度
$cfs_temp = "";
for ($self=1;$self<6;$self++){
for ($other=1;$other<6;$other++){
$cfs_temp .= "cfs$self$other;$cfs[$self.$other],";
}}
$cdat = $cfs_temp; # 友好度
# 国データ書き込み
sub cdat_write{
$cdat = "cn1;$cn1,cg1;$cg1,cf1;$cf1,cs1;$cs1,ce1;$ce1,c...
cn2;$cn2,cg2;$cg2,cf2;$cf2,cs2;$cs2,ce2;$ce2,c2;$c2,c2a;...
cn3;$cn3,cg3;$cg3,cf3;$cf3,cs3;$cs3,ce3;$ce3,c3;$c3,c3a;...
cn4;$cn4,cg4;$cg4,cf4;$cf4,cs4;$cs4,ce4;$ce4,c4;$c4,c4a;...
cn5;$cn5,cg5;$cg5,cf5;$cf5,cs5;$cs5,ce5;$ce5,c5;$c5,c5a;...
set;$set,all_mem;$all_mem,goal_no;$goal_no,
asya;$hasya,hcamp;$hcamp,ad;$addr,ht;$host,date;$date,wr...
open (OUT,">$cdatfile") || &error("open error:$cdatfile...
print OUT $cdat;
close(OUT) or die "Can't close : $!";
}
とこんな風になっていますが、以下のように書き換えてみてく...
# 国データ&キャラデータ書き込み
sub write_data{
&cdat_write;
&dat_write;
}
# 国データ書き込み
sub cdat_write{
#
# この下1行の $cdat は、見やすいように改行して...
#
$cdat = "cn1;$cn1,cg1;$cg1,cf1;$cf1,cs1;$cs1,ce1;$ce1,c...
cn2;$cn2,cg2;$cg2,cf2;$cf2,cs2;$cs2,ce2;$ce2,c2;$c2,c2a;...
cn3;$cn3,cg3;$cg3,cf3;$cf3,cs3;$cs3,ce3;$ce3,c3;$c3,c3a;...
cn4;$cn4,cg4;$cg4,cf4;$cf4,cs4;$cs4,ce4;$ce4,c4;$c4,c4a;...
cn5;$cn5,cg5;$cg5,cf5;$cf5,cs5;$cs5,ce5;$ce5,c5;$c5,c5a;...
set;$set,all_mem;$all_mem,goal_no;$goal_no,
asya;$hasya,hcamp;$hcamp,ad;$addr,ht;$host,date;$date,wr...
# 友好度
$cfs_temp = "";
for ($self=1;$self<6;$self++){
for ($other=1;$other<6;$other++){
$cfs_temp .= "cfs$self$other;$cfs[$self.$other],";
}}
$cdat = $cfs_temp.$cdat;
open (OUT,">$cdatfile") || &error("open error:$cdatfile...
print OUT $cdat;
close(OUT) or die "Can't close : $!";
}
-これでどうでしょうか? -- [[あくあ]] &new{2004-04-19 (月...
-全国が統一されました。各国データをリセットしますとでてき...
-すみません、もう一度書き換えたファイルをお願いします -- ...
-あ、上のスクリプトを貼り付けただけだとダメですよ。見やす...
-ファイルを書き換えさせていただきました。延々と続くのは一...
-同盟か宣戦を実施してからの cdata.cgi にデータ( cfs )が保...
-お言葉に甘えさせていただきメールを送らさせていただきまし...
-うーん、おかしいところが見当たらないですね。もう一度、宣...
-もう一度送らせていただきました。 -- [[kururu]] &new{2004...
-わかりました〜 -- [[あくあ]] &new{2004-04-20 (火) 21:22:...
$my_cf=$cf5;
$my_cs=$cs5;
$my_ce=$ce5;
}
} # <--ここの「{」が違っています
# 友好度
for ($self=1; $self<6;$self++){
for ($other=1; $other<6;$other++){
$cfs[$self.$other] = $CP{'cfs'.$self.$other};
if ($other<$self){
# 友好度
$cfs[$self.$other] = int(rand(30)+40) if ($cf...
} elsif ($other>$self) {
# 条約
# $cfs[$self.$other] = 0;
}
# 設定値をクリア
# $cfs[$self.$other] = "";
}
}
こうなってますが、下のように変更してください。ちょっとわ...
「}」の場所が違っています。
$my_cf=$cf5;
$my_cs=$cs5;
$my_ce=$ce5;
}
# 友好度
for ($self=1; $self<6;$self++){
for ($other=1; $other<6;$other++){
$cfs[$self.$other] = $CP{'cfs'.$self.$other};
if ($other<$self){
# 友好度
$cfs[$self.$other] = int(rand(30)+40) if ($cf...
} elsif ($other>$self) {
# 条約
# $cfs[$self.$other] = 0;
}
# 設定値をクリア
# $cfs[$self.$other] = "";
}
}
} # <--ここに移動します
-ありがとうございました。おかげで設置することが出来ました...
-うまくいったんですね。良かったです -- [[あくあ]] &new{20...
-あの。。たびたび申し訳ないのですが宣戦布告をすると同盟と...
-ore_sub-base_p1_pc.cgi の @cfs_str=('-','同盟','交戦');...
-ありがとうございました。逆にしていていました。色々とあり...
-いや、それもともとが間違ってたので、こちらのミスだったん...
#comment
終了行:
*
-ページ: [[罪罰改造掲示板]]
-投稿者: [[kururu]]
-優先順位: 普通
-状態: 完了
-カテゴリー: 設置できません
-投稿日: 2004-04-19 (月) 22:24:15
-バージョン:
**罪罰/外交が動作しない [#g84aedce]
初めまして。突然失礼いたします。
許文龍さんと同じく外交に関しての質問なのですが横から書く...
僕も宣戦布告しても「交戦」状態になりません。
保存もされていませんのでore_sub-system.cgiを見直したので...
もしよろしければ見てはいただけないでしょうか??
http://mikaran.hp.infoseek.co.jp/ore_sub-system.txt
----
-はじめまして、kururuさん。スクリプト見せてもらいます。ま...
# 国データ&キャラデータ書き込み
sub write_data{
&cdat_write;
&dat_write;
$cdat = $cfs_temp; # 友好度
}
# 友好度
$cfs_temp = "";
for ($self=1;$self<6;$self++){
for ($other=1;$other<6;$other++){
$cfs_temp .= "cfs$self$other;$cfs[$self.$other],";
}}
$cdat = $cfs_temp; # 友好度
# 国データ書き込み
sub cdat_write{
$cdat = "cn1;$cn1,cg1;$cg1,cf1;$cf1,cs1;$cs1,ce1;$ce1,c...
cn2;$cn2,cg2;$cg2,cf2;$cf2,cs2;$cs2,ce2;$ce2,c2;$c2,c2a;...
cn3;$cn3,cg3;$cg3,cf3;$cf3,cs3;$cs3,ce3;$ce3,c3;$c3,c3a;...
cn4;$cn4,cg4;$cg4,cf4;$cf4,cs4;$cs4,ce4;$ce4,c4;$c4,c4a;...
cn5;$cn5,cg5;$cg5,cf5;$cf5,cs5;$cs5,ce5;$ce5,c5;$c5,c5a;...
set;$set,all_mem;$all_mem,goal_no;$goal_no,
asya;$hasya,hcamp;$hcamp,ad;$addr,ht;$host,date;$date,wr...
open (OUT,">$cdatfile") || &error("open error:$cdatfile...
print OUT $cdat;
close(OUT) or die "Can't close : $!";
}
とこんな風になっていますが、以下のように書き換えてみてく...
# 国データ&キャラデータ書き込み
sub write_data{
&cdat_write;
&dat_write;
}
# 国データ書き込み
sub cdat_write{
#
# この下1行の $cdat は、見やすいように改行して...
#
$cdat = "cn1;$cn1,cg1;$cg1,cf1;$cf1,cs1;$cs1,ce1;$ce1,c...
cn2;$cn2,cg2;$cg2,cf2;$cf2,cs2;$cs2,ce2;$ce2,c2;$c2,c2a;...
cn3;$cn3,cg3;$cg3,cf3;$cf3,cs3;$cs3,ce3;$ce3,c3;$c3,c3a;...
cn4;$cn4,cg4;$cg4,cf4;$cf4,cs4;$cs4,ce4;$ce4,c4;$c4,c4a;...
cn5;$cn5,cg5;$cg5,cf5;$cf5,cs5;$cs5,ce5;$ce5,c5;$c5,c5a;...
set;$set,all_mem;$all_mem,goal_no;$goal_no,
asya;$hasya,hcamp;$hcamp,ad;$addr,ht;$host,date;$date,wr...
# 友好度
$cfs_temp = "";
for ($self=1;$self<6;$self++){
for ($other=1;$other<6;$other++){
$cfs_temp .= "cfs$self$other;$cfs[$self.$other],";
}}
$cdat = $cfs_temp.$cdat;
open (OUT,">$cdatfile") || &error("open error:$cdatfile...
print OUT $cdat;
close(OUT) or die "Can't close : $!";
}
-これでどうでしょうか? -- [[あくあ]] &new{2004-04-19 (月...
-全国が統一されました。各国データをリセットしますとでてき...
-すみません、もう一度書き換えたファイルをお願いします -- ...
-あ、上のスクリプトを貼り付けただけだとダメですよ。見やす...
-ファイルを書き換えさせていただきました。延々と続くのは一...
-同盟か宣戦を実施してからの cdata.cgi にデータ( cfs )が保...
-お言葉に甘えさせていただきメールを送らさせていただきまし...
-うーん、おかしいところが見当たらないですね。もう一度、宣...
-もう一度送らせていただきました。 -- [[kururu]] &new{2004...
-わかりました〜 -- [[あくあ]] &new{2004-04-20 (火) 21:22:...
$my_cf=$cf5;
$my_cs=$cs5;
$my_ce=$ce5;
}
} # <--ここの「{」が違っています
# 友好度
for ($self=1; $self<6;$self++){
for ($other=1; $other<6;$other++){
$cfs[$self.$other] = $CP{'cfs'.$self.$other};
if ($other<$self){
# 友好度
$cfs[$self.$other] = int(rand(30)+40) if ($cf...
} elsif ($other>$self) {
# 条約
# $cfs[$self.$other] = 0;
}
# 設定値をクリア
# $cfs[$self.$other] = "";
}
}
こうなってますが、下のように変更してください。ちょっとわ...
「}」の場所が違っています。
$my_cf=$cf5;
$my_cs=$cs5;
$my_ce=$ce5;
}
# 友好度
for ($self=1; $self<6;$self++){
for ($other=1; $other<6;$other++){
$cfs[$self.$other] = $CP{'cfs'.$self.$other};
if ($other<$self){
# 友好度
$cfs[$self.$other] = int(rand(30)+40) if ($cf...
} elsif ($other>$self) {
# 条約
# $cfs[$self.$other] = 0;
}
# 設定値をクリア
# $cfs[$self.$other] = "";
}
}
} # <--ここに移動します
-ありがとうございました。おかげで設置することが出来ました...
-うまくいったんですね。良かったです -- [[あくあ]] &new{20...
-あの。。たびたび申し訳ないのですが宣戦布告をすると同盟と...
-ore_sub-base_p1_pc.cgi の @cfs_str=('-','同盟','交戦');...
-ありがとうございました。逆にしていていました。色々とあり...
-いや、それもともとが間違ってたので、こちらのミスだったん...
#comment
ページ名: