+int DispenseAdd(int ActualUser, int User, int Ammount, const char *ReasonGiven)
+{
+ int ret;
+ char *dstName, *byName;
+
+#if DISPENSE_ADD_BELOW_MIN
+ ret = _Transfer( Bank_GetAcctByName(COKEBANK_ADDSRC_ACCT,1), User, Ammount, ReasonGiven );
+#else
+ ret = Bank_Transfer( Bank_GetAcctByName(COKEBANK_ADDSRC_ACCT,1), User, Ammount, ReasonGiven );
+#endif
+ if(ret) return 2;
+
+ byName = Bank_GetAcctName(ActualUser);
+ dstName = Bank_GetAcctName(User);
+
+ Log_Info("add %i to %s by %s [balance %i] - %s",
+ Ammount, dstName, byName, Bank_GetBalance(User), ReasonGiven
+ );
+
+ free(byName);
+ free(dstName);
+
+ return 0;
+}
+
+int DispenseSet(int ActualUser, int User, int Balance, const char *ReasonGiven, int *OrigBalance)
+{
+ int curBal = Bank_GetBalance(User);
+ char *byName, *dstName;
+
+ if( Bank_Transfer( Bank_GetAcctByName(COKEBANK_DEBT_ACCT,1), User, Balance-curBal, ReasonGiven ) )
+ return -1;
+
+ byName = Bank_GetAcctName(ActualUser);
+ dstName = Bank_GetAcctName(User);
+
+ Log_Info("set balance of %s to %i by %s [was %i, balance %i] - %s",
+ dstName, Balance, byName, curBal, Bank_GetBalance(User), ReasonGiven
+ );
+
+ *OrigBalance = curBal;
+ free(byName);
+ free(dstName);
+
+ return 0;
+}
+
+/**
+ * \brief Donate money to the club
+ */
+int DispenseDonate(int ActualUser, int User, int Ammount, const char *ReasonGiven)