country.c

#include <stdio.h>
#include <unistd.h>
#include <term.h>
#include <termios.h>

#define drt(ch,n)\
 case ch: \
 fprintf(stdout,"i 10 0 %d %f 0\n",p,n); break; \
 case ch-32: \
 fprintf(stdout,"i 10 0 %d %f 1\n",p,n); break
 
 
#define nurt(ch)\
 case ch: \
 p = ch-48; break
 
 
#define brt(ch,n)\
 case ch: \
 fprintf(stdout,"i 12 0 %d %f 0\n",p,n); break;\
  case ch-32: \
 fprintf(stdout,"i 12 0 %d %f 1\n",p,n); break
  
#define art(ch,n)\
 case ch: \
 fprintf(stdout,"i 11 0 %d %f 0\n",p,n); break;\
  case ch-32: \
 fprintf(stdout,"i 11 0 %d %f 1\n",p,n); break
 
#define prt(ch,nm)\
 case ch: \
 fprintf(stdout,"i %d 0 %d 0\n",nm,p); break; \
 case ch-32: \
 fprintf(stdout,"i %d 0 %d 1\n",nm,p); break


int main(void){  
 int p;
 int c;   
 static struct termios oldt, newt;
 p = 1;
 tcgetattr( STDIN_FILENO, &oldt);
 newt = oldt;
 newt.c_lflag &= ~(ICANON | ECHO);          
 tcsetattr( STDIN_FILENO, TCSANOW, &newt);
 while((c=getchar())!= 27) {   
  switch(c) { 
  
  nurt('1');
  nurt('2');
  nurt('3');
  nurt('4');
  nurt('5');
  nurt('6');
  nurt('7');
  nurt('8');
  


prt('q',1);
prt('w',2);
prt('e',3);
prt('r',4);
prt('t',5);


   brt('y',3.0/4.0);
   brt('u',5.0/6.0);
   brt('i',1.0);
   brt('o',9.0/8.0);
   brt('p',4.0/3.0);

   art('a',3.0/4.0);
      art('s',5.0/6.0);
   art('d',1.0);
   art('f',9.0/8.0);
   art('g',4.0/3.0);
   art('h',16.0/11.0);
   art('j',7.0/5.0);
   art('k',3.0/2.0);
   art('l',7.0/4.0);
   art(';',2.0);
   
   
   drt('<',3.0/4.0);
      drt('z',5.0/6.0);
   drt('x',1.0);
   drt('c',9.0/8.0);
   drt('v',4.0/3.0);
   drt('b',16.0/11.0);
   drt('n',7.0/5.0);
   drt('m',3.0/2.0);
   drt(',',7.0/4.0);
   drt('.',2.0);
 case '9': 
 fprintf(stdout,"i2 0 0.3 1\n"); 
  }  
 // fflush( csound_pointer );
  fflush(stdout);
 }             
    tcsetattr( STDIN_FILENO, TCSANOW, &oldt);
    return 0;
}