The problem isn't really getting the subtypes, it's storing them betwen EVENT_CAST_SPELL and EVENT_RESOLVE_SPELL. You can get the subtypes in EVENT_CAST_SPELL with:
- Code: Select all
reported_subtypes_t my_stypes = {{0}};
get_creature_subtypes(BYTE2(sac), BYTE3(sac), &my_stypes);
The issue is reported_subtypes_t has a length of 26 int, though I'm pretty sure we can truncate each subtype_t to 16 bits. We might want to change the definition of reported_subtypes_t to reflect this. In any case, the only place I know of to store all that is in the targets array
Storing them at the end of the targets array is probably safest and hopefully won't interfere with anything that checks targets. Each target_t, being 2 int, can store 4 int16_t, so counting backwards from targets[18] we can start at targets[12].card. We end up with something like:
- Code: Select all
#define NUM_SUBTYPES 26
typedef struct
{
uint16_t reported_subtypes16[NUM_SUBTYPES];
} reported_subtypes16_t;
static void store_subtypes_in_targets_array(card_instance_t* inst, reported_subtypes_t *my_subtypes){
reported_subtypes16_t* stored_subtypes = (reported_subtypes16_t*)(&inst->targets[12].card);
int q;
for(q=0; q<NUM_SUBTYPES; q++){
stored_subtypes->reported_subtypes16[q] = (my_subtypes->reported_subtypes[q] & 0xFFFF);
}
}
static void retrieve_subtypes_from_targets_array(card_instance_t* inst, reported_subtypes_t *my_subtypes){
reported_subtypes16_t* stored_subtypes = (reported_subtypes16_t*)(&inst->targets[12].card);
int q;
for(q=0; q<NUM_SUBTYPES; q++){
my_subtypes->reported_subtypes[q] = stored_subtypes->reported_subtypes16[q];
}
}
int card_endemic_plague(int player, int card, event_t event){
/* CARD_ID_ENDEMIC_PLAGUE 6132
Endemic Plague |3|B
Sorcery
As an additional cost to cast this spell, sacrifice a creature.
Destroy all creatures that share a creature type with the sacrificed creature. They can't be regenerated. */
if( ! IS_GS_EVENT(player, card, event) ){
return 0;
}
if( event == EVENT_CAN_CAST ){
return generic_spell(player, card, event, GS_SAC_CREATURE_AS_COST, NULL, NULL, 1, NULL);
}
test_definition_t test;
new_default_test_definition(&test, TYPE_CREATURE, "Select a creature to sacrifice.");
if( event == EVENT_CAST_SPELL && affect_me(player, card) ){
int sac = new_sacrifice(player, card, player, SAC_JUST_MARK|SAC_AS_COST|SAC_RETURN_CHOICE, &test);
if (!sac){
cancel = 1;
return 0;
}
reported_subtypes_t my_stypes = {{0}};
get_creature_subtypes(BYTE2(sac), BYTE3(sac), &my_stypes);
DECL_INST();
store_subtypes_in_targets_array(inst, &my_stypes);
kill_card(BYTE2(sac), BYTE3(sac), KILL_SACRIFICE);
}
if( event == EVENT_RESOLVE_SPELL ){
reported_subtypes_t my_stypes = {{0}};
DECL_INST();
retrieve_subtypes_from_targets_array(inst, &my_stypes);
int i, p, q;
for(p=0;p<2;p++){
for(i=0; i<active_cards_count[p]; i++){
if( in_play(p, i) && is_what(p, i, TYPE_CREATURE) )
{
for(q=0; q<NUM_SUBTYPES; q++){
if( is_creature_type(my_stypes.reported_subtypes[q]) && has_subtype(p, i, my_stypes.reported_subtypes[q]) )
kill_card(p, i, KILL_BURY);
}
}
}
}
kill_card(player, card, KILL_DESTROY);
}
return 0;
}
#undef NUM_SUBTYPES
The has_subtype() line might not be exactly right for some edge cases. You might want to scan through shares_creature_subtype() for those.
Posted: 03 Apr 2023, 15:32
