 |
Are We Dead? Not Quite. |
 |
Sorry for the tremendous lack of updates during the last months, but we aren't dead. I'm going to be updating soon (not today, its my birthday, and its 1:30am). If you sent us a cover or theme and I don't post it soon, than I've lost it. Please send it again, and I'll put it up ASAP.
-Sunookitsune, your friendly neighborhood arctic fox |
|
 |
Po sted
on June 29, 2004 by: TheGatesofBill |
 |
|
Theme Contest Submissions |
|
All submissions to the theme contest will appear here: http://covers.boob.co.uk/contest/theme1.shtml
It's not currently linked anywhere, but I'll get to that ASAP. |
|
|
Posted
on October 22, 2003 by: TheGatesofBill |
|
|
First B!CC Theme Contest |
|
Warmachine and I are sponsering a theme contest. There will be two categories: Best DCDivX Theme (prize provided by Warmachine), and Best Non-DCDivX Theme (prize to be provided by myself). The prizes have not yet been decided upon, but will probably be Dreamcast games.
The rules are simple:
1. No pieced together themes (themes made from other themes, or based directly off other themes, unless you are the creator of the other themes)
2. No stealing work that isn't yours (if you use someone else's work, make sure to give them credit)
3. No offensive contest (porn, drugs, etc)
All themes must be submitted by December 31st, 2003 at midnight. It will be judged by a panel of (probably) five people.
Judges:
1. No Name (myself)
2. Warmachine
3. Shinji ikari 256
4. GoldbergWWE
5.
If you do not have a place to host your theme, e-mail it to me at thegatesofbill@comcast.net and I will host it for you. |
|
|
Posted
on October 19, 2003 by: TheGatesofBill |
|
|
Lost Covers |
|
| When B!CC went down, some of the covers I was uploading got lost. Unfortunately, I do not know what they were. If you submitted a cover to us, and its not up, thats probably the reason. Please submit them again and I'll put them up. |
|
|
Posted
on August 21, 2003 by: TheGatesofBill |
|
|
|
 |
| |
 |
 |
| |
|
 |
#!/usr/bin/perl
require 'crlib.pl'; #for ReadForm
require 'cruser.pl'; #for helping load %CConfig
ReadForm();
LoadConfigInfo();
InitImageTags();
LoadCount();
$Count{$in{'page'}}++;
GenNumArray();
PrintAbacus();
WriteCount();
WriteVisitorStats();
######################################
# All the subroutines, neat and tidy #
######################################
sub GenNumArray {
my $curcnt = $Count{$in{'page'}};
my $digits = 5;
for (my $i = $digits ; 0 < $i ; $i--) {
$num[$i] = $curcnt % 10;
$curcnt = ($curcnt - ($curcnt % 10)) / 10;
}
}
sub PrintAbacus {
print "Content-type: text/html\n\n";
unless ($in{'display'} eq 'hide') {
foreach (@num) {
print $numbers{$_};
}
}
}
sub LoadCount {
open(ABACUS, "$CConfig{admin_path}/abacus.txt");
%Count = ();
while () {
chomp;
my ($page, $count) = split /\|x\|/;
$Count{$page} = $count;
}
close ABACUS;
}
sub WriteCount {
open(ABACUS, ">$CConfig{admin_path}/abacus.txt");
foreach (keys %Count) {
print ABACUS "$_|x|$Count{$_}\n";
}
close ABACUS;
}
sub WriteVisitorStats {
open(ABACUS_STATS, "$CConfig{admin_path}/abacus_$in{'page'}.txt");
open(TMP, ">$CConfig{admin_path}/cstmp1.txt");
if ($UseFlock) {
flock(COUNTER_STATS, 2);
flock(TMP, 2);
}
print TMP join('|x|', (time, $ENV{'HTTP_USER_AGENT'}, $ENV{'REMOTE_ADDR'})) . "\n";
LOOP: while () {
chomp;
($time, $browser, $addr) = split /\|x\|/;
if ((time - 604800) < $time) {
print TMP join('|x|', ($time, $browser, $addr)) . "\n";
}
}
close ABACUS_STATS;
close TMP;
rename("$CConfig{admin_path}/abacus_$in{'page'}.txt", "$CConfig{admin_path}/cstmp2.txt");
rename("$CConfig{admin_path}/cstmp1.txt", "$CConfig{admin_path}/abacus_$in{'page'}.txt");
unlink "$CConfig{admin_path}/cstmp2.txt";
}
sub InitImageTags {
foreach (0..9) {
if ($CConfig{"abacus-number-$_"}) {
$numbers{$_} = $CConfig{"abacus-number-$_"};
}
else {
$numbers{$_} = $_;
}
}
}
sub LoadConfigInfo() {
# it's less cpu intensive this way, trust me
my $nsetpath = $nsettingspath;
if (!$nsetpath) {
$nsetpath = 'nsettings.cgi';
}
open(NSETTINGS, $nsetpath);
while () {
($key, $value) = split /``x/ ;
chomp $value;
$value =~ s/\(ns!x!nl\)/\n/g;
$CConfig{$key} = $value;
}
close(NSETTINGS);
}
|
|
|
