Return to Question

Inspired by Paulo Cereda's question here, I would like to draw tally marks using PSTricks (or TikZ, if no one can help with PSTricks).

Inspired by Paulo Cereda's question here, I would like to draw tally marks using PSTricks (or TikZ, if no one can help with PSTricks).

Inspired by Herbert idea, here is an attempt to use PSTricks.

Inspired by Herbert's idea, here is an attempt to use PSTricks.

Update 3

\documentclass{article} \usepackage{pstricks-add} \newcommand*{\tallymarksOne}{\pslineByHand(0,0)(0,1)} \newcommand*{\tallymarksTwo}{% \tallymarksOne% \pslineByHand(2pt,0)(2pt,1)} \newcommand*{\tallymarksThree}{% \tallymarksTwo% \pslineByHand(4pt,0)(4pt,1)} \newcommand*{\tallymarksFour}{% \tallymarksThree \pslineByHand(6pt,0)(6pt,1)} \newcommand*{\tallymarksFive}{% \tallymarksFour% \pslineByHand(8pt,0)(8pt,1)% \pslineByHand(-17pt,0)(9pt,1)} \newcounter{TallyTemp} \def\tallymark#1{% \setcounter{TallyTemp}{#1}% \ifnum#1>4 \tallymarksFive\kern14pt \addtocounter{TallyTemp}{-4}% \else% \ifcase#1\or \tallymarksOne\kern3pt \addtocounter{TallyTemp}{-1}\or \tallymarksTwo\kern6pt \addtocounter{TallyTemp}{-2}\or \tallymarksThree\kern9pt \addtocounter{TallyTemp}{-3}\or \tallymarksFour\kern12pt \addtocounter{TallyTemp}{-4} \fi% \fi% \ifnum\theTallyTemp>0 \expandafter\tallymark\expandafter{\theTallyTemp}\fi \vspace{1cm} } \begin{document} \tallymark{0}\par \tallymark{1}\par \tallymark{2}\par \tallymark{3}\par \tallymark{4}\par \tallymark{5}\par \tallymark{14} \end{document}