#!/usr/bin/perl
#Dieser Downloadzeitberechner wurde von "NEO_2.0" Geschriben
#Bei Fragen
hi-sers@web.de
print "----------------------------------------------------------------------------\n";
print "\n";
print " Rapidsharedownloadzeitberechner C0ded By NEO_2.0 \n";
print "\n";
print "----------------------------------------------------------------------------\n";
print "Geben Sie die Größe des einzelnen Downloadparts in MB an :\n";
$dgr = <STDIN>;
print "Geben Sie die Anzahl ader Parts an :\n";
$pz = <STDIN>;
print "Geben Sie die Wartezeit zwischen jedem Download in Sekunden an :\n";
$wzzp = <STDIN>;
print "Gebens Sie die Downloadgeschwindokgeit an in Kb/s :\n";
$dgw = <STDIN>;
$dgrap = $dgr * $pz;
$dgrkb = $dgrap * 1000;
$dz = $dgrkb / $dgw;
$zz = $wzzp * $pz;
$dzm = $dz / 60;
$dzh = $dzm / 60;
$dz0 = $dz + $wzzp;
$wzzpm = $wzzp /60;
$wzzph = $wzzpm /60;
$dzm0 = $dzm + $wzzpm;
$dzh0 = $dzh + $wzzph;
print "\n";
print "\n";
print "Ihr Download dauert :\n";
print "\n";
print "Free Account :\n";
print "-------------------\n";
print $dz0, " Sekunden\n";
print $dzm0, " Minuten\n";
print $dzh0, " Stunden\n";
print "\n";
print "\n";
print "Premium Account :\n";
print "------------------\n";
print $dz, " Sekunden\n";
print $dzm, " Minuten\n";
print $dzh, " Stunden\n";
print "\n";
print "\n";
print "Wartezeit in Sekunden :\n";
print $zz, "\n";
print "\n";
print "Downloadgeschwindigkeit in KB/s :\n";
print $dgw;
print "\n";
print "\n";
print "Anzahl der Parts :\n";
print $pz, "\n";
print "------------------------------------\n";
print "Größe aller Parts in MB :\n";
print $dgrap, "\n";
print "\n";
print "Gröse eines Enzelnen Parts in MB :\n";
print $dgr, "\n";
print "------------------------------------\n";
print "Downloadzeit einzeler Part :\n";
$dgrep = $dgr * 1000;
$dzeps = $dgrep / 60;
$dzepm = $dzeps / 60;
$dzeph = $dzepm / 60;
print "------------------------------------\n";
print $dzeps, " Sekunden\n";
print $dzepm, " Minuten\n";
print $dzeph, " Stunden\n";
print "------------------------------------\n";
print "\n";
print "C0ded By NEO_2.0\n";
print "Fragen
hi-sers@web.de\n";
print "\n";
print "------------------------------------\n";
