[]
վ=׶
վַ=http://www.yi-look.com/
=С˵
=GB2312
ʹ÷Cookie=
Ŀ¼ַʶ=art_(\d+)_(\d+)\.html
½ڵַʶ=read_(\d+)_(\d+)\.html
С˵Ϣ=<title>(#,.*?)$$$$$<a href='search\.php\?key=(#,[^\']*?)'
ȡбִнű=
ץȡ=1
ʹIE=
ݽȡʼ1=ART>
ݽȡ1=<DIV class=FL>
ַ=http://www.yi-look.com/search.php?key=$key
ַ_=http://www.yi-look.com/artc_0.html
ַ_=http://www.yi-look.com/
ַ_=http://www.yi-look.com/weeksort_1.html
=GB2312
POST=
бʼ=</TD></TR></form></TABLE>
б=<TR><TD height=30px >
б=T(?:\d+)><a href='(#ַ,.*?)'.*?>(#,.*?)<\/A><\/DIV><\/TD><TD.*?>(#,.*?)<\/TD>$$$$$href='(#ַ,[^>]*?)' target='_blank' >(#,.*?)</A></.*?k'>(#,.*?)</a>
滻=(reg)^art$$$$$http://www.yi-look.com/art
ҳ=<\/TD><TD><DIV Class=NEXT><a href='(\S*?)'
ҳ=0
sort=997
{script}
#language pascal
function MyBeforeGetChapter(HTMLCode:string):boolean;
var
	i,j,k	: integer;
	alen,len: integer;
	allids	: array of integer;
	alltit	: array of string;
	tmpurl	: string;
begin
	result	:= false;//֪ͨȥ½
	//ȡ
	_RegExp.pattern := '<a[\s\S]+?href\s*=\s*["|'']?([^"'' ]*)["|'']?[^<>]*>\s*(<[^<>]+>)*([^<>]*)(<[^<>]+>)*\s*</a';
	Matchs	:= _RegExp.Execute(HTMLCode);
	alen	:= Matchs.count-1;
	len		:= 0;
	//½ID
	for i:=0 to alen do
	begin
		tmpurl := Matchs.Item[i].SubMatches[0];
		if RegMatch('read\_(\d+)\_\d+', tmpurl)<>'' then
		begin
			tmpurl		:= RegReplace(tmpurl, 'read\_(\d+)\_\d+\.html', '$1');
			setLength(allids, len+1);
			setLength(alltit, len+1);
			allids[len]	:= strtoint(tmpurl);
			alltit[len]	:= Matchs.Item[i].SubMatches[2];
			inc(len);
		end;
	end;
	//ID
	for i := len-2 downto 0 do
	begin
		for j := 0 to i do
		begin
			if allids[j]>allids[j+1] then
			begin
				//ID
				k			:= allids[j];
				allids[j]	:= allids[j+1];
				allids[j+1] := k;
				//
				tmpurl		:= alltit[j];
				alltit[j]	:= alltit[j+1];
				alltit[j+1]	:= tmpurl;
			end;
		end;
	end;
	
	//HTMLĴ
	tmpurl		:= RegReplace(_DATA.url, 'http:\S+art\_(\d+)_\S+', '$1');
	HTMLCode	:= '';
	for i := 0 to len-1 do
	begin
		HTMLCode := HTMLCode + '<a href="read_'+inttostr(allids[i])+'_'+tmpurl+'.html">'+alltit[i]+'</a>';
	end;
end;
function mybeforeread(var content,url:string;repeatindex:integer):boolean;
begin
	result := false;
	content := replace(content, '<a>', '</a>');
end;
begin
end.
{/script}