Sub SetMaterialEmissiveColor( material_id, color)

Set's a material's emissive color