fix

gframe/game.cpp

@@ -14,7 +14,7 @@
 #include <dirent.h>
 #endif
 
-const unsigned short PRO_VERSION = 0x12b0;
+const unsigned short PRO_VERSION = 0x12b1;
 
 namespace ygo {
 

ocgcore/libduel.cpp

@@ -1912,7 +1912,7 @@ int32 scriptlib::duel_select_target(lua_State *L) {
 	group* pgroup = pduel->new_group();
 	pduel->game_field->core.select_cards.clear();
 	pduel->game_field->filter_matching_card(2, (uint8)self, location1, location2, pgroup, pexception, extraargs, 0, 0, TRUE);
-	for(field::card_set::iterator cit = pgroup->container.begin(); cit != pgroup->container.end(); ++cit)
+	for(auto cit = pgroup->container.begin(); cit != pgroup->container.end(); ++cit)
 		pduel->game_field->core.select_cards.push_back(*cit);
 	pduel->game_field->add_process(PROCESSOR_SELECT_TARGET, 0, 0, 0, playerid, min + (max << 16));
 	return lua_yield(L, 0);
@@ -2078,12 +2078,15 @@ int32 scriptlib::duel_set_target_card(lua_State *L) {
 			pduel->game_field->core.current_chain.rbegin()->target_cards->is_readonly = TRUE;
 		}
 		group* targets = pduel->game_field->core.current_chain.rbegin()->target_cards;
-		if(pcard)
+		if(pcard) {
 			targets->container.insert(pcard);
-		else
+			pcard->create_relation(peffect);
+		} else {
 			targets->container.insert(pgroup->container.begin(), pgroup->container.end());
+			for(auto cit = pgroup->container.begin(); cit != pgroup->container.end(); ++cit)
+				(*cit)->create_relation(peffect);
+		}
 		if(peffect->flag & EFFECT_FLAG_CARD_TARGET) {
-			group::card_set::iterator cit;
 			if(pcard) {
 				if(pcard->current.location & 0x30)
 					pduel->game_field->move_card(pcard->current.controler, pcard, pcard->current.location, 0);
@@ -2091,7 +2094,7 @@ int32 scriptlib::duel_set_target_card(lua_State *L) {
 				pduel->write_buffer8(1);
 				pduel->write_buffer32(pcard->get_info_location());
 			} else {
-				for(cit = pgroup->container.begin(); cit != pgroup->container.end(); ++cit) {
+				for(auto cit = pgroup->container.begin(); cit != pgroup->container.end(); ++cit) {
 					if((*cit)->current.location & 0x30)
 						pduel->game_field->move_card((*cit)->current.controler, (*cit), (*cit)->current.location, 0);
 					pduel->write_buffer8(MSG_BECOME_TARGET);

ocgcore/processor.cpp

@@ -692,6 +692,8 @@ int32 field::process() {
 						pduel->write_buffer32(core.select_cards[returns.bvalue[i + 1]]->get_info_location());
 					}
 				}
+				for(auto cit = pret->container.begin(); cit != pret->container.end(); ++cit)
+					(*cit)->create_relation(peffect);
 				pduel->lua->add_param(pret, PARAM_TYPE_GROUP);
 			}
 			core.units.pop_front();
@@ -3933,8 +3935,6 @@ int32 field::add_chain(uint16 step) {
 		effect* peffect = clit->triggering_effect;
 		card_set::iterator cit;
 		if(clit->target_cards && clit->target_cards->container.size()) {
-			for(cit = clit->target_cards->container.begin(); cit != clit->target_cards->container.end(); ++cit)
-				(*cit)->create_relation(clit->triggering_effect);
 			if(clit->triggering_effect->flag & EFFECT_FLAG_CARD_TARGET) {
 				for(cit = clit->target_cards->container.begin(); cit != clit->target_cards->container.end(); ++cit)
 					raise_single_event(*cit, 0, EVENT_BECOME_TARGET, clit->triggering_effect, 0, clit->triggering_player, 0, clit->chain_count);

script/c24096228.lua

@@ -13,7 +13,7 @@ function c24096228.cfilter(c)
 	return c:IsDiscardable() and c:IsType(TYPE_SPELL)
 end
 function c24096228.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c24096228.cfilter,tp,LOCATION_HAND,0,1,nil) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c24096228.cfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
 	Duel.DiscardHand(tp,c24096228.cfilter,1,1,REASON_COST+REASON_DISCARD)
 end
 function c24096228.filter1(c,e,tp,eg,ep,ev,re,r,rp)

script/c5990062.lua

@@ -12,10 +12,14 @@ function c5990062.cfilter(c)
 	return not c:IsAbleToGraveAsCost()
 end
 function c5990062.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	local g=Duel.GetFieldGroup(tp,LOCATION_ONFIELD+LOCATION_HAND,0)
-	g:RemoveCard(e:GetHandler())
-	if chk==0 then return g:GetCount()>0 and not g:IsExists(c5990062.cfilter,1,nil) end
-	Duel.SendtoGrave(g,REASON_COST)
+	local g1=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,0)
+	local g2=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
+	g1:RemoveCard(e:GetHandler())
+	g2:RemoveCard(e:GetHandler())
+	if chk==0 then return g1:GetCount()>0 and not g1:IsExists(c5990062.cfilter,1,nil)
+		and g2:GetCount()>0 and not g2:IsExists(c5990062.cfilter,1,nil) end
+	g1:Merge(g2)
+	Duel.SendtoGrave(g1,REASON_COST)
 end
 function c5990062.activate(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetDecktopGroup(tp,1)

script/c76891401.lua

@@ -18,7 +18,7 @@ function c76891401.synfilter(c)
 	return c:GetLevel()==3
 end
 function c76891401.filter(c)
-	if c:GetLevel()~=3 then return false end
+	if not c:IsLevelBelow(3) then return false end
 	local loc=c:GetPreviousLocation()
 	if not (bit.band(loc,LOCATION_ONFIELD)>0) then return false end
 	local pos=c:GetPreviousPosition()