Hướng dẫn làm bài viết mới, bài viết HOT cho filelist Xtgem

#exportable

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

var $list = <xt:filelist sort_type="updated" sort_dir="desc" per_page="$per" folder="/$path" template="&lt;div class=&quot;menu&quot;&gt;&lt;img src=&quot;http://ehot.yn.lt/images/icon/item.png&quot;&gt;&#32;&lt;a href=&quot;.file_url.&quot;&gt;~tao~.file_name.&lt;/a&gt;~biet~&lt;/div&gt;" 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=($start2+5);$length=($end2-$start2-9);

if $start > 1

goto @batdau

endif

print $list

endfunction

#exportable

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

var $list = <xt:filelist sort_type="updated" sort_dir="desc" per_page="$per" folder="/$path" template="&lt;div class=&quot;tbox error&quot;&gt;&lt;div class=&quot;menu&quot;&gt;&lt;img src=&quot;/images/icon/item.png&quot;&gt;&#32;&lt;a href=&quot;.file_url.&quot;&gt;~tao~.file_name.&lt;/a&gt;~biet~~duy~.file_date.&lt;/a&gt;~minh~&lt;/div&gt;&lt;/div&gt;" 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=($start2+5);$length=($end2-$start2-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=($start3+5);$length=($end3-$start3-9);

var $timemoi=$time

var $time = call str_replace $subject=$time;$search=-;$replace=;

var $hientai=<xt:tdate format="Ymd" tzone="7"/>

if ($hientai-$time) <= 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