▼スレッド
│
└◇795:まとめると・・ [コーノ] 09/25 20:38

　└◇796:Re:まとめると・・ [moon] 09/25 22:02<-last

返信ありがとうございました。
まとめると

（１）$temp{"$win1"} += $win1num;の下に、
$temp{"$win1"} = "$temp{$win1}<>トロフィー△00100000IgNsTi";
追加。

（２）$mn += $pay;以降に、
my $prize = (split(/<>/,$paylist{"$id<>$nm<>$ps"}))[4];
$bg = $bg ne '' ? "$bg,$extra" : $extra if($prize ne '' && $prize ne "\n");
追加。

だと解釈したのですが、
$extraっていうのはつまり「トロフィー△00100000IgNsTi」のことなんですよね？

だとするとどこかに
$extra = "トロフィー△00100000IgNsTi";
というのを入れなければいけないのでしょうか？

ちょっと混乱してきました・・・（汗）
えっと、
$bg = $bg ne '' ? "$bg,$extra" : $extra if($prize ne '' && $prize ne "\n");
には$prizeと$extraってのがありますが、
$extraは「トロフィー△00100000IgNsTi」なんですよね？
だとすると$prizeはなにを意味するんでしょうか？

ああ・・・
もしかして私の技量では無理な改造なのでしょうか・・・（涙）

> my $prize = (split(/<>/,$paylist{"$id<>$nm<>$ps"}))[4];
> $bg = $bg ne '' ? "$bg,$extra" : $extra if($prize ne '' && $prize ne "\n");

修正が洩れていました。
ここの$extraは全て$prizeです。
なので、$prizeが「トロフィー△00100000IgNsTi」となります。