#include "mat.h"
#include "tekst.h"
#include "podpis.h"
#include "menu.h"
#include "macierze.h"

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

void program_liczby (void);
void program_litery (void);
void program_macierz (void);
void program_macierz_2 (double *, double *, int, int);



#include "macierz MAX.h"

void program (void)
{
 char z;
 while(1)
 {
  visiting_card();
  menu_glowne();
  z = _getch();
  switch(z)
  {
   case '0':
    program_liczby();
    getchar();          //gdzies zostaje enter
    break;
   case '1':
    program_litery();
    break;
   case '2':
    program_macierz();
    getchar();         //gdzies zostaje enter
    break;
   case 27:
    return;
   default:
    break;
  }
  system&#40;"cls"&#41;;
 }
 
}
void program_liczby (void)
{
 system&#40;"cls"&#41;;
 char z;
 while(1)
 {
  visiting_card();
  menu_liczby();
  z = _getch();
  switch(z)
  {
   case '0':
    logarytm();
    break;
   case '1':
    uklad_2_rownan();
    break;
   case '2':
    uklad_3_rownan();
    break;
   case '3':
    liczba_przekatnych();
    break;
   case '4':
    potega();
    break;
   case '5':
    pierwiastek();
    break;
   case '6':
    trojkat();
    break;
   case '7':
    kolo();
    break;
   case '8':
    pierwiastki_rownania();
    break;
   case '9':
    wielokat_foremny();
    break;
   case 27:
    return;
   default:
    break;
  }
  system&#40;"cls"&#41;;
 }
}
void program_litery (void)
{
 char z;
 char tab[1000];
 podaj_tekst(tab);
 system&#40;"cls"&#41;;
 while (1)
 {
  visiting_card();
  menu_litery();
  z = _getch();
  switch(z)
  {
  case '0':
   male_na_duze(tab);
   break;
  case '1':
   duze_na_male(tab);
   break;
  case '2':
   male_duze_duze_male(tab);
   break;
  case '3':
   tekst_od_konca(tab);
   break;
  case '4':
   ilosc_znakow(tab);
   break;
  case '5':
   tekst_symetryczny(tab);
   break;
  case '6':
   szyfr_cezara(tab);
   break;
  case '7':
   szachownica_polibiusza(tab);
   break;
  case '8':
   podaj_tekst(tab);
   break;
  case 27:
   return;
  default:
   break;
  }
  system&#40;"cls"&#41;;
 }
}
void program_macierz (void)
{
 char z;
 double A[MAX][MAX], B[MAX][MAX]; //dwie macierze A i B (kwadratowe)!!!
 int rozm; //rozmiar tych macierzy
 wypelnij_macierze_specjalnie((double*)A, (double *)B, &rozm;, MAX);
 system&#40;"cls"&#41;;
 while(1)
 {
  visiting_card();
  menu_macierz();
  z = _getch();
  switch (z)
  {
  case '0':
   suma_macierzy ((double *)A, (double *)B, rozm, MAX);
   break;
  case '1':
   roznica_macierzy ((double *)A, (double *)B, rozm, MAX, "Macierz A - B:");
   break;
  case '2':
   roznica_macierzy ((double *)B, (double *)A, rozm, MAX, "Macierz B - A:");
   break;
  case '3':
   mnozenie_macierzy((double *)A, (double *)B, rozm, MAX, "Macierz A * B:");
   break;
  case '4':
   mnozenie_macierzy((double *)B, (double *)A, rozm, MAX, "Macierz B * A:");
   break;
  case '5':
   system&#40;"cls"&#41;;
   transpozycja((double *)A, rozm, MAX, "Macierz A transponowana:");
   transpozycja((double *)B, rozm, MAX, "Macierz B transponowana:");
   break;
  case '6':
   system&#40;"cls"&#41;;                                       //trzeba wyczyscic ekran bo w funkcji wypelnij_macierz tego nie ma
   wypelnij_macierz((double*)A, rozm, MAX, 'A');
   wypisz_macierz((double *)A, rozm, MAX, "Macierz A:");        //wypiszmy macierz do podgladu
   _getch();
   break;
  case '7':
   system&#40;"cls"&#41;;
   wypelnij_macierz((double*)B, rozm, MAX, 'B');
   wypisz_macierz((double *)B, rozm, MAX, "Macierz B:");
   _getch();
   break;
  case '8':
   wypelnij_macierze_specjalnie((double*)A, (double *)B, &rozm;, MAX);
   break;
  case '9':
   program_macierz_2 ((double *)A, (double *)B, rozm, MAX);
   break;
  case 27:
   return;
  default:
   break;
  }
  system&#40;"cls"&#41;;
 }
}

void program_macierz_2 (double *A, double *B, int rozmiar, int max)
{
 char z;
 system&#40;"cls"&#41;;
 while(1)
 {
  visiting_card();
  menu_macierz_2();
  z = _getch();
  switch (z)
  {
  case '0':
   skalar_macierze ((double *)A, rozmiar, max, "Macierz A");
   break;
  case '1':
   skalar_macierze ((double *)B, rozmiar, max, "Macierz B");
   break;
  case '2':
   badanie_macierzy ((double *)A, (double *)B, rozmiar, max);
   break;
  case '3':
   wyznacznik_macierzy ((double*)A, rozmiar, "Macierz A:");
   break;
  case '4':
   wyznacznik_macierzy ((double*)B, rozmiar, "Macierz B:");
   break;
  case '5':
   macierz_odwrotna((double *)A, (double *)B, rozmiar, "Macierz odwrotna do macierzy A:", "A", "B");
   break;
  case '6':
   macierz_odwrotna((double *)B, (double *)A, rozmiar, "Macierz odwrotna do macierzy B:", "B", "A");
   break;
  case '7':
  case '8':
  case '9':
   break;
  case 27:
   return;
  default:
   break;
  }
  system&#40;"cls"&#41;;
 }
}