커뮤니티
한번더 부탁드립니다.
2016-01-28 13:39:27
138
글번호 94909
감사합니다.
그리고 나머지 2개를 제가적용시킬려고 변환을 했으나 잘 되질 않습니다.
이번에도 도움 부탁 드립니다.
1. 당일 10시15분 기준 시작 피봇선
Var : Pivot(0),R1(0),R2(0),S1(0),S2(0);
Pivot = (DayHigh(1)+DayLow(1)+DayClose(1))/3;
R1 = 2*Pivot-DayLow(1);
R2 = Pivot+DayHigh(1)-DayLow(1);
S1 = 2*Pivot-DayHigh(1);
S2 = Pivot-DayHigh(1)+DayLow(1);
Plot1(Pivot, "피봇포인트");
Plot2(R1, "1차저항");
Plot3(R2, "2차저항");
Plot4(S1, "1차지지");
Plot5(S2, "2차지지");
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
Text_Delete(var5);
var1 = Text_New(sdate,stime,Plot1,"피봇기준 : " +NumToStr(Plot1,2));
var2 = Text_New(sdate,stime,Plot2,"1차저항 : " +NumToStr(Plot2,2));
var3 = Text_New(sdate,stime,Plot3,"2차저항 : " +NumToStr(Plot3,2));
var4 = Text_New(sdate,stime,Plot4,"1차지지 : " +NumToStr(Plot4,2));
var5 = Text_New(sdate,stime,Plot5,"2자지지 : " +NumToStr(Plot5,2));
2. 전일 10시 15분 시작기준 피보나치 및 고저
value1 = dayhigh(1);
value2 = daylow(1);
value3 = value1-value2;
Plot1(value1,"전일고점");
Plot2(value2,"전일저점");
Plot3(value1-value3*0.236,"전일23.6");
Plot4(value1-value3*0.382,"전일 38.2" );
plot5(value1-value3*0.500,"전일 평균" );
Plot6(value1-value3*0.618,"전일 61.8" );
plot7(value1-value3*0.764,"전일 76.4" );
plot8(value1+value3*0.236,"전일 +23.6");
plot9(value1+value3*0.382,"전일 +38.2");
plot10(value1+value3*0.618,"전일 +61.8");
plot11(value2-value3*0.236,"전일 -23.6");
plot12(value2-value3*0.382,"전일 -38.2");
plot13(value2-value3*0.618,"전일 -61.8");
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
Text_Delete(var5);
Text_Delete(var6);
Text_Delete(var7);
Text_Delete(Var8);
Text_Delete(Var9);
Text_Delete(Var10);
Text_Delete(var11);
Text_Delete(var12);
Text_Delete(var13);
var1 = Text_New(sdate,stime,plot1,"전일 고점 : " +NumToStr(plot1,2));
var2 = Text_New(sdate,stime,plot2,"전일 저점 : " +NumToStr(plot2,2));
var3 = Text_New(sdate,stime,plot3,"전일 23.6 : " +NumToStr(plot3,2));
var4 = Text_New(sdate,stime,plot4,"전일 38.2 : " +NumToStr(plot4,2));
var5 = Text_New(sdate,stime,plot5,"전일 평균 : " +NumToStr(plot5,2));
var6 = Text_New(sdate,stime,plot6,"전일 61.8 : " +NumToStr(plot6,2));
var7 = Text_New(sdate,stime,plot7,"전일 76.4 : " +NumToStr(plot7,2));
Var8 = Text_New(sdate,stime,plot8,"전일 +23.6 : " +NumToStr(plot8,2));
Var9 = Text_New(sdate,stime,plot9,"전일 +38.2 : " +NumToStr(plot9,2));
Var10 = Text_New(sdate,stime,plot10,"전일 +61.8 : " +NumToStr(plot10,2));
var11 = Text_New(sdate,stime,plot11,"전일 -23.6 : " +NumToStr(plot11,2));
var12 = Text_New(sdate,stime,plot12,"전일 -38.2 : " +NumToStr(plot12,2));
var13 = Text_New(sdate,stime,plot13,"전일 -61.8 : " +NumToStr(plot13,2));
답변 1
예스스탁 예스스탁 답변
2016-01-29 09:22:30
안녕하세요
예스스탁입니다.
1.
Var : Pivot(0),R1(0),R2(0),S1(0),S2(0);
var : HH(0),LL(0),CC(0),HH1(0),LL1(0),CC1(0);
if stime == 101500 or (stime > 101500 and stime[1] < 101500) 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;
Pivot = (HH1+LL1+CC1)/3;
R1 = 2*Pivot-LL1;
R2 = Pivot+HH1-LL1;
S1 = 2*Pivot-HH1;
S2 = Pivot-HH1+LL1;
Plot1(Pivot, "피봇포인트");
Plot2(R1, "1차저항");
Plot3(R2, "2차저항");
Plot4(S1, "1차지지");
Plot5(S2, "2차지지");
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
Text_Delete(var5);
var1 = Text_New(sdate,stime,Plot1,"피봇기준 : " +NumToStr(Plot1,2));
var2 = Text_New(sdate,stime,Plot2,"1차저항 : " +NumToStr(Plot2,2));
var3 = Text_New(sdate,stime,Plot3,"2차저항 : " +NumToStr(Plot3,2));
var4 = Text_New(sdate,stime,Plot4,"1차지지 : " +NumToStr(Plot4,2));
var5 = Text_New(sdate,stime,Plot5,"2자지지 : " +NumToStr(Plot5,2));
2.
var : HH(0),LL(0),CC(0),HH1(0),LL1(0),CC1(0);
if stime == 101500 or (stime > 101500 and stime[1] < 101500) 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;
value1 = HH1;
value2 = LL1;
value3 = value1-value2;
Plot1(value1,"전일고점");
Plot2(value2,"전일저점");
Plot3(value1-value3*0.236,"전일23.6");
Plot4(value1-value3*0.382,"전일 38.2" );
plot5(value1-value3*0.500,"전일 평균" );
Plot6(value1-value3*0.618,"전일 61.8" );
plot7(value1-value3*0.764,"전일 76.4" );
plot8(value1+value3*0.236,"전일 +23.6");
plot9(value1+value3*0.382,"전일 +38.2");
plot10(value1+value3*0.618,"전일 +61.8");
plot11(value2-value3*0.236,"전일 -23.6");
plot12(value2-value3*0.382,"전일 -38.2");
plot13(value2-value3*0.618,"전일 -61.8");
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
Text_Delete(var5);
Text_Delete(var6);
Text_Delete(var7);
Text_Delete(Var8);
Text_Delete(Var9);
Text_Delete(Var10);
Text_Delete(var11);
Text_Delete(var12);
Text_Delete(var13);
var1 = Text_New(sdate,stime,plot1,"전일 고점 : " +NumToStr(plot1,2));
var2 = Text_New(sdate,stime,plot2,"전일 저점 : " +NumToStr(plot2,2));
var3 = Text_New(sdate,stime,plot3,"전일 23.6 : " +NumToStr(plot3,2));
var4 = Text_New(sdate,stime,plot4,"전일 38.2 : " +NumToStr(plot4,2));
var5 = Text_New(sdate,stime,plot5,"전일 평균 : " +NumToStr(plot5,2));
var6 = Text_New(sdate,stime,plot6,"전일 61.8 : " +NumToStr(plot6,2));
var7 = Text_New(sdate,stime,plot7,"전일 76.4 : " +NumToStr(plot7,2));
Var8 = Text_New(sdate,stime,plot8,"전일 +23.6 : " +NumToStr(plot8,2));
Var9 = Text_New(sdate,stime,plot9,"전일 +38.2 : " +NumToStr(plot9,2));
Var10 = Text_New(sdate,stime,plot10,"전일 +61.8 : " +NumToStr(plot10,2));
var11 = Text_New(sdate,stime,plot11,"전일 -23.6 : " +NumToStr(plot11,2));
var12 = Text_New(sdate,stime,plot12,"전일 -38.2 : " +NumToStr(plot12,2));
var13 = Text_New(sdate,stime,plot13,"전일 -61.8 : " +NumToStr(plot13,2));
즐거운 하루되세요
> 세계일주 님이 쓴 글입니다.
> 제목 : 한번더 부탁드립니다.
> 감사합니다.
그리고 나머지 2개를 제가적용시킬려고 변환을 했으나 잘 되질 않습니다.
이번에도 도움 부탁 드립니다.
1. 당일 10시15분 기준 시작 피봇선
Var : Pivot(0),R1(0),R2(0),S1(0),S2(0);
Pivot = (DayHigh(1)+DayLow(1)+DayClose(1))/3;
R1 = 2*Pivot-DayLow(1);
R2 = Pivot+DayHigh(1)-DayLow(1);
S1 = 2*Pivot-DayHigh(1);
S2 = Pivot-DayHigh(1)+DayLow(1);
Plot1(Pivot, "피봇포인트");
Plot2(R1, "1차저항");
Plot3(R2, "2차저항");
Plot4(S1, "1차지지");
Plot5(S2, "2차지지");
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
Text_Delete(var5);
var1 = Text_New(sdate,stime,Plot1,"피봇기준 : " +NumToStr(Plot1,2));
var2 = Text_New(sdate,stime,Plot2,"1차저항 : " +NumToStr(Plot2,2));
var3 = Text_New(sdate,stime,Plot3,"2차저항 : " +NumToStr(Plot3,2));
var4 = Text_New(sdate,stime,Plot4,"1차지지 : " +NumToStr(Plot4,2));
var5 = Text_New(sdate,stime,Plot5,"2자지지 : " +NumToStr(Plot5,2));
2. 전일 10시 15분 시작기준 피보나치 및 고저
value1 = dayhigh(1);
value2 = daylow(1);
value3 = value1-value2;
Plot1(value1,"전일고점");
Plot2(value2,"전일저점");
Plot3(value1-value3*0.236,"전일23.6");
Plot4(value1-value3*0.382,"전일 38.2" );
plot5(value1-value3*0.500,"전일 평균" );
Plot6(value1-value3*0.618,"전일 61.8" );
plot7(value1-value3*0.764,"전일 76.4" );
plot8(value1+value3*0.236,"전일 +23.6");
plot9(value1+value3*0.382,"전일 +38.2");
plot10(value1+value3*0.618,"전일 +61.8");
plot11(value2-value3*0.236,"전일 -23.6");
plot12(value2-value3*0.382,"전일 -38.2");
plot13(value2-value3*0.618,"전일 -61.8");
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
Text_Delete(var5);
Text_Delete(var6);
Text_Delete(var7);
Text_Delete(Var8);
Text_Delete(Var9);
Text_Delete(Var10);
Text_Delete(var11);
Text_Delete(var12);
Text_Delete(var13);
var1 = Text_New(sdate,stime,plot1,"전일 고점 : " +NumToStr(plot1,2));
var2 = Text_New(sdate,stime,plot2,"전일 저점 : " +NumToStr(plot2,2));
var3 = Text_New(sdate,stime,plot3,"전일 23.6 : " +NumToStr(plot3,2));
var4 = Text_New(sdate,stime,plot4,"전일 38.2 : " +NumToStr(plot4,2));
var5 = Text_New(sdate,stime,plot5,"전일 평균 : " +NumToStr(plot5,2));
var6 = Text_New(sdate,stime,plot6,"전일 61.8 : " +NumToStr(plot6,2));
var7 = Text_New(sdate,stime,plot7,"전일 76.4 : " +NumToStr(plot7,2));
Var8 = Text_New(sdate,stime,plot8,"전일 +23.6 : " +NumToStr(plot8,2));
Var9 = Text_New(sdate,stime,plot9,"전일 +38.2 : " +NumToStr(plot9,2));
Var10 = Text_New(sdate,stime,plot10,"전일 +61.8 : " +NumToStr(plot10,2));
var11 = Text_New(sdate,stime,plot11,"전일 -23.6 : " +NumToStr(plot11,2));
var12 = Text_New(sdate,stime,plot12,"전일 -38.2 : " +NumToStr(plot12,2));
var13 = Text_New(sdate,stime,plot13,"전일 -61.8 : " +NumToStr(plot13,2));