-- first, let's set up the text vars
block
    overwrite on
    beer = " of beer"
    b=" bottle"
    wall =" on the wall"
    c=", "
    p="."
    d="Take 1 down and pass it around, "
end block

-- next, define the quantity formula with "plurality" and caps where needed
-- (functions are database objects, formulae are "free code" thingys)
-- %plur takes 2 args: x:quantity and y:"start of line" (1=yes)
formula <over on> %plur = &&
    ( &&
        if (x eq 0) then ( &&
            (if (y eq 1) then "N" else "n") &&