loot.sty

\ProvidesPackage{config/loot}
\newcounter{treasure}
\setcounter{treasure}{\month}

%%%%%%%%%%%%%%%%%%%% LOOT %%%%%%%%%%%%%%%%%%%%

\newcounter{goblinLoot}
\setcounter{goblinLoot}{\value{r4}}

\newcommand{\lootGoblin}{%
  \ifnum\value{goblinLoot}>15%
    \setcounter{goblinLoot}{0}%
  \else%
    \stepcounter{goblinLoot}%
  \fi%
  \ifcase\value{goblinLoot}\relax%
    \stepcounter{r4}%
    tinder box and \arabic{r4} candles%
  \or%
    1 \gls{sp} from the far North%
  \or%
    pouch of long, dark, humanoid hair%
  \or%
    rotten mushrooms%
  \or%
    flask of lantern oil%
  \or%
    leather pouch filled with colorful egg shells%
  \or%
    small torch%
  \or%
    small shaker filled with dried beans%
  \or%
    tobacco pipe%
  \or%
    a horse's tail%
  \or%
    lump of clay with an ex-lover's bitemarks%
  \or%
    polished sphere of snow-white quartz%
  \or%
    tinder box%
  \or%
    ratking shaul%
  \or%
    lock-picking set%
  \or%
    1 \gls{gp} from the far East%
  \else%
    empty wine bottle filled with dead spiders%
  \fi%
}

\newcommand{\lootSmall}{%
	\iftoggle{genExamples}{%
		\ifodd\value{r2}%
			$3D6$\else$2D6$%
		\fi \glspl{cp}}{%
		\randomdozen\multiply\value{r12} by \value{r4}\arabic{r12} \glspl{cp}}%
}

\newcommand{\lootMedium}{%
	\iftoggle{genExamples}{%
		\ifodd\value{r2}%
			$3D6$%
		\else%
			$2D6$%
		\fi~\glspl{sp}}{%
		\setcounter{gold}{\value{r12}}%
    \multiply\value{gold} by 3%
		\arabic{gold}~\glspl{sp}}%
}

\newcommand{\lootBig}{%
\iftoggle{genExamples}{%
	$3D6-2$~\glspl{gp}}{%
	\randomdozen\addtocounter{r12}{8}\arabic{r12}\glspl{gp}%
	}%
}

\newcommand{\lootMagic}{%
  \iftoggle{genExamples}{}%
    {%
      \ifnum\value{treasure}>8\setcounter{treasure}{1}\fi%
      \ifcase\value{treasure}\relax%
        \scrollOfFriendship%
      \or%1
        \bloodCandle%
      \or%2
        \minersWeed%
      \or%3
        \oceanPhial%
      \or%4
        \hagFinger%
      \or%4
        \safetyScroll%
      \or%4
        \snacklet%
      \else%
        \homeScroll%
      \fi%
      \ignorespaces\spellName%
      \setcounter{track}{\value{treasure}}%
      \stepcounter{treasure}%
    }%
}

\newcommand{\lootJewellery}{%
\iftoggle{genExamples}{jewellery worth \ifodd\value{r2}$3D6$sp\else$1D6+2$\glspl{gp}\fi}%
	{%
    \stepcounter{treasure}%
    \ifnum\value{treasure}>10\addtocounter{treasure}{-10}\fi%
    \ifcase\value{treasure}\relax%
			golden necklace worth \arabic{r12}~\glspl{sp}%
    \or%1
			golden ring worth \thechapter~\glspl{sp}%
    \or%2
      jewel encrusted dagger worth \arabic{r12}~\glspl{sp}%
    \or%3
      ornate silver earrings worth 1 \glspl{gp}%
    \or%4
      gem encrusted broach worth \arabic{r4b} \glspl{gp}
    \or%5
      saphire pendant worth \arabic{r3b}\glspl{gp}%
    \or%6
      gem-encrusted headband, worth \arabic{r4b}~\glspl{gp}%
    \or%7
      gold-looking necklage made from fool's gold (worthless)%
    \or%8
      gem-studded ring, worth \arabic{r12}~\glspl{sp}%
    \or%9
      signet ring, worth \arabic{r2}~\glspl{gp}%
    \else%10
      gem-studded ring, worth \arabic{r12}~\glspl{sp}%
    \fi%
  }%
}