15/05/24

Share code random bài viết dạng nhẹ không dùng javascript

Đầu tiên các bạn vào mục xt tạo 1 file mới tên là random.xt dạng text, sau đó dán code bên dưới vào file vừa tạo



get id

var $out = $id

assign $out=call str_replace $subject=$out;$search=-;$replace=*;

var $rd = <xt:include file="/xt/rd/*"/>

var $forlam = call substr $val=$out;$start=$rd;$length=8

var $k1 = call substr $val=$forlam;$start=0;$length=1

var $k2 = call substr $val=$forlam;$start=1;$length=1

var $k3 = call substr $val=$forlam;$start=2;$length=1

var $k4 = call substr $val=$forlam;$start=3;$length=1

var $k5 = call substr $val=$forlam;$start=4;$length=1

var $k6 = call substr $val=$forlam;$start=5;$length=1

var $k7 = call substr $val=$forlam;$start=6;$length=1

var $fi= *$k1$k2*$k3*$k4*$k5$k6*$k7*

Print <div class="phdr">Bài viết ngẫu nhiên</div>

include /xt/mini.xt

call @filelist $fi=$fi;

Ai sợ copy lỗi thì import link dưới nhé!

Bước tiếp theo, tạo thêm thư mục tên rd trong thư mục xt. Trong thư mục rd tạo các file đạng text với tên bất kì, file đó chứa các con số bất kì tuỳ bạn, số có thể âm, và các số không trùng với file khác
VD: file tên tn chứa số 9
file tc chứa số -4

Share code random bài viết dạng nhẹ không dùng javascript - ForLam.Wap.Sh

Share code random bài viết dạng nhẹ không dùng javascript
Cuối cùng là vào file xem bài viết (thường là xem.html or forum.html) dán code này vào chỗ hiện bài ngẫu nhiên0

include /xt/random.xt

Demo: Bên dưới
Nguồn: sắt - gmvn