[]
վ=ٶĿ
վ=С˵
=GB2312
վַ=http://wenku.baidu.com/
½ڵַʶ=view/(\w+).html
С˵Ϣ=<h1>(#)</h1>$$$$$<span id="full-summary" style="display:none">(#)<a href="#"$$$$$ٶĿ</a>&nbsp;&gt;&nbsp;[^>]*?>(#)</a>
ȡбִнű=
ַ=http://wenku.baidu.com/search?lm=0&od=0&word=$key
=GB2312
бʼ=<body>
б=<div id="aside" class="aside">
б=<span title="\w+" class="\w+ icon"></span>\s+<a href="(#ַ)"[^>]*?>(#)</a>\s+<span class="ml12 gray">(#ʱ)</span>[\s\S]*?<p class="summary">(#)</p>
sort=0
{script}
#language pascal
function _callbacktxt(s:string):string;
begin
	result := '    '+trim(s);
	result := replace(result, 'www.docin.com', 'www.mozhua.net');
	result := regreplace(result, '^[?]', '');
	result := regreplace(result, '[.]{3,}', '');
	result := regreplace(result, '[\r\n]+?[\s]+', #13#10'    ')+#13#10+#13#10+'TXTɡħצ:http://www.mozhua.net/download/';
end;

function MyStartDownNew(var content:string;var nosave:boolean):boolean;
begin
	result	:= true;
	nosave	:= true;
	url	:= _nowsource.url;
	urlid	:= match(url, 'view/(*).html');
	url	:= 'http://wapwenku.baidu.com/view/'+urlid+'?from=&ssid=&bd_page_type=1&uid=wk_'+inttostr(TIMESTAMP)+'_'+inttostr(rand(100,999))+'&pu=sl%401%2Cpw%404500%2Csz%40240_260%2Cpd%401%2Cfz%402%2Clp%401%2Ctpl%40color&pn=1&st=1&set=num';

	_GET.useragent := 'Baiduspider+(+http://www.baidu.com/search/spider.htm)';
	html	:= down(url);
	p	:= match(html, 'maxpage=(*)"');
	if p = '' then maxpage := 1
	else maxpage := strtoint(p);
	echo('ĵ'+inttostr(maxpage)+'ҳ.');
	uid	:= match(_GET.cookie, '_UID=(*);');
	filename:= NoSpecialchars(_Data.name);
	filename:= _data.savedir+filename+'.txt';
	i:=2;
	while i<=maxpage+1 do
	begin
		nurl	:= match(html, 'accesskey="[*]" href="(*)">ҳ');
		_html	:= match(html, '</span><br/>(*)<a name="page">');
		if _html ='' then _html := getmidstr(html, 'ptb45 bgcolor1">', '<a name="page">', true);
		lasthtml:= html;
		save(filename, html2txt(_html), true);  
		if i=maxpage+1 then break;
		
		nurl	:= '/view/'+urlid+'?pn='+inttostr(i)+'&amp;ssid=&amp;from=&amp;bd_page_type=1&amp;uid='+uid+'&amp;pu=sl@1,pw@4500,sz@240_260,pd@1,fz@2,lp@2,tpl@color,&amp;st=1&amp;maxpage='+inttostr(maxpage);
		nurl	:= abspath(url, nurl);
		nurl	:= replace(nurl, '&amp;', '&');
		_GET.useragent	:= 'Baiduspider+(+http://www.baidu.com/search/spider.htm)';
		_GET.referer	:= nurl;
		echo('ʼص'+inttostr(i)+'ҳ.');
		html		:= down(nurl);
		inc(i);
	end;
	_html := readfile(filename);
	_html := _callbacktxt(_html);
	savefile(filename, _html);
end;
begin
end.
{/script}