안녕하세요 예스스탁입니다. input : left(5), right(5); var : swing_low(0),swing_high(0),Dir(0),Bi(0),Si(0); swing_low = SwingLow(1, Low, left, right, Left+Right+1); swing_high = SwingHigh(1, High, left, right,Left+Right+1); if (Dir >= 0 and swing_low != -1 ) Then { Dir = -1; var11 = sdate[right]; var12 = STime[right]; var13 = Low[right]; var21 = var11[1]; var22 = var12[1]; var23 = var13[1]; var31 = var21[1]; var32 = var22[1]; var33 = var23[1]; if var23 > 0 Then { TL_SetExtRight(value1,False); Value1 = TL_New(var21,var22,var23,var11,var12,var13);#최근 저점-저점 추세선 TL_SetExtRight(value1,true); TL_SetColor(value1,BLACK); TL_SetSize(value1,2); Bi = Index; } if var53 > 0 Then { value5 = TL_New(var51,var52,var53,var11,var12,var13);#고점-저점 추세선 TL_SetColor(value5,BLUE); } } if (Dir <= 0 and swing_high != -1 ) Then{ Dir = 1; var51 = sdate[right]; var52 = STime[right]; var53 = high[right]; var61 = var51[1]; var62 = var52[1]; var63 = var53[1]; var71 = var61[1]; var72 = var62[1]; var73 = var63[1]; if var63 > 0 Then { TL_SetExtRight(value3,False); value3 = TL_New(var61,var62,var63,var51,var52,var53);#최근 고점-고점 추세선 TL_SetExtRight(value3,true); TL_SetColor(value3,BLACK); TL_SetSize(value3,2); Si = Index; } if var53 > 0 Then { value5 = TL_New(var11,var12,var13,var51,var52,var53);#저점-고점 추세선 TL_SetColor(value5,RED); } } if Bi > 0 and Index == Bi+1 and C > var13 Then Buy("b"); if Si > 0 and Index == Si+1 and C < var53 Then Sell("s"); 즐거운 하루되세요 > 김예스 님이 쓴 글입니다. > 제목 : 새로운 추세선 발생 시 매매 > 안녕하세요, 아래 추세선 발생 지표에서 고점-고점이나 저점-저점이 갱신되면 그 다음봉에서 매매를 하는 시스템 트레이딩 식을 만들고 싶습니다. - 1봉전 새로운 고점-고점 추세선 발생하면, 현재봉 종가가 추세선발생가격보다 작을때 매도 진입 - 1봉전 새로운 저점-저점 추세선 발생하면, 현재봉 종가가 추세선발생가격보다 크다면 매수 진입 늘 많은 도움에 감사드립니다. input : left(5), right(5); var : swing_low(0),swing_high(0),Dir(0); swing_low = SwingLow(1, Low, left, right, Left+Right+1); swing_high = SwingHigh(1, High, left, right,Left+Right+1); if (Dir >= 0 and swing_low != -1 ) Then { Dir = -1; var11 = sdate[right]; var12 = STime[right]; var13 = Low[right]; var21 = var11[1]; var22 = var12[1]; var23 = var13[1]; var31 = var21[1]; var32 = var22[1]; var33 = var23[1]; if var23 > 0 Then { TL_SetExtRight(value1,False); Value1 = TL_New(var21,var22,var23,var11,var12,var13);#최근 저점-저점 추세선 TL_SetExtRight(value1,true); TL_SetColor(value1,BLACK); TL_SetSize(value1,2); } if var53 > 0 Then { value5 = TL_New(var51,var52,var53,var11,var12,var13);#고점-저점 추세선 TL_SetColor(value5,BLUE); } } if (Dir <= 0 and swing_high != -1 ) Then{ Dir = 1; var51 = sdate[right]; var52 = STime[right]; var53 = high[right]; var61 = var51[1]; var62 = var52[1]; var63 = var53[1]; var71 = var61[1]; var72 = var62[1]; var73 = var63[1]; if var63 > 0 Then { TL_SetExtRight(value3,False); value3 = TL_New(var61,var62,var63,var51,var52,var53);#최근 고점-고점 추세선 TL_SetExtRight(value3,true); TL_SetColor(value3,BLACK); TL_SetSize(value3,2); } if var53 > 0 Then { value5 = TL_New(var11,var12,var13,var51,var52,var53);#저점-고점 추세선 TL_SetColor(value5,RED); } }