## CGIゲーム用掲示板 過去ログ

新規発言 ｜ 一覧 ｜ 過去ログ ｜ 最新ログ ｜ 検索 ｜ ＨＯＭＥ

No.494　 Re:こまごま質問
`発言者： きりう 発言日： 2003 01/14 02:16`

`> 1.首チョンパや餓死をハイスコアに載せるには？ ・首チョン btlryldt.cgiファイル、 # --------首ちょんぱ の push @log,"$count\,\,death\,hang"; @j = split(/\,/); の下に # == ハイスコアに載せてあげよう。 @deaddata = ($j[6],$j[0],$count,死因,'',$j[1]); $deaddata[0] = sprintf("%03d",$deaddata[0]); open(SCORE,">>$filescore") || &Error(1,'ハイスコア'); eval {flock(SCORE,2)}; print SCORE join(',',@deaddata)."\n"; eval {flock(SCORE,8)}; close(SCORE); # == まで。 ・餓死 btlrylcl.cgiファイルの # 餓死判定 if(time - $status0[4] > $starvtime){ の下に # == ハイスコアに載せてあげよう。 @deaddata = ($status0[6],$status0[0],$i,「死因」,'',$status0[1]); $deaddata[0] = sprintf("%03d",$deaddata[0]); open(SCORE,">>$filescore") || &Error(1,'ハイスコア'); eval {flock(SCORE,2)}; print SCORE join(',',@deaddata)."\n"; eval {flock(SCORE,8)}; close(SCORE); # == まで。 これで多分いけると思うんですけどね、「死因」の部分は自分で調べて入れてくだ さい。 > 2.ログに残り何人と表示させる方法 実際にやってみました。 btlryl.cgiファイルの # ---------ステータス書き込み sub Writeone { の中の my $count = 0; # 追加-生徒ナンバー の下に my $remain = 0; # 追加-残り何人 if($death){ $remain--;} # 追加-ここまでで誰か死んでたら while(<STAT>){ $count++; # 追加 @status0 = split(/\,/); の下に $remain++ if(@status0[2] > 0); # 追加-生き残り人数カウント sub Writeoneサブルーチンの一番下に # 追加-残り人数をログに吐く if($death){ push @log,",,left,$remain";} これだけ追加すればいけるはずです。 > 3.武器個別に待ち時間を変える方法 btlrylcm.cgiファイルの # ------------道具読み込み に push @weaponmatijikan,$i[4]; を追加 @weaponmatijikanの名前は任意で。 btlrylit.txtファイルに各武器の待ち時間を設定 アイテム名,アイテムの種類,攻撃（防御）力,アイコンNo,武器の待ち時間 という風になっています。 例） ボウガン,2,5,14,50 にすると、ボウガンで攻撃すると50秒待たされるようになるわけです。 btlryl.cgiファイルの # ----------攻撃 sub Attack { の中 # 攻撃(銃) の中の $writestatus = $anaction / 2; を $writestatus = 0; に Out("<b>$status[0]</b>は目の前が真っ暗になり、そのまま意識が遠くなっていく のを感じた。"); の下の $writestatus += $anaction; を $writestatus += $weaponmatijikan[$kind1]; に書き換えれば出来ると思います。 一部、確認してない箇所があるのでちゃんと動くかどうかは保証できません。 あと、１と２は那司さんと菅原さんの大会Verから流用したものなので、フッター に那司さんの名前が入ってないverをお使いなら入れておいてください。`

`▼関連発言 │ └◆490:こまごま質問 [こう] 01/14 00:07 └◆494:Re:こまごま質問 [きりう] 01/14 02:16 └◆497:Re[2]:こまごま質問 [こう] 01/15 00:03 └◆499:Re[3]:こまごま質問 [きりう] 01/15 15:16`

`過去ログには返信できません。`

`Pass 保存`