안녕하세요 예스스탁입니다. 1. Inputs: Length(14),n(1),n1(5),n2(10),n3(20); value1 = C - C[1]; value2 = Power(Ma(Power(value1,2), Length)+1, 0.5); value3 = Power(Power(value1,2)+1, 0.5); value4 = Iff(Ma(value1, Length) > 0,1 * value2,-1 * value2); value5 = IFF(value1 > 0 ,1 * value3,-1 * value3); var1 = accum(value4 + value5);#BPDL Trend Filter - Raw if var1 >= var1[1]+n Then var2 = 1; if var1 <= var1[1]-n Then var2 = -1; if var2 == 1 Then{ plot1(var1,"1",RED); plot2(ma(var1,n1),"2",RED); plot3(ma(var1,n2),"3",RED); plot4(ma(var1,n3),"4",RED); } if var2 == -1 Then{ plot1(var1,"1",blue); plot2(ma(var1,n1),"2",blue); plot3(ma(var1,n2),"3",blue); plot4(ma(var1,n3),"4",blue); } 상승하락에 따라 이평들도 같이 색이 변경됩니다. 이평은 따로 그리고자 하시면 아래와 같이 해당 지표출력 부분 변경하시면 됩니다. if var2 == 1 Then{ plot1(var1,"1",RED); } if var2 == -1 Then{ plot1(var1,"1",blue); } plot2(ma(var1,n1)); plot3(ma(var1,n2)); plot4(ma(var1,n3)); 2. Inputs: Length(14),n(1); input: period(10),nn(20); var: efratio(0), smooth(1), fastend(0.666), slowend(0.0645), AMA(0), diff(0), signal(0), noise(0),aa(0),bb(0); value1 = C - C[1]; value2 = Power(Ma(Power(value1,2), Length)+1, 0.5); value3 = Power(Power(value1,2)+1, 0.5); value4 = Iff(Ma(value1, Length) > 0,1 * value2,-1 * value2); value5 = IFF(value1 > 0 ,1 * value3,-1 * value3); var1 = accum(value4 + value5);#BPDL Trend Filter - Raw efratio = 1; diff = absvalue(C - C[1]); if currentbar > period then { signal = absvalue(C - C[period]); noise = accumN(diff,period); if noise <> 0 then efratio = signal / noise; smooth = power(efratio*(fastend - slowend) + slowend,2); AMA = AMA[1] + smooth*(C - AMA[1]); } else AMA = C; var11 = ema(c,nn); if crossup(var11,ama) Then aa = 1; if CrossDown(var11,ama) Then aa = -1; if var1 >= var1[1]+n Then bb = 1; if var1 <= var1[1]-n Then bb = -1; if aa == 1 and bb == 1 and (crossup(var11,ama) or var1 >= var1[1]+n) Then buy(); if aa == -1 and bb == -1 and CrossDown(var11,ama) and var1 <= var1[1]-n Then sell(); 즐거운 하루되세요 > 흑수돌 님이 쓴 글입니다. > 제목 : 수식재문의 > 수식 재문의 1 : BPDL Trend Filter - Raw 지표 수식을 바탕으로 아래의 수식을 문의한 바 있습니다. BPDL Trend Filter - Raw 지표의 값이 직전값 대비 n값 이상 상승하면 **색을 n값 이상 하락하면 %%색을 n값 이내로 횡보하면 직전 봉 색깔을 유지 하는 지표를 얻고 싶습니다. 또, 그 지표에 대한 이동평균선 n1, n2, n3을 구하여 추가로 삽입하고 싶습니다. 그리하여 받은 수식이 아래와 같은데, 강조식이더군요. 제가 얻고 싶은 수식은 강조식이 아니라 BPDL Trend Filter - Raw 지표의 색깔이 위의 조건에 따라 바뀌고 그 지표에 추가로 이평을 더 삽입하고 싶다는 뜻이었습니다. 제, 설명이 충분치 못하였나 봅니다. 다시 한번 부탁드리겠습니다. 아래 : Inputs: Length(14),n(1); value1 = C - C[1]; value2 = Power(Ma(Power(value1,2), Length)+1, 0.5); value3 = Power(Power(value1,2)+1, 0.5); value4 = Iff(Ma(value1, Length) > 0,1 * value2,-1 * value2); value5 = IFF(value1 > 0 ,1 * value3,-1 * value3); var1 = accum(value4 + value5);#BPDL Trend Filter - Raw if var1 >= var1[1]+n Then var2 = 1; if var1 <= var1[1]-n Then var2 = -1; if var2 == 1 Then PlotPaintBar(c,O,"1",RED); if var2 == -1 Then PlotPaintBar(c,O,"1",blue); ￦￦￦￦￦￦￦￦￦￦￦￦￦￦￦￦￦￦￦￦￦￦￦￦ 수식 재문의 2 : 쿠프먼필터와 지수이동평균의 골드데드를 이용한 신호와 BPDL Trend Filter - Raw지표의 상승하락을 이용한 신호를 합친 시스템을 아래와 같이 요청드린 바 있습니다. ㅁ. 쿠프먼필터 시스템 수식 ㄱ 과 BPDL Trend Filter - Raw지표 시스템 수식 ㄹ을 하나로 합치고 싶습니다. 즉, ㄱ의 조건과 ㄹ의 조건을 동시에 만족할 때에만 매수,매도 신호를 뿌려주는 것입니다. 그리하여 아래2의 지표를 얻었으나, ㄱ의 조건과 ㄹ의 조건을 같은 봉에서 동시에 만족하는 봉에서만 신호가 나오네요. 제가 말씀 얻고 싶은 수식은, 가령, ㄱ의 조건과 ㄹ의 조건이 동시에 (같은 봉에서) 만족되지 않더라도 ㄱ(또는 ㄹ)의 조건이 만족된 상태에서 시간이 경과하여 이후의 다른 봉에서라도 ㄹ(또는 ㄱ)의 조건이 만족된다면 거기에 신호를 뿌려주고 싶다는 뜻입니다. 제, 설명이 충분치 못하였나 봅니다. 다시 한번 부탁드리겠습니다. 아래 2 : Inputs: Length(14),n(1); input: period(10),nn(20); var: efratio(0), smooth(1), fastend(0.666), slowend(0.0645), AMA(0), diff(0), signal(0), noise(0); value1 = C - C[1]; value2 = Power(Ma(Power(value1,2), Length)+1, 0.5); value3 = Power(Power(value1,2)+1, 0.5); value4 = Iff(Ma(value1, Length) > 0,1 * value2,-1 * value2); value5 = IFF(value1 > 0 ,1 * value3,-1 * value3); var1 = accum(value4 + value5);#BPDL Trend Filter - Raw efratio = 1; diff = absvalue(C - C[1]); if currentbar > period then { signal = absvalue(C - C[period]); noise = accumN(diff,period); if noise <> 0 then efratio = signal / noise; smooth = power(efratio*(fastend - slowend) + slowend,2); AMA = AMA[1] + smooth*(C - AMA[1]); } else AMA = C; var11 = ema(c,nn); if crossup(var11,ama) and var1 >= var1[1]+n Then buy(); if CrossDown(var11,ama) and var1 <= var1[1]-n Then sell();