COMCHAT

皆さんご存知であろう、KENT-WEBのKENTさんのCOMCHATの改造方法です。
　このテキストに対応してるバージョンはCOMCHAT 4.4です。

以下はCOMCHAT v4.4の改造方法です。一部COMCHATのスクリプトから引用しています。
COMCHATの著作権はKENTさんにあります。　　KENT WEB フリーソフト利用規定
んでもって、この改造部分の著作権は紅堂幹人にある事を忘れないでください。
　既に改造済みのCOMCHAT v4.4を『ElDorado Chat』として再配布しています。無改造の方は是非。

CGI改造に成功しましたら、著作権･フッター部分ででもリンクしてくれると嬉しいです。
　　改造協力：<a href="http://eldorado1st.cool.ne.jp/GalleBasra/">紅堂幹人</a>
……という感じでしょうか。リンクしなくてもいいから、改造協力：紅堂幹人は必ず。

ここではコピーがしやすいようにと『<textarea>～</textarea>』で表示しています。
　スクリプトにそのまま貼り付ける時にインデント(字下げ)が崩れないようにという配慮でもあります。
　……そのせいでここで見辛いのはご愛嬌、ね？(汗)。

メールアドレス欄を… Ref.2005/02/05 修正

入室前のメールアドレス入力欄をメールアドレス以外でも使えるようにする改造です。
改造して、これ良いかな♪　などあれば、教えてもらえると嬉しいです。

最初のほうのpointer設定がある所に、上書きします。
# ポインタの形状（ログ表示部で「名前」の前につく） $pointer = "★"; # ポインタの形状（メアドの場合） $pointer2 = "◆"; # ポインタの形状（ＵＲＬの場合） $pointer3 = "※"; # ポインタの形状（コメントの場合） $dummy = '?retime=40&line=20'; # ポインタの移動先（コメントの場合） # $dummy = '#top'; # ポインタの移動先（コメントの場合） #　後は、$pointer3でリロードしたくなければ#をはずし、ある程度の編集すればOKです。

そして、comchat.cgiを『$pointer』で検索をかけます。検索できるエディタ使ったほうが楽です(笑)。
　下記部分は『sub regist』(書込処理)にあります。
if ($in{'email'} eq "") { $name = "$pointer <b>$in{'name'}</b>"; } elsif ($in{'email'} =~ /\@/) { $name = "<a href=\"mailto:$in{'email'}\">$pointer</a> <b>$in{'name'}</b>"; } elsif ($in{'email'} =~ /\http:/) { $name = "<a href=\"$in{'email'}\" target='_blank'>$pointer2</a> <b>$in{'name'}</b>"; } elsif ($in{'email'} =~ /\http/) { $name = "$pointer2 <b>$in{'name'}</b>"; } elsif ($in{'email'} =~ /\mailto/) { $name = "$pointer <b>$in{'name'}</b>"; } else { $name = qq(<a href="$script$dummy" onmouseout="status=''; return true" onmouseover="status='$in{'email'}'; return true" title="$in{'email'}">$pointer3</a> <b>$in{'name'}</b>); } $email = $in{'email'}; $color = $in{'color'}; …という風に、上記を上書きします。挿入ではありません。
『#top』を使う場合、<a name=top>をログ表示部分に書く必要があります。
尚、この改造を施した場合、『メールアドレス入力欄にはURLやコメントを入れることができます』などのコメントを添えて置くと利用者が使いやすくなります。