Grant EXP for Tagged Collectibles

using { /Fortnite.com/Devices }
using { /Verse.org/Simulation }
using { /UnrealEngine.com/Temporary/Diagnostics }
using { /Verse.org/Simulation/Tags }

xp_token_tag := class(tag){}

xp_tokens := class(creative_device):

    @editable
    Grant_XP_Accolade : accolades_device = accolades_device{}
  
    OnBegin<override>()<suspends>:void=
        TaggedTokens := GetCreativeObjectsWithTag(xp_token_tag{})
        for (FoundObject: TaggedTokens):
            if (Token := collectible_object_device[FoundObject]):
                Token.CollectedEvent.Subscribe(GrantXP)

    GrantXP (Agent: agent): void =
        Grant_XP_Accolade.Award(Agent)