get q
if $q !=
var $ou = call urlencode $val=$q;
var $out=call str_replace $subject=$ou;$search=%CC%81;$replace=*;
var $out=call str_replace $subject=$out;$search=%CC%80;$replace=*;
var $out=call str_replace $subject=$out;$search=+;$replace=*;
var $out=call str_replace $subject=$out;$search=++;$replace=*;
var $out=call str_replace $subject=$out;$search=+++;$replace=-;
var $out=call str_replace $subject=$out;$search=_;$replace=-;
var $out=call str_replace $subject=$out;$search=ô;$replace=o;
var $out=call str_replace $subject=$out;$search=%CC%83;$replace=*;
var $out=call str_replace $subject=$out;$search=%CC%89;$replace=*;
var $out=call str_replace $subject=$out;$search=%CC%A3;$replace=*;
var $out=call str_replace $subject=$out;$search= ;$replace=*;
var $out=call urldecode $val=$out;
var $out=call str_replace $subject=$out;$search=ă;$replace=a;
var $out=call str_replace $subject=$out;$search=Ă;$replace=a;
var $out=call str_replace $subject=$out;$search=Â;$replace=a;
var $out=call str_replace $subject=$out;$search=Đ;$replace=d;
var $out=call str_replace $subject=$out;$search=Ê;$replace=e;
var $out=call str_replace $subject=$out;$search=Ô;$replace=o;
var $out=call str_replace $subject=$out;$search=Ơ;$replace=o;
var $out=call str_replace $subject=$out;$search=Ư;$replace=u;
var $out=call str_replace $subject=$out;$search=â;$replace=a;
var $out=call str_replace $subject=$out;$search=ậ;$replace=a;
var $out=call str_replace $subject=$out;$search=ấ;$replace=a;
var $out=call str_replace $subject=$out;$search=ầ;$replace=a;
var $out=call str_replace $subject=$out;$search=ẫ;$replace=a;
var $out=call str_replace $subject=$out;$search=ẩ;$replace=e;
var $out=call str_replace $subject=$out;$search=đ;$replace=d;
var $out=call str_replace $subject=$out;$search=ể;$replace=e;
var $out=call str_replace $subject=$out;$search=ề;$replace=e;
var $out=call str_replace $subject=$out;$search=ế;$replace=e;
var $out=call str_replace $subject=$out;$search=ễ;$replace=e;
var $out=call str_replace $subject=$out;$search=ệ;$replace=e;
var $out=call str_replace $subject=$out;$search=ê;$replace=e;
var $out=call str_replace $subject=$out;$search=ô;$replace=o;
var $out=call str_replace $subject=$out;$search=ồ;$replace=o;
var $out=call str_replace $subject=$out;$search=ố;$replace=o;
var $out=call str_replace $subject=$out;$search=ổ;$replace=o;
var $out=call str_replace $subject=$out;$search=ộ;$replace=o;
var $out=call str_replace $subject=$out;$search=ỗ;$replace=o;
var $out=call str_replace $subject=$out;$search=ơ;$replace=o;
var $out=call str_replace $subject=$out;$search=ờ;$replace=o;
var $out=call str_replace $subject=$out;$search=ớ;$replace=o;
var $out=call str_replace $subject=$out;$search=ở;$replace=o;
var $out=call str_replace $subject=$out;$search=ợ;$replace=o;
var $out=call str_replace $subject=$out;$search=ỡ;$replace=e;
var $out=call str_replace $subject=$out;$search=ư;$replace=u;
var $out=call str_replace $subject=$out;$search=ừ;$replace=u;
var $out=call str_replace $subject=$out;$search=ứ;$replace=u;
var $out=call str_replace $subject=$out;$search=ử;$replace=u;
var $out=call str_replace $subject=$out;$search=ự;$replace=u;
var $out=call str_replace $subject=$out;$search=ữ;$replace=u;
var $out=call str_replace $subject=$out;$search=u;$replace=u;
var $out=call str_replace $subject=$out;$search=ù;$replace=u;
var $out=call str_replace $subject=$out;$search=ú;$replace=u;
var $out=call str_replace $subject=$out;$search=ủ;$replace=u;
var $out=call str_replace $subject=$out;$search=ũ;$replace=u;
var $out=call str_replace $subject=$out;$search=ụ;$replace=u;
var $out=call str_replace $subject=$out;$search=ò;$replace=o;
var $out=call str_replace $subject=$out;$search=ó;$replace=o;
var $out=call str_replace $subject=$out;$search=ỏ;$replace=o;
var $out=call str_replace $subject=$out;$search=õ;$replace=o;
var $out=call str_replace $subject=$out;$search=ọ;$replace=o;
var $out=call str_replace $subject=$out;$search=ì;$replace=i;
var $out=call str_replace $subject=$out;$search=í;$replace=i;
var $out=call str_replace $subject=$out;$search=ỉ;$replace=i;
var $out=call str_replace $subject=$out;$search=ĩ;$replace=i;
var $out=call str_replace $subject=$out;$search=ị;$replace=i;
var $out=call str_replace $subject=$out;$search=à;$replace=a;
var $out=call str_replace $subject=$out;$search=á;$replace=a;
var $out=call str_replace $subject=$out;$search=ả;$replace=a;
var $out=call str_replace $subject=$out;$search=ã;$replace=a;
var $out=call str_replace $subject=$out;$search=ạ;$replace=a;
var $out=call str_replace $subject=$out;$search=,;$replace=;
var $out=call str_replace $subject=$out;$search=.;$replace=;
var $list =
assign $space=call chr $val=32
var $q2=call str_replace $subject=$q;$search=+;$replace=-;
var $q2=call str_replace $subject=$out;$search=$space;$replace=-;
function dem $ok=;
var $dem =
var $dem = call strlen $val=$dem
Print $dem
endfunction
@batdau
assign $end=call strrpos $haystack=$list;$needle=~cuoi~; $offset=0
assign $start=call strrpos $haystack=$list;$needle=~dau~; $offset=0
var $getname = call substr $val=$list;$start=($start+5);$length=($end-$start-9);
var $data = call source $file=/data/$getname
assign $endt =call strpos $haystack=$data;$needle=[/ten]; $offset=0
assign $startt=call strpos $haystack=$data;$needle=[ten]; $offset=0
assign $endi=call strpos $haystack=$data;$needle=[/img]; $offset=0
assign $starti=call strpos $haystack=$data;$needle=[img]; $offset=0
assign $tenfile = $getname
var $rename = call substr $val=$data;$start=($startt+5);$length=($endt-$startt-5);
assign $infoa=call strstr $haystack=$data; $needle=[/info]; $before_needle=1;
assign $infob=call strstr $haystack=$infoa; $needle=[info]; $before_needle=0;
assign $info=call str_replace $subject=$infob;$search=[info];$replace=;
assign $sinfoa=call str_replace $subject=$info;$search=
;$replace=.;
assign $sinfoa=call str_replace $subject=$info;$search=
;$replace=.;
assign $sinfoa=call str_replace $subject=$info;$search=
;$replace=.;
assign $sinfo=call substr $val=$sinfoa;$start=0;$length=50;
var $mt = call substr $val=$info;$start=0;$length=70;
var $idc = call substr $val=$getname;$start=-1;$length=1
var $cm = call source $file=/muc/$idc
var $lcm = call source $file=/muc/$idc
if $endi > ($starti+13)
var $img = call substr $val=$data; $start=($starti+5); $length=($endi-$starti-5);
else
var $img=http://zingtop.biz/logo/pro/$idc.png
endif
var $list = call str_replace $subject=$list;$search=~dau~$getname~cuoi~;$replace= $rename;
var $list = call str_replace $subject=$list; $search=~img[$getname]~; $replace=$img;
var $list = call str_replace $subject=$list; $search=~des[$getname]~; $replace=$mt...;
var $list = call str_replace $subject=$list; $search=~tl[$getname]~; $replace= $cm;
var $list = call str_replace $subject=$list; $search=title[$getname]; $replace=$rename
if $start > 25
goto @batdau
endif
get __filelist_page
if $__filelist_page ==
var $__filelist_page = 1
endif
Print $mt
print
var $tk =
if not $q
print $tk
Elseif not $list
print $tkKhông tìm thấy bất kì kết quả nào cho từ khóa "$q"
• Hãy kiểm tra lại từ khóa hoặc thử với một từ khóa ngắn gọn hơn bạn nhé.
• Hãy dùng từ khóa không dấu để tiện cho quá trình tìm kiếm
elseif $q
print {{$tkCó$space }}
call dem $ok=$q2
print {{$space kết quả tìm kiếm với từ khóa "$q"
$list}}
endif