Main | Heart of Steel | Columns | Multimedia | Interactive | Info | Store | Support
 

Multimedia
Sound Archive
Metal Radio
Wallpaper
Videos

New releases available from Metal Blade Records - check them out here!

 

Multimedia

Looking for videos and MP3's? Well we don't have a lot because it costs a lot in bandwidth charges to provide this. However, we do have some content online for you to check out.

#!/usr/bin/perl ######################################################################### # Top Downloads v2.0 (SSI) # # Copyright (c)2000 Chi Kien Uong # # URL: http://www.proxy2.de # # # # This Software is distributed under the GNU General Public # # License. For more details see license.txt # # # # # To include the table into a HTML document use: # # # # # # To include a count number into a HTML document use: # # # # # # Total downloads: # # # # # ######################################################################### # base url to the *.gif files without trailing "/" $base_gif = "http://www.metal-rules.com/gif"; # path to the log file - relative to script location or absolute $basedat = "log.txt"; $table_width = 560; # width of hole table $table_text = 250; # width reserve for the file description $table_bg = "#000000"; # table background color $table_top = "#999999"; # top table background color $show_default = 15; # 10=TOP_10 20=TOP_20,etc. $font_size = 'face=Arial size=1'; # font style and size # End Setup ##################### @querys = split(/&/, $ENV{'QUERY_STRING'}); foreach $query_str (@querys) { ($name, $value) = split(/=/, $query_str); $query{$name} = $value; } print "Content-type: text/html\n\n"; if ($query{'stat'} || $query{'total'}) { open(DATA,"$basedat"); @lines = ; close(DATA); shift(@lines); if ($query{'stat'}) { foreach $line (@lines) { ($file_id,$count,$location,$stamp,$descript) = split(/\|/,$line); if ($query{'stat'} eq $file_id) { print ("$count"); last; } } } else { foreach $line (@lines) { ($file_id,$count,$location,$stamp,$descript) = split(/\|/,$line); $total += $count; } print ("$total"); } } else { $query{'top'} = $show_default if ($query{'top'} !~ /^\d+/); unless (open(DATA,"$basedat")) { if (-e "$basedat") { die ("File exists, but cannot be opened.\n"); } else { open(DATA,">$basedat"); } } @sort_array = ; chop (@sort_array); close(DATA); $last_download = shift(@sort_array); print "\n"; print " \n \n \n"; $total=0; foreach $input (@sort_array) { ($filenum, $countnum, $location, $stamp, $description) = split(/\|/,$input); $name_array{$filenum}=$countnum; $descript_array{$filenum}=$description; $total += $countnum; } if ($total>0) { $show=0; $flag=0; foreach $file_id (sort {$name_array{$b} <=> $name_array{$a}} (keys(%name_array))) { if ($show < $query{'top'}) { $top_pos = $name_array{$file_id} if ($flag == 0); $percent = ($name_array{$file_id} *100/ $total); if ($percent <= 1) {$img = 'blue.gif';} elsif ($percent > 1 && $percent <= 2) {$img = 'green.gif';} elsif ($percent > 2 && $percent <= 5) {$img = 'aqua.gif';} elsif ($percent > 5 && $percent <= 8) {$img = 'pink.gif';} elsif ($percent > 8 && $percent <= 11) {$img = 'yellow.gif';} elsif ($percent > 11 && $percent <= 14) {$img = 'purple.gif';} elsif ($percent > 14 && $percent <= 17) {$img = 'brown.gif';} elsif ($percent > 17 && $percent <= 20) {$img = 'darkgreen.gif';} elsif ($percent > 20 && $percent <= 23) {$img = 'red.gif';} elsif ($percent > 23) {$img = 'gold.gif';} $img_width = int($name_array{$file_id} *($table_width-$table_text)/$top_pos); if ($descript_array{$file_id} ne "---") { print " \n \n \n \n"; } else { print " \n \n \n \n"; } $show++; $flag=1; } else { last; } } } print " \n \n \n \n
Top $query{'top'} Downloads
$descript_array{$file_id} $name_array{$file_id}
$file_id $name_array{$file_id}
StatisticLast Download: $last_download Total\n"; print " Downloads: $total
"; } exit(0);

Some of the MP3's listed above come from Metal-Rules.com Volume I CD.
Support our site, support underground metal & order a copy!

All rights reserved and contents 2005 Metal-Rules.com
Keeping the Metal Faith Since 1995!