| 1 | /* |
1 | /* |
| 2 | * static char *rcsid_shop_c = |
2 | * static char *rcsid_shop_c = |
| 3 | * "$Id: shop.c,v 1.15 2006/07/06 03:03:33 root Exp $"; |
3 | * "$Id: shop.c,v 1.17 2006/07/11 10:35:20 root Exp $"; |
| 4 | */ |
4 | */ |
| 5 | |
5 | |
| 6 | /* |
6 | /* |
| 7 | CrossFire, A Multiplayer game for X-windows |
7 | CrossFire, A Multiplayer game for X-windows |
| 8 | |
8 | |
| … | |
… | |
| 125 | LOG(llevError, "Asking for buy-value of unidentified object.\n"); |
125 | LOG(llevError, "Asking for buy-value of unidentified object.\n"); |
| 126 | val = tmp->arch->clone.value * 50 * number; |
126 | val = tmp->arch->clone.value * 50 * number; |
| 127 | } |
127 | } |
| 128 | else { /* Trying to sell something, or get true value */ |
128 | else { /* Trying to sell something, or get true value */ |
| 129 | if (tmp->type == POTION) |
129 | if (tmp->type == POTION) |
| 130 | val = number * 1000; /* Don't want to give anything away */ |
130 | val = number * 40; /* Don't want to give anything away */ |
| 131 | else { |
131 | else { |
| 132 | /* Get 2/3'rd value for applied objects, 1/3'rd for totally |
132 | /* Get 2/3'rd value for applied objects, 1/3'rd for totally |
| 133 | * unknown objects |
133 | * unknown objects |
| 134 | */ |
134 | */ |
| 135 | if (QUERY_FLAG(tmp, FLAG_BEEN_APPLIED)) |
135 | if (QUERY_FLAG(tmp, FLAG_BEEN_APPLIED)) |
| … | |
… | |
| 185 | if (flag==F_SELL) |
185 | if (flag==F_SELL) |
| 186 | val=value_limit(val, number, who, shop); |
186 | val=value_limit(val, number, who, shop); |
| 187 | |
187 | |
| 188 | // use a nonlinear price adjustment. as my predecessor said, don't change |
188 | // use a nonlinear price adjustment. as my predecessor said, don't change |
| 189 | // the archetypes, its work required for balancing, and we don't care. |
189 | // the archetypes, its work required for balancing, and we don't care. |
| 190 | val = pow (val, 1.2); |
190 | //val = pow (val, 1.05); |
| 191 | |
191 | |
| 192 | /* This modification is for bargaining skill. |
192 | /* This modification is for bargaining skill. |
| 193 | * Now only players with max level in bargaining |
193 | * Now only players with max level in bargaining |
| 194 | * AND Cha = 30 will get optimal price. |
194 | * AND Cha = 30 will get optimal price. |
| 195 | * Thus charisma will never get useless. |
195 | * Thus charisma will never get useless. |
