커뮤니티

문의드립니다~

프로필 이미지
겐지
2023-09-05 16:09:54
1148
글번호 172164
답변완료
var: 분주기(15),분주기1(5),분주기4(4),분주기3(3),분주기2(2),분주기5(1); var: S1(0),D1(0); var: cnt(0),cnt1(0),cnt2(0),cnt3(0),cnt4(0),cnt5(0); Array : CC[100](0),OO[100](0);//,HH[100](0),LL[100](0),TT[100](0); Array : C1[300](0);//,T1[100](0); Array : C2[100](0);//,T1[100](0); Array : C3[100](0);//,T1[100](0); Array : C4[100](0);//,T1[100](0); Array : C5[100](0);//,T1[100](0); var:TM(0); var:TF(0),tf1(0),tf2(0),tf3(0),tf4(0),tf5(0); if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) Then{ S1 = TimeToMinutes(070000); D1 = sdate; } if D1 > 0 then{ if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%분주기; if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) or (TF < TF[1]) Then{ OO[0] = o; //HH[0] = H; //LL[0] = L; //TT[0] = stime; for cnt = 1 to 100{ OO[cnt] = OO[cnt-1][1]; //HH[cnt] = HH[cnt-1][1]; //LL[cnt] = LL[cnt-1][1]; CC[cnt] = CC[cnt-1][1]; //TT[cnt] = TT[cnt-1][1]; } } //if H > HH[0] Then HH[0] = H; //if L < LL[0] Then LL[0] = L; CC[0] = C; TF1 = TM%분주기1; if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) or (TF1 < TF1[1]) Then{ //T1[cnt1] = stime; for cnt1 = 1 to 300{ C1[cnt1] = C1[cnt1-1][1]; //T1[cnt1] = T1[cnt1-1][1]; } } C1[0] = c; TF2 = TM%분주기2; if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) or (TF2 < TF2[1]) Then{ for cnt2 = 1 to 100{ C2[cnt2] = C2[cnt2-1][1]; } } C2[0] = c; TF3 = TM%분주기3; if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) or (TF3 < TF3[1]) Then{ for cnt3 = 1 to 100{ C3[cnt3] = C3[cnt3-1][1]; } } C3[0] = c; TF4 = TM%분주기4; if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) or (TF4 < TF4[1]) Then{ for cnt4 = 1 to 100{ C4[cnt4] = C4[cnt4-1][1]; } } C4[0] = c; TF5 = TM%분주기5; if (sdate != sdate[1] and stime >= 070000 and 분주기5 > 1) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000)) and 분주기5 > 1) or (TF5 < TF5[1] and 분주기5 > 1) or (Bdate == Bdate[1] and TM > TM[1] and 분주기5 == 1) Then{ for cnt5 = 1 to 100{ C5[cnt5] = C5[cnt5-1][1]; } } C5[0] = c; } ///////////////// 1.분주기식에서 나스닥 5분 기준으로 120이평과 240이평값을 구했는데 실제5분봉이랑 차이가 꽤 있어서요~ 이게 날이 지나면서 5분봉값과 차이가 생기는거 같은데요. 수정 부탁드립니다.~ 2.그리고 틱차트를 메인으로 하고 참조차트에 5분봉을 불러와서 120이평과 240이평을 구한 다음에 적용했을때 실시간신호가 안잡히는데요.틱차트에선 시간축이 동일하지 않아서 5분봉의 참조차트이용이 가능하지 않다는 이전답변을 보았습니다. 그러면 참조차트상에 현재 그려지는 봉 말고 이전에 완성된 봉을 기준으로 적용해도 마찬가지 인가요? 이렇게 저렇게 해봤는데 심플한 식에서는 적용이 되는데 좀 복잡한 식에서는 적용이 안되고 그렇네요. 아래식대로 1봉전 완성봉 기준으로 전략실행차트에서 적용하고 싶은데요. var:b120(0),b240(0); b120 = (c1[1]+c1[2]+c1[3]+c1[4]+c1[5]+c1[6]+c1[7]+c1[8]+c1[9]+c1[10]+c1[11]+c1[12]+c1[13]+c1[14]+c1[15]+c1[16]+c1[17]+c1[18]+c1[19]+c1[20]+ c1[21]+c1[22]+c1[23]+c1[24]+c1[25]+c1[26]+c1[27]+c1[28]+c1[29]+c1[30]+c1[31]+c1[32]+c1[33]+c1[34]+c1[35]+c1[36]+c1[37]+c1[38]+c1[39]+c1[40]+ c1[41]+c1[42]+c1[43]+c1[44]+c1[45]+c1[46]+c1[47]+c1[48]+c1[49]+c1[50]+c1[51]+c1[52]+c1[53]+c1[54]+c1[55]+c1[56]+c1[57]+c1[58]+c1[59]+c1[60]+ c1[61]+c1[62]+c1[63]+c1[64]+c1[65]+c1[66]+c1[67]+c1[68]+c1[69]+c1[70]+c1[71]+c1[72]+c1[73]+c1[74]+c1[75]+c1[76]+c1[77]+c1[78]+c1[79]+c1[80]+ c1[81]+c1[82]+c1[83]+c1[84]+c1[85]+c1[86]+c1[87]+c1[88]+c1[89]+c1[90]+c1[91]+c1[92]+c1[93]+c1[94]+c1[95]+c1[96]+c1[97]+c1[98]+c1[99]+c1[100]+ c1[101]+c1[102]+c1[103]+c1[104]+c1[105]+c1[106]+c1[107]+c1[108]+c1[109]+c1[110]+c1[111]+c1[112]+c1[113]+c1[114]+c1[115]+c1[116]+c1[117]+c1[118]+c1[119])/119; b240 = (c1[1]+c1[2]+c1[3]+c1[4]+c1[5]+c1[6]+c1[7]+c1[8]+c1[9]+c1[10]+c1[11]+c1[12]+c1[13]+c1[14]+c1[15]+c1[16]+c1[17]+c1[18]+c1[19]+c1[20]+ c1[21]+c1[22]+c1[23]+c1[24]+c1[25]+c1[26]+c1[27]+c1[28]+c1[29]+c1[30]+c1[31]+c1[32]+c1[33]+c1[34]+c1[35]+c1[36]+c1[37]+c1[38]+c1[39]+c1[40]+ c1[41]+c1[42]+c1[43]+c1[44]+c1[45]+c1[46]+c1[47]+c1[48]+c1[49]+c1[50]+c1[51]+c1[52]+c1[53]+c1[54]+c1[55]+c1[56]+c1[57]+c1[58]+c1[59]+c1[60]+ c1[61]+c1[62]+c1[63]+c1[64]+c1[65]+c1[66]+c1[67]+c1[68]+c1[69]+c1[70]+c1[71]+c1[72]+c1[73]+c1[74]+c1[75]+c1[76]+c1[77]+c1[78]+c1[79]+c1[80]+ c1[81]+c1[82]+c1[83]+c1[84]+c1[85]+c1[86]+c1[87]+c1[88]+c1[89]+c1[90]+c1[91]+c1[92]+c1[93]+c1[94]+c1[95]+c1[96]+c1[97]+c1[98]+c1[99]+c1[100]+ c1[101]+c1[102]+c1[103]+c1[104]+c1[105]+c1[106]+c1[107]+c1[108]+c1[109]+c1[110]+c1[111]+c1[112]+c1[113]+c1[114]+c1[115]+c1[116]+c1[117]+c1[118]+c1[119]+c1[120]+ c1[121]+c1[122]+c1[123]+c1[124]+c1[125]+c1[126]+c1[127]+c1[128]+c1[129]+c1[130]+c1[131]+c1[132]+c1[133]+c1[134]+c1[135]+c1[136]+c1[137]+c1[138]+c1[139]+c1[140]+ c1[141]+c1[142]+c1[143]+c1[144]+c1[145]+c1[146]+c1[147]+c1[148]+c1[149]+c1[150]+c1[151]+c1[152]+c1[153]+c1[154]+c1[155]+c1[156]+c1[157]+c1[158]+c1[159]+c1[160]+ c1[161]+c1[162]+c1[163]+c1[164]+c1[165]+c1[166]+c1[167]+c1[168]+c1[169]+c1[170]+c1[171]+c1[172]+c1[173]+c1[174]+c1[175]+c1[176]+c1[177]+c1[178]+c1[179]+c1[180]+ c1[181]+c1[182]+c1[183]+c1[184]+c1[185]+c1[186]+c1[187]+c1[188]+c1[189]+c1[190]+c1[191]+c1[192]+c1[193]+c1[194]+c1[195]+c1[196]+c1[197]+c1[198]+c1[199]+c1[200]+ c1[201]+c1[202]+c1[203]+c1[204]+c1[205]+c1[206]+c1[207]+c1[208]+c1[209]+c1[210]+c1[211]+c1[212]+c1[213]+c1[214]+c1[215]+c1[216]+c1[217]+c1[218]+c1[219]+c1[220]+ c1[221]+c1[222]+c1[223]+c1[224]+c1[225]+c1[226]+c1[227]+c1[228]+c1[229]+c1[230]+c1[231]+c1[232]+c1[233]+c1[234]+c1[235]+c1[236]+c1[237]+c1[238]+c1[239])/239;
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2023-09-06 08:43:17

안녕하세요 예스스탁입니다. 1 사용하시는 기본차트의 주기가 틱봉이면 틱봉에서는 분봉이평은 정확한 계산이 가능하지 않습니다. 랭귀지는 봉의 시고저종가를 이용합니다. 봉 중간의 특정시간대의 가격은 알수가 없어 틱봉에서 분주기의 종가를 알수 없습니다. 틱봉에서 분봉의 지표값은 근사값 정도로 보셔야 합니다. 즉 타주기는 기본차트의 주기에서 배수로 높은 경우만 가능합니다. 1분에서 5분, 5분에서 30분과 같이 배수로 높아야 합니다. 5분에서 7분과 같이 기본차트의 주기기준 배수가 아닌 경우 계산 불가합니다. 2 b120 = (c1[1]+c1[2]+c1[3]+c1[4]+c1[5]+c1[6]+c1[7]+c1[8]+c1[9]+c1[10]+c1[11]+c1[12]+c1[13]+c1[14]+c1[15]+c1[16]+c1[17]+c1[18]+c1[19]+c1[20]+ c1[21]+c1[22]+c1[23]+c1[24]+c1[25]+c1[26]+c1[27]+c1[28]+c1[29]+c1[30]+c1[31]+c1[32]+c1[33]+c1[34]+c1[35]+c1[36]+c1[37]+c1[38]+c1[39]+c1[40]+ c1[41]+c1[42]+c1[43]+c1[44]+c1[45]+c1[46]+c1[47]+c1[48]+c1[49]+c1[50]+c1[51]+c1[52]+c1[53]+c1[54]+c1[55]+c1[56]+c1[57]+c1[58]+c1[59]+c1[60]+ c1[61]+c1[62]+c1[63]+c1[64]+c1[65]+c1[66]+c1[67]+c1[68]+c1[69]+c1[70]+c1[71]+c1[72]+c1[73]+c1[74]+c1[75]+c1[76]+c1[77]+c1[78]+c1[79]+c1[80]+ c1[81]+c1[82]+c1[83]+c1[84]+c1[85]+c1[86]+c1[87]+c1[88]+c1[89]+c1[90]+c1[91]+c1[92]+c1[93]+c1[94]+c1[95]+c1[96]+c1[97]+c1[98]+c1[99]+c1[100]+ c1[101]+c1[102]+c1[103]+c1[104]+c1[105]+c1[106]+c1[107]+c1[108]+c1[109]+c1[110]+c1[111]+c1[112]+c1[113]+c1[114]+c1[115]+c1[116]+c1[117]+c1[118]+c1[119])/119; 타주기 지표를 계산할 경우에는 지정한 기간의 값이 모두 준비되었을때 계산하셔야 합니다. 위와 같이 작성하시면 실제 c1[50]까지만 값이 저장된 경우에도 나머지는 모두 0갑을 합산해서 최종 119로 나누게 됩니다, 아래와 같이 119번방까지 값이 저장된 이후에 계산해서 사용하게 작성하셔야 하며 지표가 0이 출력되면 해당 차트의 조회된 과거봉으로는 지정한 기간의 타주기 지표를 계산하기에는 과거 데이타가 부족하다는 의미입니다. 차트는 최대 1만봉만 조회되므로 너무 긴 타주기 지표는 데이터 부족으로 계산이 불가합니다. if c1[119] > 0 Then { b120 = (c1[1]+c1[2]+c1[3]+c1[4]+c1[5]+c1[6]+c1[7]+c1[8]+c1[9]+c1[10]+c1[11]+c1[12]+c1[13]+c1[14]+c1[15]+c1[16]+c1[17]+c1[18]+c1[19]+c1[20]+ c1[21]+c1[22]+c1[23]+c1[24]+c1[25]+c1[26]+c1[27]+c1[28]+c1[29]+c1[30]+c1[31]+c1[32]+c1[33]+c1[34]+c1[35]+c1[36]+c1[37]+c1[38]+c1[39]+c1[40]+ c1[41]+c1[42]+c1[43]+c1[44]+c1[45]+c1[46]+c1[47]+c1[48]+c1[49]+c1[50]+c1[51]+c1[52]+c1[53]+c1[54]+c1[55]+c1[56]+c1[57]+c1[58]+c1[59]+c1[60]+ c1[61]+c1[62]+c1[63]+c1[64]+c1[65]+c1[66]+c1[67]+c1[68]+c1[69]+c1[70]+c1[71]+c1[72]+c1[73]+c1[74]+c1[75]+c1[76]+c1[77]+c1[78]+c1[79]+c1[80]+ c1[81]+c1[82]+c1[83]+c1[84]+c1[85]+c1[86]+c1[87]+c1[88]+c1[89]+c1[90]+c1[91]+c1[92]+c1[93]+c1[94]+c1[95]+c1[96]+c1[97]+c1[98]+c1[99]+c1[100]+ c1[101]+c1[102]+c1[103]+c1[104]+c1[105]+c1[106]+c1[107]+c1[108]+c1[109]+c1[110]+c1[111]+c1[112]+c1[113]+c1[114]+c1[115]+c1[116]+c1[117]+c1[118]+c1[119])/119; } Plot1(b120); 3 데이터는 완성봉기준(다음봉시가수신)으로 값 사용이 가능합니다. 기본차트와 참조데이터 모두 미완성봉의 값을 사용할 수 없습니다. 기본차트 봉완성기준 그때 완성되어 있는 봉을 기준으로 값을 리턴합니다. 즐거운 하루되세요 > 겐지 님이 쓴 글입니다. > 제목 : 문의드립니다~ > var: 분주기(15),분주기1(5),분주기4(4),분주기3(3),분주기2(2),분주기5(1); var: S1(0),D1(0); var: cnt(0),cnt1(0),cnt2(0),cnt3(0),cnt4(0),cnt5(0); Array : CC[100](0),OO[100](0);//,HH[100](0),LL[100](0),TT[100](0); Array : C1[300](0);//,T1[100](0); Array : C2[100](0);//,T1[100](0); Array : C3[100](0);//,T1[100](0); Array : C4[100](0);//,T1[100](0); Array : C5[100](0);//,T1[100](0); var:TM(0); var:TF(0),tf1(0),tf2(0),tf3(0),tf4(0),tf5(0); if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) Then{ S1 = TimeToMinutes(070000); D1 = sdate; } if D1 > 0 then{ if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%분주기; if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) or (TF < TF[1]) Then{ OO[0] = o; //HH[0] = H; //LL[0] = L; //TT[0] = stime; for cnt = 1 to 100{ OO[cnt] = OO[cnt-1][1]; //HH[cnt] = HH[cnt-1][1]; //LL[cnt] = LL[cnt-1][1]; CC[cnt] = CC[cnt-1][1]; //TT[cnt] = TT[cnt-1][1]; } } //if H > HH[0] Then HH[0] = H; //if L < LL[0] Then LL[0] = L; CC[0] = C; TF1 = TM%분주기1; if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) or (TF1 < TF1[1]) Then{ //T1[cnt1] = stime; for cnt1 = 1 to 300{ C1[cnt1] = C1[cnt1-1][1]; //T1[cnt1] = T1[cnt1-1][1]; } } C1[0] = c; TF2 = TM%분주기2; if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) or (TF2 < TF2[1]) Then{ for cnt2 = 1 to 100{ C2[cnt2] = C2[cnt2-1][1]; } } C2[0] = c; TF3 = TM%분주기3; if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) or (TF3 < TF3[1]) Then{ for cnt3 = 1 to 100{ C3[cnt3] = C3[cnt3-1][1]; } } C3[0] = c; TF4 = TM%분주기4; if (sdate != sdate[1] and stime >= 070000) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000))) or (TF4 < TF4[1]) Then{ for cnt4 = 1 to 100{ C4[cnt4] = C4[cnt4-1][1]; } } C4[0] = c; TF5 = TM%분주기5; if (sdate != sdate[1] and stime >= 070000 and 분주기5 > 1) or (sdate == sdate[1] and (Stime == 070000 or (stime > 070000 and stime[1] < 070000)) and 분주기5 > 1) or (TF5 < TF5[1] and 분주기5 > 1) or (Bdate == Bdate[1] and TM > TM[1] and 분주기5 == 1) Then{ for cnt5 = 1 to 100{ C5[cnt5] = C5[cnt5-1][1]; } } C5[0] = c; } ///////////////// 1.분주기식에서 나스닥 5분 기준으로 120이평과 240이평값을 구했는데 실제5분봉이랑 차이가 꽤 있어서요~ 이게 날이 지나면서 5분봉값과 차이가 생기는거 같은데요. 수정 부탁드립니다.~ 2.그리고 틱차트를 메인으로 하고 참조차트에 5분봉을 불러와서 120이평과 240이평을 구한 다음에 적용했을때 실시간신호가 안잡히는데요.틱차트에선 시간축이 동일하지 않아서 5분봉의 참조차트이용이 가능하지 않다는 이전답변을 보았습니다. 그러면 참조차트상에 현재 그려지는 봉 말고 이전에 완성된 봉을 기준으로 적용해도 마찬가지 인가요? 이렇게 저렇게 해봤는데 심플한 식에서는 적용이 되는데 좀 복잡한 식에서는 적용이 안되고 그렇네요. 아래식대로 1봉전 완성봉 기준으로 전략실행차트에서 적용하고 싶은데요. var:b120(0),b240(0); b120 = (c1[1]+c1[2]+c1[3]+c1[4]+c1[5]+c1[6]+c1[7]+c1[8]+c1[9]+c1[10]+c1[11]+c1[12]+c1[13]+c1[14]+c1[15]+c1[16]+c1[17]+c1[18]+c1[19]+c1[20]+ c1[21]+c1[22]+c1[23]+c1[24]+c1[25]+c1[26]+c1[27]+c1[28]+c1[29]+c1[30]+c1[31]+c1[32]+c1[33]+c1[34]+c1[35]+c1[36]+c1[37]+c1[38]+c1[39]+c1[40]+ c1[41]+c1[42]+c1[43]+c1[44]+c1[45]+c1[46]+c1[47]+c1[48]+c1[49]+c1[50]+c1[51]+c1[52]+c1[53]+c1[54]+c1[55]+c1[56]+c1[57]+c1[58]+c1[59]+c1[60]+ c1[61]+c1[62]+c1[63]+c1[64]+c1[65]+c1[66]+c1[67]+c1[68]+c1[69]+c1[70]+c1[71]+c1[72]+c1[73]+c1[74]+c1[75]+c1[76]+c1[77]+c1[78]+c1[79]+c1[80]+ c1[81]+c1[82]+c1[83]+c1[84]+c1[85]+c1[86]+c1[87]+c1[88]+c1[89]+c1[90]+c1[91]+c1[92]+c1[93]+c1[94]+c1[95]+c1[96]+c1[97]+c1[98]+c1[99]+c1[100]+ c1[101]+c1[102]+c1[103]+c1[104]+c1[105]+c1[106]+c1[107]+c1[108]+c1[109]+c1[110]+c1[111]+c1[112]+c1[113]+c1[114]+c1[115]+c1[116]+c1[117]+c1[118]+c1[119])/119; b240 = (c1[1]+c1[2]+c1[3]+c1[4]+c1[5]+c1[6]+c1[7]+c1[8]+c1[9]+c1[10]+c1[11]+c1[12]+c1[13]+c1[14]+c1[15]+c1[16]+c1[17]+c1[18]+c1[19]+c1[20]+ c1[21]+c1[22]+c1[23]+c1[24]+c1[25]+c1[26]+c1[27]+c1[28]+c1[29]+c1[30]+c1[31]+c1[32]+c1[33]+c1[34]+c1[35]+c1[36]+c1[37]+c1[38]+c1[39]+c1[40]+ c1[41]+c1[42]+c1[43]+c1[44]+c1[45]+c1[46]+c1[47]+c1[48]+c1[49]+c1[50]+c1[51]+c1[52]+c1[53]+c1[54]+c1[55]+c1[56]+c1[57]+c1[58]+c1[59]+c1[60]+ c1[61]+c1[62]+c1[63]+c1[64]+c1[65]+c1[66]+c1[67]+c1[68]+c1[69]+c1[70]+c1[71]+c1[72]+c1[73]+c1[74]+c1[75]+c1[76]+c1[77]+c1[78]+c1[79]+c1[80]+ c1[81]+c1[82]+c1[83]+c1[84]+c1[85]+c1[86]+c1[87]+c1[88]+c1[89]+c1[90]+c1[91]+c1[92]+c1[93]+c1[94]+c1[95]+c1[96]+c1[97]+c1[98]+c1[99]+c1[100]+ c1[101]+c1[102]+c1[103]+c1[104]+c1[105]+c1[106]+c1[107]+c1[108]+c1[109]+c1[110]+c1[111]+c1[112]+c1[113]+c1[114]+c1[115]+c1[116]+c1[117]+c1[118]+c1[119]+c1[120]+ c1[121]+c1[122]+c1[123]+c1[124]+c1[125]+c1[126]+c1[127]+c1[128]+c1[129]+c1[130]+c1[131]+c1[132]+c1[133]+c1[134]+c1[135]+c1[136]+c1[137]+c1[138]+c1[139]+c1[140]+ c1[141]+c1[142]+c1[143]+c1[144]+c1[145]+c1[146]+c1[147]+c1[148]+c1[149]+c1[150]+c1[151]+c1[152]+c1[153]+c1[154]+c1[155]+c1[156]+c1[157]+c1[158]+c1[159]+c1[160]+ c1[161]+c1[162]+c1[163]+c1[164]+c1[165]+c1[166]+c1[167]+c1[168]+c1[169]+c1[170]+c1[171]+c1[172]+c1[173]+c1[174]+c1[175]+c1[176]+c1[177]+c1[178]+c1[179]+c1[180]+ c1[181]+c1[182]+c1[183]+c1[184]+c1[185]+c1[186]+c1[187]+c1[188]+c1[189]+c1[190]+c1[191]+c1[192]+c1[193]+c1[194]+c1[195]+c1[196]+c1[197]+c1[198]+c1[199]+c1[200]+ c1[201]+c1[202]+c1[203]+c1[204]+c1[205]+c1[206]+c1[207]+c1[208]+c1[209]+c1[210]+c1[211]+c1[212]+c1[213]+c1[214]+c1[215]+c1[216]+c1[217]+c1[218]+c1[219]+c1[220]+ c1[221]+c1[222]+c1[223]+c1[224]+c1[225]+c1[226]+c1[227]+c1[228]+c1[229]+c1[230]+c1[231]+c1[232]+c1[233]+c1[234]+c1[235]+c1[236]+c1[237]+c1[238]+c1[239])/239;