커뮤니티
수식
2015-09-14 10:53:02
133
글번호 90287
안녕하세요. 하기 조건에 수식 요청 드립니다.
복합 챠트를 사용합니다.
1. 20개봉 고점, 저점 자동선 및 봉 상/하 Text (신규 고점, 저점 생성 시 이전 자동선 삭제)
2. 상기1번 고점, 저점 기준 피보나치 자동선
감사합니다.
답변 1
예스스탁 예스스탁 답변
2015-09-14 16:34:26
안녕하세요
예스스탁입니다.
input : N(20);
var : T(0);
var : TL1(0),TL2(0),tx1(0),tx2(0);
var : TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
if H > highest(H,N)[1] Then{
var1 = Highest(H,N);
var2 = Lowest(L,N);
var3 = var1-var2;
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL_Delete(TL6);
TL_Delete(TL7);
TL1 = TL_New(Sdate[N-1],stime[N-1],var1,sdate,stime,var1);
TL2 = TL_New(Sdate[N-1],stime[N-1],var1-var3*0.236,sdate,stime,var1-var3*0.236);
TL3 = TL_New(Sdate[N-1],stime[N-1],var1-var3*0.382,sdate,stime,var1-var3*0.382);
TL4 = TL_New(Sdate[N-1],stime[N-1],var1-var3*0.500,sdate,stime,var1-var3*0.500);
TL5 = TL_New(Sdate[N-1],stime[N-1],var1-var3*0.618,sdate,stime,var1-var3*0.612);
TL6 = TL_New(Sdate[N-1],stime[N-1],var2,sdate,stime,var2);
TL7 = TL_New(Sdate[N-1],stime[N-1],var1+var3*1.236,sdate,stime,var1+var3*1.236);
TL_SetExtRight(TL1,true);
TL_SetExtRight(TL2,true);
TL_SetExtRight(TL3,true);
TL_SetExtRight(TL4,true);
TL_SetExtRight(TL5,true);
TL_SetExtRight(TL6,true);
TL_SetExtRight(TL7,true);
}
if L < Lowest(L,N)[1] Then{
var1 = Highest(H,N);
var2 = Lowest(L,N);
var3 = var1-var2;
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL_Delete(TL6);
TL_Delete(TL7);
TL1 = TL_New(Sdate[N-1],stime[N-1],var2,sdate,stime,var2);
TL2 = TL_New(Sdate[N-1],stime[N-1],var2+var3*0.236,sdate,stime,var2+var3*0.236);
TL3 = TL_New(Sdate[N-1],stime[N-1],var2+var3*0.382,sdate,stime,var2+var3*0.382);
TL4 = TL_New(Sdate[N-1],stime[N-1],var2+var3*0.500,sdate,stime,var2+var3*0.500);
TL5 = TL_New(Sdate[N-1],stime[N-1],var2+var3*0.618,sdate,stime,var2+var3*0.612);
TL6 = TL_New(Sdate[N-1],stime[N-1],var1,sdate,stime,var1);
TL7 = TL_New(Sdate[N-1],stime[N-1],var2+var3*1.236,sdate,stime,var2+var3*1.236);
TL_SetExtRight(TL1,true);
TL_SetExtRight(TL2,true);
TL_SetExtRight(TL3,true);
TL_SetExtRight(TL4,true);
TL_SetExtRight(TL5,true);
TL_SetExtRight(TL6,true);
TL_SetExtRight(TL7,true);
}
Text_Delete(tx1);
Text_Delete(tx2);
tx1 = Text_New(sdate,stime,var1,NumToStr(var1,2));
tx2 = Text_New(sdate,stime,var2,NumToStr(var2,2));
즐거운 하루되세요
> 한국사람73 님이 쓴 글입니다.
> 제목 : 수식
> 안녕하세요. 하기 조건에 수식 요청 드립니다.
복합 챠트를 사용합니다.
1. 20개봉 고점, 저점 자동선 및 봉 상/하 Text (신규 고점, 저점 생성 시 이전 자동선 삭제)
2. 상기1번 고점, 저점 기준 피보나치 자동선
감사합니다.
다음글