#!/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();
| |
 |
RICOCHET
G David Peters
Ricochet is exciting new software for music students of all ages. Choose
between Ricochet Random and Ricochet melody for colorful learning to
begin! In Ricochet Random, play highlighted keys after random balls
ricochet off of the piano keys on the computer screen. The higher the
level of difficulty you choose, the number of balls and movement speed
will increase. After 60 seconds the computer will add another ball for
the challenge. Ricochet Melody asks you to choose a melody from a "play
list" of popular tunes such as Amazing Grace and America. Try to play
notes of the melody before the ball leaves the screen. Tempo can be
changed by the difficulty level you choose. You may select a variety
of preprogrammed sounds including piano, guitar, strings, bass, or reeds
to offer hours of fun! Develop better piano and ear training skills
with these innovative music games.
|
| |
Download
Windows Demo
Ricochet is not available on the Macintosh.
|
Windows CD-ROM: 1507CD
Single Station Price: $29.95
Lab Pack (5 stations) Price: $105.00
Site/Network License (24 stations) Price: $240.00
System requirements: Windows 98, 2000, XP
|
| |
|
|
