#include "audio.h"

ookisa_henka(ii,i)
     int *ii,*i;
{
  int j,k=0;
  double waru,hani_dat[4],hk;
  char s[256],ss[256];

  nyu[*ii].hani=0.0;
  for(j=0; j<4; j++)
    hani_dat[j]=0.0;
  switch(nyu[*ii].tori[*i]){
  case '<': nyu[*ii].henka=1.0;
    sscanf(nyu[*ii].tori,"<%lf%s",&hani_dat[0],s); break;
  case '>': nyu[*ii].henka=-1.0;
    sscanf(nyu[*ii].tori,">%lf%s",&hani_dat[0],s);
  }
  for((*i)++; nyu[*ii].tori[*i-1]!='-'; (*i)++);
  while(s[0]!=',')
    switch(s[0]){
    case '+': nyu[*ii].hani+=hani_dat[k];
      k++;
      sscanf(s,"+%lf%s",&hani_dat[k],ss);
      sscanf(ss,"%s",s);
      break;
    case '/': sscanf(s,"/%lf%s",&waru,ss);
      sscanf(ss,"%s",s);
      hani_dat[k]/=waru;
    }
  nyu[*ii].hani+=hani_dat[k];
  hani_h=0.0;
  sscanf(s,",%lf",&hk);
  nyu[*ii].henka*=hk;
}