preset.typ

#let math-state-counter=counter("math-state")
#let is-clear=()=>{
	let chapters=query(selector(<题集篇>).or(<讲义篇>))
	chapters.any(c=>{
		c.location().page()==here().page()
	})
}
#let is-chap-page=()=>{
	let chapters=query(
		heading.where(level:1).or(
			heading.where(level:2).after(<题集篇>).before(<积分常见结论>)
		)
	)
	chapters.any(c=>{
		c.location().page()==here().page()
	})
}
#let book-header=()=>context{
	if is-clear() {
		none
	} else if is-chap-page() {
		none
	} else {
		block(
			stroke:(
				bottom:.5pt,
			),
			inset:(
				bottom:3pt,
			),
			{
				if calc.odd(counter(page).get().first()) {
					let heading-2=query(selector(heading.where(level:2).after(here()))).filter(h=>{
						h.location().page()==here().page()
					}).first(default:none)
					let heading-2=if heading-2==none {
						query(selector(heading.where(level:2).before(here()))).last()
					} else {
						heading-2
					}
					link(
						heading-2.location(),
						{
							counter(heading).display(heading-2.numbering)
							" "
							heading-2.body
						},
					)
					h(1fr)
					link(
						<outline>,
						counter(page).display(),
					)
				} else {
					let heading-1=query(selector(heading.where(level:1).after(here()))).filter(h=>{
						h.location().page()==here().page()
					}).first(default:none)
					let heading-1=if heading-1==none {
						query(selector(heading.where(level:1).before(here()))).last()
					} else {
						heading-1
					}
					link(
						<outline>,
						counter(page).display(),
					)
					h(1fr)
					link(
						heading-1.location(),
						{
							if heading-1.numbering!=none{
								counter(heading.where(level:1)).display(heading-1.numbering)
							}
							heading-1.body
						},
					)
				}
			}
		)
	}
}
#let book-footer=()=>context{
	if is-clear() {
		none
	} else if is-chap-page() {
		set align(center)
		link(
			<outline>,
			counter(page).display(),
		)
	} else {
		none
	}
}
#let collection-foreground=()=>context{
	set text(size:9pt)
	let alignment=if calc.odd(counter(page).get().first()) {
		right+top
	}
	else {
		left+top
	}
	let section=counter(heading).get().at(1)
	let match=query(metadata).filter(data=>{
		data.value.keys().contains("kind") and data.value.kind=="question" and data.location().page()==here().page()
	}).first(default:none)
	let match=if match==none {
		query(metadata).filter(data=>{
			data.value.keys().contains("kind") and data.value.kind=="question" and data.location().page()<=here().page()
		}).last(default:none)
	} else {
		match
	}
	place(
		alignment,
		dy:25mm+5.4em*(section -1)*2.6,
		rotate(
			90deg,
			reflow:true,
			link(
				match.location(),
				box(
					height:1.4em,
					width:5.4em,
					fill:color.rgb("#e8d0d0"),
					align(
						center+horizon,
						numbering("Q1",match.value.number)
					),
				)
			)
		)
	)
}
#let preset(body)={
	set page(
		paper:"a4",
		margin:(
			top:25mm,
			bottom:30mm,
			outside:22mm,
			inside:32mm,
		),
		numbering:"1",
		header:book-header(),
		footer:book-footer(),
		number-align:center+bottom,
	)
	set text(
		lang:"zh",
		region:"CN",
		font:(
			"Noto Serif CJK SC",
			"Noto Serif",
		),
		size:10.5pt,
		top-edge:"bounds",
		bottom-edge:"bounds",
		costs:(
			widow:0%,
			orphan:0%,
		),
	)
	set par(
		justify:true,
		leading:1.2em,
		spacing:1.2em,
	)
	//句号应使用句点，且需维持标点挤压
	show regex("[，。．、：；？！》）』」】〗〕〉］｝“‘《（『「【〖〔〈［｛，。．、：；]+"):it=>it.text.replace("。","．")
	show math.equation:set text(
		font:"New Computer Modern Math",
	)
	show math.equation:it=>math.display(it)
	//令行内数学公式保持CJK间距
	show math.equation.where(block:false):it=>{
		let ghost=text(font:"Adobe Blank","\u{375}")
		ghost;it;ghost
	}
	show math.equation:set block(breakable:true)
	show math.equation.where(block:true):it=>block({
		math-state-counter.step()
		let pagenum=state(str(math-state-counter.get().first()))
		context if here().page()!=pagenum.final(){
			set text(fill:silver,size:16pt)
			place(
				center+bottom,
				dy:10mm,
				sym.arrow.b.filled,
			)
		}
		it
		context pagenum.update(here().page())
	})
	show heading:set align(center)
	show heading:set text(weight:"extrabold")
	show heading.where(level:1):set text(size:30pt)
	show heading.where(level:2):set text(size:21pt)
	show heading.where(level:3):set text(size:16pt)
	show figure.where(kind:"question"):set block(breakable:true)
	body
}
#let preset-frontmatter(body)={
	set page(
		numbering:"i",
	)
	body
}
#let preset-collection(body)={
	show:preset
	set page(
		numbering:"1",
		foreground:collection-foreground(),
	)
	show heading.where(level:2):set heading(
		numbering:(..nums)=>numbering("难度一",nums.at(1)),
	)
	body
}
#let preset-lecture(body)={
	show:preset
	set page(
		foreground:context{
			set text(size:9pt)
			let alignment=if calc.odd(counter(page).get().first()) {
				right+top
			}
			else {
				left+top
			}
			let section=counter(heading).get().at(1)
			place(
				alignment,
				dy:25mm+(6.4em+20pt)*(section -1)*2.4,
				link(
					query(selector(heading.where(level:3)).before(here())).last().location(),
					box(
						height:6.4em+20pt,
						width:1.4em,
						fill:color.rgb("#d0d0e8"),
						{
							set text(
								top-edge:"cap-height",
								bottom-edge:"baseline",
							)
							set align(center+horizon)
							set par(leading:3pt)
							query(selector(heading.where(level:3)).before(here())).last().body
						},
					)
				)
			)
		},
	)
	set par(
		first-line-indent:(
			amount:2em,
			all:true,
		),
	)
	show heading.where(level:2):set heading(
		numbering:(..nums)=>numbering("阶段一",nums.at(1)),
	)
	show heading.where(level:3):set heading(
		numbering:(..nums)=>numbering("一、1",..nums.pos().slice(1)),
	)
	show heading.where(level:4):set heading(
		numbering:(..nums)=>numbering("1.1",..nums.pos().slice(2)),
	)
	show heading.where(level:4):set align(left)
	show regex("[，。．、：；？！》』」】〗〕〉］｝“‘《『「【〖〔〈［｛，。．、：；]+"):it=>it.text.replace("。","．")
	show regex("（.*?）"):emph
	show emph:set text(
		font:"Zhuque Fangsong (technical preview)",
		size:10pt,
	)
	body
}
#let preset-appendix(body)={
	show:preset
	set par(
		first-line-indent:(
			amount:2em,
			all:true,
		)
	)
	show heading.where(level:1):set text(size:21pt)
	show heading.where(level:1):set heading(numbering:"附录A")
	show heading.where(level:2):set text(size:18pt)
	show heading.where(level:2):set heading(numbering:"A.1")
	set heading(supplement:"附录")
	body
}