An effective atomic charge model for infrared intensities