Hướng dẫn làm bài viết mới, hót cho fl xtgem

#exportable
function list $fi=-ten;$path=;$per=;

var $list = <@xt:filelist sort_type="updated" sort_dir="desc" per_page="$per" folder="/$path" template="<div class="menu"><img src="http://ehot.yn.lt/images/icon/item.png"> <a href=".file_url.">~tao~.file_name.</a>~biet~</div>" filter="$fi" />
@batdau

assign $end2=call strrpos $haystack=$list;$needle=~biet~; $offset=0
assign $start2=call strrpos $haystack=$list;$needle=~tao~; $offset=0
var $time= call substr $val=$list;$start=5;$length=-9;
if $start > 1
goto @batdau
endif
print $list
endfunction


Copy code này

#exportable
function list $fi=-ten;$path=;$per=;

var $list = <@xt:filelist sort_type="updated" sort_dir="desc" per_page="$per" folder="/$path" template="<div class="tbox error"><div class="menu"><img src="/images/icon/item.png"> <a href=".file_url.">~tao~.file_name.</a>~biet~~duy~.file_date.</a>~minh~</div></div>" filter="$fi" />

@batdau

assign $end2=call strrpos $haystack=$list;$needle=~biet~; $offset=0
assign $start2=call strrpos $haystack=$list;$needle=~tao~; $offset=0
var $ten= call substr $val=$list;$start=5;$length=-9;
var $name= call source $file=title/$ten;$nl2br=1

var $list = call str_replace $subject=$list;$search=~tao~$ten</a>~biet~;$replace=$name</a>

assign $end3=call strrpos $haystack=$list;$needle=~minh~; $offset=0
assign $start3=call strrpos $haystack=$list;$needle=~duy~; $offset=0
var $time= call substr $val=$list;$start=5;$length=-9;
var $timemoi=$time
var $time = call str_replace $subject=$time;$search=-;$replace=;
var $hientai=<xt:tdate format="Ymd" tzone="7"/>
if 0 <= 3
var $moi=<font color="red">(New)</font>
endif
var $list = call str_replace $subject=$list;$search=~tao~$timemoi</a>~biet~;$replace=$moi;

if $start2 > 1
goto @batdau
endif
print $list

endfunction


Copy code này