뉴스소스 구할수 없을까요?

먼저 리플을 주셔서 감사드립니다. ^^

첨에는 안되는줄 알았습니다..근데 위 리플주신 코드에서
유심히 보니 제일마지막에
</marquee> <--- 이부분이 빠졌었더군요..

그리고 테스트해보니...'한겨례','동아, '경향, '중앙' 뉴스가 스크롤 되네요.


근데 신문사별 기사 갯수를 어떻게 조정할수 없을까요?
해보니 한겨레 기사가 제일 많네요.. ^^

여하간 감사합니다.

<marquee onmouseover=this.stop() onmouseout=this.start() scrollamount="1" direction="up">
<?

function get($url){//문서가져옮
$fp = fopen($url, "r");

while(!feof($fp)){
$tmp = fgets($fp, 1024);
$temp .= $tmp;
}

fclose($fp);

return $temp;
}//function get

function Strip($all){// 링크랑 제목만 빼오기

$link_pm=strpos($all,">");

$link=substr($all,0,$link_pm);

if(!$link) return;

if(ereg("\"",$link)){

$link_p=strpos($link,"\"");
$link=substr($link,$link_p+1);
$link_p=strpos($link,"\"");

$link=substr($link,0,$link_p);
}

if(ereg("'",$link)){

$link_p=strpos($link,"'");
$link=substr($link,$link_p+1);
$link_p=strpos($link,"'");

$link=substr($link,0,$link_p);
}

$link=trim($link);

$substr=substr($all,$link_pm+1);
$substr_p=strpos($substr,"</a>");
$substr=substr($substr,0,$substr_p);
$strip=strip_tags($substr);
$strip=trim($strip);

return array(link => $link, sub => $strip);
}//function strip($all)

function makeUrl($Url, $Link){

if(!strpos($Link,"http://") && substr_count("$Link","http://")) return $Link;

$eURL = pathinfo("$Url");

$host = parse_url($Url);
$host = $host[scheme]."://".$host[host];

$Link = "/".$Link; //링크가 루트인지 확인위해 임의로 붙인다.
if(substr_count("$Link","../")){ //한칸앞으로

$Link = str_replace("./../", "", $Link);
$Link = str_replace("../", "", $Link);

$pos = strrpos($eURL["dirname"], "/");
$makeUrl = substr($eURL["dirname"],0,$pos);

$makeUrl = "$makeUrl"."$Link";

}else if(substr_count("$Link","//") && !strpos($Link, "//")){ //루트로 가라

$makeUrl = $host."/".str_replace("//", "", $Link);

}else{ //제자리

$Link = str_replace("./", "", $Link);
$makeUrl = $eURL["dirname"]."$Link";
}

return $makeUrl;
}
////////////////////////////////////// 펑션끝
$date_Y = date("Y");
$date_M = date("m");
$date_D = date("d");

$mdate = "$date_Y.$date_M.$date_D"; //확장성 위해 이르케
////////////////////////////////////////////////////////////<== 신문사별설정 추가가능

$newspaper[] = "데";//이데일리
$URL[] = "http://www.edaily.co.kr/news/";
$like[] = "$date_Y$date_M$date_D";
$newspaper[] = "레";//한겨레
$URL[] = "http://www.hani.co.kr/";
$like[] = "$date_Y$date_M$date_D";


$newspaper[] = "향";//경향
$URL[] = "http://www.khan.co.kr/news/all_article.html";
$like[] = "$date_Y$date_M$date_D";


$newspaper[] = "먼";//머니투데이
$URL[] = "http://www.moneytoday.co.kr/real_index.html";
$like[] = "$date_Y$date_M$date_D";


$newspaper[] = "국";//한국일보
$URL[] = "http://news.hankooki.com/society/soc_news.htm";
$like[] = "$date_Y$date_M$date_D";

$newspaper[] = "앙";//중앙
$URL[] = "http://www.joins.com/it/list/it_list.html";
$like[] = "$date_Y$date_M$date_D";

$newspaper[] = "아";//똥아
$URL[] = "http://www.donga.com/fbin/output?f=totalk&code=k__";
$like[] = "$date_Y$date_M$date_D";

$newspaper[] = "선";//&#51334선
$URL[] = "http://www.chosun.com/it/";
$like[] = "$date_Y$date_M$date_D";


////////////////////////////////////////////////////////////<== 여그까지 신문사별설정

for($x=0; $x < sizeof($newspaper); $x++){

$temp = get($URL[$x]);

$all = split("href =|HREF =|href=|HREF=",$temp);//--> url 추출

for($i=0; $i < sizeof($all); $i++){

$kisa = Strip($all[$i]);

if(ereg($like[$x], $kisa[link]) && 20 < strlen($kisa[sub])){

$LinkURL = makeUrl($URL[$x], $kisa[link]);
echo "<br><a href='$LinkURL'target='_blank'>[$newspaper[$x]]$kisa[sub]</a></font><br></span>";
}//if(ereg($like[$x], $kisa[link]) && 20 < strlen($kisa[sub]))
}//for($i=0; $i < sizeof($all); $i++)
}//for($x=0; $x < sizeof($newspaper); $x++)
?>
<!--여기까지 news-->


제가 사용했던 소스 인데요.
지금도 제대로 표시되나 잘 모르겠네요.
표시 않되는 신문사는 삭제 하세요.