#### Show Help Files on ikonboard.cgi,
#### by C.v. Marle (C.A.vanMarle@inter.NL.net)

#### This hack will show all the help files<BR>
#### on the first page of your forum (ikonboard.cgi)

# Some things may differ, because I've a very modified board...
# Sorry... If you can't find any thing, please mail me...
# BACK-UP all your files before editing!!!
# Don't blame me if your board's messed up

[ikonboard.cgi]

>> After:

<tr>
       <td bgcolor=$titlecolor colspan=5>
           <font face="$font" color=$titlefontcolor size=2>
            <b>$total_users user(s) active in the past 15 minutes</b>
           </font>
       </td>
   </tr>
   <tr>
       <td bgcolor=$forumcolortwo>
           <img src="$imagesurl/images/online.gif" border=0 width=20 height=20 align=center>
       </td>
       <td bgcolor=$forumcolortwo colspan=4>
           <font face="$font" color=$forumfontcolor size=1>
           Guests: $guests, Total members: $members
           <br><font face="$font" color=$forumfontcolor size=1>
           $memberoutput</font>
       </td>
   </tr>
   <!--; Cgi-bot End of Active Users -->
   </table>
   </td>
   </tr>
   </table>
   ~;

#------- END OF HTML

>> Add this:

# --- Help files

   $output .= qq~
       <!--; Cgi-bot Script page footer -->
       <p>

   <table cellpadding=0 cellspacing=0 border=0 width=$tablewidth bgcolor=$tablebordercolor align=center>
       <tr>
           <td>
               <table cellpadding=4 cellspacing=1 border=0 width=100%>
   <tr>
       <td bgcolor=$titlecolor colspan=2>
           <font face="$font" color=$titlefontcolor size=2>
            <b>Help Files:</b>
           </font>
       </td>
   </tr>~;

           $dirtoopen = "$ikondir" . "help";
           opendir (DIR, "$dirtoopen") or die "Could not find the help dir at $dirtoopen"; 
           @dirdata = readdir(DIR);
           closedir (DIR);

           @sorteddirdata = grep(/cgi/,@dirdata);
           @newdirdata = sort alphabetically(@sorteddirdata);
           
           foreach (@newdirdata) {
               chomp $_;
               $filename = $_;
               $filename =~ s/\.cgi//g;
               
               $cleanname = $filename;
               $cleanname =~ s/\_/ /g;
               

               $output .= qq~
<tr>
<td width=10% bgcolor=$forumcolortwo>
<a href="$thisprog?admin=$filename" target="_self"><img src="$imagesurl/images/help_b.gif" border=0 alt="$cleanname"></a>
</td>
<td bgcolor=$forumcolortwo>
<a href="$thisprog?admin=$filename" target="_self"><b>$cleanname</b></a>
</td>
</tr>~;
               }

$output .= qq~
       </table></table>
       <!--; Cgi-bot End of script page footer -->
~;

# --- end help files


# That's it... 

# Mzzl, Chris
# C.A.vanMarle@inter.NL.net

# P.S. if you find any bugs/errors please send me an e-mail