Skip to content

Y
ygopro-core
You need to sign in or sign up before continuing.
Commit ec9d41a0 authored by salix5's avatar salix5
Browse files
Options

summon/set procedure

parent 07a74fc1
Hide whitespace changes
Inline Side-by-side
Showing with 78 additions and 27 deletions
card.cpp
View file @ ec9d41a0
...@@ -1988,7 +1988,7 @@ int32 card::filter_summon_procedure(uint8 playerid, effect_set* peset, uint8 ign ...@@ -1988,7 +1988,7 @@ int32 card::filter_summon_procedure(uint8 playerid, effect_set* peset, uint8 ign
bool lim = true; bool lim = true;
uint8 toplayer; uint8 toplayer;
int32 rcount = 0; int32 rcount = 0;
card_set test; card_set test, exset;
filter_effect(EFFECT_LIMIT_SUMMON_PROC, &eset); filter_effect(EFFECT_LIMIT_SUMMON_PROC, &eset);
if(!eset.size()) { if(!eset.size()) {
...@@ -1997,6 +1997,8 @@ int32 card::filter_summon_procedure(uint8 playerid, effect_set* peset, uint8 ign ...@@ -1997,6 +1997,8 @@ int32 card::filter_summon_procedure(uint8 playerid, effect_set* peset, uint8 ign
} }
for(int32 i = 0; i < eset.size(); ++i) { for(int32 i = 0; i < eset.size(); ++i) {
int32 val = eset[i]->get_value(this); int32 val = eset[i]->get_value(this);
if(!eset[i]->check_count_limit(playerid))
continue;
if(!pduel->game_field->is_player_can_summon(val, playerid, this)) if(!pduel->game_field->is_player_can_summon(val, playerid, this))
continue; continue;
if((val & SUMMON_TYPE_ADVANCE) == SUMMON_TYPE_ADVANCE) if((val & SUMMON_TYPE_ADVANCE) == SUMMON_TYPE_ADVANCE)
...@@ -2017,25 +2019,31 @@ int32 card::filter_summon_procedure(uint8 playerid, effect_set* peset, uint8 ign ...@@ -2017,25 +2019,31 @@ int32 card::filter_summon_procedure(uint8 playerid, effect_set* peset, uint8 ign
// uniqueness // uniqueness
if(pduel->game_field->check_unique_onfield(this, toplayer, LOCATION_MZONE)) if(pduel->game_field->check_unique_onfield(this, toplayer, LOCATION_MZONE))
continue; continue;
// check if the usable count is enough int32 m1 = 0, m2 = 0, self_max = 0;
int32 fcount = pduel->game_field->get_useable_count(toplayer, LOCATION_MZONE, current.controler, LOCATION_REASON_TOFIELD);
int32 m1 = 0, m2 = 0, self_max = rcount;
if(toplayer == playerid) { if(toplayer == playerid) {
m1 = pduel->game_field->get_summon_release_slist(this, &test, NULL); m1 = pduel->game_field->get_summon_release_slist(this, &test, NULL);
m2 = pduel->game_field->get_summon_release_olist(this, NULL, NULL, NULL); m2 = pduel->game_field->get_summon_release_olist(this, NULL, NULL, NULL);
pduel->game_field->get_summon_release_exlist(this, &exset);
if(rcount < (int32)exset.size())
self_max = 0;
else
self_max = rcount - exset.size();
} }
else { else {
m1 = pduel->game_field->get_summon_release_olist(this, &test, NULL, NULL, 1); m1 = pduel->game_field->get_summon_release_olist(this, &test, NULL, NULL, 1);
m2 = pduel->game_field->get_summon_release_slist(this, NULL, NULL); m2 = pduel->game_field->get_summon_release_slist(this, NULL, NULL);
self_max = rcount;
} }
// check if the # of tributes is enough
if(m1 + m2 < rcount)
continue;
// check if the usable count is enough
int32 fcount = pduel->game_field->get_useable_count(toplayer, LOCATION_MZONE, current.controler, LOCATION_REASON_TOFIELD);
if(self_max > (int32)test.size()) if(self_max > (int32)test.size())
self_max = test.size(); self_max = test.size();
if(fcount + self_max - 1 < 0) if(fcount + self_max - 1 < 0)
continue; continue;
// check if the # of tributes is enough if(is_summonable(eset[i], min_tribute))
if(m1 + m2 < rcount)
continue;
if(eset[i]->check_count_limit(playerid) && is_summonable(eset[i], min_tribute))
peset->add_item(eset[i]); peset->add_item(eset[i]);
} }
if(lim){ if(lim){
...@@ -2056,7 +2064,7 @@ int32 card::filter_set_procedure(uint8 playerid, effect_set* peset, uint8 ignore ...@@ -2056,7 +2064,7 @@ int32 card::filter_set_procedure(uint8 playerid, effect_set* peset, uint8 ignore
bool lim = true; bool lim = true;
uint8 toplayer; uint8 toplayer;
int32 rcount = 0; int32 rcount = 0;
card_set test; card_set test, exset;
filter_effect(EFFECT_LIMIT_SET_PROC, &eset); filter_effect(EFFECT_LIMIT_SET_PROC, &eset);
if(!eset.size()) { if(!eset.size()) {
...@@ -2065,6 +2073,8 @@ int32 card::filter_set_procedure(uint8 playerid, effect_set* peset, uint8 ignore ...@@ -2065,6 +2073,8 @@ int32 card::filter_set_procedure(uint8 playerid, effect_set* peset, uint8 ignore
} }
for(int32 i = 0; i < eset.size(); ++i) { for(int32 i = 0; i < eset.size(); ++i) {
int32 val = eset[i]->get_value(this); int32 val = eset[i]->get_value(this);
if(!eset[i]->check_count_limit(playerid))
continue;
if(!pduel->game_field->is_player_can_mset(val, playerid, this)) if(!pduel->game_field->is_player_can_mset(val, playerid, this))
continue; continue;
if((val & SUMMON_TYPE_ADVANCE) == SUMMON_TYPE_ADVANCE) if((val & SUMMON_TYPE_ADVANCE) == SUMMON_TYPE_ADVANCE)
...@@ -2082,25 +2092,31 @@ int32 card::filter_set_procedure(uint8 playerid, effect_set* peset, uint8 ignore ...@@ -2082,25 +2092,31 @@ int32 card::filter_set_procedure(uint8 playerid, effect_set* peset, uint8 ignore
} }
else else
toplayer = playerid; toplayer = playerid;
// check if the usable count is enough int32 m1 = 0, m2 = 0, self_max = 0;
int32 fcount = pduel->game_field->get_useable_count(toplayer, LOCATION_MZONE, current.controler, LOCATION_REASON_TOFIELD);
int32 m1 = 0, m2 = 0, self_max = rcount;
if(toplayer == playerid) { if(toplayer == playerid) {
m1 = pduel->game_field->get_summon_release_slist(this, &test, NULL); m1 = pduel->game_field->get_summon_release_slist(this, &test, NULL);
m2 = pduel->game_field->get_summon_release_olist(this, NULL, NULL, NULL); m2 = pduel->game_field->get_summon_release_olist(this, NULL, NULL, NULL);
pduel->game_field->get_summon_release_exlist(this, &exset);
if(rcount < (int32)exset.size())
self_max = 0;
else
self_max = rcount - exset.size();
} }
else { else {
m1 = pduel->game_field->get_summon_release_olist(this, &test, NULL, NULL, 1); m1 = pduel->game_field->get_summon_release_olist(this, &test, NULL, NULL, 1);
m2 = pduel->game_field->get_summon_release_slist(this, NULL, NULL); m2 = pduel->game_field->get_summon_release_slist(this, NULL, NULL);
self_max = rcount;
} }
// check if the # of tributes is enough
if(m1 + m2 < rcount)
continue;
// check if the usable count is enough
int32 fcount = pduel->game_field->get_useable_count(toplayer, LOCATION_MZONE, current.controler, LOCATION_REASON_TOFIELD);
if(self_max > (int32)test.size()) if(self_max > (int32)test.size())
self_max = test.size(); self_max = test.size();
if(fcount + self_max - 1 < 0) if(fcount + self_max - 1 < 0)
continue; continue;
// check if the # of tributes is enough if(is_summonable(eset[i], min_tribute))
if(m1 + m2 < rcount)
continue;
if(eset[i]->check_count_limit(playerid) && is_summonable(eset[i], min_tribute))
peset->add_item(eset[i]); peset->add_item(eset[i]);
} }
if(lim){ if(lim){
...@@ -2352,7 +2368,7 @@ int32 card::is_spsummonable(effect* peffect) { ...@@ -2352,7 +2368,7 @@ int32 card::is_spsummonable(effect* peffect) {
pduel->game_field->core.reason_player = op; pduel->game_field->core.reason_player = op;
return result; return result;
} }
// check the condition of summon procedure peffect // check the condition of summon/set procedure peffect
int32 card::is_summonable(effect* peffect, uint8 min_tribute) { int32 card::is_summonable(effect* peffect, uint8 min_tribute) {
effect* oreason = pduel->game_field->core.reason_effect; effect* oreason = pduel->game_field->core.reason_effect;
uint8 op = pduel->game_field->core.reason_player; uint8 op = pduel->game_field->core.reason_player;
...@@ -2403,7 +2419,8 @@ int32 card::is_can_be_summoned(uint8 playerid, uint8 ignore_count, effect* peffe ...@@ -2403,7 +2419,8 @@ int32 card::is_can_be_summoned(uint8 playerid, uint8 ignore_count, effect* peffe
pduel->game_field->restore_lp_cost(); pduel->game_field->restore_lp_cost();
return FALSE; return FALSE;
} }
} else if(current.location == LOCATION_HAND) { }
else if(current.location == LOCATION_HAND) {
if(is_affected_by_effect(EFFECT_CANNOT_SUMMON)) { if(is_affected_by_effect(EFFECT_CANNOT_SUMMON)) {
pduel->game_field->restore_lp_cost(); pduel->game_field->restore_lp_cost();
return FALSE; return FALSE;
...@@ -2427,12 +2444,12 @@ int32 card::is_can_be_summoned(uint8 playerid, uint8 ignore_count, effect* peffe ...@@ -2427,12 +2444,12 @@ int32 card::is_can_be_summoned(uint8 playerid, uint8 ignore_count, effect* peffe
} }
else { else {
if(!proc.size()) { if(!proc.size()) {
// uniqueness
if(pduel->game_field->check_unique_onfield(this, playerid, LOCATION_MZONE)){ if(pduel->game_field->check_unique_onfield(this, playerid, LOCATION_MZONE)){
pduel->game_field->restore_lp_cost(); pduel->game_field->restore_lp_cost();
return FALSE; return FALSE;
} }
card_set test; card_set test, exset;
int32 fcount = pduel->game_field->get_useable_count(playerid, LOCATION_MZONE, current.controler, LOCATION_REASON_TOFIELD);
int32 rcount = get_summon_tribute_count(); int32 rcount = get_summon_tribute_count();
int32 min = rcount & 0xffff, max = (rcount >> 16) & 0xffff; int32 min = rcount & 0xffff, max = (rcount >> 16) & 0xffff;
int32 m1 = pduel->game_field->get_summon_release_slist(this, &test, NULL); int32 m1 = pduel->game_field->get_summon_release_slist(this, &test, NULL);
...@@ -2447,6 +2464,8 @@ int32 card::is_can_be_summoned(uint8 playerid, uint8 ignore_count, effect* peffe ...@@ -2447,6 +2464,8 @@ int32 card::is_can_be_summoned(uint8 playerid, uint8 ignore_count, effect* peffe
pduel->game_field->restore_lp_cost(); pduel->game_field->restore_lp_cost();
return FALSE; return FALSE;
} }
int32 fcount = pduel->game_field->get_useable_count(playerid, LOCATION_MZONE, current.controler, LOCATION_REASON_TOFIELD);
pduel->game_field->get_summon_release_exlist(this, &exset);
for(int32 i = min; i <= max; ++i) { for(int32 i = min; i <= max; ++i) {
if(i == 0){ if(i == 0){
if(!pduel->game_field->is_player_can_summon(SUMMON_TYPE_NORMAL, playerid, this)) if(!pduel->game_field->is_player_can_summon(SUMMON_TYPE_NORMAL, playerid, this))
...@@ -2457,7 +2476,11 @@ int32 card::is_can_be_summoned(uint8 playerid, uint8 ignore_count, effect* peffe ...@@ -2457,7 +2476,11 @@ int32 card::is_can_be_summoned(uint8 playerid, uint8 ignore_count, effect* peffe
continue; continue;
} }
// check if the usable count is enough // check if the usable count is enough
int32 self_max = i; int32 self_max = 0;
if(i < (int32)exset.size())
self_max = 0;
else
self_max = i - exset.size();
if(self_max > (int32)test.size()) if(self_max > (int32)test.size())
self_max = test.size(); self_max = test.size();
if(fcount + self_max - 1 >= 0) { if(fcount + self_max - 1 >= 0) {
...@@ -2470,6 +2493,10 @@ int32 card::is_can_be_summoned(uint8 playerid, uint8 ignore_count, effect* peffe ...@@ -2470,6 +2493,10 @@ int32 card::is_can_be_summoned(uint8 playerid, uint8 ignore_count, effect* peffe
} }
} }
} }
else {
pduel->game_field->restore_lp_cost();
return FALSE;
}
pduel->game_field->restore_lp_cost(); pduel->game_field->restore_lp_cost();
return TRUE; return TRUE;
} }
...@@ -2649,6 +2676,7 @@ int32 card::is_can_be_special_summoned(effect * reason_effect, uint32 sumtype, u ...@@ -2649,6 +2676,7 @@ int32 card::is_can_be_special_summoned(effect * reason_effect, uint32 sumtype, u
pduel->game_field->restore_lp_cost(); pduel->game_field->restore_lp_cost();
return TRUE; return TRUE;
} }
// see is_can_be_summoned()
int32 card::is_setable_mzone(uint8 playerid, uint8 ignore_count, effect* peffect, uint8 min_tribute) { int32 card::is_setable_mzone(uint8 playerid, uint8 ignore_count, effect* peffect, uint8 min_tribute) {
if(!is_summonable_card()) if(!is_summonable_card())
return FALSE; return FALSE;
...@@ -2692,8 +2720,7 @@ int32 card::is_setable_mzone(uint8 playerid, uint8 ignore_count, effect* peffect ...@@ -2692,8 +2720,7 @@ int32 card::is_setable_mzone(uint8 playerid, uint8 ignore_count, effect* peffect
} }
else { else {
if(!proc.size()) { if(!proc.size()) {
card_set test; card_set test, exset;
int32 fcount = pduel->game_field->get_useable_count(playerid, LOCATION_MZONE, current.controler, LOCATION_REASON_TOFIELD);
int32 rcount = get_summon_tribute_count(); int32 rcount = get_summon_tribute_count();
int32 min = rcount & 0xffff, max = (rcount >> 16) & 0xffff; int32 min = rcount & 0xffff, max = (rcount >> 16) & 0xffff;
int32 m1 = pduel->game_field->get_summon_release_slist(this, &test, NULL); int32 m1 = pduel->game_field->get_summon_release_slist(this, &test, NULL);
...@@ -2708,6 +2735,8 @@ int32 card::is_setable_mzone(uint8 playerid, uint8 ignore_count, effect* peffect ...@@ -2708,6 +2735,8 @@ int32 card::is_setable_mzone(uint8 playerid, uint8 ignore_count, effect* peffect
pduel->game_field->restore_lp_cost(); pduel->game_field->restore_lp_cost();
return FALSE; return FALSE;
} }
int32 fcount = pduel->game_field->get_useable_count(playerid, LOCATION_MZONE, current.controler, LOCATION_REASON_TOFIELD);
pduel->game_field->get_summon_release_exlist(this, &exset);
for(int32 i = min; i <= max; ++i) { for(int32 i = min; i <= max; ++i) {
if(i == 0){ if(i == 0){
if(!pduel->game_field->is_player_can_mset(SUMMON_TYPE_NORMAL, playerid, this)) if(!pduel->game_field->is_player_can_mset(SUMMON_TYPE_NORMAL, playerid, this))
...@@ -2718,7 +2747,11 @@ int32 card::is_setable_mzone(uint8 playerid, uint8 ignore_count, effect* peffect ...@@ -2718,7 +2747,11 @@ int32 card::is_setable_mzone(uint8 playerid, uint8 ignore_count, effect* peffect
continue; continue;
} }
// check if the usable count is enough // check if the usable count is enough
int32 self_max = i; int32 self_max = 0;
if(i < (int32)exset.size())
self_max = 0;
else
self_max = i - exset.size();
if(self_max > (int32)test.size()) if(self_max > (int32)test.size())
self_max = test.size(); self_max = test.size();
if(fcount + self_max - 1 >= 0) { if(fcount + self_max - 1 >= 0) {
......
field.cpp
View file @ ec9d41a0
...@@ -1251,14 +1251,14 @@ int32 field::check_release_list(uint8 playerid, int32 count, int32 use_con, int3 ...@@ -1251,14 +1251,14 @@ int32 field::check_release_list(uint8 playerid, int32 count, int32 use_con, int3
} }
return FALSE; return FALSE;
} }
// ex: the procedure of target can release opponent monster
// return: the max release count of mg or all monsters on field // return: the max release count of mg or all monsters on field
int32 field::get_summon_release_list(card* target, card_set* release_list, card_set* ex_list, card_set* ex_list_sum, group* mg, uint32 ex) { int32 field::get_summon_release_list(card* target, card_set* release_list, card_set* ex_list, card_set* ex_list_sum, group* mg, uint32 ex) {
int32 m1 = get_summon_release_slist(target, release_list, mg); int32 m1 = get_summon_release_slist(target, release_list, mg);
int32 m2 = get_summon_release_olist(target, ex_list, ex_list_sum, mg, ex); int32 m2 = get_summon_release_olist(target, ex_list, ex_list_sum, mg, ex);
return m1 + m2; return m1 + m2;
} }
// // let the controller of target be p
// search in mg or mzone of p, and put the tribute monsters in release_list
int32 field::get_summon_release_slist(card* target, card_set* release_list, group* mg) { int32 field::get_summon_release_slist(card* target, card_set* release_list, group* mg) {
uint8 p = target->current.controler; uint8 p = target->current.controler;
card* pcard; card* pcard;
...@@ -1279,7 +1279,10 @@ int32 field::get_summon_release_slist(card* target, card_set* release_list, grou ...@@ -1279,7 +1279,10 @@ int32 field::get_summon_release_slist(card* target, card_set* release_list, grou
} }
return rcount; return rcount;
} }
// // ex: the procedure of target can release opponent monster
// ex_list: the tribute monsters controlled by 1-p
// ex_list_sum: the opponent monsters affected by EFFECT_EXTRA_RELEASE_SUM
// search in mg or mzone of 1-p, and maintain ex_list, ex_list_sum
int32 field::get_summon_release_olist(card* target, card_set* ex_list, card_set* ex_list_sum, group* mg, uint32 ex) { int32 field::get_summon_release_olist(card* target, card_set* ex_list, card_set* ex_list_sum, group* mg, uint32 ex) {
uint8 p = target->current.controler; uint8 p = target->current.controler;
card* pcard; card* pcard;
...@@ -1315,6 +1318,20 @@ int32 field::get_summon_release_olist(card* target, card_set* ex_list, card_set* ...@@ -1315,6 +1318,20 @@ int32 field::get_summon_release_olist(card* target, card_set* ex_list, card_set*
} }
return rcount + ex_sum_max; return rcount + ex_sum_max;
} }
// put the monsters of 1-p affected by EFFECT_EXTRA_RELEASE
void field::get_summon_release_exlist(card* target, card_set* ex_list) {
uint8 p = target->current.controler;
card* pcard;
uint32 rcount = 0;
for(int i = 0; i < 5; ++i) {
pcard = player[1 - p].list_mzone[i];
if(!pcard || pcard->is_releasable_by_summon(p, target))
continue;
if(pcard->is_affected_by_effect(EFFECT_EXTRA_RELEASE)) {
ex_list->insert(pcard);
}
}
}
int32 field::get_summon_count_limit(uint8 playerid) { int32 field::get_summon_count_limit(uint8 playerid) {
effect_set eset; effect_set eset;
filter_player_effect(playerid, EFFECT_SET_SUMMON_COUNT_LIMIT, &eset); filter_player_effect(playerid, EFFECT_SET_SUMMON_COUNT_LIMIT, &eset);
......
field.h
View file @ ec9d41a0
...@@ -365,6 +365,7 @@ public: ...@@ -365,6 +365,7 @@ public:
int32 get_summon_release_list(card* target, card_set* release_list, card_set* ex_list, card_set* ex_list_sum, group* mg = NULL, uint32 ex = 0); int32 get_summon_release_list(card* target, card_set* release_list, card_set* ex_list, card_set* ex_list_sum, group* mg = NULL, uint32 ex = 0);
int32 get_summon_release_slist(card* target, card_set* release_list, group* mg = NULL); int32 get_summon_release_slist(card* target, card_set* release_list, group* mg = NULL);
int32 get_summon_release_olist(card* target, card_set* ex_list, card_set* ex_list_sum, group* mg = NULL, uint32 ex = 0); int32 get_summon_release_olist(card* target, card_set* ex_list, card_set* ex_list_sum, group* mg = NULL, uint32 ex = 0);
void get_summon_release_exlist(card* target, card_set* ex_list);
int32 get_summon_count_limit(uint8 playerid); int32 get_summon_count_limit(uint8 playerid);
int32 get_draw_count(uint8 playerid); int32 get_draw_count(uint8 playerid);
void get_ritual_material(uint8 playerid, effect* peffect, card_set* material); void get_ritual_material(uint8 playerid, effect* peffect, card_set* material);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment