";
print TEMP "Once you have browsed the features in the public part of the guestbook, you will want to access the Active Guestbook Control Panel which allows you to manage your guestbook. To access the Control Panel, you will normally need to use a password. The default password is the word active in lower case but you can change it to anything you like.";
print TEMP "

The first thing you should do once you visit the Control Panel is to add the page to your Bookmarks/Favorites so that you can easily get there in the future.

";
print TEMP "You will of course want to delete all these sample messages once you get things set up the way you want.|$time_in_seconds|frank\@active-scripts.net|active-scripts.net|||$now|$revdate||www.active-scripts.net||||||||||||||||||||\n";
close(TEMP);
chmod(0777, "$guestbook_data_name");
&finish_start;
exit;
}
} # end startup
sub finish_start{
&content;
print qq~

(If you have made any changes, you first need to UPDATE using the button at the bottom.) $font ~;
if ($active_header eq "on"){
print qq~ To remove the Active Scripts image from the top of your guestbook, move down to the
Images/titles section below and select No for "Show Active-Scripts header".~;
}
print qq~

A - Guestbook Security/Abuse Control

~;
if ($use_referrer_limit ne "yes"){
print qq~

PLEASE NOTE - You currently have your guestbook set to accept messages posted from ANY domain (A12 and A13 below). We STRONGLY recommend that you restrict access to only your domain. This can help limit spam.

Cancel all changes - Save as new skin - Skins Manager(If you have made any changes, you first need to click UPDATE PREFERENCES using the button at the bottom.)$fontPLEASE NOTE Any CSS code in the Standard Preferences Manager (section C) can override the settings below.~;
$cssenabled = "disabled"; $cssenabled = "enabled" if ($style ne "off");
print qq~CSS is currently $cssenabled.~;
if ($active_header eq "on"){print qq~You can remove the active-scripts image via the Standard Preferences Manager. ~;}
if ($demo ne "on"){
if ((($var - $stamp) > $grace) && ($foundasimgcol eq "yes")){
print qq~
IMAGES WILL NOT WORK AT THE MOMENT AS YOU HAVE IMAGES HOSTED ON
THE ACTIVE-SCRIPTS.NET WEBSITE. YOU NEED TO MOVE THESE TO YOUR OWN SITE
AND CHANGE THE SETTINGS BELOW ACCORDINGLY.
~;
}
elsif ($foundasimgcol eq "yes"){
$alltogo = $stamp+$grace;
$tooo = int(($alltogo -$var)/60/60);
print qq~

ACTION REQUIRED -
YOU MUST MOVE YOUR IMAGES ONTO YOUR OWN SERVER. AT LEAST ONE IMAGE
BELOW IS HOSTED ON ACTIVE-SCRIPTS.NET. YOU NEED TO CHANGE THE SETTINGS
BELOW ACCORDINGLY. YOU HAVE $tooo HOURS LEFT TO DO THIS.
~;
}
}
print qq~

Active Guestbook Smiley Manager~;
if ($demo ne "on"){
if ((($var - $stamp) > $grace) && ($foundasimg eq "yes")){
print qq~
SMILEYS WILL NOT WORK AT THE MOMENT AS YOU HAVE IMAGES HOSTED ON
THE ACTIVE-SCRIPTS.NET WEBSITE. YOU NEED TO MOVE THESE TO YOUR OWN SITE
AND EDIT EACH SMILEY BELOW ACCORDINGLY.
~;
}
elsif ($foundasimg eq "yes"){
$alltogo = $stamp+$grace;
$tooo = int(($alltogo -$var)/60/60);
print qq~

ACTION REQUIRED -
YOU MUST MOVE YOUR SMILEYS ONTO YOUR OWN SERVER. AT LEAST ONE SMILEY
BELOW IS HOSTED ON ACTIVE-SCRIPTS.NET. YOU NEED TO EDIT EACH SMILEY
BELOW ACCORDINGLY. YOU HAVE $tooo HOURS LEFT TO DO THIS.
~;
}
}
print qq~$font Smileys are currently $smiley_status.
$font Max number of smileys per message is $max_smileys.
You can change these settings via E10 and E11 in the Standard Preferences Manager.