커뮤니티

지표를 시스템식으로 변환 부탁드립니다.

프로필 이미지
maker
2022-01-10 16:18:20
1095
글번호 155300
답변완료
안녕하십니까, 지표를 시스템식으로 변환 부탁드립니다. 종가가 파란선 위에 있고, 빨간색 선을 CrossUp 할 경우 매수 종가가 파란색 선을 CrossDown 할 경우 매도 부탁드립니다. input : 비교고저점기준(10); var : cnt(0),BTL(0),STL(0); Array : HH[20](0),HD[20](0),HT[20](0); Array : LL[20](0),LD[20](0),LT[20](0); if SwingHigh(1,H,비교고저점기준,비교고저점기준,비교고저점기준*2+1) != -1 Then{ HH[0] = H[비교고저점기준]; HD[0] = sdate[비교고저점기준]; HT[0] = sTime[비교고저점기준]; Condition1 = false; for cnt = 1 to 19{ HH[cnt] = HH[cnt-1][1]; HD[cnt] = HD[cnt-1][1]; HT[cnt] = HT[cnt-1][1]; if Condition1 == false and HH[cnt] > HH[0] and HH[cnt] > 0 Then{ Condition1 = true; TL_Delete(BTL); BTL = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]); TL_SetExtRight(BTL,true); TL_SetColor(BTL,BLUE); } } } if SwingLow(1,L,비교고저점기준,비교고저점기준,비교고저점기준*2+1) != -1 Then{ LL[0] = L[비교고저점기준]; LD[0] = sdate[비교고저점기준]; LT[0] = sTime[비교고저점기준]; Condition2 = false; for cnt = 1 to 19{ LL[cnt] = LL[cnt-1][1]; LD[cnt] = LD[cnt-1][1]; LT[cnt] = LT[cnt-1][1]; if Condition2 == false and LL[cnt] < LL[0] and LL[cnt] > 0 Then{ Condition2 = true; TL_Delete(STL); STL = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]); TL_SetExtRight(STL,true); TL_SetColor(STL,RED); } } } if TL_GetValue(BTL,sdate,stime) > TL_GetValue(STL,sdate,stime) Then { if CrossUp(C, TL_GetValue(BTL,sdate,stime)) Then{ buy("b"); } if CrossDown(C, TL_GetValue(STL,sdate,stime)) Then{ sell("s"); } }
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2022-01-11 10:46:42

안녕하세요 예스스탁입니다. input : 비교고저점기준(10); var : cnt(0),BTL(0),STL(0); Array : HH[20](0),HD[20](0),HT[20](0); Array : LL[20](0),LD[20](0),LT[20](0); if SwingHigh(1,H,비교고저점기준,비교고저점기준,비교고저점기준*2+1) != -1 Then { HH[0] = H[비교고저점기준]; HD[0] = sdate[비교고저점기준]; HT[0] = sTime[비교고저점기준]; Condition1 = false; for cnt = 1 to 19 { HH[cnt] = HH[cnt-1][1]; HD[cnt] = HD[cnt-1][1]; HT[cnt] = HT[cnt-1][1]; if Condition1 == false and HH[cnt] > HH[0] and HH[cnt] > 0 Then { Condition1 = true; TL_Delete(BTL); BTL = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]); TL_SetExtRight(BTL,true); TL_SetColor(BTL,BLUE); } } } if SwingLow(1,L,비교고저점기준,비교고저점기준,비교고저점기준*2+1) != -1 Then { LL[0] = L[비교고저점기준]; LD[0] = sdate[비교고저점기준]; LT[0] = sTime[비교고저점기준]; Condition2 = false; for cnt = 1 to 19 { LL[cnt] = LL[cnt-1][1]; LD[cnt] = LD[cnt-1][1]; LT[cnt] = LT[cnt-1][1]; if Condition2 == false and LL[cnt] < LL[0] and LL[cnt] > 0 Then { Condition2 = true; TL_Delete(STL); STL = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]); TL_SetExtRight(STL,true); TL_SetColor(STL,RED); } } } var1 = TL_GetValue(BTL,sDate,sTime);#파란색선값 var2 = TL_GetValue(STL,sDate,sTime);#파란색선값 if C > var1 and CrossUp(C,Var2) Then Buy(); if CrossDown(C,var1) Then exitlong(); 즐거운 하루되세요 > maker 님이 쓴 글입니다. > 제목 : 지표를 시스템식으로 변환 부탁드립니다. > 안녕하십니까, 지표를 시스템식으로 변환 부탁드립니다. 종가가 파란선 위에 있고, 빨간색 선을 CrossUp 할 경우 매수 종가가 파란색 선을 CrossDown 할 경우 매도 부탁드립니다. input : 비교고저점기준(10); var : cnt(0),BTL(0),STL(0); Array : HH[20](0),HD[20](0),HT[20](0); Array : LL[20](0),LD[20](0),LT[20](0); if SwingHigh(1,H,비교고저점기준,비교고저점기준,비교고저점기준*2+1) != -1 Then{ HH[0] = H[비교고저점기준]; HD[0] = sdate[비교고저점기준]; HT[0] = sTime[비교고저점기준]; Condition1 = false; for cnt = 1 to 19{ HH[cnt] = HH[cnt-1][1]; HD[cnt] = HD[cnt-1][1]; HT[cnt] = HT[cnt-1][1]; if Condition1 == false and HH[cnt] > HH[0] and HH[cnt] > 0 Then{ Condition1 = true; TL_Delete(BTL); BTL = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]); TL_SetExtRight(BTL,true); TL_SetColor(BTL,BLUE); } } } if SwingLow(1,L,비교고저점기준,비교고저점기준,비교고저점기준*2+1) != -1 Then{ LL[0] = L[비교고저점기준]; LD[0] = sdate[비교고저점기준]; LT[0] = sTime[비교고저점기준]; Condition2 = false; for cnt = 1 to 19{ LL[cnt] = LL[cnt-1][1]; LD[cnt] = LD[cnt-1][1]; LT[cnt] = LT[cnt-1][1]; if Condition2 == false and LL[cnt] < LL[0] and LL[cnt] > 0 Then{ Condition2 = true; TL_Delete(STL); STL = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]); TL_SetExtRight(STL,true); TL_SetColor(STL,RED); } } } if TL_GetValue(BTL,sdate,stime) > TL_GetValue(STL,sdate,stime) Then { if CrossUp(C, TL_GetValue(BTL,sdate,stime)) Then{ buy("b"); } if CrossDown(C, TL_GetValue(STL,sdate,stime)) Then{ sell("s"); } }