Function doprgold

src/invent.c:4502–4546

the #showgold command */

/* the #showgold command */
int
doprgold(void)
{
    /* Command takes containers into account. */
    long umoney = money_cnt(gi.invent);

    /* Only list the money you know about.  Guards and shopkeepers
       can somehow tell if there is any gold anywhere on your
       person, but you have no such preternatural gold-sense. */
    long hmoney = hidden_gold(FALSE);

    if (flags.verbose) {
        char buf[BUFSZ];

        if (!umoney) {
            Strcpy(buf, "Your wallet is empty");
        } else {
            Sprintf(buf, "Your wallet contains %ld %s",
                    umoney, currency(umoney));
        }
        if (hmoney) {
            Sprintf(eos(buf),
                    ", %s you have %ld %s stashed away in your pack",
                    umoney ? "and" : "but", hmoney,
                    umoney ? "more" : currency(hmoney));
        }
        pline("%s.", buf);
    } else {
        long total = umoney + hmoney;
        if (total)
            You("are carrying a total of %ld %s.", total, currency(total));
        else
            You("have no money.");
    }
    shopper_financial_report();

    if (umoney && iflags.menu_requested) {
        char dollarsign[] = "$";

        /* mustn't use TRUE or gold wouldn't show up unless it was quivered */
        (void) dispinv_with_action(dollarsign, FALSE, NULL);
    }

    return ECMD_OK;
}

/* the #seeweapon command */
int