커뮤니티

시스템/검색식을 알려주세요

프로필 이미지
회원
2015-03-27 08:00:28
195
글번호 84465
답변완료
전략실행차트의 자동추세선(A/T)의 시스템수식과 종목검색식이 필요합니다.
종목검색
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2015-03-27 14:41:50

안녕하세요 예스스탁입니다. 차트보조도구에서 제공되고 있는 자동추세선을 랭귀지로 그대로 구현하기는 어렵습니다. 현재 발생된 고점이나 저점보다 높거나 낮은 가장 가까운 고점/저점을 차트 전체에서 찾아 그리는데 수식에서는 갯수를 지정해야 하므로 아래식에서는 최근 50개의 고점/저점만 기준으로 합니다. 50개 안에 현재고점보다 큰 고점이 없으면 직전고점과 저점을 연결합니다. 추세선은 종목검색식에서는 이용할수 없습니다. 이용에 참고하시기 바랍니다. input : P(3); var : TL1(0),TL2(0),tx1(0),tx2(0); if SwingHigh(1,h,P,P,P*2+1) != -1 Then{ var1 = sdate[P]; var2 = sTime[P]; var3 = H[P]; var4 = var1[1]; var5 = var2[1]; var6 = var3[1]; if var6 > 0 Then{ #고점에 동그라미 그리기 Tx1 = Text_New(var1,var2,var3,"●"); #동그라미 색상, 빨강 Text_SetColor(Tx1,RED); Text_SetStyle(Tx1,2,2); #기존그려진 TL2추세선의 오측연장을 없앰 TL_SetExtRight(TL1,False); #새로운 고점과 이전고점을 연결해 추세선 생성 TL1 = TL_New(var4,var5,var6,var1,var2,var3); #추세선 우측 연장 TL_SetExtRight(TL1,true); #추세선 색지정 TL_SetColor(TL1,CYAN); } } if SwingLow(1,L,P,P,P*2+1) != -1 Then{ var11 = sdate[P]; var12 = sTime[P]; var13 = L[P]; var14 = var11[1]; var15 = var12[1]; var16 = var13[1]; if var16 > 0 Then{ #저점에 동그라미 그리기 Tx2 = Text_New(var11,var12,var13,"●"); #동그라미 색상, 파랑 Text_SetColor(Tx2,BLUE); Text_SetStyle(Tx2,2,2); #기존그려진 TL2추세선의 오측연장을 없앰 TL_SetExtRight(TL2,False); #새로운 저점과 이전저점을 연결해 추세선 생성 TL2 = TL_New(var14,var15,var16,var11,var12,var13); #추세선 우측 연장 TL_SetExtRight(TL2,true); #추세선 색지정 TL_SetColor(TL2,MAGENTA); } } if C > TL_GetValue(TL1,sdate,stime) and C[1] < TL_GetValue(TL1,sdate[1],Stime[1]) Then buy(); if C < TL_GetValue(TL2,sdate,stime) and C[1] > TL_GetValue(TL2,sdate[1],Stime[1]) Then sell(); 즐거운 하루되세요 > NH_mo****** 님이 쓴 글입니다. > 제목 : 시스템/검색식을 알려주세요 > 전략실행차트의 자동추세선(A/T)의 시스템수식과 종목검색식이 필요합니다.