test_DestructionEffects.sqf

private _e = [];
private _c = "true" configClasses (configFile >> "CfgVehicles"); 
 
{ 
    private _ce = "true" configClasses (_x >> "DestructionEffects") apply {toLower getText (_x >> "type")} select {(_x find "\") isEqualTo -1}; 
 
    _e append _ce; 
    _e = _e arrayIntersect _e; 
} forEach _c; 

_e = _e select {!isClass (configFile >> "CfgCloudlets" >> _x)} select {!isClass (configFile >> "CfgLights" >> _x)} select {!isClass (configFile >> "CfgDamageAround" >> _x)};

copyToclipboard str _e;