We present for the first time a numerical kinetic/fluid code for the ionosphere coupling proton and electron effects. It solves the fluid transport equations up to the eighth moment, and the kinetic equations for suprathermal particles. Its new feature is that for the latter, both electrons and protons are taken into account, while the preceding codes (TRANSCAR) only considered electrons. Thus it is now possible to compute in a single run the electron and ion densities due to proton precipitation. This code is successfully applied to a multi-instrumental data set recorded on 22 January 2004. We make use of measurements from the following set of instruments: the Defence Meteorological Satellite Program (DMSP) F-13 measures the precipitating particle fluxes, the EISCAT Svalbard Radar (ESR) measures the ionospheric parameters, the thermospheric oxygen lines are measured by an all-sky camera and the H_a line is given by an Ebert-Fastie spectrometer located at Ny-Ålesund. We show that the code computes the H_a spectral line profile with an excellent agreement with observations, providing some complementary information on the physical state of the atmosphere. We also show the relative effects of protons and electrons as to the electron densities. Computed electron densities are finally compared to the direct ESR measurements.