#include<fcntl.h>
#include</sys/dev/ppbus/ppi.h>
#include</sys/dev/ppbus/ppbconf.h>
#include<stdio.h>
#include<stdlib.h>

#define SPEED 44375

int main(void);
int main(void)
{

  u_int8_t val;
  int flg=1,fd;
  int a,b,c; 
  int i,j;
  int v,w;
  fd = open("/dev/ppi0",O_RDWR,0600);

  printf("ポットのロックを解除して下さい\n");
  sleep( 2 ); 
  /**ベルトの動き**/
  printf("ベルトが動きます\n"); 
  for(a=1;a<=420;a=a+1){

  val=0x01;
  ioctl(fd,PPISDATA,&val);
  for(i=0;i<SPEED;i++){
    v=v+i;
  }
  
  val=0x00;
  ioctl(fd,PPISDATA,&val);
  for(i=0;i<SPEED;i++){
    v=v+i;
  }
}


  /**停止**/
  printf("3秒間の停止\n");
   sleep( 3 );


  /**アーム 正の動き**/
  printf("アームが動きます\n");
  for(b=1;b<=61;b=b+1){

  val=0x04;
  ioctl(fd,PPISDATA,&val);
  usleep(5000);

  val=0x00;
  ioctl(fd,PPISDATA,&val);
  usleep(5000);
}


  /**10秒間の停止**/
  printf("10秒間の停止\n");
  printf("お湯を注ぎます\n");
  val=0x10;
  ioctl(fd,PPISDATA,&val);
  sleep( 10 );


  /**アーム 逆の動き**/
  printf("アームが動きます\n");
  for(b=1;b<=25;b=b+1){

  val=0x0c;
  ioctl(fd,PPISDATA,&val);
  usleep(5000);

  val=0x08;
  ioctl(fd,PPISDATA,&val);
  usleep(5000);
}


  /**停止**/
  printf("3秒間の停止\n");
  sleep( 3 );


  /**ベルトの動き**/
  printf("ベルトが動きます\n"); 
  for(b=1;b<=772;b=b+1){

  val=0x23;
  ioctl(fd,PPISDATA,&val);
  for(i=0;i<SPEED;i++){
    v=v+i;
  }
  
  val=0x22;
  ioctl(fd,PPISDATA,&val);
  for(i=0;i<SPEED;i++){
    v=v+i;
  }
}


  /**停止**/
  printf("3秒間の停止\n");
  val=0x20; 
  ioctl(fd,PPISDATA,&val);
  sleep( 3 );


  /**アーム 逆の動き**/
  printf("アームが動きます\n");
  for(b=1;b<=25;b=b+1){

  val=0x2c;
  ioctl(fd,PPISDATA,&val);
  usleep(5000);

  val=0x28;
  ioctl(fd,PPISDATA,&val);
  usleep(5000);
}


  /**2分30秒間停止**/
   printf("カウント開始\n");
   printf("赤\n");
   val=0x10;
   ioctl(fd,PPISDATA,&val);
   sleep( 3 );
   printf("30秒経過\n");
  
   printf("黄\n");
   val=0x20;
   ioctl(fd,PPISDATA,&val);
   sleep( 3 );
   printf("1分経過\n");

   printf("赤,黄\n");
   val=0x30;
   ioctl(fd,PPISDATA,&val);
   sleep( 3 );
   printf("1分30秒経過\n");
  
   printf("赤\n");
   val=0x10;
   ioctl(fd,PPISDATA,&val);
   sleep( 3 );
   printf("2分経過\n");
  
   printf("黄\n");
   val=0x20;
   ioctl(fd,PPISDATA,&val);
   sleep( 3 );
   printf("2分30秒経過\n");
   printf("よく待てましたね\n");


  /**アーム 正の動き**/
  printf("アームが動きます\n");
  for(b=1;b<=5;b=b+1){

  val=0x44;
  ioctl(fd,PPISDATA,&val);
  usleep(5000);

  val=0x40;
  ioctl(fd,PPISDATA,&val);
  usleep(5000);
}


  /**停止**/
  printf("3秒間の停止\n");
  sleep( 3 );


  /**ベルトの動き**/
  printf("ベルトが動きます\n"); 
  for(a=1;a<=356;a=a+1){

  val=0x41;
  ioctl(fd,PPISDATA,&val);
  for(i=0;i<SPEED;i++){
    v=v+i;
  }
  
  val=0x40;
  ioctl(fd,PPISDATA,&val);
  for(i=0;i<SPEED;i++){
    v=v+i;
  }
}
  /**アーム 逆の動き**/
  printf("アームが動きます\n");
  for(b=1;b<=25;b=b+1){

  val=0x0c;
  ioctl(fd,PPISDATA,&val);
  usleep(5000);

  val=0x08;
  ioctl(fd,PPISDATA,&val);
  usleep(5000);
}
    



  /**終わり**/
  printf("出来上がりました\n");
  printf("シグナルタワーの点滅1\n");
  for(b=1;b<=20;b=b+1){
  printf("赤\n");
  val=0x10;
  ioctl(fd,PPISDATA,&val);
  usleep( 50000 );
  
  printf("黄\n");
  val=0x20;
  ioctl(fd,PPISDATA,&val);
  usleep( 50000 );

  printf("青\n");
  val=0x40;
  ioctl(fd,PPISDATA,&val);
  usleep( 50000 );
  
  printf("赤,黄\n");
  val=0x30;
  ioctl(fd,PPISDATA,&val);
  usleep( 100000 );
  
  printf("黄,青\n");
  val=0x60;
  ioctl(fd,PPISDATA,&val);
  usleep( 100000 );
  
  printf("青,赤\n");
  val=0x50;
  ioctl(fd,PPISDATA,&val);
  usleep( 100000 );
  
  printf("赤,黄,青\n");
  val=0x70;
  ioctl(fd,PPISDATA,&val);
  usleep( 100000 );
  } 
  sleep( 3 );

  /**完全に終了**/
  printf("音の消去\n");
  val=0x00;
  ioctl(fd,PPISDATA,&val);
  sleep( 3 );
   
  printf("終わりです\n");
  sleep( 2 );
  printf("おいしいですか？\n");
  sleep( 2 );
  printf("残さず食べましょう\n");
}