커뮤니티
부탁드립니다
2020-05-14 19:01:27
1380
글번호 138881
#,아래식에서도움부탁드립니다,
1번식은 전일 저점대비 피봇등분선입니다, 이 식을 전일 종가대비로 수정하고 싶은데
자꾸 에라가 나네요 도움부탁드립니다.
2번식에서 Plot1값을 Text 출력하고 싶습니다.
1,
var : 고점(0),저점(0),hh(0),ll(0),hh1(0),ll1(0),s1(0),s2(0),s3(0),s4(0),s5(0);
Array : Tx[38](0);
S1 = DayOpen(0);
S2 = dayhigh(0);
S3 = daylow(0);
S4 = (dayhigh(0)+daylow(0))/2;
S5 = (DayOpen(0)+dayhigh(0)+daylow(0))/3;
if Bdate != Bdate[1] Then
{
hh = h;
ll = l;
hh1 = hh[1];
ll1 = ll[1];
}
if h > hh Then
hh = h;
if l < ll Then
ll = l;
if hh1 > 0 and ll1 > 0 then
{
고점 = hh1;
저점 = ll1;
var1 = 고점-저점;
plot1(저점+var1*3.000);
plot2(저점+var1*2.764);
plot3(저점+var1*2.618);
plot4(저점+var1*2.500);
plot5(저점+var1*2.382);
plot6(저점+var1*2.236);
plot7(저점+var1*2.000);
plot8(저점+var1*1.764);
plot9(저점+var1*1.618);
plot10(저점+var1*1.500);
plot11(저점+var1*1.382);
plot12(저점+var1*1.236);
plot13(저점+var1*1.000);
plot14(저점+var1*0.764);
plot15(저점+var1*0.618);
plot16(저점+var1*0.500);
plot17(저점+var1*0.382);
plot18(저점+var1*0.236);
plot19(저점+var1*0);
plot20(저점-var1*0.236);
plot21(저점-var1*0.382);
plot22(저점-var1*0.500);
plot23(저점-var1*0.618);
plot24(저점-var1*0.764);
plot25(저점-var1*1.000);
plot26(저점-var1*1.236);
plot27(저점-var1*1.382);
plot28(저점-var1*1.500);
plot29(저점-var1*1.618);
plot30(저점-var1*1.764);
plot31(저점-var1*2.000);
plot32(저점-var1*2.236);
plot33(저점-var1*2.382);
plot34(저점-var1*2.500);
plot35(저점-var1*2.618);
plot36(저점-var1*2.764);
plot37(저점-var1*3.000);
plot38(s1);
plot39(s2);
plot40(s3);
plot41(s4,"중심",iff(s4<s1[1],LGREEN,LGREEN));
plot42(s5);
text_Delete(Tx[1]);
tx[1] = Text_New(sdate,stime,저점+var1*3.000," 3.0%:"+NumToStr(저점+var1*3.000,0));
text_Delete(Tx[2]);
tx[2] = Text_New(sdate,stime,저점+var1*2.764," 2,7%: "+NumToStr(저점+var1*2.764,0));
text_Delete(Tx[3]);
tx[3] = Text_New(sdate,stime,저점+var1*2.618," 2,6%: "+NumToStr(저점+var1*2.618,0));
text_Delete(Tx[4]);
tx[4] = Text_New(sdate,stime,저점+var1*2.500," 2,5%: "+NumToStr(저점+var1*2.500,0));
text_Delete(Tx[5]);
tx[5] = Text_New(sdate,stime,저점+var1*2.382," 2,3%: "+NumToStr(저점+var1*2.382,0));
text_Delete(Tx[6]);
tx[6] = Text_New(sdate,stime,저점+var1*2.236," 2,2%: "+NumToStr(저점+var1*2.236,0));
text_Delete(Tx[7]);
tx[7] = Text_New(sdate,stime,저점+var1*2.000," 2,0%:"+NumToStr(저점+var1*2.000,0));
text_Delete(Tx[8]);
tx[8] = Text_New(sdate,stime,저점+var1*1.764," 1,7%: "+NumToStr(저점+var1*1.764,0));
text_Delete(Tx[9]);
tx[9] = Text_New(sdate,stime,저점+var1*1.618," 1,6%: "+NumToStr(저점+var1*1.618,0));
text_Delete(Tx[10]);
tx[10] = Text_New(sdate,stime,저점+var1*1.500," 1,5%: "+NumToStr(저점+var1*1.500,0));
text_Delete(Tx[11]);
tx[11] = Text_New(sdate,stime,저점+var1*1.382," 1,3%: "+NumToStr(저점+var1*1.382,0));
text_Delete(Tx[12]);
tx[12] = Text_New(sdate,stime,저점+var1*1.236," 1,2%: "+NumToStr(저점+var1*1.236,0));
text_Delete(Tx[13]);
tx[13] = Text_New(sdate,stime,저점+var1*1.00," 1,0%:"+NumToStr(저점+var1*1.000,0));
text_Delete(Tx[14]);
tx[14] = Text_New(sdate,stime,저점+var1*0.764," 7%: "+NumToStr(저점+var1*0.764,0));
text_Delete(Tx[15]);
tx[15] = Text_New(sdate,stime,저점+var1*0.618," 6%: "+NumToStr(저점+var1*0.618,0));
text_Delete(Tx[16]);
tx[16] = Text_New(sdate,stime,저점+var1*0.500," 5%: "+NumToStr(저점+var1*0.500,0));
text_Delete(Tx[17]);
tx[17] = Text_New(sdate,stime,저점+var1*0.382," 3%: "+NumToStr(저점+var1*0.382,0));
text_Delete(Tx[18]);
tx[18] = Text_New(sdate,stime,저점+var1*0.236," 2%: "+NumToStr(저점+var1*0.236,0));
text_Delete(Tx[19]);
tx[19] = Text_New(sdate,stime,저점+var1*0.000," 0%:"+NumToStr(저점+var1*0.000,0));
text_Delete(Tx[20]);
tx[20] = Text_New(sdate,stime,저점-var1*0.236," -2%: "+NumToStr(저점-var1*0.236,0));
text_Delete(Tx[21]);
tx[21] = Text_New(sdate,stime,저점-var1*0.382," -3%: "+NumToStr(저점-var1*0.382,0));
text_Delete(Tx[22]);
tx[22] = Text_New(sdate,stime,저점-var1*0.500," -5%: "+NumToStr(저점-var1*0.500,0));
text_Delete(Tx[23]);
tx[23] = Text_New(sdate,stime,저점-var1*0.618," -6%: "+NumToStr(저점-var1*0.618,0));
text_Delete(Tx[24]);
tx[24] = Text_New(sdate,stime,저점-var1*0.764," -7%: "+NumToStr(저점-var1*0.764,0));
text_Delete(Tx[25]);
tx[25] = Text_New(sdate,stime,저점-var1*1.000," -1,0%:"+NumToStr(저점-var1*1.000,0));
text_Delete(Tx[26]);
tx[26] = Text_New(sdate,stime,저점-var1*1.236," -1,2%: "+NumToStr(저점-var1*1.236,0));
text_Delete(Tx[27]);
tx[27] = Text_New(sdate,stime,저점-var1*1.382," -1,3%: "+NumToStr(저점-var1*1.382,0));
text_Delete(Tx[28]);
tx[28] = Text_New(sdate,stime,저점-var1*1.500," -1,5%: "+NumToStr(저점-var1*1.500,0));
text_Delete(Tx[29]);
tx[29] = Text_New(sdate,stime,저점-var1*1.618," -1,6%: "+NumToStr(저점-var1*1.618,0));
text_Delete(Tx[30]);
tx[30] = Text_New(sdate,stime,저점-var1*1.764," -1,7%: "+NumToStr(저점-var1*1.764,0));
text_Delete(Tx[31]);
tx[31] = Text_New(sdate,stime,저점-var1*2.000," -2,0%:"+NumToStr(저점-var1*2.000,0));
text_Delete(Tx[32]);
tx[32] = Text_New(sdate,stime,저점-var1*2.236," -2,2%: "+NumToStr(저점-var1*2.236,0));
text_Delete(Tx[33]);
tx[33] = Text_New(sdate,stime,저점-var1*2.382," -2,3%: "+NumToStr(저점-var1*2.382,0));
text_Delete(Tx[34]);
tx[34] = Text_New(sdate,stime,저점-var1*2.500," -2,5%: "+NumToStr(저점-var1*2.500,0));
text_Delete(Tx[35]);
tx[35] = Text_New(sdate,stime,저점-var1*2.618," -2,6%: "+NumToStr(저점-var1*2.618,0));
text_Delete(Tx[36]);
tx[36] = Text_New(sdate,stime,저점-var1*2.764," -2,7%: "+NumToStr(저점-var1*2.764,0));
text_Delete(Tx[37]);
tx[37] = Text_New(sdate,stime,저점-var1*3.000," -3,0%:"+NumToStr(저점-var1*3.000,0));
text_Delete(Tx[38]);
tx[38] = Text_New(sdate,stime,dayopen," Open :"+NumToStr(dayopen,0));
}
Text_SetStyle(tx[1],5,2);
Text_SetStyle(tx[2],5,2);
Text_SetStyle(tx[3],5,2);
Text_SetStyle(tx[4],5,2);
Text_SetStyle(tx[5],5,2);
Text_SetStyle(tx[6],5,2);
Text_SetStyle(tx[7],5,2);
Text_SetStyle(tx[8],5,2);
Text_SetStyle(tx[9],5,2);
Text_SetStyle(tx[10],5,2);
Text_SetStyle(tx[11],5,2);
Text_SetStyle(tx[12],5,2);
Text_SetStyle(tx[13],5,2);
Text_SetStyle(tx[14],5,2);
Text_SetStyle(tx[15],5,2);
Text_SetStyle(tx[16],5,2);
Text_SetStyle(tx[17],5,2);
Text_SetStyle(tx[18],5,2);
Text_SetStyle(tx[19],5,2);
Text_SetStyle(tx[20],5,2);
Text_SetStyle(tx[21],5,2);
Text_SetStyle(tx[22],5,2);
Text_SetStyle(tx[23],5,2);
Text_SetStyle(tx[24],5,2);
Text_SetStyle(tx[25],5,2);
Text_SetStyle(tx[26],5,2);
Text_SetStyle(tx[27],5,2);
Text_SetStyle(tx[28],5,2);
Text_SetStyle(tx[29],5,2);
Text_SetStyle(tx[30],5,2);
Text_SetStyle(tx[31],5,2);
Text_SetStyle(tx[32],5,2);
Text_SetStyle(tx[33],5,2);
Text_SetStyle(tx[34],5,2);
Text_SetStyle(tx[35],5,2);
Text_SetStyle(tx[36],5,2);
Text_SetStyle(tx[37],5,2);
Text_SetStyle(tx[38],5,2);
Text_SetStyle(tx[39],5,2);
Text_SetStyle(tx[40],5,2);
Text_SetStyle(tx[41],5,2);
Text_SetStyle(tx[42],5,2);
Text_SetColor(tx[1],LGREEN);
Text_SetColor(tx[7],LGREEN);
Text_SetColor(tx[13],LGREEN);
Text_SetColor(tx[19],LGREEN);
Text_SetColor(tx[25],LGREEN);
Text_SetColor(tx[31],LGREEN);
Text_SetColor(tx[37],LGREEN);
Text_SetColor(tx[38],LMAGENTA);
Text_SetColor(tx[39],RED);
Text_SetColor(tx[40],BLUE);
Text_SetColor(tx[41],LGREEN);
Text_SetColor(tx[42],LGREEN);
Text_SetColor(tx[2],RED);
Text_SetColor(tx[3],MAGENTA);
Text_SetColor(tx[4],MAGENTA);
Text_SetColor(tx[5],RED);
Text_SetColor(tx[6],RED);
Text_SetColor(tx[8],RED);
Text_SetColor(tx[9],MAGENTA);
Text_SetColor(tx[10],MAGENTA);
Text_SetColor(tx[11],RED);
Text_SetColor(tx[12],RED);
Text_SetColor(tx[14],RED);
Text_SetColor(tx[15],MAGENTA);
Text_SetColor(tx[16],MAGENTA);
Text_SetColor(tx[17],RED);
Text_SetColor(tx[18],RED);
Text_SetSize(tx[19],0);
Text_SetColor(tx[20],LBLUE);
Text_SetColor(tx[21],LBLUE);
Text_SetColor(tx[22],BLUE);
Text_SetColor(tx[23],BLUE);
Text_SetColor(tx[24],LBLUE);
Text_SetColor(tx[26],LBLUE);
Text_SetColor(tx[27],LBLUE);
Text_SetColor(tx[28],BLUE);
Text_SetColor(tx[29],BLUE);
Text_SetColor(tx[30],LBLUE);
Text_SetColor(tx[32],LBLUE);
Text_SetColor(tx[33],LBLUE);
Text_SetColor(tx[34],BLUE);
Text_SetColor(tx[35],BLUE);
Text_SetColor(tx[36],LBLUE);
2.
if Bdate != Bdate[1] Then{
var1 = V;
var2 = C;
var11 = var1[1];
var22 = var2[1];
Condition1 = false;
}
if V > var1 Then{
var1 = V;
var2 = C;
}
if Condition1 == false and V > var11 Then{
var3 = C;
Condition1 = true;
}
plot1(var3);
$,고맙습니다.
답변 1
예스스탁 예스스탁 답변
2020-05-15 09:43:11
안녕하세요
예스스탁입니다.
1
var : 고점(0),저점(0),hh(0),ll(0),hh1(0),ll1(0),s1(0),s2(0),s3(0),s4(0),s5(0),cc(0),cc1(0);
Array : Tx[38](0);
S1 = DayOpen(0);
S2 = dayhigh(0);
S3 = daylow(0);
S4 = (dayhigh(0)+daylow(0))/2;
S5 = (DayOpen(0)+dayhigh(0)+daylow(0))/3;
if Bdate != Bdate[1] Then
{
hh = h;
ll = l;
hh1 = hh[1];
ll1 = ll[1];
cc1 = cc[1];
}
if h > hh Then
hh = h;
if l < ll Then
ll = l;
cc = c;
if hh1 > 0 and ll1 > 0 then
{
고점 = hh1;
CC1 = ll1;
var1 = 고점-CC1;
plot1(CC1+var1*3.000);
plot2(CC1+var1*2.764);
plot3(CC1+var1*2.618);
plot4(CC1+var1*2.500);
plot5(CC1+var1*2.382);
plot6(CC1+var1*2.236);
plot7(CC1+var1*2.000);
plot8(CC1+var1*1.764);
plot9(CC1+var1*1.618);
plot10(CC1+var1*1.500);
plot11(CC1+var1*1.382);
plot12(CC1+var1*1.236);
plot13(CC1+var1*1.000);
plot14(CC1+var1*0.764);
plot15(CC1+var1*0.618);
plot16(CC1+var1*0.500);
plot17(CC1+var1*0.382);
plot18(CC1+var1*0.236);
plot19(CC1+var1*0);
plot20(CC1-var1*0.236);
plot21(CC1-var1*0.382);
plot22(CC1-var1*0.500);
plot23(CC1-var1*0.618);
plot24(CC1-var1*0.764);
plot25(CC1-var1*1.000);
plot26(CC1-var1*1.236);
plot27(CC1-var1*1.382);
plot28(CC1-var1*1.500);
plot29(CC1-var1*1.618);
plot30(CC1-var1*1.764);
plot31(CC1-var1*2.000);
plot32(CC1-var1*2.236);
plot33(CC1-var1*2.382);
plot34(CC1-var1*2.500);
plot35(CC1-var1*2.618);
plot36(CC1-var1*2.764);
plot37(CC1-var1*3.000);
plot38(s1);
plot39(s2);
plot40(s3);
plot41(s4,"중심",iff(s4<s1[1],LGREEN,LGREEN));
plot42(s5);
text_Delete(Tx[1]);
tx[1] = Text_New(sdate,stime,CC1+var1*3.000," 3.0%:"+NumToStr(CC1+var1*3.000,0));
text_Delete(Tx[2]);
tx[2] = Text_New(sdate,stime,CC1+var1*2.764," 2,7%: "+NumToStr(CC1+var1*2.764,0));
text_Delete(Tx[3]);
tx[3] = Text_New(sdate,stime,CC1+var1*2.618," 2,6%: "+NumToStr(CC1+var1*2.618,0));
text_Delete(Tx[4]);
tx[4] = Text_New(sdate,stime,CC1+var1*2.500," 2,5%: "+NumToStr(CC1+var1*2.500,0));
text_Delete(Tx[5]);
tx[5] = Text_New(sdate,stime,CC1+var1*2.382," 2,3%: "+NumToStr(CC1+var1*2.382,0));
text_Delete(Tx[6]);
tx[6] = Text_New(sdate,stime,CC1+var1*2.236," 2,2%: "+NumToStr(CC1+var1*2.236,0));
text_Delete(Tx[7]);
tx[7] = Text_New(sdate,stime,CC1+var1*2.000," 2,0%:"+NumToStr(CC1+var1*2.000,0));
text_Delete(Tx[8]);
tx[8] = Text_New(sdate,stime,CC1+var1*1.764," 1,7%: "+NumToStr(CC1+var1*1.764,0));
text_Delete(Tx[9]);
tx[9] = Text_New(sdate,stime,CC1+var1*1.618," 1,6%: "+NumToStr(CC1+var1*1.618,0));
text_Delete(Tx[10]);
tx[10] = Text_New(sdate,stime,CC1+var1*1.500," 1,5%: "+NumToStr(CC1+var1*1.500,0));
text_Delete(Tx[11]);
tx[11] = Text_New(sdate,stime,CC1+var1*1.382," 1,3%: "+NumToStr(CC1+var1*1.382,0));
text_Delete(Tx[12]);
tx[12] = Text_New(sdate,stime,CC1+var1*1.236," 1,2%: "+NumToStr(CC1+var1*1.236,0));
text_Delete(Tx[13]);
tx[13] = Text_New(sdate,stime,CC1+var1*1.00," 1,0%:"+NumToStr(CC1+var1*1.000,0));
text_Delete(Tx[14]);
tx[14] = Text_New(sdate,stime,CC1+var1*0.764," 7%: "+NumToStr(CC1+var1*0.764,0));
text_Delete(Tx[15]);
tx[15] = Text_New(sdate,stime,CC1+var1*0.618," 6%: "+NumToStr(CC1+var1*0.618,0));
text_Delete(Tx[16]);
tx[16] = Text_New(sdate,stime,CC1+var1*0.500," 5%: "+NumToStr(CC1+var1*0.500,0));
text_Delete(Tx[17]);
tx[17] = Text_New(sdate,stime,CC1+var1*0.382," 3%: "+NumToStr(CC1+var1*0.382,0));
text_Delete(Tx[18]);
tx[18] = Text_New(sdate,stime,CC1+var1*0.236," 2%: "+NumToStr(CC1+var1*0.236,0));
text_Delete(Tx[19]);
tx[19] = Text_New(sdate,stime,CC1+var1*0.000," 0%:"+NumToStr(CC1+var1*0.000,0));
text_Delete(Tx[20]);
tx[20] = Text_New(sdate,stime,CC1-var1*0.236," -2%: "+NumToStr(CC1-var1*0.236,0));
text_Delete(Tx[21]);
tx[21] = Text_New(sdate,stime,CC1-var1*0.382," -3%: "+NumToStr(CC1-var1*0.382,0));
text_Delete(Tx[22]);
tx[22] = Text_New(sdate,stime,CC1-var1*0.500," -5%: "+NumToStr(CC1-var1*0.500,0));
text_Delete(Tx[23]);
tx[23] = Text_New(sdate,stime,CC1-var1*0.618," -6%: "+NumToStr(CC1-var1*0.618,0));
text_Delete(Tx[24]);
tx[24] = Text_New(sdate,stime,CC1-var1*0.764," -7%: "+NumToStr(CC1-var1*0.764,0));
text_Delete(Tx[25]);
tx[25] = Text_New(sdate,stime,CC1-var1*1.000," -1,0%:"+NumToStr(CC1-var1*1.000,0));
text_Delete(Tx[26]);
tx[26] = Text_New(sdate,stime,CC1-var1*1.236," -1,2%: "+NumToStr(CC1-var1*1.236,0));
text_Delete(Tx[27]);
tx[27] = Text_New(sdate,stime,CC1-var1*1.382," -1,3%: "+NumToStr(CC1-var1*1.382,0));
text_Delete(Tx[28]);
tx[28] = Text_New(sdate,stime,CC1-var1*1.500," -1,5%: "+NumToStr(CC1-var1*1.500,0));
text_Delete(Tx[29]);
tx[29] = Text_New(sdate,stime,CC1-var1*1.618," -1,6%: "+NumToStr(CC1-var1*1.618,0));
text_Delete(Tx[30]);
tx[30] = Text_New(sdate,stime,CC1-var1*1.764," -1,7%: "+NumToStr(CC1-var1*1.764,0));
text_Delete(Tx[31]);
tx[31] = Text_New(sdate,stime,CC1-var1*2.000," -2,0%:"+NumToStr(CC1-var1*2.000,0));
text_Delete(Tx[32]);
tx[32] = Text_New(sdate,stime,CC1-var1*2.236," -2,2%: "+NumToStr(CC1-var1*2.236,0));
text_Delete(Tx[33]);
tx[33] = Text_New(sdate,stime,CC1-var1*2.382," -2,3%: "+NumToStr(CC1-var1*2.382,0));
text_Delete(Tx[34]);
tx[34] = Text_New(sdate,stime,CC1-var1*2.500," -2,5%: "+NumToStr(CC1-var1*2.500,0));
text_Delete(Tx[35]);
tx[35] = Text_New(sdate,stime,CC1-var1*2.618," -2,6%: "+NumToStr(CC1-var1*2.618,0));
text_Delete(Tx[36]);
tx[36] = Text_New(sdate,stime,CC1-var1*2.764," -2,7%: "+NumToStr(CC1-var1*2.764,0));
text_Delete(Tx[37]);
tx[37] = Text_New(sdate,stime,CC1-var1*3.000," -3,0%:"+NumToStr(CC1-var1*3.000,0));
text_Delete(Tx[38]);
tx[38] = Text_New(sdate,stime,dayopen," Open :"+NumToStr(dayopen,0));
}
Text_SetStyle(tx[1],5,2);
Text_SetStyle(tx[2],5,2);
Text_SetStyle(tx[3],5,2);
Text_SetStyle(tx[4],5,2);
Text_SetStyle(tx[5],5,2);
Text_SetStyle(tx[6],5,2);
Text_SetStyle(tx[7],5,2);
Text_SetStyle(tx[8],5,2);
Text_SetStyle(tx[9],5,2);
Text_SetStyle(tx[10],5,2);
Text_SetStyle(tx[11],5,2);
Text_SetStyle(tx[12],5,2);
Text_SetStyle(tx[13],5,2);
Text_SetStyle(tx[14],5,2);
Text_SetStyle(tx[15],5,2);
Text_SetStyle(tx[16],5,2);
Text_SetStyle(tx[17],5,2);
Text_SetStyle(tx[18],5,2);
Text_SetStyle(tx[19],5,2);
Text_SetStyle(tx[20],5,2);
Text_SetStyle(tx[21],5,2);
Text_SetStyle(tx[22],5,2);
Text_SetStyle(tx[23],5,2);
Text_SetStyle(tx[24],5,2);
Text_SetStyle(tx[25],5,2);
Text_SetStyle(tx[26],5,2);
Text_SetStyle(tx[27],5,2);
Text_SetStyle(tx[28],5,2);
Text_SetStyle(tx[29],5,2);
Text_SetStyle(tx[30],5,2);
Text_SetStyle(tx[31],5,2);
Text_SetStyle(tx[32],5,2);
Text_SetStyle(tx[33],5,2);
Text_SetStyle(tx[34],5,2);
Text_SetStyle(tx[35],5,2);
Text_SetStyle(tx[36],5,2);
Text_SetStyle(tx[37],5,2);
Text_SetStyle(tx[38],5,2);
Text_SetStyle(tx[39],5,2);
Text_SetStyle(tx[40],5,2);
Text_SetStyle(tx[41],5,2);
Text_SetStyle(tx[42],5,2);
Text_SetColor(tx[1],LGREEN);
Text_SetColor(tx[7],LGREEN);
Text_SetColor(tx[13],LGREEN);
Text_SetColor(tx[19],LGREEN);
Text_SetColor(tx[25],LGREEN);
Text_SetColor(tx[31],LGREEN);
Text_SetColor(tx[37],LGREEN);
Text_SetColor(tx[38],LMAGENTA);
Text_SetColor(tx[39],RED);
Text_SetColor(tx[40],BLUE);
Text_SetColor(tx[41],LGREEN);
Text_SetColor(tx[42],LGREEN);
Text_SetColor(tx[2],RED);
Text_SetColor(tx[3],MAGENTA);
Text_SetColor(tx[4],MAGENTA);
Text_SetColor(tx[5],RED);
Text_SetColor(tx[6],RED);
Text_SetColor(tx[8],RED);
Text_SetColor(tx[9],MAGENTA);
Text_SetColor(tx[10],MAGENTA);
Text_SetColor(tx[11],RED);
Text_SetColor(tx[12],RED);
Text_SetColor(tx[14],RED);
Text_SetColor(tx[15],MAGENTA);
Text_SetColor(tx[16],MAGENTA);
Text_SetColor(tx[17],RED);
Text_SetColor(tx[18],RED);
Text_SetSize(tx[19],0);
Text_SetColor(tx[20],LBLUE);
Text_SetColor(tx[21],LBLUE);
Text_SetColor(tx[22],BLUE);
Text_SetColor(tx[23],BLUE);
Text_SetColor(tx[24],LBLUE);
Text_SetColor(tx[26],LBLUE);
Text_SetColor(tx[27],LBLUE);
Text_SetColor(tx[28],BLUE);
Text_SetColor(tx[29],BLUE);
Text_SetColor(tx[30],LBLUE);
Text_SetColor(tx[32],LBLUE);
Text_SetColor(tx[33],LBLUE);
Text_SetColor(tx[34],BLUE);
Text_SetColor(tx[35],BLUE);
Text_SetColor(tx[36],LBLUE);
2
input : 소숫점표시(2);
var : tx(0);
if Bdate != Bdate[1] Then{
var1 = V;
var2 = C;
var11 = var1[1];
var22 = var2[1];
Condition1 = false;
}
if V > var1 Then{
var1 = V;
var2 = C;
}
if Condition1 == false and V > var11 Then{
var3 = C;
Condition1 = true;
}
plot1(var3);
Text_Delete(tx);
tx = Text_New(NextBarSdate,NextBarStime,var3,NumToStr(var3,소숫점표시));
Text_SetStyle(tx,2,1);
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> #,아래식에서도움부탁드립니다,
1번식은 전일 저점대비 피봇등분선입니다, 이 식을 전일 종가대비로 수정하고 싶은데
자꾸 에라가 나네요 도움부탁드립니다.
2번식에서 Plot1값을 Text 출력하고 싶습니다.
1,
var : 고점(0),저점(0),hh(0),ll(0),hh1(0),ll1(0),s1(0),s2(0),s3(0),s4(0),s5(0);
Array : Tx[38](0);
S1 = DayOpen(0);
S2 = dayhigh(0);
S3 = daylow(0);
S4 = (dayhigh(0)+daylow(0))/2;
S5 = (DayOpen(0)+dayhigh(0)+daylow(0))/3;
if Bdate != Bdate[1] Then
{
hh = h;
ll = l;
hh1 = hh[1];
ll1 = ll[1];
}
if h > hh Then
hh = h;
if l < ll Then
ll = l;
if hh1 > 0 and ll1 > 0 then
{
고점 = hh1;
저점 = ll1;
var1 = 고점-저점;
plot1(저점+var1*3.000);
plot2(저점+var1*2.764);
plot3(저점+var1*2.618);
plot4(저점+var1*2.500);
plot5(저점+var1*2.382);
plot6(저점+var1*2.236);
plot7(저점+var1*2.000);
plot8(저점+var1*1.764);
plot9(저점+var1*1.618);
plot10(저점+var1*1.500);
plot11(저점+var1*1.382);
plot12(저점+var1*1.236);
plot13(저점+var1*1.000);
plot14(저점+var1*0.764);
plot15(저점+var1*0.618);
plot16(저점+var1*0.500);
plot17(저점+var1*0.382);
plot18(저점+var1*0.236);
plot19(저점+var1*0);
plot20(저점-var1*0.236);
plot21(저점-var1*0.382);
plot22(저점-var1*0.500);
plot23(저점-var1*0.618);
plot24(저점-var1*0.764);
plot25(저점-var1*1.000);
plot26(저점-var1*1.236);
plot27(저점-var1*1.382);
plot28(저점-var1*1.500);
plot29(저점-var1*1.618);
plot30(저점-var1*1.764);
plot31(저점-var1*2.000);
plot32(저점-var1*2.236);
plot33(저점-var1*2.382);
plot34(저점-var1*2.500);
plot35(저점-var1*2.618);
plot36(저점-var1*2.764);
plot37(저점-var1*3.000);
plot38(s1);
plot39(s2);
plot40(s3);
plot41(s4,"중심",iff(s4<s1[1],LGREEN,LGREEN));
plot42(s5);
text_Delete(Tx[1]);
tx[1] = Text_New(sdate,stime,저점+var1*3.000," 3.0%:"+NumToStr(저점+var1*3.000,0));
text_Delete(Tx[2]);
tx[2] = Text_New(sdate,stime,저점+var1*2.764," 2,7%: "+NumToStr(저점+var1*2.764,0));
text_Delete(Tx[3]);
tx[3] = Text_New(sdate,stime,저점+var1*2.618," 2,6%: "+NumToStr(저점+var1*2.618,0));
text_Delete(Tx[4]);
tx[4] = Text_New(sdate,stime,저점+var1*2.500," 2,5%: "+NumToStr(저점+var1*2.500,0));
text_Delete(Tx[5]);
tx[5] = Text_New(sdate,stime,저점+var1*2.382," 2,3%: "+NumToStr(저점+var1*2.382,0));
text_Delete(Tx[6]);
tx[6] = Text_New(sdate,stime,저점+var1*2.236," 2,2%: "+NumToStr(저점+var1*2.236,0));
text_Delete(Tx[7]);
tx[7] = Text_New(sdate,stime,저점+var1*2.000," 2,0%:"+NumToStr(저점+var1*2.000,0));
text_Delete(Tx[8]);
tx[8] = Text_New(sdate,stime,저점+var1*1.764," 1,7%: "+NumToStr(저점+var1*1.764,0));
text_Delete(Tx[9]);
tx[9] = Text_New(sdate,stime,저점+var1*1.618," 1,6%: "+NumToStr(저점+var1*1.618,0));
text_Delete(Tx[10]);
tx[10] = Text_New(sdate,stime,저점+var1*1.500," 1,5%: "+NumToStr(저점+var1*1.500,0));
text_Delete(Tx[11]);
tx[11] = Text_New(sdate,stime,저점+var1*1.382," 1,3%: "+NumToStr(저점+var1*1.382,0));
text_Delete(Tx[12]);
tx[12] = Text_New(sdate,stime,저점+var1*1.236," 1,2%: "+NumToStr(저점+var1*1.236,0));
text_Delete(Tx[13]);
tx[13] = Text_New(sdate,stime,저점+var1*1.00," 1,0%:"+NumToStr(저점+var1*1.000,0));
text_Delete(Tx[14]);
tx[14] = Text_New(sdate,stime,저점+var1*0.764," 7%: "+NumToStr(저점+var1*0.764,0));
text_Delete(Tx[15]);
tx[15] = Text_New(sdate,stime,저점+var1*0.618," 6%: "+NumToStr(저점+var1*0.618,0));
text_Delete(Tx[16]);
tx[16] = Text_New(sdate,stime,저점+var1*0.500," 5%: "+NumToStr(저점+var1*0.500,0));
text_Delete(Tx[17]);
tx[17] = Text_New(sdate,stime,저점+var1*0.382," 3%: "+NumToStr(저점+var1*0.382,0));
text_Delete(Tx[18]);
tx[18] = Text_New(sdate,stime,저점+var1*0.236," 2%: "+NumToStr(저점+var1*0.236,0));
text_Delete(Tx[19]);
tx[19] = Text_New(sdate,stime,저점+var1*0.000," 0%:"+NumToStr(저점+var1*0.000,0));
text_Delete(Tx[20]);
tx[20] = Text_New(sdate,stime,저점-var1*0.236," -2%: "+NumToStr(저점-var1*0.236,0));
text_Delete(Tx[21]);
tx[21] = Text_New(sdate,stime,저점-var1*0.382," -3%: "+NumToStr(저점-var1*0.382,0));
text_Delete(Tx[22]);
tx[22] = Text_New(sdate,stime,저점-var1*0.500," -5%: "+NumToStr(저점-var1*0.500,0));
text_Delete(Tx[23]);
tx[23] = Text_New(sdate,stime,저점-var1*0.618," -6%: "+NumToStr(저점-var1*0.618,0));
text_Delete(Tx[24]);
tx[24] = Text_New(sdate,stime,저점-var1*0.764," -7%: "+NumToStr(저점-var1*0.764,0));
text_Delete(Tx[25]);
tx[25] = Text_New(sdate,stime,저점-var1*1.000," -1,0%:"+NumToStr(저점-var1*1.000,0));
text_Delete(Tx[26]);
tx[26] = Text_New(sdate,stime,저점-var1*1.236," -1,2%: "+NumToStr(저점-var1*1.236,0));
text_Delete(Tx[27]);
tx[27] = Text_New(sdate,stime,저점-var1*1.382," -1,3%: "+NumToStr(저점-var1*1.382,0));
text_Delete(Tx[28]);
tx[28] = Text_New(sdate,stime,저점-var1*1.500," -1,5%: "+NumToStr(저점-var1*1.500,0));
text_Delete(Tx[29]);
tx[29] = Text_New(sdate,stime,저점-var1*1.618," -1,6%: "+NumToStr(저점-var1*1.618,0));
text_Delete(Tx[30]);
tx[30] = Text_New(sdate,stime,저점-var1*1.764," -1,7%: "+NumToStr(저점-var1*1.764,0));
text_Delete(Tx[31]);
tx[31] = Text_New(sdate,stime,저점-var1*2.000," -2,0%:"+NumToStr(저점-var1*2.000,0));
text_Delete(Tx[32]);
tx[32] = Text_New(sdate,stime,저점-var1*2.236," -2,2%: "+NumToStr(저점-var1*2.236,0));
text_Delete(Tx[33]);
tx[33] = Text_New(sdate,stime,저점-var1*2.382," -2,3%: "+NumToStr(저점-var1*2.382,0));
text_Delete(Tx[34]);
tx[34] = Text_New(sdate,stime,저점-var1*2.500," -2,5%: "+NumToStr(저점-var1*2.500,0));
text_Delete(Tx[35]);
tx[35] = Text_New(sdate,stime,저점-var1*2.618," -2,6%: "+NumToStr(저점-var1*2.618,0));
text_Delete(Tx[36]);
tx[36] = Text_New(sdate,stime,저점-var1*2.764," -2,7%: "+NumToStr(저점-var1*2.764,0));
text_Delete(Tx[37]);
tx[37] = Text_New(sdate,stime,저점-var1*3.000," -3,0%:"+NumToStr(저점-var1*3.000,0));
text_Delete(Tx[38]);
tx[38] = Text_New(sdate,stime,dayopen," Open :"+NumToStr(dayopen,0));
}
Text_SetStyle(tx[1],5,2);
Text_SetStyle(tx[2],5,2);
Text_SetStyle(tx[3],5,2);
Text_SetStyle(tx[4],5,2);
Text_SetStyle(tx[5],5,2);
Text_SetStyle(tx[6],5,2);
Text_SetStyle(tx[7],5,2);
Text_SetStyle(tx[8],5,2);
Text_SetStyle(tx[9],5,2);
Text_SetStyle(tx[10],5,2);
Text_SetStyle(tx[11],5,2);
Text_SetStyle(tx[12],5,2);
Text_SetStyle(tx[13],5,2);
Text_SetStyle(tx[14],5,2);
Text_SetStyle(tx[15],5,2);
Text_SetStyle(tx[16],5,2);
Text_SetStyle(tx[17],5,2);
Text_SetStyle(tx[18],5,2);
Text_SetStyle(tx[19],5,2);
Text_SetStyle(tx[20],5,2);
Text_SetStyle(tx[21],5,2);
Text_SetStyle(tx[22],5,2);
Text_SetStyle(tx[23],5,2);
Text_SetStyle(tx[24],5,2);
Text_SetStyle(tx[25],5,2);
Text_SetStyle(tx[26],5,2);
Text_SetStyle(tx[27],5,2);
Text_SetStyle(tx[28],5,2);
Text_SetStyle(tx[29],5,2);
Text_SetStyle(tx[30],5,2);
Text_SetStyle(tx[31],5,2);
Text_SetStyle(tx[32],5,2);
Text_SetStyle(tx[33],5,2);
Text_SetStyle(tx[34],5,2);
Text_SetStyle(tx[35],5,2);
Text_SetStyle(tx[36],5,2);
Text_SetStyle(tx[37],5,2);
Text_SetStyle(tx[38],5,2);
Text_SetStyle(tx[39],5,2);
Text_SetStyle(tx[40],5,2);
Text_SetStyle(tx[41],5,2);
Text_SetStyle(tx[42],5,2);
Text_SetColor(tx[1],LGREEN);
Text_SetColor(tx[7],LGREEN);
Text_SetColor(tx[13],LGREEN);
Text_SetColor(tx[19],LGREEN);
Text_SetColor(tx[25],LGREEN);
Text_SetColor(tx[31],LGREEN);
Text_SetColor(tx[37],LGREEN);
Text_SetColor(tx[38],LMAGENTA);
Text_SetColor(tx[39],RED);
Text_SetColor(tx[40],BLUE);
Text_SetColor(tx[41],LGREEN);
Text_SetColor(tx[42],LGREEN);
Text_SetColor(tx[2],RED);
Text_SetColor(tx[3],MAGENTA);
Text_SetColor(tx[4],MAGENTA);
Text_SetColor(tx[5],RED);
Text_SetColor(tx[6],RED);
Text_SetColor(tx[8],RED);
Text_SetColor(tx[9],MAGENTA);
Text_SetColor(tx[10],MAGENTA);
Text_SetColor(tx[11],RED);
Text_SetColor(tx[12],RED);
Text_SetColor(tx[14],RED);
Text_SetColor(tx[15],MAGENTA);
Text_SetColor(tx[16],MAGENTA);
Text_SetColor(tx[17],RED);
Text_SetColor(tx[18],RED);
Text_SetSize(tx[19],0);
Text_SetColor(tx[20],LBLUE);
Text_SetColor(tx[21],LBLUE);
Text_SetColor(tx[22],BLUE);
Text_SetColor(tx[23],BLUE);
Text_SetColor(tx[24],LBLUE);
Text_SetColor(tx[26],LBLUE);
Text_SetColor(tx[27],LBLUE);
Text_SetColor(tx[28],BLUE);
Text_SetColor(tx[29],BLUE);
Text_SetColor(tx[30],LBLUE);
Text_SetColor(tx[32],LBLUE);
Text_SetColor(tx[33],LBLUE);
Text_SetColor(tx[34],BLUE);
Text_SetColor(tx[35],BLUE);
Text_SetColor(tx[36],LBLUE);
2.
if Bdate != Bdate[1] Then{
var1 = V;
var2 = C;
var11 = var1[1];
var22 = var2[1];
Condition1 = false;
}
if V > var1 Then{
var1 = V;
var2 = C;
}
if Condition1 == false and V > var11 Then{
var3 = C;
Condition1 = true;
}
plot1(var3);
$,고맙습니다.
다음글
이전글