<@7> <@local(ps,y,yc,yyyymm,name)> <$name = argv#0> <$ps = v.load_plgset(name)> <@> <@>------------------------------------------------------------------- <@>月別記事数リスト <@>------------------------------------------------------------------- <$yc=new> <@>年別の計算 <$forexec(t, argv#1, begin)> <$yc.(t.year) += t.count> <$end> <$y=0> <@ifexec(ps.select_box, begin, begin)> <@>------------------------------------------------------------------- <@>------------------------------------------------------------------- <$else> <@>------------------------------------------------------------------- \n")>
  • ><@t.year>年 (<@yc.(t.year)>) \n")> <@>------------------------------------------------------------------- <$end>