void bg_team_get_kafrapoints(int bg_id, int amount)
{
struct battleground_data *bg;
struct map_session_data *sd;
int i, j, get_amount, rank = 0;
if( (bg = bg_team_search(bg_id)) == NULL )
return;
if( battle_config.bg_reward_rates != 100 )
amount = amount * battle_config.bg_reward_rates / 100;
for( i = 0; i < MAX_BG_MEMBERS; i++ )
{
if( (sd = bg->members[i].sd) == NULL )
continue;
if( battle_config.bg_ranking_bonus )
{
rank = 0;
ARR_FIND(0,MAX_FAME_LIST,j,bgrank_fame_list[j].id == sd->status.char_id);
if( j < MAX_FAME_LIST )
rank = 1;
else
{
ARR_FIND(0,MAX_FAME_LIST,j,bg_fame_list[j].id == sd->status.char_id);
if( j < MAX_FAME_LIST )
rank = 1;
}
}
get_amount = amount;
if( rank ) get_amount += battle_config.bg_ranking_bonus * get_amount / 100;
pc_getcash(sd,0,get_amount);
}
}
/*==========================================
* Purchase item(s) from a shop
*------------------------------------------*/
void vending_purchasereq(struct map_session_data* sd, int aid, int uid, const uint8* data, int count)
{
int i, j, cursor, w, new_ = 0, blank, vend_list[MAX_VENDING];
double z;
struct s_vending vending[MAX_VENDING]; // against duplicate packets
struct map_session_data* vsd = map_id2sd(aid);
char output[256];
nullpo_retv(sd);
if( vsd == NULL || !vsd->state.vending || vsd->bl.id == sd->bl.id )
return; // invalid shop
if( vsd->vender_id != uid )
{// shop has changed
clif_buyvending(sd, 0, 0, 6); // store information was incorrect
return;
}
if( !searchstore_queryremote(sd, aid) && ( sd->bl.m != vsd->bl.m || !check_distance_bl(&sd->bl, &vsd->bl, AREA_SIZE) ) )
return; // shop too far away
searchstore_clearremote(sd);
if( count < 1 || count > MAX_VENDING || count > vsd->vend_num )
return; // invalid amount of purchased items
blank = pc_inventoryblank(sd); //number of free cells in the buyer's inventory
// duplicate item in vending to check hacker with multiple packets
memcpy(&vending, &vsd->vending, sizeof(vsd->vending)); // copy vending list
// some checks
z = 0.; // zeny counter
w = 0; // weight counter
for( i = 0; i < count; i++ )
{
short amount = *(uint16*)(data + 4*i + 0);
short idx = *(uint16*)(data + 4*i + 2);
idx -= 2;
if( amount <= 0 )
return;
// check of item index in the cart
if( idx < 0 || idx >= MAX_CART )
return;
ARR_FIND( 0, vsd->vend_num, j, vsd->vending[j].index == idx );
if( j == vsd->vend_num )
return; //picked non-existing item
else
vend_list[i] = j;
z += ((double)vsd->vending[j].value * (double)amount);
if( !vsd->vend_coin || vsd->vend_coin == battle_config.vending_zeny_id )
{ // Normal Vending - Zeny Option
if( z > (double)sd->status.zeny || z < 0. || z > (double)MAX_ZENY )
{
clif_buyvending(sd, idx, amount, 1); // you don't have enough zeny
return;
}
if( z + (double)vsd->status.zeny > (double)MAX_ZENY && !battle_config.vending_over_max )
{
clif_buyvending(sd, idx, vsd->vending[j].amount, 4); // too much zeny = overflow
return;
}
}
else if( battle_config.vending_cash_id && vsd->vend_coin == battle_config.vending_cash_id )
{ // Cash Shop
if( z > (double)sd->cashPoints || z < 0. || z > (double)MAX_ZENY )
{
sprintf(output,msg_txt(915),itemdb_jname(vsd->vend_coin));
clif_displaymessage(sd->fd,output);
return;
}
if( z + (double)vsd->cashPoints > (double)MAX_ZENY && !battle_config.vending_over_max )
{
sprintf(output,msg_txt(916),itemdb_jname(vsd->vend_coin));
clif_displaymessage(sd->fd,output);
return;
}
}
w += itemdb_weight(vsd->status.cart[idx].nameid) * amount;
if( w + sd->weight > sd->max_weight )
{
clif_buyvending(sd, idx, amount, 2); // you can not buy, because overweight
return;
}
//Check to see if cart/vend info is in sync.
if( vending[j].amount > vsd->status.cart[idx].amount )
vending[j].amount = vsd->status.cart[idx].amount;
// if they try to add packets (example: get twice or more 2 apples if marchand has only 3 apples).
// here, we check cumulative amounts
if( vending[j].amount < amount )
{
// send more quantity is not a hack (an other player can have buy items just before)
clif_buyvending(sd, idx, vsd->vending[j].amount, 4); // not enough quantity
return;
}
vending[j].amount -= amount;
switch( pc_checkadditem(sd, vsd->status.cart[idx].nameid, amount) ) {
case ADDITEM_EXIST:
break; //We'd add this item to the existing one (in buyers inventory)
case ADDITEM_NEW:
new_++;
if (new_ > blank)
return; //Buyer has no space in his inventory
break;
case ADDITEM_OVERAMOUNT:
return; //too many items
}
}
// Payments
if( !vsd->vend_coin || vsd->vend_coin == battle_config.vending_zeny_id )
{
if( log_config.zeny > 0 )
log_zeny(vsd, "V", sd, (int)z); //Logs (V)ending Zeny [Lupus]
pc_payzeny(sd, (int)z);
if( battle_config.vending_tax || (vsd->state.autotrade && battle_config.at_tax && !pc_isPremium(vsd)) )
z -= z * ((battle_config.vending_tax + ((vsd->state.autotrade && !pc_isPremium(vsd)) ? battle_config.at_tax : 0)) / 10000.);
pc_getzeny(vsd, (int)z);
}
else if( battle_config.vending_cash_id && vsd->vend_coin == battle_config.vending_cash_id )
{
pc_paycash(sd,(int)z,0);
pc_getcash(vsd,(int)z,0);
}
else
{
if( z < 0. || (i = pc_search_inventory(sd,vsd->vend_coin)) < 0 || z > (double)sd->status.inventory[i].amount )
{
sprintf(output,msg_txt(915),itemdb_jname(vsd->vend_coin));
clif_displaymessage(sd->fd,output);
return;
}
switch( pc_checkadditem(vsd,vsd->vend_coin,(int)z) )
{
case ADDITEM_NEW:
if( pc_inventoryblank(vsd) > 0 )
break;
case ADDITEM_OVERAMOUNT:
sprintf(output,msg_txt(916),itemdb_jname(vsd->vend_coin));
clif_displaymessage(sd->fd,output);
return;
}
pc_additem(vsd,&sd->status.inventory[i],(int)z);
pc_delitem(sd,i,(int)z,0,6);
}
for( i = 0; i < count; i++ )
{
short amount = *(uint16*)(data + 4*i + 0);
short idx = *(uint16*)(data + 4*i + 2);
idx -= 2;
//Logs sold (V)ending items [Lupus]
if(log_config.enable_logs&0x4) {
log_pick_pc(vsd, "V", vsd->status.cart[idx].nameid, -amount, &vsd->status.cart[idx], vsd->status.cart[idx].serial );
log_pick_pc( sd, "V", vsd->status.cart[idx].nameid, amount, &vsd->status.cart[idx], vsd->status.cart[idx].serial );
}
// vending item
pc_additem(sd, &vsd->status.cart[idx], amount);
vsd->vending[vend_list[i]].amount -= amount;
pc_cart_delitem(vsd, idx, amount, 0);
clif_vendingreport(vsd, idx, amount);
//print buyer's name
if( battle_config.buyer_name )
{
char temp[256];
sprintf(temp, msg_txt(265), sd->status.name);
clif_disp_onlyself(vsd,temp,strlen(temp));
}
}
// compact the vending list
for( i = 0, cursor = 0; i < vsd->vend_num; i++ )
{
if( vsd->vending[i].amount == 0 )
continue;
if( cursor != i ) // speedup
{
vsd->vending[cursor].index = vsd->vending[i].index;
vsd->vending[cursor].amount = vsd->vending[i].amount;
vsd->vending[cursor].value = vsd->vending[i].value;
}
cursor++;
}
vsd->vend_num = cursor;
//Always save BOTH: buyer and customer
if( save_settings&2 )
{
chrif_save(sd,0);
chrif_save(vsd,0);
}
//check for @AUTOTRADE users [durf]
if( vsd->state.autotrade )
{
//see if there is anything left in the shop
ARR_FIND( 0, vsd->vend_num, i, vsd->vending[i].amount > 0 );
if( i == vsd->vend_num )
{
//Close Vending (this was automatically done by the client, we have to do it manually for autovenders) [Skotlex]
vending_closevending(vsd);
map_quit(vsd); //They have no reason to stay around anymore, do they?
}
}
}
/* ==============================================================
bg_arena (0 EoS | 1 Boss | 2 TI | 3 CTF | 4 TD | 5 SC | 6 CON | 7 RUSH | 8 DOM)
bg_result (0 Won | 1 Tie | 2 Lost)
============================================================== */
void bg_team_rewards(int bg_id, int nameid, int amount, int kafrapoints, int quest_id, const char *var, int add_value, int bg_arena, int bg_result)
{
struct battleground_data *bg;
struct map_session_data *sd;
struct item_data *id;
struct item it;
int i, j, flag, fame, get_amount, rank = 0, type;
if( amount < 1 || (bg = bg_team_search(bg_id)) == NULL || (id = itemdb_exists(nameid)) == NULL )
return;
if( battle_config.bg_reward_rates != 100 )
{ // BG Reward Rates
amount = amount * battle_config.bg_reward_rates / 100;
kafrapoints = kafrapoints * battle_config.bg_reward_rates / 100;
}
bg_result = cap_value(bg_result,0,2);
memset(&it,0,sizeof(it));
if( nameid == 7828 || nameid == 7829 || nameid == 7773 )
{
it.nameid = nameid;
it.identify = 1;
}
else nameid = 0;
for( j = 0; j < MAX_BG_MEMBERS; j++ )
{
if( (sd = bg->members[j].sd) == NULL )
continue;
if( battle_config.bg_ranking_bonus )
{
rank = 0;
ARR_FIND(0,MAX_FAME_LIST,i,bgrank_fame_list[i].id == sd->status.char_id);
if( i < MAX_FAME_LIST )
rank = 1;
else
{
ARR_FIND(0,MAX_FAME_LIST,i,bg_fame_list[i].id == sd->status.char_id);
if( i < MAX_FAME_LIST )
rank = 1;
}
}
if( quest_id ) quest_add(sd,quest_id);
pc_setglobalreg(sd,var,pc_readglobalreg(sd,var) + add_value);
if( kafrapoints > 0 )
{
get_amount = kafrapoints;
if( rank ) get_amount += battle_config.bg_ranking_bonus * get_amount / 100;
pc_getcash(sd,0,get_amount);
}
if( nameid && amount > 0 )
{
get_amount = amount;
if( rank ) get_amount += battle_config.bg_ranking_bonus * get_amount / 100;
if( (flag = pc_additem(sd,&it,get_amount,LOG_TYPE_SCRIPT)) )
clif_additem(sd,0,0,flag);
}
type = bg->members[j].ranked ? 2 : 3; // Where to Add Fame
switch( bg_result )
{
case 0: // Won
add2limit(sd->status.bgstats.win,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_VICTORY,1);
fame = 100;
if( sd->bmaster_flag )
{
add2limit(sd->status.bgstats.leader_win,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_LEADER_VICTORY,1);
fame += 25;
}
pc_addfame(sd,fame,type);
switch( bg_arena )
{
case 0:
add2limit(sd->status.bgstats.eos_wins,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_EOS_VICTORY,1);
break;
case 1:
add2limit(sd->status.bgstats.boss_wins,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_BOSS_VICTORY,1);
break;
case 2:
add2limit(sd->status.bgstats.ti_wins,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_TI_VICTORY,1);
break;
case 3:
add2limit(sd->status.bgstats.ctf_wins,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_CTF_VICTORY,1);
break;
case 4:
add2limit(sd->status.bgstats.td_wins,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_TDM_VICTORY,1);
break;
case 5:
add2limit(sd->status.bgstats.sc_wins,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_SC_VICTORY,1);
break;
case 6:
add2limit(sd->status.bgstats.cq_wins,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_CON_VICTORY,1);
break;
case 7:
add2limit(sd->status.bgstats.ru_wins,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_RU_VICTORY,1);
break;
case 8:
add2limit(sd->status.bgstats.dom_wins,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_DOM_VICTORY,1);
break;
}
break;
case 1: // Tie
add2limit(sd->status.bgstats.tie,1,USHRT_MAX);
fame = 75;
if( sd->bmaster_flag )
{
add2limit(sd->status.bgstats.leader_tie,1,USHRT_MAX);
fame += 10;
}
pc_addfame(sd,fame,type);
switch( bg_arena )
{
case 0: add2limit(sd->status.bgstats.eos_tie,1,USHRT_MAX); break;
case 1: add2limit(sd->status.bgstats.boss_tie,1,USHRT_MAX); break;
case 2: add2limit(sd->status.bgstats.ti_tie,1,USHRT_MAX); break;
case 3: add2limit(sd->status.bgstats.ctf_tie,1,USHRT_MAX); break;
case 4: add2limit(sd->status.bgstats.td_tie,1,USHRT_MAX); break;
case 5: add2limit(sd->status.bgstats.sc_tie,1,USHRT_MAX); break;
// No Tie for Conquest or Rush
case 8: add2limit(sd->status.bgstats.dom_tie,1,USHRT_MAX); break;
}
break;
case 2: // Lost
add2limit(sd->status.bgstats.lost,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_DEFEAT,1);
fame = 50;
if( sd->bmaster_flag )
{
add2limit(sd->status.bgstats.leader_lost,1,USHRT_MAX);
achievement_validate_bg(sd,ATB_LEADER_DEFEAT,1);
}
pc_addfame(sd,fame,type);
switch( bg_arena )
{
case 0: add2limit(sd->status.bgstats.eos_lost,1,USHRT_MAX); break;
case 1: add2limit(sd->status.bgstats.boss_lost,1,USHRT_MAX); break;
case 2: add2limit(sd->status.bgstats.ti_lost,1,USHRT_MAX); break;
case 3: add2limit(sd->status.bgstats.ctf_lost,1,USHRT_MAX); break;
case 4: add2limit(sd->status.bgstats.td_lost,1,USHRT_MAX); break;
case 5: add2limit(sd->status.bgstats.sc_lost,1,USHRT_MAX); break;
case 6: add2limit(sd->status.bgstats.cq_lost,1,USHRT_MAX); break;
case 7: add2limit(sd->status.bgstats.ru_lost,1,USHRT_MAX); break;
case 8: add2limit(sd->status.bgstats.dom_lost,1,USHRT_MAX); break;
}
break;
}
}
}
