横浜@黄昏%鷹さん大変そう頑張って ですこんにちは
改造ではなく改装です。主に画面の「見てくれ」を変えてみよう、
その程度のことです、それとちょっと補足も。
人工無能を何とか設置して動作確認が出来ると、今度は自分好みの画面表示に
したいと、思うでしょう。ま、HTMLの記述は出来るが、もう少し何とかしたい
と思ってる人向けです。私自身も知識がある訳でなく、こんなの当たり前ジャン
と言れればそれまでですが。。。。
計画自体はこんなかんじです。
(1)初期設定部分について(ちょっと補足です)
(2)ロボット文字色など
(3)ロボット画像配置などなど・・
まず初めに「改装計画3つのお約束。」
1.元のCGIは必ずバックアップしておく。
2.改装個所に#記号をつけてメモを書き込んでおく
(これは#記号の後ろから行末まではスクリプトと認識しないからです)
3.当たり前ですが、改装はあくまで個人の責任で行う。
じゃ、始めます。
(1)初期設定部分について。
CGIの設定で始め誤解しやすいのがファイルの名前です。ダウンロードした
CGIファイルをパスだけ書き直してHPにアップする方が多い様です。
でもこれは絶対止めましょう、いろいろ支障があるので詳しく書けませんが、
「データファイルの名前は必ず変更」これお約束です。変更したら、当然
スクリプト内も書き換えます、でないと動きません。
そうそう、よく「jcode.pl」をホルダーごとに置いている方いませんか?
一つでいいんですよ、パスをあわせればいいわけです。(ボソッ)
では、具体的に。(ファイル名はお好みで・・・)
<bot.cgiの書き換え部分>
#デザインデータの呼び込み--------------------------------------------
$setfile = './ore.dat'; #set.datをore.datに書き換え
#初期設定------------------------------------------------------------
require '../jcode.pl'; #このファイル名は変えちゃダメ
$chat_file = './omae.dat'; #bot.datをomae.datに書き換え
#ログファイルの設定--------------------------------------------------
$log = './anata.dat'; #log.datをanata.datに書き換え
(注)「ログファイルの設定」については次回以降で説明します。
#辞書&画像呼び出し分岐-----------------------------------------------
if ($dict eq $robo1){$dicf = './boku1.dat';} #j.datを書き換え(以下同様)
if ($dict eq $robo2){$dicf = './kimi1.dat';} #j3.
if ($dict eq $robo3){$dicf = './anta1.dat';} #j5.
if ($dict eq $robo1){$dicf2 = './boku2.dat';} #j2.
if ($dict eq $robo2){$dicf2 = './kimi2.dat';} #j4.
if ($dict eq $robo3){$dicf2 = './anta3.dat';} #j6.
<bot_t.cgi>
#書きこみ辞書設定---------------------------------------
$pika = './boku1.dat'; #j.datを書き換え(以下同じ)
$hagi = './kimi1.dat';
$badi = './anta1.dat';
<bot_b.cgi>
#書きこみ辞書設定---------------------------------------
$pika = './boku2.dat';
$hagi = './kimi2.dat';
$badi = './anta2.dat';
<design.cgi>
#データを上書き用にオープンし、書き込む---------------------
open(IN,">ore.dat"); #set.datをore.datに書き換え
<log.cgi>
12行目
$log ='./anata.dat'; #log.datをanata.datに書き換え
-------------------------------------------------------------
取りあえずこんなとです、間違っていたら訂正してください>新選組さん
んじゃ、次回「ロボット文字色など」をお楽しみに(爆)
.