@5> コマンド前のタブを削除
<@local(x,s,t,t2)> ローカル変数宣言
<$>フレーム内HTML$>
<$comment_view_size=10> <@>10件ごとの表示
<@> 日記の設定
<$s = set = v.daybook_setting>
<$day_log = v.load_diary_for_phone(1, s)>
<$v.title = s.blog_name>
<@ifexec(! v.exsits_daybook, begin, begin)>
<$ifmessage(v.diary_id, "日記帳 <@v.diary_id> が存在しません", "日記帳が指定されていません")>
<$else>
<$ifmessage(!v.load_days, "該当する日記がありません")>
<$end>
<@ifexec(Message, begin)>
<@join("
\n", Message)>
<$end>
<@ifexec(v.load_days, begin)>
<@>コメント表示領域
<$t=day_log#0>
<$ifset(v.allow_edit, coms, t.comments_all, t.comments)>
<$query=v.query_ary#1>
<$ifset(query>0 , start, query, 1)>
<$ifset(start>1 , prev, start-comment_view_size)>
<$ifset(prev!='' && prev<1, prev, 1)>
<$ifset(start+comment_view_size<=coms, next, start+comment_view_size)>
<@>
<@ifexec(!t.wiki || s.contents_disp_date==1, begin)><@t.year>/<@t.mon>/<@t.day>(<@t.wday_name>)<$end>
<@t.title>
<@ifexec(t.wiki && s.contents_disp_date, begin)><@t.year>/<@t.mon>/<@t.day><$end><@ifexec(s.category_list, begin)>【<@t.category_main><@ifexec(t.category_sub, begin)>::<@t.category_sub><$end>】<$end><@if(s.disp_writer, t.name)><@ifexec(v.allow_edit, begin)>([3]編集)<$end>
<@if(! t.enable, '【この記事は非公開です】
')>
<@ifexec(t.allow_com || t.comments || (v.allow_edit && t.comments_all), begin.comment)>
■コメント(<@if(v.allow_edit, t.comments_all, t.comments)>件)
<@ifexec(v.allow_edit && t.comments_all, begin)> 編集<$end>
<@> ページ送り
<@if(prev, #'<前[4]')>
<@start>件目から
<@if(next, #'[6]次>')>
<$c_ary = v.load_comments(t)>
<$c_ary = splice(c_ary, start-1, comment_view_size)>
<@forexec(t2, c_ary, begin)>
<@t2.name><@if(t2.hidden, '(非公開)', if(! t2.enable, '(非表示)'))>『<@t2.text>』<@ifexec(t2.email && v.allow_edit, begin)>mail<$end> <@ifexec(t2.url && s.allow_comment_url, begin)>URL<$end> (<@tm_printf('%Y/%m/%d %J:%M', t2.tm)>)
<$end>
<@if(prev, #'<前[4]')>
<@start>件目から
<@if(next, #'[6]次>')>
<@ifexec(t.allow_com, begin)>
[2]コメントを書く
<$end>
<$end.comment>
記事に戻る
<$end>