私設SoS2オーナー応援BBS

▼スレッド
│
└◇666:ニューゲームについて。 [戒] 07/17 22:49

　└◇667:Re:ニューゲームについて。 [moon] 07/18 08:51
　　└◇668:Re[2]:ニューゲームについて。 [戒] 07/18 12:54
　　　└◇669:Re[3]:ニューゲームについて。 [哲] 07/18 15:28
　　　　└◇671:Re[4]:ニューゲームについて。 [戒] 07/18 15:50
　　　　　└◇673:Re[5]:ニューゲームについて。 [哲] 07/18 15:56
　　　　　　└◇674:Re[6]:ニューゲームについて。 [戒] 07/18 16:02
　　　　　　　└◇675:Re[7]:ニューゲームについて。 [哲] 07/18 16:34
　　　　　　　　└◇676:解決～★ [戒] 07/18 17:22<-last

666● ニューゲームについて。[ 戒 ] 2003 07/17 22:49

どうもお久しぶりデス。えっと、ニューゲームで、左右に分かれていて、右が職業や名前などを決めますが、左の枠は空白ですよね？あそこに文章を入れようと頑張っていたのですが･･･、どうも上手くいきません･･･。 # Sub New Game # sub new_game { 　　　　&form('start'); 　　　　print qq|<tr><td width=50% align=center>\n|; 　　　　print qq|<tr><td><font color=gray><center>注意事項</center></font></td><br>\n|; 　　　　print qq|<tr><td><font color=gray><center>ゲームを終了する時は、</center></font></td></tr>\n|; 　　　　print qq|<tr><td><font color=gray><center>「町で保存」か「人里離れて保存」をしてから</center></font></td></tr>\n|; 　　　　print qq|<tr><td><font color=gray><center>ゲームを終了するようにしてください。</center></font><br></td></tr>\n|; 　　　　print qq|<tr><td><font color=gray><center>戦闘や商品の買取などをした時には、</center></font></td></tr>\n|; 　　　　print qq|<tr><td><font color=gray><center>極力相手のプレイヤーにお礼を言いましょう。</center></font><br></td></tr>\n|; 　　　　print qq|<tr><td><font color=gray><center>プレイ人数が３人以上の時は</center></font></td></tr>\n|; 　　　　print qq|<tr><td><font color=gray><center>プレイする事を禁止します。</center></font></td></tr>\n|; 　　　　print qq|<tr><td><font color=gray><center>人数が減るまで待ちましょう</center></font></td></tr>\n|; 　　　　print qq|<tr><table border=0 cellspacing=0 cellpadding=5 align=center>\n|; 　　　　print qq|<tr><td colspan=2 align=center><b>新規登録</b></td></tr>\n|; 　　　　print qq|<tr><td>名前</td><td><input type=text name=name></td></tr>\n|; 　　　　print qq|<tr><td>パスワード</td><td><input type=password name=pass></td></tr>\n|; 　　　　print qq|<tr><td>確認のためもう一度</td><td><input type=password name=pass2></td></tr>\n|; 　　　　print qq|<tr><td>職業</td>\n|; 　　　　@joblines = &opendat($jobdat); 　　　　print qq|<td><select name=job>\n|; 　　　　foreach $line (@joblines) { 　　　　　　　　($job,$others) = split(/<>/,$line); 　　　　　　　　print qq|<option value="$job">$job\n|; 　　　　} 　　　　print qq|</select></td></tr>\n|; 　　　　print qq|<tr><td colspan=2 align=right>\n|; 　　　　&OKbuttoninform('','make_new'); 　　　　print qq|</td></tr></table></td></tr>\n|; 　　　　&form('end'); } っとなっているのですが、どこらへんが間違っているのでしょうか？現状はhttp://seirei.ath.cx/imaginaryspace/cgi-bin/sos2.cgi っで見れますので･･･（；；

スレッド一覧

667● Re:ニューゲームについて。[ moon ] 2003 07/18 08:51

> えっと、ニューゲームで、 > 左右に分かれていて、 > 右が職業や名前などを決めますが、 > 左の枠は空白ですよね？ > あそこに文章を入れようと > 頑張っていたのですが･･･、 > どうも上手くいきません･･･。 >省略... > っとなっているのですが、 > どこらへんが間違っているのでしょうか？現状のように一段一段表示されるようにではなくてオリジナルのように左右に分かれたまま表示したいのですよね？それなら、オリジナルのprint qq|<tr><td width=50% align=center><img src=$imgdir$ttlimg></td>|;を以下のような形式に変更すればOKだと思います。 print << 'ATTENTION'; <tr><td width=50% align=center><font color=gray> 注意事項<br> ゲームを終了する時は、<br> ... プレイする事を禁止します。<br> 人数が減るまで待ちましょう </font></td> ATTENTION

スレッド一覧

668● Re[2]:ニューゲームについて。[ 戒 ] 2003 07/18 12:54

以下のように変更してみましが、エラーが出てしまいました･･･（；；あと、ATTENTIONっというのは、どういう役割＆使い方なのですか･･･？初歩的な質問で申し訳ないです。。 # Sub New Game # sub new_game { 　　　　&form('start'); 　　　　print << 'ATTENTION'; 　　　　<tr><td width=50% align=center><font color=gray> 　　　　注意事項<br> 　　　　ゲームを終了する時は、<br> 　　　　「町で保存」か「人里離れて保存」をしてから<br> 　　　　ゲームを終了するようにしてください。<br> 　　　　戦闘や商品の買取などをした時には、<br> 　　　　極力相手のプレイヤーにお礼を言いましょう。<br> 　　　　プレイ人数が３人以上の時は<br> 　　　　プレイする事を禁止します。<br> 　　　　人数が減るまで待ちましょう<br> 　　　　</font></td> 　　　　ATTENTION 　　　　print qq|<tr><table border=0 cellspacing=0 cellpadding=5 align=center>\n|; 　　　　print qq|<tr><td colspan=2 align=center><b>新規登録</b></td></tr>\n|; 　　　　print qq|<tr><td>名前</td><td><input type=text name=name></td></tr>\n|; 　　　　print qq|<tr><td>パスワード</td><td><input type=password name=pass></td></tr>\n|; 　　　　print qq|<tr><td>確認のためもう一度</td><td><input type=password name=pass2></td></tr>\n|; 　　　　print qq|<tr><td>職業</td>\n|; 　　　　@joblines = &opendat($jobdat); 　　　　print qq|<td><select name=job>\n|; 　　　　foreach $line (@joblines) { 　　　　　　　　($job,$others) = split(/<>/,$line); 　　　　　　　　print qq|<option value="$job">$job\n|; 　　　　} 　　　　print qq|</select></td></tr>\n|; 　　　　print qq|<tr><td colspan=2 align=right>\n|; 　　　　&OKbuttoninform('','make_new'); 　　　　print qq|</td></tr></table></td></tr>\n|; 　　　　&form('end'); }

スレッド一覧

669● Re[3]:ニューゲームについて。[ 哲 ] 2003 07/18 15:28

ATTENTIONっというのは、実際には効果ありません。 print << ～; で～までをプリントしなさいという命令ですので、文章中に使われない単語ならAAAAとかでも問題無いです。 print <<ATTENTION; ～～～ ATTENTION で出来ませんか？ ↑は「'」を抜いただけです。

スレッド一覧

671● Re[4]:ニューゲームについて。[ 戒 ] 2003 07/18 15:50

指示通りに、以下のように変更し、出来なかったので文法チェックをしたところ、 Can't find string terminator "ATTENTION" anywhere before EOF at /home/imaginaryspace/cgi-bin/sos2.cgi line 357. っと出ました。３５７行目は「rint <<ATTENTION;」←の部分です。（下より参照。） # Sub New Game # sub new_game { 　　　　&form('start'); 　　　　print <<ATTENTION; 　　　　<tr><td width=50% align=center><font color=gray> 　　　　注意事項<br> 　　　　ゲームを終了する時は、<br> 　　　　「町で保存」か「人里離れて保存」をしてから<br> 　　　　ゲームを終了するようにしてください。<br> 　　　　戦闘や商品の買取などをした時には、<br> 　　　　極力相手のプレイヤーにお礼を言いましょう。<br> 　　　　プレイ人数が３人以上の時は<br> 　　　　プレイする事を禁止します。<br> 　　　　人数が減るまで待ちましょう<br> 　　　　</font></td> 　　　　ATTENTION 　　　　print qq|<tr><table border=0 cellspacing=0 cellpadding=5 align=center>\n|; 　　　　print qq|<tr><td colspan=2 align=center><b>新規登録</b></td></tr>\n|; 　　　　print qq|<tr><td>名前</td><td><input type=text name=name></td></tr>\n|; 　　　　print qq|<tr><td>パスワード</td><td><input type=password name=pass></td></tr>\n|; 　　　　print qq|<tr><td>確認のためもう一度</td><td><input type=password name=pass2></td></tr>\n|; 　　　　print qq|<tr><td>職業</td>\n|; 　　　　@joblines = &opendat($jobdat); 　　　　print qq|<td><select name=job>\n|; 　　　　foreach $line (@joblines) { 　　　　　　　　($job,$others) = split(/<>/,$line); 　　　　　　　　print qq|<option value="$job">$job\n|; 　　　　} 　　　　print qq|</select></td></tr>\n|; 　　　　print qq|<tr><td colspan=2 align=right>\n|; 　　　　&OKbuttoninform('','make_new'); 　　　　print qq|</td></tr></table></td></tr>\n|; 　　　　&form('end'); }

スレッド一覧

673● Re[5]:ニューゲームについて。[ 哲 ] 2003 07/18 15:56

> 　　　　print <<ATTENTION; > 　　　　ATTENTION を print <<ATTENTION; ATTENTION (どちらも先頭のタブを消しただけ) にしてみて下さい。

スレッド一覧

674● Re[6]:ニューゲームについて。[ 戒 ] 2003 07/18 16:02

ありがとうございます。一応、出来たのですが（ｃｇｉ自体は）フレーム？が上下に分かれてしまっています（^^; 左右に分けたかったのですが･･･。デフォルトの四角が二つくっついた感じで、右は入力関連があって、左が空欄になっていましたが、そこに入れる感じに･･･。現状↓ # Sub New Game # sub new_game { 　　　　&form('start'); print <<ATTENTION; 　　　　<tr><td width=50% align=center><font color=gray> 　　　　注意事項<br> 　　　　ゲームを終了する時は、<br> 　　　　「町で保存」か「人里離れて保存」をしてから<br> 　　　　ゲームを終了するようにしてください。<br> 　　　　戦闘や商品の買取などをした時には、<br> 　　　　極力相手のプレイヤーにお礼を言いましょう。<br> 　　　　プレイ人数が３人以上の時は<br> 　　　　プレイする事を禁止します。<br> 　　　　人数が減るまで待ちましょう<br> 　　　　</font></td> ATTENTION 　　　　print qq|<tr><table border=0 cellspacing=0 cellpadding=5 align=center>\n|; 　　　　print qq|<tr><td colspan=2 align=center><b>新規登録</b></td></tr>\n|; 　　　　print qq|<tr><td>名前</td><td><input type=text name=name></td></tr>\n|; 　　　　print qq|<tr><td>パスワード</td><td><input type=password name=pass></td></tr>\n|; 　　　　print qq|<tr><td>確認のためもう一度</td><td><input type=password name=pass2></td></tr>\n|; 　　　　print qq|<tr><td>職業</td>\n|; 　　　　@joblines = &opendat($jobdat); 　　　　print qq|<td><select name=job>\n|; 　　　　foreach $line (@joblines) { 　　　　　　　　($job,$others) = split(/<>/,$line); 　　　　　　　　print qq|<option value="$job">$job\n|; 　　　　} 　　　　print qq|</select></td></tr>\n|; 　　　　print qq|<tr><td colspan=2 align=right>\n|; 　　　　&OKbuttoninform('','make_new'); 　　　　print qq|</td></tr></table></td></tr>\n|; 　　　　&form('end'); }

スレッド一覧

675● Re[7]:ニューゲームについて。[ 哲 ] 2003 07/18 16:34

ATTENTIONの真下の > 　　　　print qq|<tr><table border=0 cellspacing=0 cellpadding=5 align=center>\n|; を > 　　　　print qq|<td><table border=0 cellspacing=0 cellpadding=5 align=center>\n|; にしたらどうでしょう？(<tr>を<td>にしただけ)

スレッド一覧

676● 解決～★[ 戒 ] 2003 07/18 17:22

迅速な対処ありがとうございました！無事解決いたしました～。とても助かりました♪

スレッド一覧

CGIROOM