/**************/
/* laskuri.c  */
/**************/

#include <stdio.h>
#include <conio.h>
#include <ctype.h>

#define MAX 100

typedef struct {
  const char *nimi;
  int lkm;
} Kulkuneuvo;

typedef struct {
  Kulkuneuvo kulkuneuvoja[MAX];
  int lkm;
} Kulkuneuvot;

char lue_merkki(void)   
{
/* Seuraava toimii mm. Turbo C:ss„: */
  return toupper(getch());
}

void piirra_naytto(Kulkuneuvot *k)
{
  int i;

  clrscr();
  printf("\n"
"  Ohjelmalla lasketaan kuorma- ja henkil”autojen lukum„„ri„\n"
"  sit„ mukaa kun ne ajavat ohi.\n"
"\n"
"  K„ytt”ohje:  K - lis„„ kuorma-autojen lukum„„r„„\n"
"               H - lis„„ henkil”autojen lukum„„r„„\n"
"               N - nollaa molemmat laskurit\n"
"               X - lopettaa ohjelman\n"
"\n\n");
  printf("\t");
  for(i=0; i<(*k).lkm; i++)
    if(i<MAX) printf("      %13s",(*k).kulkuneuvoja[i].nimi);
  printf("\n");
}

void nayta_autot(Kulkuneuvot *k)
{
  int i;

  for(i=0; i<(*k).lkm; i++)
    if(i<MAX) printf("  %17d",(*k).kulkuneuvoja[i].lkm);
  printf("\n");
}

void nollaa_laskurit(Kulkuneuvot *k)
{
  int i;

  for(i=0; i<MAX; i++) (*k).kulkuneuvoja[i].lkm = 0;
  nayta_autot(k);
}

void lisaa(const char c, Kulkuneuvot *k)
{
  int i;
  for(i=0; i<(*k).lkm; i++)
    if((*k).kulkuneuvoja[i].nimi[0] == toupper(c))
      (*k).kulkuneuvoja[i].lkm = (*k).kulkuneuvoja[i].lkm + 1;
  nayta_autot(k);
}

int laske(Kulkuneuvot *k)
{
  char c;

  while (1) {
    c = lue_merkki();
    lisaa(c, k);
    if (c == 'X') return 0;
  }
}

/****************************************************************************/
int main(void)
{
  Kulkuneuvot autot;
  autot.kulkuneuvoja[0].nimi = "Kuorma-auto";
  autot.kulkuneuvoja[1].nimi = "Henkilöauto";
  autot.lkm = 2;	// aina oltava: lkm < MAX
  piirra_naytto(&autot);
  nollaa_laskurit(&autot);
  laske(&autot);
  return 0;
}