## CGIゲーム用掲示板

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

`▼関連発言 │ └◆668:チーム [ケンシロ] 01/31 19:12 ├◆669:Re:チーム [鮎] 01/31 20:03 └◆670:Re:チーム [きりう] 01/31 21:21 └◆671:Re[2]:チーム [ケンシロ] 01/31 23:52 ├◆673:Re[3]:チーム [鮎] 02/01 11:18 │└◆674:Re[4]:チーム [ケンシロ] 02/01 12:11 │　└◆675:Re[5]:チーム [鮎] 02/01 12:14 └◆677:Re[3]:チーム [きりう] 02/01 15:13 ├◆679:Re[4]:チーム [鮎] 02/01 15:58 └◆681:Re[4]:チーム [ケンシロ] 02/01 16:10`

``

``

No.668　 チーム
`[返信] 発言者： ケンシロウ 発言日： 2003 01/31 19:12 無謀かもしれませんが、ちょっと大きめの改造をしてみようかなぁと思ってます。 ヨイキャラVS悪役みたいに二チーム対抗戦ってカンジに・・・。 自分でできる改造は大体施したんですが、判らない事が一つあります。 チーム戦であるからには、味方に攻撃できてしまうのはマズイと・・・ そこで、「味方に攻撃できなくする方法」を教えていただきたいです。 なお、男子をヨイキャラ、女子を悪役にしていますので、 同性別同士で攻撃できなくすればいいものと思います(勝手 長々と申し訳ありません。`

``

No.669　 Re:チーム
`[返信] 発言者： 鮎 発言日： 2003 01/31 20:03 デフォルトの男子・女子を利用して ifを使い同性（番号１〜２１or２２〜４２）の場合エラーが でる（攻撃できない）ようにすればいいんじゃないのかな この説明じゃよくわかりませんよね… ということで管理人さんよろしくおねがいします(笑`

``

No.670　 Re:チーム
`[返信] 発言者： きりう 発言日： 2003 01/31 21:21 鮎さんが答えてくれた方法でOKです。 もうちょっと詳しく言ってみると、 自分の番号（$num）が22未満（21以下）の時、攻撃する相手の番号（$guestnum）が22未 満だったらエラーメッセージを出す。 同じ様に、自分の番号が21より大きい（22以上）時、攻撃する相手の番号が21より大き かったらエラーメッセージを出す。 って感じですね。`

``

No.671　 Re[2]:チーム
`[返信] 発言者： ケンシロウ 発言日： 2003 01/31 23:52 鮎さん 管理人さん ありがとうございました！ かなり時間がかかりましたができました。 この改造まで論理積を使ったことが無かったので手間取った(汗 改造中に、チーム戦にするなら、味方同士のコソコソ喋りができると面白いんじゃない かなぁと思い、 さきほどチャレンジしてみたのですが、改造箇所が多そうで、 断念しました。 個人的には、メガホンの応用と、$numを組み合わせれば・・・ と思いましたが・・・できなかった(泣`

``

No.673　 Re[3]:チーム
`[返信] 発言者： 鮎 発言日： 2003 02/01 11:18 論理積ですか…初耳 とりあえず質問に答えます。 間違ってるかもしれないのであてにしないほうが身のためです。 掲示板の応用です。 自分が男子のときは男子用書き込みフォーム(？)みたいなのを表示させる。 女子のときは女子のです。 そこに書き込むと男子なら男子の書き込みログファイル(？) に記録されます。 そして自分の性別と同じログファイルを表示する。 私はこう考えますがこれじゃチートされる可能性があるかもしれませんね（笑`

``

No.674　 Re[4]:チーム
`[返信] 発言者： ケンシロウ 発言日： 2003 02/01 12:11 俺もチート対策は考えてるんですが、 もともとプログラム技術が無いため、手も足も出ない・・・ ネオマトに対抗するにはチーム戦か！・・・と思ったのですが壁に・・ ちなみにPerl言語じゃ論理積って言わないのかな？＞&&`

``

No.675　 Re[5]:チーム
`[返信] 発言者： 鮎 発言日： 2003 02/01 12:14 私は暇人・Perl初心者です。`

``

No.677　 Re[3]:チーム
`[返信] 発言者： きりう 発言日： 2003 02/01 15:13 チーム内通信みたいな感じですよね。 メガホンとか会話の応用でいけると思います。 ただ、読み込み・表示がちょっとややこしいですね。 多分、一番シンプル（手抜き）であろう方法を書きますね。 会話みたいに、ボタンとテキストボックスを出してやって、 「通信」ボタンを押すと、sub Tuusinに飛んで、 男子（$num<22）なら push @log,"$num,,tuusin_dansi,$i"; それ以外（女子）なら push @log,"$num,,tuusin_josi,$i"; と、ログを書き込むようにしてやります。ほとんどsub Talkのコピペでいけるでしょう 。 あとは読み込みですね。 # 行動記録 open (LOG,"$filelog") || &Error(1,'行動記録'); while(<LOG>){ @status0 = split(/\,/); if($num == $status0[1] || $num == $status0[2] || abs($status[3] - $status0[5] ) < 6){ chomp; push @latest,$_; $i++; } ($i > 9) && last; } close(LOG); &Unlock; ↑ この部分で読み込んでいますんで、 if($num == $status0[1] || $num == $status0[2] || abs($status[3] - $status0[5]) < 6){ ↑この条件式に 男子ならtuusin_dansi（$status0[3]）、女子ならtuusin_josi も読み込むように追加します。 if($num == $status0[1] || $num == $status0[2] || abs($status[3] - $status0[5]) < 6 || ($num < 22 && $status0[3] eq 'tuusin_dansi') || ($num > 21 && $status0[3] e q 'tuusin_josi')){ こんな感じですね。 あとは、ステータス表示や最近の行動に表示してやるだけです。 > && perlでも論理積って言うみたいですよ。`

``

No.679　 Re[4]:チーム
`[返信] 発言者： 鮎 発言日： 2003 02/01 15:58 やっぱり管理人様はすごい! チーム戦にすることになったら参考にさせていただきます。 （いただいていいのかな？）`

``

No.681　 Re[4]:チーム
`[返信] 発言者： ケンシロウ 発言日： 2003 02/01 16:10 かなり壮絶な改造になりそう・・・(汗 がんがる！`

``

`CGIROOM`