open(X,"$path_to_library/help/index.txt");
while(<X>){
chomp();
($qs,$topic)=split(/=/,$_,2);
push(@X,$qs);
}
@X=sort(@X);
foreach $x (@X){
$z=$x;$z=~tr/ /_/;
$OPTIONS .= qq~<div onmousedown=hilite(this.id) onclick="gofor(this.id)" style="background-color:#F0F0F0" id="$z" value="opt">$x</div>\n~;
}
&check_cookie;
&check_login;
&seed;
@buttons=split(/\|/,$buttons);
for (@buttons){
	$icon = $_."_";
	$$icon="<div style='margin:6px 0px 0px 10px'>$$icon</div>";
	$$icon=~s!onclick=.+?\s!onclick=tut(this.src,this.alt) !;
	$$_=$$icon;
	if($_ eq "classes" || $_ eq "inline" || $_ eq "freehand"){
							$style_=~s!onclick=.+?\s!onclick=tut(this.src) !;
							$style=qq~<div style='margin:6px 0px 0px 10px'>$style_</div>~}
	}
if($fonts){
	$fontsa=qq~<div style='margin:6px 0px 0px 10px'><img onclick=tut(this.src,this.alt) id=fakeMenua src="$url_to_ikons/fontsa.gif" width="45" height="19" border="0" style="margin:0px 3px 0px 3px" alt="Font Face"></div>~;
	$fontsb=qq~<div style='margin:6px 0px 0px 10px'><img onclick=tut(this.src,this.alt) id=fakeMenub src="$url_to_ikons/fontsb.gif" width="45" height="19" border="0" style="margin:0px 3px 0px 3px" alt="Font Size"></div>~;
	$fontsc=qq~<div style='margin:6px 0px 0px 10px'><img onclick=tut(this.src,this.alt) id=fakeMenu src="$url_to_ikons/fontsc.gif" width="57" height="19" border="0" style="margin:0px 3px 0px 3px" alt="Paragraph Headings"></div>~;
	}


print "Content-type: text/html\n\n";
$help_inc = $htm."/help.txt";
open(HLP,"$help_inc");
while(<HLP>){
s/\$(\w+)/${$1}/eg;
print;
}
1;