#!/usr/bin/perl


#print "Content-type: text/plain", "xxx \n\n";
#print ">>>>>>>>>>>";

$start = $ARGV[0];
$members = $ARGV[1];
$info = $ARGV[2];
$activities = $ARGV[3];
$presse = $ARGV[4];
$support = $ARGV[5];
$berichte = $ARGV[6];
$foerderer = $ARGV[7];

print <<EOF;
<TABLE border="0" cellpadding="0" cellspacing="0">
	<TR>
		<TD><a href="you.shtml" name="top"><IMG src="../img/logo_verein.gif"  width="238" height="77" border="0" alt="verein mur.at" hspace="20"></a></td></tr></table>

<table width="700" border="0" cellpadding="0" cellspacing="0">
<TR>


EOF

#start/index
if ($start eq 'index') {print <<EOF;
<td class="topn"><a href="http://midihy.mur.at/zand/verein_mur.at/you.shtml"><img src="../img/fclose.gif" width="9" height="9" hspace="3" border="0" alt="" hspace="3">home</a></td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

elsif ($start eq 'indexa') {print <<EOF;
<td class="topn"><img src="../img/fopen.gif" width="9" height="9" hspace="3" border="0" alt="" >home</td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

#members
if ($members eq 'members') {print <<EOF;
<td class="topn"><a href="../members/index.shtml"><img src="../img/fclose.gif" width="9" height="9" border="0" alt="" hspace="3">members</a></td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

elsif ($members eq 'membersa') {print <<EOF;
<td class="topn"><img src="../img/fopen.gif" width="9" height="9" border="0" alt="" hspace="3">members</td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

#info
if ($info eq 'info') {print <<EOF;
<td class="topn"><a href="../info/index.shtml"><img src="../img/fclose.gif" width="9" height="9" border="0" alt="" hspace="3">info</a></td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

elsif ($info eq 'infoa') {print <<EOF;
<td class="topn"><img src="../img/fopen.gif" width="9" height="9" border="0" alt="" hspace="3">info</td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

#activities/services
if ($activities eq 'activities') {print <<EOF;
<td class="topn"><a href="../activities/index.shtml"><img src="../img/fclose.gif" width="9" height="9" hspace="3" border="0" alt="" hspace="3">activities</a></td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

elsif ($activities eq 'activitiesa') {print <<EOF;
<td class="topn"><img src="../img/fopen.gif" width="9" height="9" border="0" alt="" hspace="3">activities</td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

#presse
if ($presse eq 'presse') {print <<EOF;
<td class="topn"><a href="../presse/index.shtml"><img src="../img/fclose.gif" width="9" height="9" hspace="3" border="0" alt="" hspace="3">presse</a></td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

elsif ($presse eq 'pressea') {print <<EOF;
<td class="topn" ><img src="../img/fopen.gif" width="9" height="9" border="0" alt="" hspace="3">presse</td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}


#support
if ($support eq 'support') {print <<EOF;
<td class="topn"><a href="../support/index.shtml"><img src="../img/fclose.gif" width="9" height="9" hspace="3" border="0" alt="" hspace="3">support</a></td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

elsif ($support eq 'supporta') {print <<EOF;
<td class="topn"><img src="../img/fopen.gif" width="9" height="9" border="0" alt="" hspace="3">support</td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

#berichte
if ($berichte eq 'berichte') {print <<EOF;
<td class="topn"><a href="../berichte/index.shtml"><img src="../img/fclose.gif" width="9" height="9" hspace="3" border="0" alt="" hspace="3">berichte</a></td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

elsif ($berichte eq 'berichtea') {print <<EOF;
<td class="topn"><img src="../img/fopen.gif" width="9" height="9" border="0" alt="" hspace="3">berichte</td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

#foerderer
if ($foerderer eq 'foerderer') {print <<EOF;
<td class="topn"><a href="../foerderer/index.shtml"><img src="../img/fclose.gif" width="9" height="9" hspace="3" border="0" alt="" hspace="3">foerderer</a></td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}

elsif ($foerderer eq 'foerderera') {print <<EOF;
<td class="topn"><img src="../img/fopen.gif" width="9" height="9" border="0" alt="" hspace="3">foerderer</td><td><img src="../img/0.gif" width="1" height="1" hspace="5" border="0" alt=""></td>
EOF
}


print "</tr>";

exit (0);