Xoops真好、、支持自己写代码、、区块里面可以加入PHP程序

<?
////////////////////////////////代码开始////////////////////////////////
function Showtitle($str,$strlen) {
//这个函数来保证截取字符串不出现乱码（Alpha转载）
 for($i=0;$i<$strlen;$i++)
  if(ord(substr($str,$i,1))>0xa0) $j++;
 if($j%2!=0) $strlen++;
 $str=substr($str,0,$strlen);
 return $str;
}
function ShowArticle($ShowTopicID,$ShowNum=10,$TitleLen=20){
/////////////////////////////////////////////////////////////////////////
//函数功能：实现News模块的文章的分块排列                                /
//$ShowTopicID参数代表News模块的分类（必选参数）                        /
//ShowNum参数代表每个块显示多少篇文章                                   /
//$TitleLen参数代表显示出来文章的标题的长度(多少个字符）                /
//函数用法：                                                            /
//Step1.将此函数Copy到mainfile.php里面即可,当然Copy到其他文件也可以，   /
//前提是能让程序找到,mainfile.php是最保险的地方,页面都要调用这个文件。  /
//Step2.到后台管理页面的区块设置页面，添加一个“定制区块”，在“选项”里面  /
//写入该函数，比如ShowArticle(3,20,20)                                  /
//实现效果：                                                            /
//HttP://WwW.XueVB.Net                                                  /
//作者：Alpha                                                           /
/////////////////////////////////////////////////////////////////////////
////////////////////////////函数开始/////////////////////////////////////
  $XueVB_today=time();
  $XueVB_topicid=$ShowTopicID;
  $XueVB_len=$TitleLen;
  $sql="select * from `".XOOPS_DB_PREFIX."_stories` where `expired`='0' and `topicid`='".$XueVB_topicid."' order by `storyid` desc limit 0,".$ShowNum;
  $result=mysql_query($sql);
   if(!$XueVB_ok = mysql_fetch_object($result)){
    echo "该栏目暂时没有文章";
    }
   else
   {
    do{
     echo "<a href=".XOOPS_URL."/modules/news/article.php?storyid=".$XueVB_ok->storyid." title=".$XueVB_ok->title.">".Showtitle($XueVB_ok->title,$XueVB_len) ."</a>";
     if(strlen($XueVB_ok->title)>$XueVB_len){echo "...";}
     echo "&nbsp;&nbsp;&nbsp;&nbsp;";
     if(($XueVB_today-($XueVB_ok->published))<"86400"){ echo"<font color=red>[".date("n月j日",$XueVB_ok->published)."]</font><br>";}
     elseif(($XueVB_today-($XueVB_ok->published))<"259200"){ echo"<font color=green>[".date("n月j日",$XueVB_ok->published)."]</font><br>";}
     else{ echo"[".date("n月j日",$XueVB_ok->published)."]<br>";}
    }while($XueVB_ok = mysql_fetch_object($result));
   }
   echo "<div align=right><a href=".XOOPS_URL."/modules/news/index.php?storytopic=".$XueVB_topicid.">更多文章....</a></div>";
}
////////////////////////////函数结束/////////////////////////////////////
////////////////////////////代码结束/////////////////////////////////////
?>