TA的回答 - 第8页

问关于jiazhu宏包的一个问题

jiazhu 宏包版本太旧。
使用这一个版本：jiazhu.sty

1 条评论收藏感谢

你引入了 paralist 宏包，它不能和 enumitem 同时使用。你把 paralist 那段代码全删掉。
enumitem 的 nosep 选项可以清除前后空白。
然后，用 \setlist[enumerate,2]{label=(\arabic*)} 统一设置二级列表的 label，或者写 \begin{enumerate}[label=(\arabic*)]。

\documentclass[11pt,a4paper]{article} 
\pagestyle{plain}

\usepackage{ctex}            % 显示中文宏包
%\usepackage{snotez}            % 侧边标注宏包

\usepackage{marginnote}        % 侧边标注宏包
\usepackage{ragged2e}
\renewcommand{\marginfont}{\small\kaishu}
\renewcommand*{\raggedrightmarginnote}{}
\renewcommand*{\raggedleftmarginnote}{}



\usepackage{geometry}
%\geometry{left=2.8cm,right=1.8cm,top=2.8cm,bottom=2.8cm}
\geometry{inner=2cm,outer=2cm,bottom=1.5cm,top=2cm,marginparwidth=4.5cm,marginparsep=0.5cm,includemp}

\usepackage[dvipsnames]{xcolor}

\usepackage{fontspec}
\setmainfont{Times New Roman}

% \linespread{1.25}                % 设置整体行距
\usepackage{setspace}            % 行距设置宏包

\usepackage{tocloft}            % 目录格式宏包
\renewcommand\cfttoctitlefont{\hfill\Large\sffamily\bfseries\color{BrickRed}\centering}
\renewcommand\cftaftertoctitle{\hfill}
\setlength\cftbeforetoctitleskip{2ex}
\setlength\cftaftertoctitleskip{2ex}

%\setcounter{tocdepth}{1}

\usepackage{titlesec}            % 目录宏包
\usepackage{titletoc}            % 目录宏包
%\usepackage[toc]{multitoc}        % 多级目录

\usepackage{enumerate}
\usepackage{enumitem}
%\renewcommand{\labelenumii}{(\ensuremath{\arabic{enumii}})}
\setlist[enumerate,2]{label=(\arabic*)}%%% 正确的做法
%\renewcommand{\labelenumi}{(\ensuremath{\theenumi})}
\setlist[enumerate,1]{label=\arabic*.}%%% 正确的做法
%\setlist[enumerate]{listparindent=\parindent}
\usepackage{booktabs}
\usepackage{array}
\usepackage{tabularx}
\usepackage{tabu}
\usepackage{makecell}
\usepackage{longtable,booktabs}
\usepackage{ltxtable}

%%%% 解决Itemize和Enumerate的item之间行距过大的问题
\setlist{nosep}%%% 正确的做法
%\usepackage{paralist}
%\let\itemize\compactitem
%\let\enditemize\endcompactitem
%\let\enumerate\compactenum
%\let\endenumerate\endcompactenum
%\let\description\compactdesc
%\let\enddescription\endcompactdesc
%%%% ---------

\usepackage{fancyhdr}

\setlength{\parindent}{0pt} % 放在段首，之后的所有段落都将取消首行缩进
\setlength{\parskip}{0.6\baselineskip} %设置段落间距


%\author{My Name} 
\date{April, 2022}
\title{一级建造师执业资格考试市政务实 \\
~      \\  % 插入空行
~      \\
历年真题笔记} 

\begin{document} 
    
    \maketitle            % 生成标题
    
    \thispagestyle{empty}    % 当前页无页眉页脚
    
    \newpage
    
    \tableofcontents

%    \titlecontents{section}
%                  [3cm]
%                  {\bf \large}%
%                  {\contentslabel{2.5em}}%
%                  {}%
%                  {\titlerule*[0.5pc]{$\cdot$}\contentspage\hspace*{3cm}}

    \titlecontents{section}
                  [3em]
                  {\vspace{3mm}\bf \large}
                  {\contentslabel{2em}}
                  {}
                  {\titlerule*[0.5pc]{$\cdot$}\contentspage\hspace*{0em}}
                
    \titlecontents{subsection}
                  [5em]
                  {\vspace{3mm}}
                  {\contentslabel{2em}}
                  {}
                  {\titlerule*[0.5pc]{$\cdot$}\contentspage\hspace*{0em}}

    \titlecontents{subsubsection}
                  [8em]
                  {\vspace{2.5mm}}
                  {\contentslabel{3em}}
                    {}
                  {\titlerule*[0.5pc]{$\cdot$}\contentspage\hspace*{0em}}

    \thispagestyle{empty}
    
    \newpage    %第一节

    \section{20220330真题解析桥梁} 
    
%    \setlength{\parskip}{0.6\baselineskip} %设置段落间距
    
    \setcounter{page}{1}
    
%    \begin{spacing}{1.25}
        
    某桥梁工程项目的下部结构已全部完成，受政府指令工期的影响，业主将尚未施工的上部结构分成A、B二个标段，将B段重新招标。桥面宽度17.5m，桥下净空6m，上部结构设计为钢筋混凝土预应力现浇箱梁（三跨一联），共40联。
    
    原施工单位甲公司承担A标段，该标段施工现场系既有废弃公路无需处理，满足支架法施工条件，甲公司按业主要求对原施工组织设计进行了重大变更调整；新中标的乙公司承担B标段，因B标施工现场地处闲置弃土场，地域宽广平坦，满足支架法施工部分条件，其中纵坡变化较大部分为跨越既有正在通行的高架桥段，新建桥下净空高度达13.3m（如图所示）。

    甲、乙两公司接受任务后立即组织力量展开了施工竞赛。甲公同利用既有公路作为支架基础，地基承载力符合要求。乙公司为赶工期，将原地面稍作整平后即展开支架搭设工作，很快进度超过甲公司。支架全部完成后，项目部组织了支架质量检查，并批准模板安装。模板安装完成后开始绑扎钢筋。指挥部检查中发现乙公司施工管理存在问题，下发了停工整改通知单。
    
%    \end{spacing}

    问题

\begin{enumerate} % 阿拉伯数字编号
    
\item 原施工组织设计中主要施工资源配置有重大变更调整，项目部应如何处理？重新开工之前技术负责人和安全负责人应完成什么工作?
\item 满足支架法施工的部分条件指的是什么?
\item B标支架搭设场地是否满足支架的地基承载力?应如何处置?
\item 支架搭设前技术负责人应做好哪些工作?桥下净高13.3m部分如何办理手续?
\item 支架搭设完成和模板安装后用什么方法解决变形问题?支架拼装间隙和地基沉降在桥梁建设中属哪一类变形?
\item 跨越既有高架部分的桥梁施工需到什么部门补充办理手续?

\end{enumerate}

\newpage

    回答\marginnote{基础知识 + 解题思路 }

\begin{enumerate}
    
\item 原施工组织设计中主要施工资源配置有重大变更调整，\marginnote{施工组织设计（变更）审批流程 \\
\\
技术负责人 / 安全技术交底、参与施工组织设计编制、校核 \\
\\
安全负责人 / 参与施工组织设计编制、校核 \\
\\
培训教育施工作业人员}
项目部应如何处理？重新开工之前技术负责人和安全负责人应完成什么工作?

\begin{enumerate}
    
\item 主要资源配置发生重大变更调整后，项名部应执行施工组织设计变更审批流程。\\
项目经理重新组织编制施工组织设计，提交施工单位技术负责人审核签字加盖公章，经总监理工程师审查签认后交由建设公司审核。
\item 重新开工前，项目技术负责人对全体施工人员做书面安全技术交底，留交底人、被交底人和专职安全员签字归档，过程中监督检查持续更新。
\item 安全负责人参与安全技术交底，对作业人员进行安全教育培训，检查安全保障工具。
技术负责人和安全负责人参与施工组织设计中的安全技术方案编制校核工作。

\end{enumerate}

\vspace{0.6em}
    
\item 满足支架法施工的部分条件指的是什么?\marginnote{市政工程施工特点，结合案例背景}

\begin{enumerate}
\item 施工现场地处闲置弃土场，干扰少，材料、工器具进出方便。
\item 地域宽广平坦，作业面大，施工操作方便。
\end{enumerate}

\vspace{0.6em}

\item B 标支架搭设场地是否满足支架的地基承载力?应如何处置?\marginnote{地基：平整坚实+排水良好 \\
    \\
    流程：压实平整 → 验算承载力 → 不满足换填加固 → 预压合格留记录归档 → 防排水 → 混凝土地块或钢板}

\begin{enumerate}
\item 不满足
\item 清理表层、平整场地、填充坑穴，分层碾压密实，校验地基承载力。
\item 如地基承载力不满足要求则换填加固，直至承载力合格。
\item 支架搭设前预压地基，验收合格留记录归档。
\item 支架地基设置防排水设施，冬季设置防冻胀措施。
\item 基础上安装钢板或混凝土垫块，增大支架受力面积。
\end{enumerate}

\end{enumerate}


\newpage


\end{document}

7 条评论收藏感谢

问再提一个关于段落文本高亮显示的问题(利用xeCJKfntef宏包实现效果)

（1）这可能是一个 bug，见：https://github.com/CTeX-org/ctex-kit/issues/530，目前未解决。
（2）容易解决，但同样无法用于 amsmath 的某些环境，而且颜色的高度固定为普通文字那么高。

\documentclass[fontset=windows]{ctexart}
\usepackage{ulem}
\usepackage{xeCJKfntef}
\usepackage{xcolor}
\makeatletter
\newcommand{\hltext}[1]{\CJKunderanyline*{0.5ex}{\color{yellow}\rule{0.1pt}{2.5ex}}{#1}}
\newcommand\hlmath[1]{\mathpalette{\hlmath@aux}{#1}}
\def\hlmath@aux#1#2{\hbox{\hltext{\m@th$#1#2$}}}
\newcommand*\hl{\ifmmode\expandafter\hlmath\else\expandafter\hltext\fi}
\makeatother
\begin{document}
一般地，设$A$，$B$是两个非空数集，\hl{如果按某种对应关系{ }$f$，对于集合~$A$中的任意一
个数~$x$，在集合~$B$中都有唯一的数~$\displaystyle\int f(x)$和它对应}，那么就称$f$为集合$A$到集
合$B$的一个函数，记作
\[ \hl{y=\int f(x),x\in A.}\quad f_{\hl{x}} \]
\end{document}

1 条评论收藏感谢

问重新提问关于段落文本高亮显示的问题

（1）添加 \leavevmode。（2）没办法。（3）模拟 amsmath 宏包的 \boxed。
这种东西不适合用 LaTeX 制作。

缺陷：数学公式不能跨行，align 等对齐环境下存在问题，文字不能分页等问题。

\documentclass[fontset=windows]{ctexart}
\usepackage{amsmath,mathtools}
\usepackage{color}
\usepackage{linegoal}
\newbox\HighlightPiece 
\newdimen\FirstHeight
\newdimen\FirstDepth
\newdimen\LastHeight
\newdimen\LastDepth
\newdimen\TotalHeight
\newdimen\TotalDepth
\newdimen\LineIndent
\newdimen\LineGoal

\newif\ifOnePiece

\makeatletter
\newcommand\HLGetDimensions {% 
  \setbox\HighlightPiece\lastbox
  \unskip\unpenalty
  \ifdim\wd\HighlightPiece<\linewidth
  \global\OnePiecetrue
  \else
  \global\OnePiecefalse
  \fi 
  \ifOnePiece
  \else
  \global\LastHeight\ht\HighlightPiece
  \global\LastDepth\dp\HighlightPiece
  \loop % 
  \setbox\HighlightPiece\lastbox
  \unskip\unpenalty
  \ifvoid\HighlightPiece\else
  \ifdim\wd\HighlightPiece<\linewidth
   \global\FirstHeight\ht\HighlightPiece
   \global\FirstDepth\dp\HighlightPiece
  \fi
  \repeat
 \fi
}
\newcommand\Highlighttext [2][yellow]
 {%
   \leavevmode
   \LineGoal\linegoal   % http://ctan.org/pkg/linegoal
   \LineIndent=\dimexpr\linewidth-\LineGoal\relax
   \vbox{%
   \hfuzz\maxdimen
   \hangindent\LineIndent
   \hangafter\m@ne
   \noindent  #2\endgraf 
   \HLGetDimensions
   }%
   \ifOnePiece
     \begingroup \fboxsep\z@
     \colorbox{#1}{#2}%
     \endgroup
   \else
     \setbox\z@\vbox{%
      \hfuzz\maxdimen
      \hangindent\LineIndent
      \hangafter\m@ne
      \noindent #2\endgraf }%
  \TotalHeight\ht\z@
  \TotalDepth\dp\z@
  \advance\TotalHeight\TotalDepth
  \advance\TotalHeight-\FirstHeight
  \advance\TotalHeight-\FirstDepth
  \begingroup % et pas \color@begingroup, cf plus bas!
    \color{#1}%
    \rlap{\hbox{\vrule\@height\FirstHeight
        \@depth\FirstDepth
        \@width\LineGoal
}}%
    \setbox\z@\vbox{\moveleft\LineIndent
        \hbox{\vrule
        \@height\TotalHeight
        \@depth\z@
        \@width\linewidth
}}%
  \ht\z@\z@\dp\z@-\FirstDepth\wd\z@\z@
  \lower\FirstDepth\box\z@
  \endgroup % \color@endgroup fait basculer en mode vertical!!
   \mbox{}#2%
  \LineGoal\linegoal
  \rlap{\hbox{\begingroup\color{white}%
      \vrule\@height\LastHeight
         \@depth\LastDepth
         \@width\dimexpr\LineGoal+1pt\relax
      \endgroup}}% this 1pt could be a user hook dimen.
   \fi
}%
\newcommand\Highlight@dmath[2][yellow]{{\fboxsep=0pt\fboxrule=0pt\fcolorbox{#1}{#1}{\m@th$\displaystyle#2$}}}
\newcommand\Highlight{\ifmmode\expandafter\Highlight@dmath
  \else\expandafter\Highlighttext\fi}
\makeatother


\begin{document}

\Highlight{文字文字文字文字文字文字文字文文字文字文字文文字文字文字文字文字文字文，}文字文文字文

\Highlight{测试测试测试测$f(x)$试测试测试测试测试}测试
\[
\Highlight{\int f(x),x\in A}
\]

\begin{align}
a&=b \\
c&=d \\
k&=\Highlight{\int_a^c dx} \\
\Aboxed{k&=\int_a^c dx}
\end{align}

\end{document}

1 条评论收藏感谢

问使用双栏排版的一些问题

如果通栏的内容无需分页，使用 cuted 宏包提供的 strip 环境即可：

\documentclass[twocolumn]{ctexart}
\usepackage[margin = 1cm]{geometry}
\usepackage[most]{tcolorbox}
\usepackage{lipsum}

\usepackage{cuted}

\begin{document}
\lipsum[2]

%\onecolumn

\stripsep=-10pt plus12pt minus 2pt
\begin{strip}
\begin{center}
  \begin{tcolorbox}[width = 0.9\linewidth, colframe=black,boxrule = 0.5pt, colback = white,left = 1pt,top = 1pt,bottom = 1pt,right = 1pt]
    \lipsum[1]
  \end{tcolorbox}
\end{center}
\end{strip}
\leavevmode %如果后面没有文字，必须使用，否则可能出错
\end{document}

如果要分页，则只能使用 multicol 宏包，浮动体使用 H，或者带星号的 figure* 等，目前没有其它办法。

0 条评论收藏感谢

问关于利用lineno宏包实现“笔记本段落下划线”的一个问题

不难实现，只需：

\renewcommand*\@LN@depthbox{%
  \dp\@tempboxa=\@tempdima
  \nointerlineskip \box\@tempboxa \kern-\@tempdima}

实际上原来的这个命令正是为了行号能对齐基线的。

为了显示效果，你可能还需要改改 \rule 的移动距离和 \lineskip：

\renewcommand\makeLineNumber
  {%\tikz[remember picture,overlay,baseline=0.3em]
   % \draw[red!20] (0,0em) -- (\textwidth,0em);
    \mbox{\rule[-0.2em]{\textwidth}{0.2pt}}
  }
\AtBeginDocument{%
  \lineskiplimit=4pt
  \lineskip=8pt
}

完整代码：

\documentclass{ctexart}
\usepackage{mathtools}
\usepackage[mathlines,displaymath]{lineno}
\usepackage{tikz}

\usepackage{zhlipsum}

\usepackage{etoolbox}        
%% Patch 'normal' math environments:
\newcommand*\linenomathpatch[1]{%
  \cspreto{#1}{\linenomath}%
  \cspreto{#1*}{\linenomath}%
  \csappto{end#1}{\endlinenomath}%
  \csappto{end#1*}{\endlinenomath}%
}
%% Patch AMS math environments:
\newcommand*\linenomathpatchAMS[1]{%
  \cspreto{#1}{\linenomathAMS}%
  \cspreto{#1*}{\linenomathAMS}%
  \csappto{end#1}{\endlinenomath}%
  \csappto{end#1*}{\endlinenomath}%
}

%% Definition of \linenomathAMS depends on whether the mathlines option is provided
\expandafter\ifx\linenomath\linenomathWithnumbers
  \let\linenomathAMS\linenomathWithnumbers
  %% The following line gets rid of an extra line numbers at the bottom:
  \patchcmd\linenomathAMS{\advance\postdisplaypenalty\linenopenalty}{}{}{}
\else
  \let\linenomathAMS\linenomathNonumbers
\fi

\linenomathpatch{equation}
\linenomathpatchAMS{gather}
\linenomathpatchAMS{multline}
\linenomathpatchAMS{align}
\linenomathpatchAMS{alignat}
\linenomathpatchAMS{flalign}

% Disable line numbering during measurement step of multline
\makeatletter
\patchcmd{\mmeasure@}{\measuring@true}{
  \measuring@true
  \ifnum-\linenopenaltypar>\interdisplaylinepenalty
    \advance\interdisplaylinepenalty-\linenopenalty
  \fi
  }{}{}
\def\@LN@depthbox{%
  \dp\@tempboxa=\@tempdima
  \nointerlineskip \box\@tempboxa \kern-\@tempdima}
\renewcommand\makeLineNumber
  {%\tikz[remember picture,overlay,baseline=0.3em]
   % \draw[red!20] (0,0em) -- (\textwidth,0em);
    \mbox{\rule[-0.2em]{\textwidth}{0.2pt}}
  }
\AtBeginDocument{
\lineskiplimit=4pt
\lineskip=8pt
}
\makeatother
\begin{document}

\linenumbers
文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字
文字文字文字文字文字文字文字文$\dfrac{1}{2}$文字文字文
文字文字文字文字文字文字文字文字文字文字文文
%\begin{linenomath}
\begin{align}
a+b\\
\int c+d
\end{align}
%\end{linenomath}
字文字文字文字文字文字文字文字文字
$\begin{dcases}
  a+b\\ f+r\\ go
\end{dcases}$
\begin{enumerate}
  \item 测试测试测试测试测试测试测试测试$\displaystyle\int$
  \item 测试测试测试测试测试测试测试测试
\end{enumerate}
行间公式块
\[
\begin{dcases}
x\\
-x
\end{dcases}
\]
文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本文本
%\nolinenumbers
\end{document}

通过修改 \@LN@depthbox 中的 \kern，你可以将行号放置于任意处。
比如：

\def\@LN@depthbox{%
  \dp\@tempboxa=\@tempdima
  \nointerlineskip \kern-.3\@tempdima \box\@tempboxa \kern-.7\@tempdima}

2 条评论收藏感谢

问 wrapfig插图的一个问题

这是由于你用了 \mbox{} 制造了一个空行。行间距为 \baselineskip。设置 before=\vspace{-\baselineskip} 即可。

\documentclass{ctexart}
\usepackage{graphicx}
\usepackage{caption}
\usepackage{enumitem}
\usepackage{enumitem}
\setenumerate[1]{label={\sf\arabic*}.,labelwidth=1em,labelsep=0.2em,leftmargin=*,itemsep=0pt,partopsep=0pt,parsep=\parskip,topsep=0pt}
\usepackage{wrapfig2}
\begin{document}
测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试
\WFclear
\begin{wrapfigure}[7]{r}
\includegraphics[scale=0.3]{example-image-a}
\end{wrapfigure}
\mbox{}
\begin{enumerate}[before=\vspace{-\baselineskip}]
\item 字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文
\item 字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字文字
\end{enumerate}
\end{document}

1 条评论收藏感谢

问关于利用changepage宏包实现悬挂缩进的两个问题

与缩进相关的环境和命令基本上都是使用 trivlist 和 list 环境（list 也使用 trivlist 环境）制作的。包括但不限于 theorem、changepage 宏包、itemize、description 等。你用 changepage，自定义环境等还不如直接使用 list 环境来定义，而且 list 环境已经给你做好了嵌套使用所需的准备工作。

而 trivlist 和 list 环境使用 \hangindent、\hangafter 等 primitive 来制作，这意味着由它们定义的环境和命令无法与其它使用 \hangindent、\hangafter、\parshape primitive 定义的环境和命令共同使用，包括但不限于图文绕排、lettrine（首字下沉）等。这是 LaTeX 固有的缺陷。要么不同时使用，要么用 ConTeXt。

回到这个问题上来，adjustwidth 环境不是默认从新的一行开始，而是只能从新的一行开始，所有的 trivlist 环境都是如此，根本原因是上述 primitive 只能从新的一行或一段开始生效。

在只包含正常文字的情况下，两基线间的距离为 \baselineskip。

你可以把文字放在一个盒子中，以测量其长度，或者使用 \settowidth{dim register}{content}。

如下代码支持 text\hang{...\hang{...}...}，基本实现了原始需要，但是，编译次数至少为：嵌套次数+1。比如上述 \hang 中嵌套了一个 \hang，需要至少编译 3 次。不支持多栏。

若要在任意位置开始，需显示地给出 \indentstart 以标明起始位置，见最后一例。

\documentclass{ctexart}
\usepackage[a4paper,includeheadfoot,margin=1.98cm]{geometry}

\usepackage{changepage}
\usepackage{zref,zref-savepos,zref-abspos}
\makeatletter
\newdimen\@autoindentsuppshift
\newdimen\@autoindenttrueyshift
\newdimen\@autoindentxshift
\newdimen\@autoindentyshift
\newcount\@autoindentdepth
\newcount\@autoindentcount
\zref@newlist{autoindent@info}
\zref@newprop{lastyshift}[0pt]{0pt}
\zref@newprop{yshift}[0pt]{0pt}
\zref@addprops{autoindent@info}{lastyshift,yshift}
% \def\@autoindent@strut{\hb@xt@\z@{\hss
%   \vrule\@width\z@\@depth\dimexpr -\zref@getcurrent{yshift}+\f@size\p@\relax}}
\def\@autoindent@strut{}
\def\indentstart{\leavevmode
  \@namedef{autoindent@record@\the\numexpr\@autoindentcount+1}{}%
  \zsavepos{autoindent@labelpos@\the\numexpr\@autoindentcount+1@0}}
\def\@autoindent@startposx{\zref@ifrefundefined
  {autoindent@labelpos@\the\@autoindentcount @0}
  {\zref@absposx{\@autoindent@label}{body}{left}}
  {\zposx{autoindent@labelpos@\the\@autoindentcount @0}}}
\def\@autoindent@info{autoindent@info@\the\@autoindentcount @\the\@autoindentdepth}
\def\@autoindent@hang{autoindent@hangpos@\the\@autoindentcount @\the\@autoindentdepth}
\def\@autoindent@label{autoindent@labelpos@\the\@autoindentcount @\the\@autoindentdepth}
\def\@autoindent@savelabelpos{\advance\@autoindentdepth\@ne
  \zsavepos{\@autoindent@label}}
\def\@autoindent@savehangpos{\zsavepos{\@autoindent@hang}}
\def\@autoindent@labelposx{\zposx{\@autoindent@label}}
\def\@autoindent@labelposy{\zposy{\@autoindent@label}}
\def\@autoindent@hangposx{\zposx{\@autoindent@hang}}
\def\@autoindent@hangposy{\zposy{\@autoindent@hang}}

\newenvironment{autoindent}
  {\ifdim\@autoindentsuppshift=\z@ \global\advance\@autoindentcount\@ne\fi 
    \@autoindent@savelabelpos \leavevmode 
    \setlength\@autoindentxshift{\dimexpr
      \@autoindent@labelposx sp -
      \@autoindent@startposx sp - 
      \@autoindentsuppshift}%
    \advance\@autoindentsuppshift\@autoindentxshift
    \ifnum\zref@extract{\@autoindent@label}{abspage}
      =\zref@extract{\@autoindent@hang}{abspage}
      \setlength\@autoindentyshift{\dimexpr
        \@autoindent@hangposy sp - \@autoindent@labelposy sp}%
      \ifdim\@autoindentyshift=\z@ 
        \ifdim\@autoindent@hangposy sp>\z@ 
          \zref@ifrefundefined{\@autoindent@info}
            {\zref@setcurrent{yshift}{0pt}}
            {\ifdim\zref@extract{\@autoindent@info}{yshift}=\z@ 
                \zref@setcurrent{yshift}{\the\dimexpr
                  \zref@extract{\@autoindent@info}{lastyshift}}%
              \else
                \zref@setcurrent{yshift}{\the\dimexpr
                  \zref@extract{\@autoindent@info}{yshift}}%
              \fi}
        \else 
          \zref@setcurrent{yshift}{0pt}%
        \fi 
      \else
        \ifdim\zref@extract{\@autoindent@info}{lastyshift}=\@autoindentyshift
          \ifdim\zref@extract{\@autoindent@info}{lastyshift}=
            \zref@extract{\@autoindent@info}{yshift}
            \zref@setcurrent{yshift}{\the\dimexpr\@autoindentyshift}
          \else
            \zref@setcurrent{yshift}{\the\dimexpr
              \zref@extract{\@autoindent@info}{lastyshift}+
              \zref@extract{\@autoindent@info}{yshift}}%
          \fi
        \else 
          \zref@setcurrent{yshift}{\the\dimexpr\@autoindentyshift}%
        \fi
      \fi 
    \else 
      \zref@setcurrent{yshift}{0pt}%
    \fi
    \zref@setcurrent{lastyshift}{\zref@extract{\@autoindent@info}{yshift}}%
    \zref@labelbylist{\@autoindent@info}{autoindent@info}%
    \setlength\@autoindenttrueyshift{\zref@getcurrent{yshift}}%
    \vspace*{\@autoindenttrueyshift}%
    \begin{adjustwidth}{\@autoindentxshift}{\z@}\leavevmode
      \@autoindent@savehangpos \@autoindent@strut \ignorespaces}
  {\end{adjustwidth}}
\newcommand\hang[1]{\begin{autoindent}#1\end{autoindent}}


\newenvironment{autoindent*}[1]{\leavevmode\setbox0\hbox{#1}%
  \ifnum\@autoindentdepth=\z@ \setlength\@autoindentxshift{\dimexpr\parindent+\wd0}%
  \else \setlength\@autoindentxshift{\wd0}%
  \fi
  \setlength\@autoindentyshift{-\baselineskip}%
  \advance\@autoindentdepth\@ne
  \unhbox0
  \nobreak\vspace*{\@autoindentyshift}%
  \begin{adjustwidth}{\@autoindentxshift}{0pt}\ignorespaces}
 {\end{adjustwidth}}

\makeatletter

\begin{document}

\begin{autoindent*}{第一层}
试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试\\
\begin{autoindent*}{第二层}
试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试\\
\begin{autoindent*}{第三层}
试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试
\end{autoindent*}
\end{autoindent*}
\end{autoindent*}

第一层\begin{autoindent}
试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测测试测试测试测试测%
\begin{autoindent}
试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试%
\begin{autoindent}
试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试%
\end{autoindent}
\end{autoindent}
\end{autoindent}

第一层\hang{试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测测试测试测试测试测\hang{试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试\hang{试测试测试测试测试测试测试测试测试测试测试测试测试\hang{测试试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测}}}}

测试 $\displaystyle\int_{\sum}^{\prod}$ 测试\hang{试测试 $\displaystyle\int_{\sum}^{\prod}$ 测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测 $\displaystyle\int_{\sum}^{\prod}$ 试测\hang{试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试}}

\begin{center}
\begin{minipage}{.8\textwidth}
\indentstart 第一层\hang{试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测测试测试测试测试测\hang{试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试测试\hang{试测试测试测试测试测试测试测试测试测试测试测试测试}}}
\end{minipage}
\end{center}

\end{document}

8 条评论收藏感谢

问如何用tiltleps宏包制作字典页眉

核心功能是标记在页眉处出现的项。

\protected\def\markcontext#1#2{%
  \begingroup
    \let\label\relax \let\index\relax \let\glossary\relax
    \unrestored@protected@xdef\@themark {#2}%
    \@temptokena \expandafter{\@themark}%
    \marks#1{\the\@temptokena}%
  \endgroup
  \if@nobreak\ifvmode\nobreak\fi\fi}

\ExplSyntaxOn
\cs_new:Npn \@removetl #1#2 { \tl_range:Nnn #1 { \tl_count:o {#2} + 1 }{ -1 } }
\ExplSyntaxOff

\def\@headtext{}
\newmarks\@headmark
\newmarks\@pinyinmark
\providecommand\lettrine[3][]{\textbf{#2}#3}
\protected\def\dictitem#1#2{\lettrine{#1}{[#2]}\g@addto@macro\@headtext{{#1}}%
  \markcontext\@headmark{\@headtext}%
  \markcontext\@pinyinmark{#2}}

\def\@headoddleft{\thepage\quad
  \botmarks\@headmark\quad
  \firstmarks\@pinyinmark --\botmarks\@pinyinmark
  \xdef\@headtext{\@removetl\@headtext{\botmarks\@headmark}}}
\def\@headevenright{\botmarks\@headmark\quad
  \firstmarks\@pinyinmark --\botmarks\@pinyinmark
  \quad\thepage
  \xdef\@headtext{\@removetl\@headtext{\botmarks\@headmark}}}

这一部分无需加载任何宏包。

这里定义了一个 \@removetl，目的是当存储的页眉项与真正出现在页眉中的项不同时，需要保存未真正出现在页眉中的项，否则下一页页眉将损失这些项。

之所以会出现存储的页眉项与真正出现在页眉中的项不同的情况，是因为 TeX 在 shipout 之前就已经执行了存储功能的那部分宏，此时 TeX 还未决定哪些内容输出至当前页。

至于使用 titleps 还是 fancyhdr 是无关紧要的。

\documentclass[twoside]{article}

\makeatletter
\protected\def\markcontext#1#2{%
  \begingroup
    \let\label\relax \let\index\relax \let\glossary\relax
    \unrestored@protected@xdef\@themark {#2}%
    \@temptokena \expandafter{\@themark}%
    \marks#1{\the\@temptokena}%
  \endgroup
  \if@nobreak\ifvmode\nobreak\fi\fi}

\ExplSyntaxOn
\cs_new:Npn \@removetl #1#2 { \tl_range:Nnn #1 { \tl_count:o {#2} + 1 }{ -1 } }
\ExplSyntaxOff

\def\@headtext{}
\newmarks\@headmark
\newmarks\@pinyinmark
\providecommand\lettrine[3][]{\textbf{#2}#3}
\protected\def\dictitem#1#2{\lettrine{#1}{[#2]}\g@addto@macro\@headtext{{#1}}%
  \markcontext\@headmark{\@headtext}%
  \markcontext\@pinyinmark{#2}}

\def\@headoddleft{\thepage\quad
  \botmarks\@headmark\quad
  \firstmarks\@pinyinmark --\botmarks\@pinyinmark
  \xdef\@headtext{\@removetl\@headtext{\botmarks\@headmark}}}
\def\@headevenright{\botmarks\@headmark\quad
  \firstmarks\@pinyinmark --\botmarks\@pinyinmark
  \quad\thepage
  \xdef\@headtext{\@removetl\@headtext{\botmarks\@headmark}}}

\usepackage{ctex}
\usepackage{xpinyin}
\usepackage[a5paper,includeheadfoot,margin=1cm,headsep=10pt]{geometry}
\usepackage{lettrine}
\usepackage{zhlipsum}


%% titleps
\usepackage{titleps}
\newpagestyle{dict}{
  \setheadrule{0.4pt}
  \sethead[][][\@headevenright]{\@headoddleft}{}{}
  \setfoot{}{}{}}

%% fancyhdr
%\usepackage{fancyhdr}
%\fancypagestyle{dict}{
%  \def\headrulewidth{0.4pt}
%  \fancyfoot{}
%  \fancyhead[OL]{\@headoddleft}
%  \fancyhead[ER]{\@headevenright}}

\makeatother

\pagestyle{dict}

\begin{document}

\dictitem{哥}{\pinyin{ge1}}\zhlipsum[3][name=zhufu]

\dictitem{歌}{\pinyin{ge1}}\zhlipsum[6][name=zhufu]

\dictitem{割}{\pinyin{ge1}}\zhlipsum[8][name=zhufu]

\dictitem{革}{\pinyin{ge2}}\zhlipsum[9][name=zhufu]

\dictitem{愅}{\pinyin{ge2}}\zhlipsum[12][name=zhufu]

\dictitem{鞈}{\pinyin{ge2}}\zhlipsum[14][name=zhufu]

\dictitem{閤}{\pinyin{ge2}}\zhlipsum[14][name=zhufu]

\dictitem{蛤}{\pinyin{ge2}}\zhlipsum[15][name=zhufu]

\dictitem{韐}{\pinyin{ge2}}\zhlipsum[16][name=zhufu]

\dictitem{阁}{\pinyin{ge2}}\zhlipsum[8][name=zhufu]

\dictitem{格}{\pinyin{ge2}}\zhlipsum[10][name=zhufu]

\end{document}

4 条评论收藏感谢

问升级texlive2022后，标题字体改变的问题

问请问为什么目录中参考文献与致谢的超链接跳转错误

问关于jiazhu宏包竖排时折行的夹注丢失一部分的问题

问关于jiazhu宏包的一个问题

问关于node竖排文字的两个问题

问关于中文竖排文本的三个问题

问关于dashrule宏包画虚线的一个问题

问 enumerate 嵌套列表使用求助?

问再提一个关于段落文本高亮显示的问题(利用xeCJKfntef宏包实现效果)

问重新提问关于段落文本高亮显示的问题

问使用双栏排版的一些问题

问关于利用lineno宏包实现“笔记本段落下划线”的一个问题

问 wrapfig插图的一个问题

问关于利用changepage宏包实现悬挂缩进的两个问题

问如何用tiltleps宏包制作字典页眉

会员统计