커뮤니티
수고하십니다
2018-05-03 09:29:44
155
글번호 118655
###,다시한번 도전입니다
$,아래수식은 어느회원분 질문에 대한 답변수식입니다,조건만족시 파동추세선의
색상이 변경되는 내용입니다, 여기서 질문입니다,
ㅡ,18시15분을 장시작~ 익일17시30분을 장마감 기준으로보고 전일의 파동추세선중에 가장큰
파동에 피봇등분선 수치를 출력하여 당일현재까지 오른쪽 그리기로 연장 하고싶습니다.
(단,당일에 전일보다 큰파동이 출현시에는 갱신되는)
#,잘 부탁드립니다~"꾸벅"
Input : af(0.02), maxAF(0.2);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),color(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
HH = H;
HH1 = HH[1];
HD = sdate;
HT = stime;
if HH > HH1 Then
color = red;
if LL > 0 Then
{
TL1 = TL_new(LD[1],LT[1],LL[1],HD,HT,HH);
TL_SetSize(TL1,3);
TL_SetColor(Tl1,color);
}
}
if CrossDown(c,var1) Then
{
T = -1;
LL = L;
LL1 = LL[1];
LD = sdate;
LT = stime;
if LL < LL1 Then
color = BLUE;
if HH > 0 Then
{
TL2 = TL_new(HD[1],HT[1],HH[1],LD,LT,LL);
TL_SetSize(TL2,3);
TL_SetColor(Tl2,color);
}
}
if T == 1 then
{
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
if HH > HH1 Then
color = YELLOW;
TL_SetEnd(TL1,HD,HT,HH);
TL_SetSize(TL1,3);
TL_SetColor(Tl1,color);
}
}
if T == -1 then
{
if L < LL Then{
LL = L;
LD = sdate;
LT = stime;
if LL < LL1 Then
color = CYAN;
TL_SetEnd(TL2,LD,LT,LL);
TL_SetSize(TL2,3);
TL_SetColor(Tl2,color);
}
}
#,매번 감사합니다.
답변 1
예스스탁 예스스탁 답변
2018-05-03 16:39:39
안녕하세요
예스스탁입니다.
올리신 내용 중 피봇은 피보나치인것 같습니다.
피봇이면 해당값을 대응하는 계산식이 어떤 내용인지 알수가 없습니다.
아래 내용 참고하시기 바랍니다.
Input : af(0.02), maxAF(0.2);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),color(0),HR(0);
var : HD1(0),HT1(0),LD1(0),LT1(0);
var : RHD(0),RHT(0),RHH(0);
var : RLD(0),RLT(0),RLL(0);
var : RHD1(0),RHT1(0),RHH1(0);
var : RLD1(0),RLT1(0),RLL1(0),hr1(0);
var : tl11(0),tl12(0);
var :tl13(0),tl14(0),tl15(0),tl16(0),tl17(0);
var1 = CSar(af,maxAF);
if bdate != bdate[1] Then{
HR = 0;
HR1 = hr[1];
RHD1 = RHD[1];
RHT1 = RHT[1];
RHH1 = RHH[1];
RLD1 = RLD[1];
RLT1 = RLT[1];
RLL1 = RLL[1];
}
if crossup(c,var1) Then
{
T = 1;
HH = H;
HD = sdate;
HT = stime;
HH1 = HH[1];
HD1 = HD[1];
HT1 = HT[1];
if HH > HH1 Then
color = red;
if LL > 0 Then
{
TL1 = TL_new(LD[1],LT[1],LL[1],HD,HT,HH);
TL_SetSize(TL1,3);
TL_SetColor(Tl1,color);
if abs(HH-LL[1]) > HR Then
{
HR = abs(HH-LL[1]);
RHD = HD;
RHT = HT;
RHH = HH;
RLD = LD[1];
RLT = LT[1];
RLL = LL[1];
}
}
}
if CrossDown(c,var1) Then
{
T = -1;
LL = L;
LD = sdate;
LT = stime;
LL1 = LL[1];
LD1 = LD[1];
LT1 = LT[1];
if LL < LL1 Then
color = BLUE;
if HH > 0 Then
{
TL2 = TL_new(HD[1],HT[1],HH[1],LD,LT,LL);
TL_SetSize(TL2,3);
TL_SetColor(Tl2,color);
if abs(HH[1]-LL) > HR Then
{
HR = abs(HH[1]-LL);
RHD = HD[1];
RHT = HT[1];
RHH = HH[1];
RLD = LD;
RLT = LT;
RLL = LL;
}
}
}
if T == 1 then
{
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
if HH > HH1 Then
color = YELLOW;
TL_SetEnd(TL1,HD,HT,HH);
TL_SetSize(TL1,3);
TL_SetColor(Tl1,color);
if abs(HH-LL[1]) > HR Then
{
HR = abs(HH-LL[1]);
RHD = HD;
RHT = HT;
RHH = HH;
RLD = LD[1];
RLT = LT[1];
RLL = LL[1];
}
}
}
if T == -1 then
{
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
if LL < LL1 Then
color = CYAN;
TL_SetEnd(TL2,LD,LT,LL);
TL_SetSize(TL2,3);
TL_SetColor(Tl2,color);
if abs(HH[1]-LL) > HR Then
{
HR = abs(HH[1]-LL);
RHD = HD[1];
RHT = HT[1];
RHH = HH[1];
RLD = LD;
RLT = LT;
RLL = LL;
}
}
}
TL_Delete(tl11);
TL_Delete(tl12);
TL_Delete(tl13);
TL_Delete(tl14);
TL_Delete(tl15);
TL_Delete(tl16);
TL_Delete(tl17);
if hr >= hr1 then{
tl11 = TL_New(RHD,RHT,RHH,sdate,stime,RHH);
tl12 = TL_New(RHD,RHT,RHH-(RHH-RLL)*0.236,sdate,stime,RHH-(RHH-RLL)*0.236);
tl13 = TL_New(RHD,RHT,RHH-(RHH-RLL)*0.382,sdate,stime,RHH-(RHH-RLL)*0.382);
tl14 = TL_New(RHD,RHT,RHH-(RHH-RLL)*0.500,sdate,stime,RHH-(RHH-RLL)*0.500);
tl15 = TL_New(RHD,RHT,RHH-(RHH-RLL)*0.618,sdate,stime,RHH-(RHH-RLL)*0.618);
tl16 = TL_New(RHD,RHT,RHH-(RHH-RLL)*0.764,sdate,stime,RHH-(RHH-RLL)*0.764);
tl17 = TL_New(RHD,RHT,RLL,sdate,stime,RLL);
}
else{
tl11 = TL_New(RHD1,RHT1,RHH1,sdate,stime,RHH);
tl12 = TL_New(RHD1,RHT1,RHH1-(RHH1-RLL1)*0.236,sdate,stime,RHH1-(RHH1-RLL1)*0.236);
tl13 = TL_New(RHD1,RHT1,RHH1-(RHH1-RLL1)*0.382,sdate,stime,RHH1-(RHH1-RLL1)*0.382);
tl14 = TL_New(RHD1,RHT1,RHH1-(RHH1-RLL1)*0.500,sdate,stime,RHH1-(RHH1-RLL1)*0.500);
tl15 = TL_New(RHD1,RHT1,RHH1-(RHH1-RLL1)*0.618,sdate,stime,RHH1-(RHH1-RLL1)*0.618);
tl16 = TL_New(RHD1,RHT1,RHH1-(RHH1-RLL1)*0.764,sdate,stime,RHH1-(RHH1-RLL1)*0.764);
tl17 = TL_New(RHD1,RHT1,RLL1,sdate,stime,RLL1);
}
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : 수고하십니다
> ###,다시한번 도전입니다
$,아래수식은 어느회원분 질문에 대한 답변수식입니다,조건만족시 파동추세선의
색상이 변경되는 내용입니다, 여기서 질문입니다,
ㅡ,18시15분을 장시작~ 익일17시30분을 장마감 기준으로보고 전일의 파동추세선중에 가장큰
파동에 피봇등분선 수치를 출력하여 당일현재까지 오른쪽 그리기로 연장 하고싶습니다.
(단,당일에 전일보다 큰파동이 출현시에는 갱신되는)
#,잘 부탁드립니다~"꾸벅"
Input : af(0.02), maxAF(0.2);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : HH1(0),LL1(0),color(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
HH = H;
HH1 = HH[1];
HD = sdate;
HT = stime;
if HH > HH1 Then
color = red;
if LL > 0 Then
{
TL1 = TL_new(LD[1],LT[1],LL[1],HD,HT,HH);
TL_SetSize(TL1,3);
TL_SetColor(Tl1,color);
}
}
if CrossDown(c,var1) Then
{
T = -1;
LL = L;
LL1 = LL[1];
LD = sdate;
LT = stime;
if LL < LL1 Then
color = BLUE;
if HH > 0 Then
{
TL2 = TL_new(HD[1],HT[1],HH[1],LD,LT,LL);
TL_SetSize(TL2,3);
TL_SetColor(Tl2,color);
}
}
if T == 1 then
{
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
if HH > HH1 Then
color = YELLOW;
TL_SetEnd(TL1,HD,HT,HH);
TL_SetSize(TL1,3);
TL_SetColor(Tl1,color);
}
}
if T == -1 then
{
if L < LL Then{
LL = L;
LD = sdate;
LT = stime;
if LL < LL1 Then
color = CYAN;
TL_SetEnd(TL2,LD,LT,LL);
TL_SetSize(TL2,3);
TL_SetColor(Tl2,color);
}
}
#,매번 감사합니다.
다음글
이전글