예스스탁
예스스탁 답변
2019-11-25 16:50:09
안녕하세요
예스스탁입니다.
수식 답변 내용 확인하시기 바랍니다.
수식이 2개입니다.
1번과 2번 따로 작성해 사용하셔야 합니다.
즐거운 하루되세요
> 푸른 님이 쓴 글입니다.
> 제목 : 수식 문의드립니다.
> 첨부파일에 시스템검증결과 오류라고 확인됩니다.
input : left(3), right(3);
var : swing_low(0),swing_high(0),Dir(0);
swing_low = SwingLowBar(1, Low, left, right, left+right+1);
swing_high = SwingHighBar(1, High, left, right, left+right+1);
if (Dir >= 0 and swing_low != -1 ) Then{
Dir = -1;
var11 = sdate[swing_low];
var12 = STime[swing_low];
var13 = Low[swing_low];
var21 = var11[1];
var22 = var12[1];
var23 = var13[1];
var31 = var21[1];
var32 = var22[1];
var33 = var23[1];
TL_Delete(value1);
if var23 > 0 Then{
value1 = TL_New(var21,var22,var23,var11,var12,var13);
TL_SetExtRight(value1,True);
TL_SetColor(value1,RED);
}
if var33 > 0 Then{
value2 = TL_New(var31,var32,var33,var21,var22,var23);
TL_SetColor(value2,RED);
}
if var53 > 0 Then{
value4 = TL_New(var51,var52,var53,var11,var12,var13);
TL_SetColor(value4,BLUE);
}
}
if (Dir <= 0 and swing_high != -1 ) Then{
Dir = 1;
var51 = sdate[swing_high];
var52 = STime[swing_high];
var53 = high[swing_high];
var61 = var51[1];
var62 = var52[1];
var63 = var53[1];
var71 = var61[1];
var72 = var62[1];
var73 = var63[1];
TL_Delete(value3);
if var63 > 0 Then{
value3 = TL_New(var61,var62,var63,var51,var52,var53);
TL_SetExtRight(value3,True);
TL_SetColor(value3,blue);
}
if var73 > 0 Then{
value4 = TL_New(var71,var72,var73,var61,var62,var63);
TL_SetColor(value4,blue);
}
if var53 > 0 Then{
value4 = TL_New(var11,var12,var13,var51,var52,var53);
TL_SetColor(value4,RED);
}
}
2.
input : left(3), right(3);
var : swing_low(0),swing_high(0),Dir(0);
swing_low = SwingLowBar(1, Low, left, right, left+right+1);
swing_high = SwingHighBar(1, High, left, right, left+right+1);
if (Dir >= 0 and swing_low != -1 ) Then{
Dir = -1;
var11 = sdate[swing_low];
var12 = STime[swing_low];
var13 = Low[swing_low];
var21 = var11[1];
var22 = var12[1];
var23 = var13[1];
var31 = var21[1];
var32 = var22[1];
var33 = var23[1];
TL_Delete(value1);
if var23 > 0 Then{
value1 = TL_New(var21,var22,var23,var11,var12,var13);#최근 저점-저점 추세선
TL_SetExtRight(value1,True);
TL_SetColor(value1,RED); #오른쪽 연장
}
if var33 > 0 Then{
value2 = TL_New(var31,var32,var33,var21,var22,var23);#과거 저점-저점 추세선
TL_SetColor(value2,RED);
}
if var53 > 0 Then{
value4 = TL_New(var51,var52,var53,var11,var12,var13);#고점-저점 추세선
TL_SetColor(value4,BLUE);
}
}
if (Dir <= 0 and swing_high != -1 ) Then{
Dir = 1;
var51 = sdate[swing_high];
var52 = STime[swing_high];
var53 = high[swing_high];
var61 = var51[1];
var62 = var52[1];
var63 = var53[1];
var71 = var61[1];
var72 = var62[1];
var73 = var63[1];
TL_Delete(value3);
if var63 > 0 Then{
value3 = TL_New(var61,var62,var63,var51,var52,var53);#최근 고점-고점 추세선
TL_SetExtRight(value3,True);
TL_SetColor(value3,blue);#오른쪽 연장
}
if var73 > 0 Then{
value4 = TL_New(var71,var72,var73,var61,var62,var63);#과거 고점-고점 추세선
TL_SetColor(value4,blue);
}
if var53 > 0 Then{
value4 = TL_New(var11,var12,var13,var51,var52,var53);#저점-고점 추세선
TL_SetColor(value4,RED);
}
}
if L > TL_GetValue(value3,sdate,stime) Then
buy();
if H < TL_GetValue(value1,sdate,stime) Then
sell();