Typstでシンプルなカレンダーを作った

#set text(font: "Noto Sans JP")
= Typstのサンプル

// 変数の定義
#let name = "Typst"
#let version = "0.13.0"

記事執筆時点の #name はバージョン #version です。これからも進化を続けるかもしれないですね。

== カスタム関数
関数を定義して再利用できます。

#let square(x) = x * x

例えば、4の二乗は #square(4) です。
また、16の二乗は #square(16) です。

== 動的リスト
#let items = ("簡潔", "高速", "柔軟")
#items.push("強力")

この文書の特徴:
#for item in items [
  - #item
]

#let read_syukujitsu_csv() = {
  let csv = csv("/syukujitsu.csv")
  let result = (:)
  for row in csv {
    result.insert(row.at(0), row.at(1))
  }
  result
}

#let month_calendar_table(
  year, month, holiday_data: (:), weekday_names: default_weekday_names,
) = {
  let month_day_1 = datetime(
    year: year,
    month: month,
    day: 1,
  )

  let days = range(0, 31)
    .map(day => month_day_1 + duration(days: day))
    .filter(day => day.month() == month)

  let first_day_padding = calc.rem-euclid(
    int(days.first().display("[weekday repr:monday]")),
    7
  )

  let cal_grid = grid(
    columns: (1fr,) * 7,
    rows: (3em,) + (1fr,) * 6,
    inset: 1em,
    ..weekday_names.map(name => {
      // 曜日の名前の色分け
      let color = if name == weekday_names.at(0) {
        // 日曜日は赤
        red
      } else if name == weekday_names.at(6) {
        // 土曜日は青
        blue
      } else {
        black
      }
      let weekday_name = place(top + center)[
        #text(name, fill: color, size: 1.5em, weight: "black")
      ]
      grid.cell(weekday_name, stroke: (bottom: 1pt))
    }),
    ..(([], ) * first_day_padding),
    ..days.map(day => {
      // 日付を文字列としてフォーマットし、祝日データを参照
      let holiday_name = holiday_data.at(day.display("[year]/[month padding:none]/[day padding:none]"), default: "")
      let holiday_name =  if holiday_name == "" {
        holiday_data.at(day.display("[year]-[month padding:none]-[day padding:none]"), default: "")
      } else {
        holiday_name
      }

      // 日付の色分け
      let color = if holiday_name != "" {
        rgb("#00B000")
      } else if day.weekday() == 6 {
        blue
      } else if day.weekday() == 7 {
        red
      } else {
        black
      }
      let day_num = day.display("[day padding:none]")
      place(top + left)[
        #text(fill: color, size: 2em, weight: "bold")[
          #day_num
        ]
        #linebreak()
        #text(fill: color, size: 0.8em, weight: "bold")[
          #holiday_name
        ]
      ]
    })
  )

  let rect = rect(inset: 0.5pt, radius: 10pt, fill: rgb(255, 255, 255, 80%),)[
    #cal_grid
  ]

  rect
}

#let month_calendar(year, month, image, title: "[year] Calendar", holiday_data: (:), weekday_names: default_weekday_names, month_format: "[month repr:long]") = {
  let month_datetime = datetime(year: year, month: month, day: 1)

  box(clip: true)[
    #image
  ]

  place(top)[
    #box(height: 50%, width: 100%)[
      #place(bottom + right, dy: -3em, dx: -2em)[
        #text(size: 7em, weight: "black", fill: white)[#month_datetime.display(month_format)]
      ]
    ]
  ]

  place(bottom)[
    #box(height: 50%, width: 100%)[
      #place(top + left)[
        #pad(1em)[
          #month_calendar_table(year, month, holiday_data: holiday_data, weekday_names: weekday_names)
        ]
      ]
    ]
  ]

  place(bottom + center, dy: -2em)[
    #text()[
      #datetime(year: year, month: month, day: 1).display(title)
    ]
  ]
}

#let quadruple_image(path1, path2, path3, path4) = {
  grid(
    columns: (1fr, 1fr),
    rows: (1fr, 1fr),
    image(path1, width: 100%, height: 100%, fit: "cover"),
    image(path2, width: 100%, height: 100%, fit: "cover"),
    image(path3, width: 100%, height: 100%, fit: "cover"),
    image(path4, width: 100%, height: 100%, fit: "cover"),
  )
}

#let double_image(path1, path2) = {
  grid(
    columns: (1fr, 1fr),
    image(path1, width: 100%, height: 100%, fit: "cover"),
    image(path2, width: 100%, height: 100%, fit: "cover"),
  )
}

#let single_image(path) = {
    image(path, width: 100%, height: 100%, fit: "cover")
}

#let half_area(grid) = {
  box(height: 50%)[
    #grid
  ]
}

#let full_area(grid) = {
  box(height: 100%)[
    #grid
  ]
}

#let year_calendar(
  year, 
  months: range(1, 12 + 1),
  font: "",
  images: (),
  weekday_names: default_weekday_names,
  holiday_data: read_syukujitsu_csv(),
  title: "[year] Calendar",
  month_names: range(1, 12 + 1).map(month => datetime(year: 0, month: month, day: 1).display("[month repr:long]")),
) = [
  #set text(font: font)
  #set page(margin: 0pt)
  #show box: it => align(it, center)

  #for month in months [
    #month_calendar(year, month, images.at(month - 1, default: half_area(single_image("/1.jpeg"))), holiday_data: holiday_data, weekday_names: weekday_names, title: title, month_format: month_names.at(month - 1, default: "[month repr:long]"))

    #pagebreak(weak: true)
  ]
]

#import "/src/lib.typ" as lib: full_area, half_area, single_image, double_image, quadruple_image

#set page(margin: 0pt)

#let lake = "/examples/calendar2/images/lake.jpeg"
#let sunset = "/examples/calendar2/images/sunset.jpeg"

#lib.year_calendar(
  2025,
  font: "Noto Sans JP",
  images: (
    half_area(single_image(lake)),
    full_area(single_image(sunset)),
    half_area(double_image(lake, sunset)),
    full_area(double_image(lake, sunset)),
    half_area(quadruple_image(lake, sunset, lake, sunset)),
    full_area(quadruple_image(lake, sunset, lake, sunset)),
  ),
)