nethack-gwaa-kiwi/nethack
1
0
Fork 0
Code Pull Requests Activity

auto credit

Browse Source 
Yes, you were right.  There is a reason to have a separate auto_credit flag.
This commit is contained in:
nethack.allison
2002-01-08 04:42:29 +00:00
parent 59f5ed1cbb
commit 17f15477e1
1 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/shk.c
+6 -2
View File
@@ -2459,6 +2459,9 @@ register boolean peaceful, silent;
/* auto-response flag for/from "sell foo?" 'a' => 'y', 'q' => 'n' */ /* auto-response flag for/from "sell foo?" 'a' => 'y', 'q' => 'n' */
static char sell_response = 'a'; static char sell_response = 'a';
static int sell_how = SELL_NORMAL; static int sell_how = SELL_NORMAL;
/* can't just use sell_response='y' for auto_credit because the 'a' response
shouldn't carry over from ordinary selling to credit selling */
static boolean auto_credit = FALSE;
void void
sellobj_state(deliberate) sellobj_state(deliberate)
@@ -2472,6 +2475,7 @@ int deliberate;
*/ */
sell_response = (deliberate != SELL_NORMAL) ? '\0' : 'a'; sell_response = (deliberate != SELL_NORMAL) ? '\0' : 'a';
sell_how = deliberate; sell_how = deliberate;
auto_credit = FALSE;
} }
void void
@@ -2622,7 +2626,7 @@ move_on:
char c, qbuf[BUFSZ]; char c, qbuf[BUFSZ];
long tmpcr = ((offer * 9L) / 10L) + (offer <= 1L); long tmpcr = ((offer * 9L) / 10L) + (offer <= 1L);
if (sell_how == SELL_NORMAL || sell_response == 'y') { if (sell_how == SELL_NORMAL || auto_credit) {
c = sell_response = 'y'; c = sell_response = 'y';
} else if (sell_response != 'n') { } else if (sell_response != 'n') {
pline("%s cannot pay you at present.", Monnam(shkp)); pline("%s cannot pay you at present.", Monnam(shkp));
@@ -2635,7 +2639,7 @@ move_on:
c = ynaq(qbuf); c = ynaq(qbuf);
if (c == 'a') { if (c == 'a') {
c = 'y'; c = 'y';
sell_response = 'y'; auto_credit = TRUE;
} }
} else /* previously specified "quit" */ } else /* previously specified "quit" */
c = 'n'; c = 'n';