[]
վ=dbankdrive
վַ=http://www.dbank.com/
=
=UTF-8
½ڵַʶ=http://mozhuadbankdrive$$$$$dbank\.com/file/
ȡбִнű=
бʼ=down_filelist">
б=<p class="related">
б=title="([^"]*?)\.txt"[^>]*?href="([^"]*?)" class="ico ico-\w+">([\s\S]*?)</strong>$$$$$1|0|2|0
滻=(reg)<span>[\s\S]*?</span>$$$$$#space$$$$$_(reg)title="([^"]*?)\.txt"[^>]*?href="http://www\.dbank\.com/download\?f=(\w+)&\S*&v=(\w+)"$$$$$title="$1.txt" href="http://www.dbank.com/$2#$3"

sort=0
{script}
#language pascal
var noreplace:boolean;
//ʼʼ
function MYBeforeBookInit:boolean;
begin
	result := false;
	if pos('.dbank.com', lowercase(_DATA.url))>0 then 
	begin
		noreplace := true;
	end
	else begin
		_DATA.url := replace(_DATA.url, 'http://mozhuadbankdrive', '');
		_DATA.url := base64tostr(_DATA.url);
	end;
	nosave	:= true;
	LG('ļ...');
	if length(Down(_data.url, '', 'GET', '', _data.savedir+NOSPECIALCHARS(_Data.name)+'.txt'))<5 then
	begin
		echo(':'+_Data.name+'ļСʧܣ볢񣬷ϵԱ:www.mozhua.net');
		stop;
	end;
end;

//ʼ
procedure MYAfterBookInit;
begin
	if not noreplace then
	begin
		_DATA.url := 'http://mozhuadbankdrive'+STRTOBASE64(_DATA.url);
	end;
end;


begin
	noreplace:= false;
end.
{/script}
