안녕하세요 예스스탁입니다. 수정한 식입니다. #==========================================# # 지표명 : 지그재그차트 # 작성자 : 수식지왕 # 블로그 : http://yahoosir.blog.me #==========================================# Input:상승률(1),하락률(1); Var:j(0),상승(100),하락(-100),양방향(2),색깔(0),파랑(-1),빨강(1), 기준고(0),기준저(0),기준고Bar(0),기준저Bar(0),추세(0),이중파동(0); Array:고[20](0),저[20](0),고Bar[20](0),저Bar[20](0); #==========================================# # 전고점,전저점 index 증가 #==========================================# For j = 1 To 19 { 저Bar[j] = 저Bar[j] + 1; 고Bar[j] = 고Bar[j] + 1; } #==========================================# # 이중파동 처리 #==========================================# If 이중파동 > 0 Then { var1 = 이중파동; #Plot1(이중파동,"Zigzag",Iff(색깔==빨강,RED,BLUE)); 이중파동 = 0; } #==========================================# # 최근 고,저 갱신 #==========================================# If 기준고 <= C || 기준고 == 0 || IsNaN(기준고) == True Then { 기준고 = C; 기준고Bar = 0; } Else 기준고Bar = 기준고Bar + 1; If 기준저 >= C || 기준저 == 0 || IsNaN(기준저) == True Then { 기준저 = C; 기준저Bar = 0; } Else 기준저Bar = 기준저Bar + 1; #==========================================# # 추세방향 결정 #==========================================# If 기준고 * (1 - (하락률/100)) > C && 기준저 * (1 + (상승률/100)) < C Then { 추세 = Iff(기준고Bar==기준저Bar,양방향,Iff(기준고Bar>기준저Bar,상승,하락)); } Else If 기준고 * (1 - (하락률/100)) > C Then 추세 = 하락; Else If 기준저 * (1 + (상승률/100)) < C Then 추세 = 상승; #==========================================# # 추세변화에 따른 변곡점 처리 #==========================================# If 추세[1] == 상승 && 추세 == 하락 Then { For j = 18 DownTo 1 { 고[j+1] = 고[j]; 고Bar[j+1] = 고Bar[j]; } 고[1] = 기준고; 고Bar[1] = 기준고Bar; 기준고 = C; 기준고Bar = 0; 기준저 = C; 기준저Bar = 0; If 고[2] < 고[1] Then 색깔 = 빨강; If 이중파동[1] > 0 Then 이중파동 = 고[1]; Else var1 = 고[1]; //plot1(고[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); } If 추세[1] == 하락 && 추세 == 하락 && 고[1] < 기준고 && 기준고 * (1 - (하락률/100)) >C Then { For j = 18 DownTo 1 { 고[j+1] = 고[j]; 고Bar[j+1] = 고Bar[j]; 저[j+1] = 저[j]; 저Bar[j+1] = 저Bar[j]; } 고[1] = 기준고; 고Bar[1] = 기준고Bar; 저[1] = 기준저; 저Bar[1] = 기준저Bar; 기준고 = C; 기준고Bar = 0; 기준저 = C; 기준저Bar = 0; If 저[2] > 저[1] Then 색깔 = 파랑; var1 = 저[1]; #plot1(저[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); If 고[2] < 고[1] Then 색깔 = 빨강; 이중파동 = 고[1]; } If 추세[1] == 하락 && 추세 == 상승 Then { For j = 18 DownTo 1 { 저[j+1] = 저[j]; 저Bar[j+1] = 저Bar[j]; } 저[1] = 기준저; 저Bar[1] = 기준저Bar; 기준저 = C; 기준저Bar = 0; 기준고 = C; 기준고Bar = 0; If 저[2] > 저[1] Then 색깔 = 파랑; If 이중파동[1] > 0 Then 이중파동 = 저[1]; Else var1 = 저[1]; //plot1(저[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); } If 추세[1] == 상승 && 추세 == 상승 && 저[1] > 기준저 && 기준저 * (1 + (상승률/100)) <C Then { For j = 18 DownTo 1 { 고[j+1] = 고[j]; 고Bar[j+1] = 고Bar[j]; 저[j+1] = 저[j]; 저Bar[j+1] = 저Bar[j]; } 고[1] = 기준고; 고Bar[1] = 기준고Bar; 저[1] = 기준저; 저Bar[1] = 기준저Bar; 기준저 = C; 기준저Bar = 0; 기준고 = C; 기준고Bar = 0; If 고[2] < 고[1] Then 색깔 = 빨강; var1 = 고[1]; #plot1(고[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); If 저[2] > 저[1] Then 색깔 = 파랑; 이중파동 = 저[1]; } If 추세 == 양방향 Then { For j = 18 DownTo 1 { 고[j+1] = 고[j]; 고Bar[j+1] = 고Bar[j]; 저[j+1] = 저[j]; 저Bar[j+1] = 저Bar[j]; } 고[1] = 기준고; 고Bar[1] = 기준고Bar; 저[1] = 기준저; 저Bar[1] = 기준저Bar; 기준고 = C; 기준고Bar = 0; 기준저 = C; 기준저Bar = 0; 추세 = 추세[1]; If 추세[1] == 상승 Then { If 고[2] < 고[1] Then 색깔 = 빨강; var1 = 고[1]; #Plot1(고[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); If 저[2] > 저[1] Then 색깔 = 파랑; 이중파동 = 저[1]; } Else { If 저[2] > 저[1] Then 색깔 = 파랑; var1 = 저[1]; #Plot1(저[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); If 고[2] < 고[1] Then 색깔 = 빨강; 이중파동 = 고[1]; } } #==========================================# # 마무리 #==========================================# If LastBarOnChart == 1 && 기준고Bar > 0 && 기준저Bar > 0 Then { If 추세 == 상승 Then { If 고[1] < 기준고 Then 색깔 = 빨강; var1 = 기준고; #Plot1(기준고,"Zigzag",Iff(색깔==빨강,RED,BLUE)); } Else { If 저[1] > 기준저 Then 색깔 = 파랑; var1 = 기준저; #Plot1(기준저,"Zigzag",Iff(색깔==빨강,RED,BLUE)); } } if 색깔 == 빨강 and var1 < var1[1] Then buy("b1"); if 색깔 == 빨강 and var1 > var1[1] Then sell("s1"); if 색깔 == 빨강 and var1 > var1[1] Then{ value1 = 1; value2 = var1; } if 색깔 == 빨강 and var1 < var1[1] Then{ value1 = -1; value3 = var1; } # 전고점 발생 --> 전저점발생 --> 전고점 상향돌파 매수 if 색깔 == 빨강 and value1 == -1 and crossup(c,value2) Then buy("b2"); 즐거운 하루되세요 > HI_webts777 님이 쓴 글입니다. > 제목 : 시스템식에서 매수부분 다시한번만 부탁드려요! > 어려웠던 부분을 이렇게나 답변을 잘해주셔셔 너무 감사합니다! 마지막부분이 이해 안된다고 하셨는데 제가 만든지표가 아니라서 제가 잘못 설명했네요! 마지막 부분을 꼭 좀 추가해 주셨으면 하는데 부탁드려요! 그리고 색깔이 변환 안된다는 걸 제가 몰랐네요! 전고점 돌파부분이에요! <아래부분이 올려주신 답변인데요!> 지그재그식 반전 매수 매도에서 색이 파란색일때 매수 매도 금지부분은 잘됩니다! 아쉬운 부분이 딱 하나있는데 전고점 돌파에 매수를 안하는게 아쉽네요! if 색깔 == 빨강 and var1 < var1[1] Then buy("b1"); if 색깔 == 빨강 and var1 > var1[1] Then sell("s1"); if 색깔 == 빨강 and 색깔[1] == 파랑 and var1 < var1[1] Then buy("b2"); 지표에서 값이 빨간색일때만 매수와 매도를 합니다. 추가된 내용은 b2로 추가했지만 직전값보다 떨어지면 매수하고 올라가면 매도하므로 해당식에서 b1과 항상 겹쳐지므로 신호가 발생하지는 않습니다. 해당 부분은 정확히 이해가 안되므로 수정해 사용하시기 바랍니다. <여기서 제가 문의드리고자하는 부분은...> if 색깔 == 빨강 and 색깔[1] == 파랑 and var1 < var1[1] Then buy("b2"); 이부분을 지우고 b2 즉 매수신호를 반전신호(b1)외에 전고점 돌파(지그재그상) 전고점 하락반전부분을 넘어서는 부분에서 또다른 매수신호를 넣고 싶습니다! 꺽은선차트상 전고점꺽은선부분을 돌파했을시(이경우색깔이 파란색에서 빨간색으로 전환) 매수신호가 나옵니다! 예를들면 이중바닥시 돌파후 매수를 하는 전략인데, 답변해주신 내용으로 만든 시스템으로는 이 한가지가 부족합니다! 단순히 최근 고점 돌파시 b2를 설정후 s2는 s1과 동일합니다! 이게 가능할까요? <<<<<실시간 지표상(현재값) 바로 전 지그재그고점(하락반전)값보다 높은 가격이 오면 b2를 실행하는 시스템식입니다! 그리고 s1(매도전략)은 같습니다! >>> ((최근 지그재그 지표상 신고가돌파가 되면 매수하는 부분입니다) 꼭 부탁드려요! <아래는 전에 답변해주신 시스템 원본입니다> 2. 시스템 #==========================================# # 지표명 : 지그재그차트 # 작성자 : 수식지왕 # 블로그 : http://yahoosir.blog.me #==========================================# Input:상승률(1),하락률(1); Var:j(0),상승(100),하락(-100),양방향(2),색깔(0),파랑(-1),빨강(1), 기준고(0),기준저(0),기준고Bar(0),기준저Bar(0),추세(0),이중파동(0); Array:고[20](0),저[20](0),고Bar[20](0),저Bar[20](0); #==========================================# # 전고점,전저점 index 증가 #==========================================# For j = 1 To 19 { 저Bar[j] = 저Bar[j] + 1; 고Bar[j] = 고Bar[j] + 1; } #==========================================# # 이중파동 처리 #==========================================# If 이중파동 > 0 Then { var1 = 이중파동; #Plot1(이중파동,"Zigzag",Iff(색깔==빨강,RED,BLUE)); 이중파동 = 0; } #==========================================# # 최근 고,저 갱신 #==========================================# If 기준고 <= C || 기준고 == 0 || IsNaN(기준고) == True Then { 기준고 = C; 기준고Bar = 0; } Else 기준고Bar = 기준고Bar + 1; If 기준저 >= C || 기준저 == 0 || IsNaN(기준저) == True Then { 기준저 = C; 기준저Bar = 0; } Else 기준저Bar = 기준저Bar + 1; #==========================================# # 추세방향 결정 #==========================================# If 기준고 * (1 - (하락률/100)) > C && 기준저 * (1 + (상승률/100)) < C Then { 추세 = Iff(기준고Bar==기준저Bar,양방향,Iff(기준고Bar>기준저Bar,상승,하락)); } Else If 기준고 * (1 - (하락률/100)) > C Then 추세 = 하락; Else If 기준저 * (1 + (상승률/100)) < C Then 추세 = 상승; #==========================================# # 추세변화에 따른 변곡점 처리 #==========================================# If 추세[1] == 상승 && 추세 == 하락 Then { For j = 18 DownTo 1 { 고[j+1] = 고[j]; 고Bar[j+1] = 고Bar[j]; } 고[1] = 기준고; 고Bar[1] = 기준고Bar; 기준고 = C; 기준고Bar = 0; 기준저 = C; 기준저Bar = 0; If 고[2] < 고[1] Then 색깔 = 빨강; If 이중파동[1] > 0 Then 이중파동 = 고[1]; Else var1 = 고[1]; //plot1(고[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); } If 추세[1] == 하락 && 추세 == 하락 && 고[1] < 기준고 && 기준고 * (1 - (하락률/100)) >C Then { For j = 18 DownTo 1 { 고[j+1] = 고[j]; 고Bar[j+1] = 고Bar[j]; 저[j+1] = 저[j]; 저Bar[j+1] = 저Bar[j]; } 고[1] = 기준고; 고Bar[1] = 기준고Bar; 저[1] = 기준저; 저Bar[1] = 기준저Bar; 기준고 = C; 기준고Bar = 0; 기준저 = C; 기준저Bar = 0; If 저[2] > 저[1] Then 색깔 = 파랑; var1 = 저[1]; #plot1(저[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); If 고[2] < 고[1] Then 색깔 = 빨강; 이중파동 = 고[1]; } If 추세[1] == 하락 && 추세 == 상승 Then { For j = 18 DownTo 1 { 저[j+1] = 저[j]; 저Bar[j+1] = 저Bar[j]; } 저[1] = 기준저; 저Bar[1] = 기준저Bar; 기준저 = C; 기준저Bar = 0; 기준고 = C; 기준고Bar = 0; If 저[2] > 저[1] Then 색깔 = 파랑; If 이중파동[1] > 0 Then 이중파동 = 저[1]; Else var1 = 저[1]; //plot1(저[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); } If 추세[1] == 상승 && 추세 == 상승 && 저[1] > 기준저 && 기준저 * (1 + (상승률/100)) <C Then { For j = 18 DownTo 1 { 고[j+1] = 고[j]; 고Bar[j+1] = 고Bar[j]; 저[j+1] = 저[j]; 저Bar[j+1] = 저Bar[j]; } 고[1] = 기준고; 고Bar[1] = 기준고Bar; 저[1] = 기준저; 저Bar[1] = 기준저Bar; 기준저 = C; 기준저Bar = 0; 기준고 = C; 기준고Bar = 0; If 고[2] < 고[1] Then 색깔 = 빨강; var1 = 고[1]; #plot1(고[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); If 저[2] > 저[1] Then 색깔 = 파랑; 이중파동 = 저[1]; } If 추세 == 양방향 Then { For j = 18 DownTo 1 { 고[j+1] = 고[j]; 고Bar[j+1] = 고Bar[j]; 저[j+1] = 저[j]; 저Bar[j+1] = 저Bar[j]; } 고[1] = 기준고; 고Bar[1] = 기준고Bar; 저[1] = 기준저; 저Bar[1] = 기준저Bar; 기준고 = C; 기준고Bar = 0; 기준저 = C; 기준저Bar = 0; 추세 = 추세[1]; If 추세[1] == 상승 Then { If 고[2] < 고[1] Then 색깔 = 빨강; var1 = 고[1]; #Plot1(고[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); If 저[2] > 저[1] Then 색깔 = 파랑; 이중파동 = 저[1]; } Else { If 저[2] > 저[1] Then 색깔 = 파랑; var1 = 저[1]; #Plot1(저[1],"Zigzag",Iff(색깔==빨강,RED,BLUE)); If 고[2] < 고[1] Then 색깔 = 빨강; 이중파동 = 고[1]; } } #==========================================# # 마무리 #==========================================# If LastBarOnChart == 1 && 기준고Bar > 0 && 기준저Bar > 0 Then { If 추세 == 상승 Then { If 고[1] < 기준고 Then 색깔 = 빨강; var1 = 기준고; #Plot1(기준고,"Zigzag",Iff(색깔==빨강,RED,BLUE)); } Else { If 저[1] > 기준저 Then 색깔 = 파랑; var1 = 기준저; #Plot1(기준저,"Zigzag",Iff(색깔==빨강,RED,BLUE)); } } if 색깔 == 빨강 and var1 < var1[1] Then buy("b1"); if 색깔 == 빨강 and var1 > var1[1] Then sell("s1"); if 색깔 == 빨강 and 색깔[1] == 파랑 and var1 < var1[1] Then buy("b2"); 지표에서 값이 빨간색일때만 매수와 매도를 합니다. 추가된 내용은 b2로 추가했지만 직전값보다 떨어지면 매수하고 올라가면 매도하므로 해당식에서 b1과 항상 겹쳐지므로 신호가 발생하지는 않습니다. 해당 부분은 정확히 이해가 안되므로 수정해 사용하시기 바랍니다. 즐거운 하루되세요