私設SoS2オーナー応援BBS

新規発言一覧最新記事過去一覧検索ダウンロードページHOME

スレッド

└◇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


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>
    プレイ人数が3人以上の時は<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.
っと出ました。

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>
    プレイ人数が3人以上の時は<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
ありがとうございます。
一応、出来たのですが(cgi自体は)
フレーム?が上下に分かれてしまっています(^^;
左右に分けたかったのですが・・・。
デフォルトの四角が二つくっついた感じで、
右は入力関連があって、
左が空欄になっていましたが、
そこに入れる感じに・・・。

現状↓
# 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>
    プレイ人数が3人以上の時は<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