/**
 *  Record samples from line-in and save to out.mp3
 *
 */
#define WIN32_LEAN_AND_MEAN
#include <windows.h>
#include <olectl.h>
#include <ole2.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <conio.h>
#include <dos.h>
#include <conio.h>
#include \"../include/libzplay.h\"
using namespace libZPlay;
ZPlay* player;
int nRate = 100;
int nPitch = 100;
int nTempo = 100;
int fCenterCut = 0;
int fSideCut = 0;
int fMixChannels = 0;
int lVolume = 100;
int rVolume = 100;
int fPause = 0;
int fEcho = 0;
int fEq = 0;
int fReverse = 0;
TStreamStatus status;
TStreamTime pos;
int main(int argc, char **argv)
{
  // clear screen
  system(\"CLS\");
  // create class instance
  player = CreateZPlay();
  // chek if we have class instance
  if(player == 0)
  {
    printf(\"Error: Can\'t create class instance !\\nPress key to exit.\\n\");
    getch();
    return 0;  
  }
  // get library version
  int ver = player->GetVersion();
  // check if we have version 2.00 and above
  if(ver < 200)
  {
    printf(\"Error: Need library version 2.00 and above !\\nPress key to exit.\\r\\n\");
    getch();
    player->Release();
    return 0;
  }
  // display version info
  printf(\"libZPlay v.%i.%02i\\r\\n\\r\\n\", ver / 100, ver % 100);
  printf( \"x: play  \\tj: fade out  \\ti: side cut  \\td: pitch down\\r\\n\"
        \"c: pause  \\tk: fade in  \\to: center cut \\tf: pitch up\\r\\n\"
        \"v: stop  \\tl: loop    \\tn: volume down\\tg: tempo down\\r\\n\"
        \"y: rew   \\tp: equalizer \\tm: volume up \\th: tempo up\\r\\n\"
        \"b: fwd   \\te: echo    \\ta: rate down \\r\\n\"
        \"r: reverse \\tt: channel mix\\ts: rate up  \\tq: quit\\r\\n\\r\\n\");
    // open wavein using Line In
    if(player->OpenFile(\"wavein://src=line;volume=50;\", sfAutodetect) == 0)
    {
      printf(\"Error: %s\\nPress key to exit.\\r\\n\", player->GetError());
      getch();
      player->Release();
      return 0;
    }
    // set wave output to disk file, mp3 encoding
    if(player->SetWaveOutFile(\"out.mp3\", sfMp3, 1) == 0)
    {
      printf(\"Error: %s\\nPress key to exit.\\r\\n\", player->GetError());
      getch();
      player->Release();
      return 0;
    }
  // get stream info
  TStreamInfo pInfo;
  player->GetStreamInfo(&pInfo);
  // display info about stream
  char *sVbr = \"CBR\";
  if(pInfo.VBR)
    sVbr = \"VBR\";
   printf(\"\\r\\n%s %i Hz %s Channel: %u Length: %02i:%02i:%02i:%02i\\r\\n\\r\\n\",
      pInfo.Description,
      pInfo.SamplingRate,
      sVbr,
      pInfo.ChannelNumber,
      pInfo.Length.hms.hour,
      pInfo.Length.hms.minute,
      pInfo.Length.hms.second,
      pInfo.Length.hms.millisecond);
  printf(\"Status| kbps | POS: |Echo|Equ|Cut|Fade|Rev|Rate|Pitch|Tempo|Vol|Loop|Ch mix|\\r\\n\");
  // start playing
  if(player->Play() == 0)
  {
    printf(\"Error: %s\\nPress key to exit.\\r\\n\", player->GetError());
    player->Release(); // delete ZPlay class
    return 0;
  }
  while(1)
  {
    // get current status
     player->GetStatus(&status); 
    char *st = 0;
    if(status.fPlay)
      st = \"Play \";
    else if(status.fPause)
      st = \"Pause\";
    else
      st = \"Stop \";    
    // get current position
    player->GetPosition(&pos);
     printf(\"%s  %04i %02i:%02i:%02i  %i  %i  %i  %i  %i  %03i %03i  %03i %03i  %i  %i\\r\", 
        st,
        player->GetBitrate(0),
        pos.hms.hour,
        pos.hms.minute,
        pos.hms.second,
        status.fEcho,
        status.fEqualizer,
        status.fVocalCut,
        status.fSlideVolume,
        status.fReverse,
        player->GetRate(),
        player->GetPitch(),
        player->GetTempo(),
        lVolume,
        status.nLoop,
        fMixChannels
        );
    if(kbhit())
    {
      int a = getch();
      switch(a)
      {
        case \'i\':  // side cut
          fSideCut = !fSideCut;
          player->StereoCut(fSideCut, 1, 0);
          fCenterCut = 0;
        break;
        case \'o\':  // center
          fCenterCut = !fCenterCut;
          player->StereoCut(fCenterCut, 0, 0);
          fSideCut = 0;
        break;
        case \'s\':  // higher rate
          nRate += 5;
          player->SetRate(nRate);
        break;
        case \'a\':  // lower rate
          nRate -= 5;
          if(nRate < 0)
            nRate = 0;
          player->SetRate(nRate);
        break;
        case \'d\':  // lower pitch
          nPitch -= 5;
          if(nPitch < 0)
            nPitch = 0;
          player->SetPitch(nPitch);
        break;
        case \'f\':  // higher pitch
          nPitch += 5;
          player->SetPitch(nPitch);
        break;
        case \'g\':  // lower tempo
          nTempo -= 5;
          if(nTempo < 0)
            nTempo = 0;
          player->SetTempo(nTempo);
        break;
        case \'h\':  // higher tempo
          nTempo += 5;
          player->SetTempo(nTempo);
        break;
        case \'r\':  // reverse mode
          fReverse = !fReverse;
          if(player->ReverseMode(fReverse) == 0)
          {
            printf(\"Error: %s\\n\", player->GetError());
            fReverse = 0;
          }
        break;
        case \'p\':  // enable or disable equalizer
        {
          fEq = !fEq;
          player->EnableEqualizer(fEq);
          if(fEq)
          {
            player->SetEqualizerPreampGain(-100000);
            player->SetEqualizerBandGain(0, 104000);
            player->SetEqualizerBandGain(1, 104000);
            player->SetEqualizerBandGain(2, 104000);
          }
        }
        break;
        case \'l\': // play loop
        {
          TStreamTime pCurrentTime;
          player->GetPosition(&pCurrentTime);
          TStreamTime pEndTime;
          pEndTime.ms = pCurrentTime.ms + 5000;
          player->PlayLoop(tfMillisecond, &pCurrentTime, tfMillisecond, &pEndTime ,5, 1);
        }
        break;
        case \'j\': // fade out volume
        {
          TStreamTime start;
          TStreamTime end;
          player->GetPosition(&start);
          end.sec = start.sec + 5;
          player->SlideVolume( tfSecond, &start, 100,100, tfSecond, &end, 0,0);
        }
        break;
        case \'k\': // fade in volume
        {
          TStreamTime start;
          player->GetPosition(&start);
          TStreamTime end;
          end.sec = start.sec + 5;
          player->SlideVolume( tfSecond, &start, 0,0, tfSecond, &end, 100, 100);
        }
        break;
        case \'e\': // enable echo
        {
          fEcho = !fEcho;
          player->EnableEcho(fEcho);
        }
        break;
        case \'x\': // play
          if(player->Play() == 0)
            printf(\"Err: %s\\n\", player->GetError());
          fPause = 0;
        break;
        case \'v\': // stop
          player->Stop();
          fPause = 0;
        break;
        case \'c\':  // pause
          if(fPause)
          {
            player->Resume();
            fPause = 0;
          }
          else
          {
            player->Pause();
            fPause = 1;
          }
        break;
        case \'y\': // jump back 5 seconds
        {
          TStreamTime pTime;
          pTime.sec = 5;
          player->Seek(tfSecond, &pTime, smFromCurrentBackward);
        }
        break;
        case \'b\': // jump forward 5 seconds
        {
          TStreamTime pTime;
          pTime.sec = 5;
          player->Seek(tfSecond, &pTime, smFromCurrentForward);
        }
        break;
        case \'t\':
        {
          // mix stereo channels to mono
          fMixChannels = !fMixChannels;
          player->MixChannels(fMixChannels, 50, 50);
        }
        break;
        case \'n\':  // volume down
          if(lVolume >= 5)
            lVolume -= 5;
          if(rVolume >= 5)
            rVolume -= 5;
          player->SetMasterVolume(lVolume, rVolume);
        break;
        case \'m\':  // volume up
          if(lVolume <= 95)
            lVolume += 5;
          if(rVolume <= 95)
            rVolume += 5;
          player->SetMasterVolume(lVolume, rVolume);
        break;
        case \'q\':
        case \'Q\':
          player->Release();  
        return 0; 
      }
    }
    Sleep(50);
  }
}