on key 't'
{
dword aep; // Application Endpoint handle
dword psi; // provided service handle
dword peg1; // provided Eventgroup handle
dword peg2; // provided Eventgroup handle
dword pev; // provided Event handle
// open an Application Endpoint
aep = AREthOpenLocalApplicationEndpoint(17, 50002);
// create service
psi = AREthCreateProvidedServiceInstance(aep,10,1);
// create Eventgroups
peg1 = AREthAddProvidedEventGroup(psi,1);
peg2 = AREthAddProvidedEventGroup(psi,1);
// create Event and add Event to both Eventgroups
pev = AREthAddEvent(psi, 1, "OnPrepareEvent1");
AREthAddEventToEventgroup(peg1, pev);
AREthAddEventToEventgroup(peg2, pev);
// ensure that Event is sent cyclically
AREthSetProperty(pev,"CycleTimeMs",1000);
// ... do something here
// remove Event from Eventgroup 1
AREthRemoveEventFromEventgroup(pev);
// ... Event is still assigned to Eventgroup 2
// ... Application Endpoint, provided Service Instance and Eventgroup can still be used here
}