>>492
技術無いんだけど、ちょっとやってみた。

CGIスクリプト1(恐らく間違った改造をしたもの)の168行目に
$value = "$name\t$color\t…略 ってのがあるから、その下に追加。

#####おみくじ ２／２#####
if ($chat2 eq 'おみくじ') { # $emoji追加時の半角スペース２つ
  $kuji_file = './kuji.dat';#おみくじファイル
  open R, "$kuji_file" or &ended("$kuji_file open error");
  rand($.) < 1 and chomp($msg = $_) while <R>;
  close R;
  $value = "巫女たん\thotpink\t\t$msg＞$nameたん $emoji\t\t$date\tyuichat.com\t\t\t\t\n$value";
}
#####おみくじ　２／２ここまで#####

今までの、おみくじ ２／２は削除。不具合でたら自分で解決して。