커뮤니티

수식 부탁 드립니다.

프로필 이미지
너무조아
2014-05-09 12:36:03
169
글번호 74962
답변완료
swinghigh, swinglow 와 추세선 함수를 사용한 시스스템식(sample)을 작성해 주시면 감사 하겠습니다.
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2014-05-09 14:04:26

안녕하세요 예스스탁입니다. 아래식 참고하시기 바랍니다. 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(); 즐거운 하루되세요 > 너무조아 님이 쓴 글입니다. > 제목 : 수식 부탁 드립니다. > swinghigh, swinglow 와 추세선 함수를 사용한 시스스템식(sample)을 작성해 주시면 감사 하겠습니다.