hathora-et-labora-game
Version:
Game logic reducer for Uwe Rosenberg's Ora et Labora
24 lines • 934 B
JavaScript
import { always, curry, identity, pipe, view } from 'ramda';
import { P, match } from 'ts-pattern';
import { parseResourceParam, costMoney } from '../board/resource';
import { withActivePlayer, payCost, activeLens } from '../board/player';
import { GameCommandEnum } from '../types';
import { addBonusAction } from '../board/frame';
export const calefactory = (coin = '') => {
const input = parseResourceParam(coin);
if (costMoney(input) < 1)
return identity;
return pipe(
//
withActivePlayer(payCost(input)), addBonusAction(GameCommandEnum.FELL_TREES), addBonusAction(GameCommandEnum.CUT_PEAT));
};
export const complete = curry((partial, state) => match(partial)
.with([], () => {
const { penny = 0 } = view(activeLens(state), state);
if (penny)
return ['Pn', ''];
return [''];
})
.with([P._], always(['']))
.otherwise(always([])));
//# sourceMappingURL=calefactory.js.map