対決ホームページ宣伝

各種パラメータを指定してサイトを対決させるバトラー系のCGIです
URLで自動的に属性が決定されてしまい、絶対に勝てないという人のための?救済版です
88 × 31 のサイズのバナーを表示することもできます

 adbattle.lzh LHA形式 12.6KB 
設置例

解凍して存在しないファイルは作成してください

<public_html> -+- index.html
        |
        +-- <adbattle> --- adbattle.cgi [755]
        |         adbattle.log [666]
        |         addai.log  [666]
        |         jcode.pl   [644]
        |
        +-- <lock> [777]
CGIの修正

CGIの改造は自由 (配布も構いません) ですが、著作権表示は消さないでください
基本的には下記の部分のみを修正してください

#!/usr/bin/perl

     <途中省略>

#----------------------------------------------------------------------
# カスタマイズ
#----------------------------------------------------------------------
require './jcode.pl';          # 文字コード変換ライブラリ
$title = '対決ホームページ宣伝';    # タイトル
$t_point = '15pt';           # タイトル文字サイズ
$t_color = "#008080";          # タイトル文字の色
$script = './adbattle.cgi';       # スクリプト名
$nobaner = './nobaner.gif';       # バナーなし
$pass = '0123';             # 管理用パスワード
$max = 20;               # 対決履歴件数
$daimax = 5;              # 歴代記録件数
                    # bodyタグ
$body = '<body text="#000000" bgcolor="#c0c0c0"
        link="#0000ff" alink="#0000ff" vlink="#800080">';
                    # 管理サイトURL
$home = 'http://woodbook.kir.jp/access/';
$logfile = './adbattle.log';      # ログファイル
$daifile = './addai.log';        # 歴代記録ファイル
$lockfile = './lock/adbattle.lock';   # ロックファイル名
$locktype = 0;             # ロック形式 (0:なし 1:symlink関数 2:mkdir関数)
呼出例
<a href="http://〜 自分のサイト名 〜/adbattle/adbattle.cgi">対決ホームページ宣伝</a>