lấy id (code tag) của bạn hoặc bạn bè để tiện khi tag tên và tag ảnh lên facebook
Get submit
If not $submit
Print {{
hướng dẫn: muốn lấy id của ai bạn vào trang cá nhân của người đó copy link ở ảnh họ. Hoặc vào xem ảnh đại diện và copy url trang bạn đang xem.
url có dạng như sau dạng 1: https://m.facebook.com/photo.php?fbid=351181595063407&id=100005147081902&set=a.115686445279591.17978.100005147081902&source=11&refid=17 dạng 2: https://m.facebook.com/story.php?story_fbid=423888974459335&id=100005147081902&fs
}}
Endif
var $bien = {_$text|}
Var $needle = &id=
Var $ne = &set=
Var $ne2 = &fs
assign $y1=call strpos $haystack=$bien;$needle=$needle; $offset=0
assign $y2=call strpos $haystack=$bien;$needle=$ne; $offset=0
var $y3 = call substr $val=$bien; $start=($y1+4); $length=($y2-$y1-4);
assign $x1=call strpos $haystack=$bien;$needle=$needle; $offset=0
assign $x2=call strpos $haystack=$bien;$needle=$ne2; $offset=0
var $x3 = call substr $val=$bien; $start=($x1+4); $length=($x2-$x1-4);
If $y3==
Var $w2 = $x3
Else
Var $w2 = $y3
Endif
If $w2==
Var $w3 = xin lỗi ko tìm thấy id trong link. Bạn phải chắc chắn đã nhập đúng link trang cá nhân của người cần lấy
Else
Var $w3 = $w2
Endif
get text
if $text
assign $text1 = @[$w3:0]
Var $text2 = [[$w3]]
Var $aface =
else
assign $text1= xin lỗi ko tìm thấy id trong link. Bạn phải chắc chắn đã nhập đúng link trang cá nhân của người cần lấy
endif
get submit
if $submit
assign $antao =
$aface nếu bạn nhìn thấy ảnh thì đã lấy thành công
Else
Var $antao =
nhập link trang cá nhân của bạn vào khung văn bản và bấm nút lấy id