#!/usr/local/bin/perl
#------------------------------------------------------#
# 本程序為Yuzi工作室提供
# Yuzi論壇3000 免費版 v3.47
#
#
# 此程式由 台北抒情夜 中文化
#
# 中文化版本 : v3.47b5
# 日期 : 2001.2.11
# 中文化作者 : 台北抒情夜站長 DC
#
# 台北抒情夜 http://www.ttt.idv.tw
#
#------------------------------------------------------#
require "cgi-lib.pl";
require "setup.cgi";
######################
## 以下部分不需修改 ##
######################
$datadir = "$filepath/guest";
$dcscript = "guest.cgi";
$adminurl = "guest.cgi";
$htmlurl = "$filepath/guest.htm";
$num_view = 20;
&GetCookies;
##########
@guest_fields = qw(
ID
Name
guest
Date
Comment
);
@required_fields = qw(Name Comment);
%field_input_type = (
"Comment" => "textarea"
);
@badwords = qw( fuck shit pussy dick ass asshole blowjob cock tits );
$allow_html = "yes";
%bgcolor = (
'0'=>'#FFFFFF',
'1'=>'#000099',
'2'=>'#FFFFEE',
'3'=>'#CCCCCC'
);
%fontcolor = (
'0'=>'#000099',
'1'=>'#FFFFCC',
'2'=>'#000099',
'3'=>'#000099'
);
%fontsize = (
'0'=>'2',
'1'=>'2',
'2'=>'2',
'3'=>'2'
);
%fontface = (
'0'=>'Verdana',
'1'=>'Verdana',
'2'=>'Verdana',
'3'=>'Verdana'
);
$guest_layout = qq~