#!/usr/bin/perl -w
use DBI;
use Date::Calc qw(Today);
use CGI qw(:standard);
print "Content-type: text/plain\n\n";
$theDB = DBI ->connect ('DBI:mysql:ecsmedia', 'ecsmedia', 'S3cq8esL') or die("Cannot connect.\n");
($year,$month,$day) = Today();
$theProduct = param("filename");
$theDate = "$month/$day/".substr($year, -2);
$theReferrer = $ENV{'HTTP_REFERER'};
$Query = "SELECT * FROM productCounters WHERE Product='$theProduct' AND Date='$theDate'";
$result = $theDB->prepare($Query) or die("error preparing SQL\n");
$result->execute() or die("error executing SQL\n");
if (@row = $result->fetchrow_array) {
$newCount = $row[2] + 1;
$newReferrer = $row[3].",".$theReferrer;
$Query = "UPDATE productCounters SET Count=$newCount, Referrers='$newReferrer' WHERE Product='$theProduct' AND Date='$theDate'";
$theDB->do($Query) or die("Invalid update");
}
else{
$Query = "INSERT INTO productCounters (Product, Date, Count, Referrers) VALUES ('$theProduct','$theDate','1','$theReferrer')";
$theDB->do($Query) or die("Invalid insert");
}
$result->finish();
$theDB->disconnect();
| |
 |
MUSICUS
Joseph E. Koob
An exciting music game where falling note blocks must strategically
be maneuvered into position in measures of specific meters. The user
must carefully select the space for the note-block to fall. Press a
BUTTON and BINGO !!! It falls into place. Instantly another note appears
at the top of the screen for your precise placement. Each game is timed
and the speed that notes fall can be adjusted at the beginning of each
session. Total points are accumulated by completing lines of rhythms
with the note-blocks. Each note offers a different point value which
is added to the total score. Following the end of the game, the user
has the option to hear completed rhythmic lines.
|
| |
Download Mac OS X Demo
Download Mac OS 8.5-9.x Demo
Download Windows Demo
|
Hybrid CD-ROM: 1343CD
Single Station Price: $29.95
Lab Pack (5 stations): $105.00
Site/Network License (24 stations) Price: $240.00
Sys. requirements: Win 98, 2000, XP, Mac OS 8.5-9.2, 10.1-10.x
|
