<!--
EOT;
$detail=explode("\r\n",$webdb[guide_word]);
$i=0;
foreach($detail AS $key=>$value){
$i++;
if($i>10)break;
if(!$value)continue;
list($Hname,$Hurl,$Hblank,$Hcolor,$Hlid)=explode("|",$value);
if(ereg("^\/",$Hurl)){$Hurl="$webdb[www_url]$Hurl";}elseif(!ereg("://",$Hurl)){$Hurl="$webdb[www_url]$webdb[path]/$Hurl";}
$Hblank=$Hblank?"target='_blank'":'';
$Hname = get_word($Hname,8);
$Hcolor=$Hcolor?"style='color:$Hcolor'":'';
$class=($key==0)?"class=over":'';
print <<<EOT
-->
<dl onmouseover="SubOn(this)" onmouseout="SubOut(this)" $class>
        <dt><a href="$Hurl" $Hblank $Hcolor>{$Hname}</a></dt>
<!--
EOT;
if($sonmenu[$Hlid]){
print <<<EOT
-->
        <dd>
<!--
EOT;
foreach($sonmenu[$Hlid] AS $key1=>$rs){
$rs[target]=$rs[target]?"target='_blank'":'';
$rs[color] = $rs[color] ? "style='color:$rs[color]'" : "" ;
$rs[name] = get_word($rs[name],10);
if(ereg("^\/",$rs[linkurl])){$rs[linkurl]="$webdb[www_url]$rs[linkurl]";}elseif(!ereg("://",$rs[linkurl])){$rs[linkurl]="$webdb[www_url]$webdb[path]/$rs[linkurl]";}
print <<<EOT
-->
        <div><a href="$rs[linkurl]" $rs[target] $rs[color]>$rs[name]</a></div>
<!--
EOT;
}
print <<<EOT
-->
        </dd>
<!--
EOT;
}
print <<<EOT
-->
    </dl>
<!--
EOT;
}print <<<EOT
-->