include('locationfilename.php');

function createur1($text){

//新闻的文本文件中这样插入你的链接

//${http://mysite.ch}

//或是${http://mysite.ch|My homepage in}

//开始处理文本文件部分

$s=$text;

$a=strstr($s,'${');

if ($a){

$b=strstr($a,'}');

if ($b){

$la=strlen($a); $ls=strlen($s);

$s=substr($s,0,$ls-$la);

$a=substr($a,2);

$lb=strlen($b); $la=strlen($a);

$a=substr($a,0,$la-$lb); $b=substr($b,1);

$ta=strstr($a,"|");

if($ta){

$la=strlen($a); $lt=strlen($ta);

$linktext=substr($a,$la-$lt+1);

$a=substr($a,0,$la-$lt);

}

else{

$linktext=$a;

}

$s=$s."".$linktext."".$b;

}

}

return($s);

}

//在这里修改你的新闻文件存放目录

//切记，新闻文件必须是文本文件

$newspath="/home/htdocs/test/new/";

//设置数组

$newsfile=array();

//设置目录把柄

$hd=dir($newspath);

//获取全部文件，并将其存放在数组中

while($filename=$hd->read() ){

$s=strtolower($filename);

if (strstr($s,".txt")){

//检测最新修改日期

$lastchanged=filemtime($newspath.$filename);

$newsfile[$filename]=$lastchanged;

}

}

//文件排序

arsort($newsfile);

//输出文件

for(reset($newsfile);$key=key($newsfile);next($newsfile)){

$fa=file($newspath.$key);

$n=count($fa);

print "

}

$hd->close();

?>