Movable Typeで今月と来月の記事を一覧表示させてみる(ハッシュ無し版)

MTQに以下の質問が上がっていましたので、まーしーさんや藤本さんが既に解答されていますが、 せっかくですので考えてみました。

元ネタ:今月と来月の記事一覧表示(MTQ)

<$mt:TemplateNote note="現在の年と日をセットする"$>
<mt:SetVarBlock name="newerY"><$MTDate format="%Y" sprintf="%d"$></mt:SetVarBlock>
<mt:SetVarBlock name="newerM"><$MTDate format="%m" sprintf="%d"$></mt:SetVarBlock>

<$mt:TemplateNote note="to部分に今の月を起点に出したい月数をセットする"$>
<MTFor var="i" from="1" to="2">

<$mt:TemplateNote note="初期化"$>
<mt:SetVars>
ymNewer=<$MTVar name="newerY"$><$MTVar name="newerM" sprintf="%02s"$>
entries_count=0
</mt:SetVars>

<h2><$MTVar name="newerY"$>年<$MTVar name="newerM" sprintf="%02s"$>月</h2>

<MTCalendar month="$ymNewer">
<MTCalendarIfEntries>
<MTEntries><div><h3><mt:entrytitle></h3><p><mt:entrybody></p></div></MTEntries>
<mt:setvar name="entries_count" op="++" value="1">
</MTCalendarIfEntries>
</MTCalendar>

<MTIf name="entries_count" eq="0">
<p>該当するエントリーはありません</p>
</MTIf>

<$mt:TemplateNote note="次月計算"$>
<$MTSetVar name="newerM" op="++" $>
<mt:If name="newerM" gt="12">
<$MTSetVar name="newerM" value="1"$>
<$MTSetVar name="newerY" op="++"$>
</mt:If>

</MTFor>