input : ³¯Â¥(20080103),P1(4),P2(5),P3(10),P4(11),P5(13),p6(16),p7(20);
var : cnt(0),mav4(0),mav5(0),mav10(0),mav11(0),mav13(0),mav16(0),mav20(0);
var : cond1(False),cond2(false),Bcnt1(0),Bcnt2(0),Bcnt3(0);
var : buycond1(False),buycond2(False),buycond3(false),Buyv1(0),Buyv2(0);
var : sellcond1(False),sellcond2(False),sellcond3(false),B1(0),B2(0);
 
var1 = 0;
var2 = 0;
var3 = 0;
var4 = 0;
var5 = 0;
var6 = 0;
var7 = 0;

for cnt = 0 to P7-1{
    if cnt < P1 Then
        var1 = var1 + dayclose(cnt);
    if cnt < P2 Then
        var2 = var2 + dayclose(cnt);
    if cnt < P3 Then
        var3 = var3 + dayclose(cnt);
    if cnt < P4 then
        var4 = var4 + dayclose(cnt);
    if cnt < P5 then
        var5 = var5 + dayclose(cnt);
    if cnt < P6 then
        var6 = var6 + dayclose(cnt);
    if cnt < P7 then
        var7 = var7 + dayclose(cnt);
}
 
mav4 = var1/P1; 
mav5 = var2/p2;
mav10 = var3/P3; 
mav11 = var4/P4; 
mav13 = var5/P5; 
mav16 = var6/P6; 
mav20 = var7/P7; 
 
cond1 = dayopen() >= mav11*0.995; 
cond2 = dayopen() < mav11*0.995; 
 
buyCond1 =dayclose(1) >= 1025 and 
    C > dayclose(1)*0.90 and 
    c <= mav13*1.005; 

buyCond2 = dayclose(1) >= 1025 and 
    C > dayclose(1)*0.88 and 
    c <= mav16*1.005;
buyCond3 = dayclose(1) >= 1025 and 
    C > dayclose(1)*0.88 and 
    c <= mav20*1.005; 
    
sellcond1 = C >= mav4*0.988; 
sellcond2 = C >= mav5*0.988; 
sellcond3 = mav4 >= mav10*0.99 and mav4 <= mav10*1.01 and 
   C >= mav10*0.99;  


if cond1 == true Then{ 
      if  buyCond1 == true  and Sdate >= ³¯Â¥ and Bcnt1 < 1 Then{
            buy("B1");
            Bcnt1 = 1;
            Buyv1 = C; //B1 ÁøÀÔ°¡
            B1 = 1; 
            B2 = 0; //B2 ÇØÁ¦
      }
}

if cond1 == true or cond2 == true then{ //¸Å¼öÁ¶°Ç 1,2´Â cond1,cond2 ¸ðµÎ ¹ßµ¿
      if  buyCond2 == true  and Sdate >= ³¯Â¥ and Bcnt2 < 1  Then{
            buy("B2");
            Bcnt2 = 1;
          Buyv2 = C; //B2 ÁøÀÔ°¡
            B2 = 1;
            B1 = 0; //B1 ÇØÁ¦
      }
      if buyCond3 == true  and Sdate >= ³¯Â¥ and Bcnt3 < 1  Then{
            buy("B3");
            Bcnt3 = 1;
            B1 = 0; //B1 ÇØÁ¦
            B2 = 0; //B2 ÇØÁ¦
      }
}

if marketposition() == 1 and B1 >= 1 and crossdown(C, Buyv1*(1-B1/100)) Then{
      buy("B1Ãß°¡");
      B1 = B1+1;
}



if marketposition() == 1 and B2 >= 1 and crossdown(C, Buyv2*(1-B2/100)) Then{
      buy("B2Ãß°¡");
      B2 = B2+1;
}

if  MarketPosition() == 1 and sellcond1 == true Then {
      exitlong("EX1");
      Bcnt1 = 1;
      Bcnt2 = 1;
      Bcnt3 = 1;
      B1 = 0; //B1 ÇØÁ¦
      B2 = 0; //B2 ÇØÁ¦
}
 
if  MarketPosition() == 1 and sellcond2 == true Then {
      exitlong("EX2");
      Bcnt1 = 1;
      Bcnt2 = 1;
      Bcnt3 = 1;
      B1 = 0; //B1 ÇØÁ¦
      B2 = 0; //B2 ÇØÁ¦
}

if  MarketPosition() == 1 and sellcond3 == true Then {
      exitlong("EX3");
      Bcnt1 = 1;
      Bcnt2 = 1;
      Bcnt3 = 1;
      B1 = 0; //B1 ÇØÁ¦
      B2 = 0; //B2 ÇØÁ¦
}