//
//	   ＜ＥＡ＞
//     売買シグナルを加工して、売買タイミングを抽出する
//-------------------------------------
#import "shared_memory.dll"
   double set_a();
   double write_a(double,int);
   double read_a(int);
   double close_a();
   double set_b();
   double write_b(double,int);
   double read_b(int);
   double close_b();
#import

//------
int open_position;
//--------------------------------------
int init()
  {
   set_a();
   set_b();
   //
   open_position=0;
   return(0);
  }
//-------------------------------------
int deinit()
  {
   close_a();
   close_b();
   return(0);
  }
//-------------------------------------
int start()
  {
   //
   //Print("start(): spread= ",spread,": Bars=",Bars);     
   //for(int i=Bars-1000;i>=0;i--)//OK
   //for(int i=0;i<=Bars-1000;i++)//OK
   //open_position=0;
   for(int k=1000;k>=0;k--)
   {
      write_a(0.0,k);
   }
   //  
   for(int i=1000;i>=0;i--)
   {
	//
	if(open_position==0)
	{
		//
		if(read_b(i)==+1.0)
		{
			//Up_arrow
         write_a(+1.0,i);
			open_position=1;
		}
		else if(read_b(i)==-1.0)
		{
			//Down_arrow
         write_a(-1.0,i);
			open_position=-1;
		}
		else if(read_b(i)==0.0)
		{
		   write_a(0.0,i);
		   open_position=0;
		}
	}
	//
	if(open_position==1)
	{
		if(read_b(i)==-1.0)
		{
		   //
		   write_a(-1.0,i);
		   open_position=0;
		   //
		}else if(read_b(i)==+1.0)
		{
			//
         //write_a(0.0,i);
			//open_position=1;
			//
		}else if(read_b(i)==0.0)
		{
		   //write_a(0.0,i);
			//open_position=1;
		}
	}
	//
	if(open_position==-1)
	{
		if(read_b(i)==1.0)
		{
			//
			write_a(+1.0,i);
			open_position=0;
			//
		}else if(read_b(i)==-1.0)
		{
			//
         //write_a(0.0,i);
			//open_position=-1;
			//
		}else if(read_b(i)==0.0)
		{
         //write_a(0.0,i);
         //open_position=-1;	
		}
	}
	//
   }
    //
   return(0);
  }