GistBirD
This code display related post after comments.
<!--parser:xtscript-->
# </xt:code>
var $blog= <xt:blog tzone="0" format="Y-m-d" display="5" show_time="0" entries_per_page="5" comments_per_page="20" comments_sort="-1" entries_sort="-1" display_limit="0" display_symbol="" version="2" t_back_to_posts="" t_comments="" t_comments_empty="" t_post_a_comment="" t_name="" t_comment="" t_post="" t_tags="" t_search="" t_created="" t_showing_tagged_posts="" t_no_entries_found="" t_no_search_results_found="" t_show_all_comments="" t_see_parent_thread="" t_show_all_replies="" t_show_replies="" t_reply="" t_posting_as="" t_comments_login_required="" t_login="" t_signup="" t_confirm_email="" t_report_spam="" />
# <xt:code>
get __xtblog_entry
var $blog=call str_replace $subject=$blog; $search=name="__xtblog_entry" value="";$replace=name="__xtblog_entry" value="$__xtblog_entry"
print $blog
if not $__xtblog_entry
goto @end
endif
var $tag_start=call strpos $haystack=$blog;$needle=__xtblog_tag
if not $tag_start
goto @end
endif
var $tag_start=($tag_start+13)
var $tag_end=call strpos $haystack=$blog;$needle=#;$offset=$tag_start
var $tag=call substr $val=$blog;$start=$tag_start;$length=($tag_end-$tag_start)
var $blog2= <xt:blog entries_per_page="0" entries_sort="-1" version="2" display="5" tag="$tag" />
var $blog2= call str_replace $subject=$blog2;$search=__xtblog_block_id=2;$replace=__xtblog_block_id=1
var $blog2= call str_replace $subject=$blog2;$search=id="xt_blog";$replace
var $current_datum=call strpos $haystack=$blog2;$needle=$__xtblog_entry
var $blog2a=call substr $val=$blog2;$start=0;$length=$current_datum
var $current_entry_start=call strrpos $haystack=$blog2a;$needle=div class="xt_item"
var $blog2a=call substr $val=$blog2;$start=0;$length=($current_entry_start-1)
var $next_entry_start=call strpos $haystack=$blog2;$needle=div class="xt_item";$offset=$current_datum
if $next_entry_start
var $blog2b=call substr $val=$blog2;$start=($next_entry_start-1)
else
var $blog2b=call urldecode $val=%3C%2Fdiv%3E%3C%2Fdiv%3E%3C%2Fdiv%3E
endif
var $is_entry=call strpos $haystack=$blog2a$blog2b;$needle=div class="xt_item"
if $is_entry
print <h3>Related posts</h3>
print $blog2a$blog2b
endif
@end
<!--/parser:xtscript-->
Copy code
