@airmark/quiver 0.38.0 → 0.39.0

package/quills/medal_citation/0.1.0/packages/tonguetoquill-medal-citation/src/primitives.typ

@@ -0,0 +1,64 @@
+#import "config.typ": *
+
+#let blank(v) = v == none or v == [] or v == ""
+
+// A line set with no height, so `above` is its baseline's drop from the line
+// above it.
+#let heading-line(body, above: 0pt, size: size.line, bold: false) = {
+  v(above)
+  align(center, text(
+    size: size,
+    weight: if bold { "bold" } else { "regular" },
+    top-edge: "baseline",
+    body,
+  ))
+}
+
+#let paragraph(body, text-size) = block(width: 100%, {
+  set text(size: text-size, top-edge: accomplishments.top-edge)
+  set par(justify: true, leading: accomplishments.pitch - accomplishments.top-edge)
+  // A pasted line break reflows across the block.
+  show linebreak: [ ]
+  show parbreak: [ ]
+  body
+})
+
+// Fills from the cursor to `bottom`, at the largest size that fits; past `min`
+// it clips.
+#let accomplishments-block(body, bottom) = context {
+  let top = here().position().y
+  let height = bottom - top
+  let width = page.width - 2 * accomplishments.side
+  let fits(s) = measure(width: width, paragraph(body, s)).height <= height
+  let steps = int((accomplishments.max - accomplishments.min) / accomplishments.step)
+  let chosen = range(steps + 1)
+    .map(i => accomplishments.max - i * accomplishments.step)
+    .find(fits)
+  let text-size = if chosen == none { accomplishments.min } else { chosen }
+  pad(x: accomplishments.side, block(height: height, clip: true, paragraph(body, text-size)))
+}
+
+#let closing-block(date, signer, signing-field: none) = {
+  let at(dy, body) = place(top + left, dx: closing.column, dy: dy, body)
+  let centered(dy, body) = place(top + left, dy: dy, block(width: 100%, body))
+  set text(size: size.line, top-edge: "baseline")
+  centered(closing.given, heading-line(size: size.heading)[GIVEN UNDER MY HAND])
+  centered(closing.given + pitch.single, heading-line(date, bold: true))
+  if signing-field != none {
+    at(closing.rule - closing.signing, signing-field(closing.rule-length, closing.signing))
+  }
+  at(closing.rule, line(length: closing.rule-length, stroke: 0.6pt))
+  for (i, l) in signer.enumerate() {
+    at(closing.rule + closing.name-drop + i * pitch.single, l)
+  }
+  let seal = closing.seal
+  place(top + left, dx: seal.x, dy: seal.y, image("seal.png", width: seal.size))
+}
+
+// `entries` pairs each label with its value; a blank value prints no entry.
+#let footer-block(entries) = {
+  set text(size: footer.size, weight: "bold", top-edge: "baseline")
+  for ((label, value), stop) in entries.zip(footer.stops) {
+    if not blank(value) { place(top + left, dx: stop, dy: footer.baseline)[#label: #value] }
+  }
+}

package/quills/medal_citation/0.1.0/plate.typ

@@ -18,9 +18,14 @@
 
 #let ink(key) = ink-value(qm.data.at(key))
 
-#let period-pattern = "[day padding:none] [month repr:long] [year]"
+#let date-pattern = "[day padding:none] [month repr:long] [year]"
 #let shown-date(key) = {
-  let shown = qm.ink(qm.data, key, period-pattern)
+  let shown = qm.ink(qm.data, key, date-pattern)
+  if shown == none { [] } else { upper(shown) }
+}
+
+#let short-date(key) = {
+  let shown = qm.ink(qm.data, key, "[day padding:none] [month repr:short] [year]")
   if shown == none { [] } else { upper(shown) }
 }
 
@@ -30,36 +35,48 @@
   if value == none { "" } else { value }
 }
 
-#let medal-field = qm.data.medal
-#let medal = if type(medal-field) == str { medal-field } else { medal-field.value }
+#let medal = choice("medal")
+
+#let cluster-line(n) = {
+  if n == none or n <= 0 { return "" }
+  let words = ("FIRST", "SECOND", "THIRD", "FOURTH", "FIFTH", "SIXTH", "SEVENTH", "EIGHTH", "NINTH", "TENTH")
+  let suffix = if calc.rem(n, 100) in (11, 12, 13) { "TH" } else {
+    ("TH", "ST", "ND", "RD", "TH", "TH", "TH", "TH", "TH", "TH").at(calc.rem(n, 10))
+  }
+  words.at(n - 1, default: str(n) + suffix) + " OAK LEAF CLUSTER"
+}
+
+#let signing-field(width, height) = qm.signature-field(
+  "Signature",
+  field: "signer_title",
+  width: width,
+  height: height,
+)
 
 #let common = (
-  oak_leaf_cluster: choice("oak_leaf_cluster"),
-  rank: ink("rank"),
-  service: ink("service"),
+  oak_leaf_cluster: cluster-line(qm.data.oak_leaf_cluster),
+  recipient: ink("recipient"),
+  reason: ink("reason"),
   period_from: shown-date("period_from"),
   period_to: shown-date("period_to"),
   accomplishments: ink("accomplishments"),
-  commander_title: ink("commander_title"),
+  signed_on: shown-date("signed_on"),
+  signer_name: ink("signer_name"),
+  signer_grade: ink("signer_grade"),
+  signer_title: ink("signer_title"),
+  signing_field: signing-field,
+  footer: (
+    ("Special Order", ink("special_order")),
+    ("Condition", ink("condition")),
+    ("PAS", ink("pas")),
+    ("RDP", short-date("rdp")),
+  ),
 )
 
 #if medal == "Air and Space Achievement Medal" {
-  afam((
-    ..common,
-    signed_on: medal-field.at("afam_signed_on"),
-    commander_name: ink-value(medal-field.commander_name),
-  ))
+  afam(common)
 } else if medal == "Meritorious Service Medal" {
-  msm((
-    ..common,
-    signed_on: shown-date("medal.signed_on"),
-    commander_name: ink-value(medal-field.msm_commander_name),
-    commander_grade: ink-value(medal-field.commander_grade),
-  ))
+  msm(common)
 } else if medal == "Air and Space Commendation Medal" {
-  afcm((
-    ..common,
-    signed_on: shown-date("medal.signed_on"),
-    commander_name: ink-value(medal-field.commander_name),
-  ))
+  afcm(common)
 }

package/templates/medal_citation.md

@@ -2,18 +2,18 @@
 $quill: medal_citation@0.1
 $kind: main
 medal: Air and Space Achievement Medal
-oak_leaf_cluster: Basic
-rank: Staff Sergeant
-service: Meritorious Service
-period_from: 2024-10-11
-period_to: 2026-10-12
-accomplishments: The citation paragraph.
-commander_title: Duty Title
+recipient: Rank First M. Last
+reason: Outstanding Achievement
+period_from: 2026-01-01
+period_to: 2026-12-31
+accomplishments: Rank First M. Last distinguished himself or herself by outstanding achievement as Duty Title, Unit Name, Base, State. During this period, Rank Last accomplished one specific thing with its result. The distinctive accomplishments of Rank Last reflect credit upon himself or herself and the United States Air Force.
+signer_name: FIRST M. LAST
+signer_grade: Rank, USAF
+signer_title: Duty Title
 $ext:
   editor:
     tips:
-      - Medal switches the certificate. Each citation opens on its own starter.
+      - The reason follows FOR. Write Outstanding Achievement or Meritorious Service to match the citation's first sentence.
       - The accomplishments paragraph is 1350 characters, including spaces.
-      - Basic prints no cluster. A later award prints the cluster, in capitals, under the medal name.
-      - On the Meritorious Service Medal, the approving official's grade is its own line, and the name leaves the grade off.
+      - Set Oak leaf cluster to 1 or more for a later award of the same medal, and the foot line fields when the special order is cut.
 ~~~

package/quills/medal_citation/0.1.0/packages/tonguetoquill-medal-citation/fonts/LiberationSerif/LICENSE

@@ -1,102 +0,0 @@
-Digitized data copyright (c) 2010 Google Corporation
-	with Reserved Font Arimo, Tinos and Cousine.
-Copyright (c) 2012 Red Hat, Inc.
-	with Reserved Font Name Liberation.
-
-This Font Software is licensed under the SIL Open Font License,
-Version 1.1.
-
-This license is copied below, and is also available with a FAQ at:
-http://scripts.sil.org/OFL
-
-SIL OPEN FONT LICENSE Version 1.1 - 26 February 2007
-
-PREAMBLE The goals of the Open Font License (OFL) are to stimulate
-worldwide development of collaborative font projects, to support the font
-creation efforts of academic and linguistic communities, and to provide
-a free and open framework in which fonts may be shared and improved in
-partnership with others.
-
-The OFL allows the licensed fonts to be used, studied, modified and
-redistributed freely as long as they are not sold by themselves.
-The fonts, including any derivative works, can be bundled, embedded,
-redistributed and/or sold with any software provided that any reserved
-names are not used by derivative works.  The fonts and derivatives,
-however, cannot be released under any other type of license.  The
-requirement for fonts to remain under this license does not apply to
-any document created using the fonts or their derivatives.
-
- 
-
-DEFINITIONS
-"Font Software" refers to the set of files released by the Copyright
-Holder(s) under this license and clearly marked as such.
-This may include source files, build scripts and documentation.
-
-"Reserved Font Name" refers to any names specified as such after the
-copyright statement(s).
-
-"Original Version" refers to the collection of Font Software components
-as distributed by the Copyright Holder(s).
-
-"Modified Version" refers to any derivative made by adding to, deleting,
-or substituting ? in part or in whole ?
-any of the components of the Original Version, by changing formats or
-by porting the Font Software to a new environment.
-
-"Author" refers to any designer, engineer, programmer, technical writer
-or other person who contributed to the Font Software.
-
-
-PERMISSION & CONDITIONS
-
-Permission is hereby granted, free of charge, to any person obtaining a
-copy of the Font Software, to use, study, copy, merge, embed, modify,
-redistribute, and sell modified and unmodified copies of the Font
-Software, subject to the following conditions:
-
-1) Neither the Font Software nor any of its individual components,in
-   Original or Modified Versions, may be sold by itself.
-
-2) Original or Modified Versions of the Font Software may be bundled,
-   redistributed and/or sold with any software, provided that each copy
-   contains the above copyright notice and this license. These can be
-   included either as stand-alone text files, human-readable headers or
-   in the appropriate machine-readable metadata fields within text or
-   binary files as long as those fields can be easily viewed by the user.
-
-3) No Modified Version of the Font Software may use the Reserved Font
-   Name(s) unless explicit written permission is granted by the
-   corresponding Copyright Holder. This restriction only applies to the
-   primary font name as presented to the users.
-
-4) The name(s) of the Copyright Holder(s) or the Author(s) of the Font
-   Software shall not be used to promote, endorse or advertise any
-   Modified Version, except to acknowledge the contribution(s) of the
-   Copyright Holder(s) and the Author(s) or with their explicit written
-   permission.
-
-5) The Font Software, modified or unmodified, in part or in whole, must
-   be distributed entirely under this license, and must not be distributed
-   under any other license. The requirement for fonts to remain under
-   this license does not apply to any document created using the Font
-   Software.
-
-
- 
-TERMINATION
-This license becomes null and void if any of the above conditions are not met.
-
- 
-
-DISCLAIMER
-THE FONT SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
-EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY WARRANTIES OF
-MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT
-OF COPYRIGHT, PATENT, TRADEMARK, OR OTHER RIGHT.  IN NO EVENT SHALL THE
-COPYRIGHT HOLDER BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
-INCLUDING ANY GENERAL, SPECIAL, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL
-DAMAGES, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
-FROM, OUT OF THE USE OR INABILITY TO USE THE FONT SOFTWARE OR FROM OTHER
-DEALINGS IN THE FONT SOFTWARE.
-