Skip to content
Snippets Groups Projects
Select Git revision
  • e493487e426f341b300ac0dd6c9c25d281254df9
  • master default protected
  • develop
  • feature/virtual
  • feature/slides
  • feature/poetry
6 results

suckless.mdwn

Blame
  • magic.sty 9.17 KiB
    % 
    %  __  __             _      
    % |  \/  | __ _  __ _(_) ___ 
    % | |\/| |/ _` |/ _` | |/ __|
    % | |  | | (_| | (_| | | (__ 
    % |_|  |_|\__,_|\__, |_|\___|
    %               |___/        
    
    \makeindex[name=talismans,title={Talisman Summaries},columns=2]
    
    % Some spells inflict X fatigue, where X is the spell level plus 2.
    \newcounter{spellCost}
      \setcounter{spellCost}{1}
    \newcounter{spellPlusOne}
      \setcounter{spellPlusOne}{1}
    \newcounter{spellPlusTwo}
      \setcounter{spellPlusTwo}{1}
    \newcounter{spellPlusThree}
      \setcounter{spellPlusThree}{1}
    \newcounter{castingBonus}
      \setcounter{castingBonus}{1}
    
    \newcommand\spellName{}
    \newcommand\spellEnhancements{}
    \newcommand\spellAction{}
    \newcommand\spellSphere{}
    \newcommand\spellResistance{}
    \newcommand\spellSum{}
    \newcommand\spellNotes{}
    
    \newcounter{spellTargets}
    \setcounter{spellTargets}{1}
    
    \newcommand\showOnset{%
      \ifcase\value{spellCost}\relax%
      Error%
      \or%
      Error%
      \or%
      \gls{interval}%
      \or%
      day%
      \or%
      week%
      \or%
      season%
      \else%
      \gls{cycle}%
      \fi%
    }
    
    \newcommand\spellRange{}
    \newcommand\setRange{%
      \iftoggle{Distant}%
        {%
          \ifcase\value{spellCost}\relax%
          \renewcommand\spellRange{Error}%
          \or%
          \renewcommand\spellRange{Error}%
          \or%
            \renewcommand\spellRange{greeting distance}%
          \or%
            \renewcommand\spellRange{yelling distance}%
          \or%
            \renewcommand\spellRange{an arrow's reach}%
          \or%
            \renewcommand\spellRange{walking distance}%
          \else%
            \renewcommand\spellRange{the horizon}%
          \fi%
        }%
        {%
          \setcounter{track}{24}%
          \Repeat{\arabic{spellCost}}{\addtocounter{track}{-4}}%
          \ifnum\value{track}<1%
            \renewcommand\spellRange{touch}%
          \else%
            \renewcommand\spellRange{\arabic{track}~steps}%
          \fi%
        }%
    }
    
    
    %%%
    
    \newtoggle{fullSpells}
      \settoggle{fullSpells}{true}
    \newtoggle{talisman}
      \settoggle{talisman}{false}
    \newtoggle{insubstantial}
      \settoggle{insubstantial}{false}
    \newtoggle{Devious}
      \settoggle{Devious}{false}
    \newtoggle{Distant}
      \settoggle{Distant}{false}
    \newtoggle{Duplicated}
      \settoggle{Duplicated}{false}
    \newtoggle{opposedSpell}
      \settoggle{opposedSpell}{false}
    
    
    \newcommand\calcSpell[7]{%
      \renewcommand\spellName{#1}%
      \setcounter{spellCost}{1}%
      \setcounter{spellTargets}{1}%
      \togglefalse{Devious}%
      \togglefalse{Distant}%
      \togglefalse{Duplicated}%
      \foreach \d in {#2}{%
        \ifdefstring{\d}{Devious}{\global\toggletrue{Devious}}{}%
        \ifdefstring{\d}{Distant}{\global\toggletrue{Distant}}{}%
        \ifdefstring{\d}{Duplicated}{\global\toggletrue{Duplicated}}{}%
        \stepcounter{spellCost}%
      }%
      \setcounter{spellPlusOne}{\value{spellCost}}%
        \addtocounter{spellPlusOne}{1}%
      \setcounter{spellPlusTwo}{\value{spellCost}}%
        \addtocounter{spellPlusTwo}{2}%
      \setcounter{spellPlusThree}{\value{spellCost}}%
        \addtocounter{spellPlusThree}{3}%
      \conDmg{spellPlusTwo}%
      \ifstrequal{#2}{}{\renewcommand\spellEnhancements{}}{\renewcommand\spellEnhancements{#2,\space}}%
      \renewcommand\spellAction{#3}%
      \renewcommand\spellSphere{#4}%
      % What bonus does the caster receive?  Some spells will display the caster's current Bonus, so we must calculate it.  We start by setting it sky-high, then for each element in {Earth,Fire}, et c. we check if this is lower than the current castingBonus, if (if so), lower the bonus.
      \setcounter{castingBonus}{10}%
      \foreach \e in {#4}{%
        \ifnum\value{\e}<\value{castingBonus}%
          \setcounter{castingBonus}{\value{\e}}%
        \fi%
      }{}%
      \iftoggle{snapCaster}{%
        \addtocounter{castingBonus}{\value{Wits}}%
      }{%
        \addtocounter{castingBonus}{\value{Charisma}}%
      }%
      \renewcommand\spellResistance{#5}%
      \ifdefmacro{#5}{\toggletrue{opposedSpell}}{\togglefalse{opposedSpell}}%
      \renewcommand\spellSum{#6}%
      \renewcommand\spellNotes{#7}%
      \setRange%
      \iftoggle{Duplicated}{%
        \foreach \i in {1,...,\arabic{spellCost}}%
          {\multiply\value{spellTargets} by \value{spellCost}\addtocounter{spellTargets}{0}}%
      }{}%
      \iftoggle{talisman}{%
        \index[talismans]{\textbf{#1} (\spellEnhancements\ \spellAction~\spellSphere) Range: \spellRange, \ifnumcomp{\value{spellTargets}}{>}{1}{Area: \arabic{spellTargets}, }{} \iftoggle{Devious}{Onset:~1~\showOnset, }{} Resisted by: \detokenize{#5}, Bonus: \arabic{spellCost}. \spellSum|adfclosedflourishleft~p.~}%
      }{%
        \index[spells]{\textbf{#1} {\sffamily (\spellEnhancements \spellAction~\spellSphere)} \textit{Cost:~\arabic{spellCost}, Range: \spellRange, \ifnumcomp{\value{spellTargets}}{>}{1}{Area: \arabic{spellTargets}, }{} \iftoggle{Devious}{Onset:~1~\showOnset, }{} Resisted by: \detokenize{#5}.} \spellSum|adfclosedflourishleft~p.~}%
      }%
    }
    
    \newcommand\fullSpell{%
      \noindent%
      \begin{tabularx}{\linewidth}{m{.28\linewidth}X}
      \hiderowcolors
      \raggedright
      \textbf{\titleFont\large\spellName}
      \iftoggle{examplecharacter}{}{\par\footnotesize\hint{\spellEnhancements\ \spellAction}}
      \label{\spellName}
      &
        \small
        \textbf{\scshape Requirements:}
        \spellSphere~\arabic{spellCost}
    
        \textbf{\scshape Resisted~by:}
        \spellResistance
    
        \textbf{\scshape Range:}
        \spellRange%
        \ifnumcomp{\value{spellTargets}}{>}{1}{
          \par
          \textbf{\scshape Area:}
          \arabic{spellTargets}%
        }{}
        \iftoggle{Devious}{%
          \par
          \textbf{\scshape Onset Time:}
          1~\showOnset%
        }{}
      \\
      \end{tabularx}
      \par%
      \nobreak%
      \noindent%
      \spellSum.
      \spellNotes
      \vspace{\baselineskip}
    }
    
    \newcommand\shortSpell{%
      \item[\spellName]
      \textit{\spellSum}.
    
      Spend \arabic{spellCost}~\glsentrytext{mp},
      \iftoggle{opposedSpell}{%
        \addtocounter{castingBonus}{7}%
        \ifnum\value{spellTargets}>1\glspl{pc} resist \else target \gls{pc} resists\fi\  with \spellResistance~(\tn[\arabic{castingBonus}])%
      }{%
        \name\ rolls with \absNum{castingBonus} (\gls{tn} set by \spellResistance)%
      }. %
      \textbf{Range:}~\spellRange,
      \ifnum\value{spellTargets}>1%
        \textbf{Area:}~\arabic{spellTargets},
      \fi%
      \iftoggle{Devious}{%
        \textbf{Onset:} 1~\showOnset%
      }{}%
    }
    
    \newcommand\spell[7]{%
      \togglefalse{talisman}%
      \stepcounter{enc}%
      \calcSpell{#1}{#2}{#3}{#4}{#5}{#6}{#7}%
      \iftoggle{fullSpells}{%
        \fullSpell%
      }{%
        \shortSpell%
      }%
    }
    
    \newcommand\showStdSpells[1][]{
      \ifnum\value{noAppearing}>1\renewcommand\name{caster}\fi% We don't want to display "3 elves rolls with +3 to do X"
      \setcounter{enc}{0}
      \setHighSpheres
      \needspace{2em}
      \begin{center}%
      \needspace{4em}
      \textcolor{\pageSideColor}{\large\Pentagram} \textbf{Spells} \textcolor{\pageSideColor}{\large\Pentagram}
      \end{center}%
      \begin{description}
        \settoggle{fullSpells}{false}
        #1
        \foreach \n in {4,3,2,1}{
          \foreach \s in {Light,Death,Life,Mind,Force,Earth,Air,Fire,Water,Fate}{
            \ifnumcomp{\value{\s}}{=}{\n}{
              \ifnum\value{enc}<3
                \input{config/spells/\s\n.tex}
              \fi
            }{}
          }
        }%
      \nobreak
      \textcolor{\pageSideColor}{\hrulefill\raisebox{-3pt}{\npcsymbol}}
      \end{description}
    }
    
    \newcommand\showSpells[1]{
      \settoggle{fullSpells}{true}%
      \foreach \s in {#1}{%
        \input{config/spells/\s.tex}%
      }%
    }
    
    \newcommand\showTalisman{
      \iftoggle{creatureBox}{%
        \spellName\ talisman%
        \setcounter{track}{\value{treasure}}%
      }{%
        \vspace{1em}
        \noindent
        \begin{minipage}{\linewidth}
        \paragraph{\adforn{25}~\spellName~\adforn{53}}%
        \spellSum.
        \spellNotes
        \par
        \noindent
        {\it(\iftoggle{opposedSpell}{%
          \addtocounter{castingBonus}{7}%
          Resisted by: \spellResistance\ (\tn[\arabic{castingBonus}]), %
        }{%
          Roll: \absNum{castingBonus}, \gls{tn} set by \spellResistance, %
        }%
        Range: \spellRange%
        \ifnum\value{spellTargets}>1%
          , Area of Effect:~\arabic{spellTargets}
        \else%
        \fi)}
        \end{minipage}
      }%
    }
    
    \newcommand\talisman[7]{%
      \toggletrue{talisman}%
      \setcounter{Charisma}{0}%
      \calcSpell{#1}{#2}{#3}{#4}{#5}{#6}{#7}%
      \setcounter{castingBonus}{\value{spellCost}}%
      \setcounter{Charisma}{\value{attackXPtotal}}% Return Charisma to old value
    }
    
    \newcommand\explainTalisman{%
      \setcounter{treasure}{\value{track}}%
      \lootMagic%
    }
    
    \newcommand\artefact[9][3]{
      \renewcommand\npcsymbol{\E}
      \settoggle{fullSpells}{false}
      \clean
      \foreach \s in {Air, Fire, Earth, Water, Fate}%
        {\setcounter{\s}{0}}
      \setcounter{Intelligence}{#4}
      \setcounter{Wits}{#5}
      \setcounter{Charisma}{#6}
      #9
      \ifglsentryexists{#2}{
        \paragraph{\adforn{54}~\Glsfmttext{#2}~\adforn{26}\hspace{1em}}
        \label{#2}%
        \renewcommand\name{\gls{#2}}
      }{
        \paragraph{\adforn{54}~#2~\adforn{26}\hspace{1em}}
        \label{#2}
        \renewcommand\name{#2}
        \index{Artefacts!#2}
      }
      #3 \hint{\gls{weight} #1}
      \par
      \noindent
      \begin{tabularx}{\linewidth}{rX}
      \hiderowcolors
      \textbf{Mission:} & \emph{#7!} \\
      \textbf{Base Spell:} & #8 \\
      \textbf{Mind:} & 
        Intelligence \arabic{Intelligence}, Wits \arabic{Wits}, Charisma \arabic{Charisma}
          \\
      \textbf{Spheres:} & 
        \foreach \s in {Air, Fire, Earth, Water, Fate}%
          {\ifnum\value{\s}>0%
            \s~\arabic{\s},
            \addtocounter{mp}{3}%
          \fi}%
          \\%
        \textbf{Skills:} & \showSkills \\
        \textbf{\glspl{mp}:} &
        \ifnum\value{mp}>0
          \boxStat{mp}
        \else
          0
        \fi \\
      \end{tabularx}
      \setcounter{wounds}{0}
    }