커뮤니티

문의 드립니다.

프로필 이미지
신대륙발견
2023-05-05 01:45:23
944
글번호 168734
답변완료
//@version=4 // This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/ // &#169; KivancOzbilgic //created by: @Anil_Ozeksi //developer: ANIL &#214;ZEK&#350;&#304; //author: @kivancozbilgic var : src(0); src = close; input : length(6),percent(5.1); input : mav(5);//"1:SMA", "2:EMA", "3:WMA", "4:TMA", "5:VAR", "6:WWMA", "7:ZLEMA", "8:TSF"]); var : valpha(0),vud1(0),vdd1(0),vUD(0),vdd(0),vCMO(0),varv(0); var : wwalpha(0),WWMA(0); var : zxLag(0),zxEMAData(0),ZLEMA(0); var : lrc(0),LRs(0),TSF(0),MAvg(0); valpha=2/(length+1); vud1=iff(src>src[1] , src-src[1] , 0); vdd1=iff(src<src[1] , src[1]-src , 0); vUD=AccumN(vud1,9); vDD=AccumN(vdd1,9); vCMO= iff(isnan((vUD-vDD)/(vUD+vDD)) == true,0,(vUD-vDD)/(vUD+vDD)); varv =0.0; varv = iff(isnan(valpha*abs(vCMO)*src) ==true,0,valpha*abs(vCMO)*src)+(1-valpha*abs(vCMO))*iff(isnan(varv[1])==true,0,varv[1]); wwalpha = 1/ length; WWMA = 0.0; WWMA = wwalpha*src + (1-wwalpha)*iff(isnan(WWMA[1])==true,0,WWMA[1]); zxLag = iff(length/2==round(length/2,0) , length/2 , (length - 1) / 2); zxEMAData = (src + (src - src[zxLag])); ZLEMA = ema(zxEMAData, length); TSF = LRL(src, length)+LRS(src, length); if mav== 1 Then #SMA { MAvg = ma(src,Length) ; } if mav== 2 Then #Ema { Mavg = ema(src, Length); } if mav== 3 Then #Ema { Mavg = wma(src, Length); } if mav== 4 Then #Tma { Mavg = ma(ma(src, Ceiling(length / 2)), floor(length / 2) + 1); } if mav== 5 Then #VAR { Mavg = varv; } if mav== 6 Then #WWMA { Mavg = WWMA; } if mav== 7 Then #ZLEMA { Mavg = ZLEMA; } if mav== 8 Then #TSF { Mavg = TSF; } var : fark(0),longStop(0),longStopPrev(0),shortStop(0),shortStopPrev(0); var : dir(0),MT(0),OTT(0),OTTC(0); fark=MAvg*percent*0.01; longStop = MAvg - fark; longStopPrev = iff(isnan(longStop[1]) == true, longStop,longStop[1]); longStop = iff(MAvg > longStopPrev , max(longStop, longStopPrev) , longStop); shortStop = MAvg + fark; shortStopPrev = iff(isnan(shortStop[1]) == true, shortStop,shortStop[1]); shortStop = iff(MAvg < shortStopPrev , min(shortStop, shortStopPrev) , shortStop); dir = 1; dir = iff(isnan(dir[1])==true,dir,dir[1]); dir = iff(dir == -1 and MAvg > shortStopPrev , 1 , IFf(dir == 1 and MAvg < longStopPrev , -1 , dir)); MT = iff(dir==1 , longStop , shortStop); OTT= iff(MAvg>MT , MT*(200+percent)/200 , MT*(200-percent)/200 ); OTTC = IFf(OTT[2] > OTT[3] , green ,red); plot1(MAvg,"Support Line",Blue); plot2(IFf(isnan(OTT[2]) == true,0,OTT[1]), "OTT",OTTC); 위 수식에서 두 선이 교차하면 매수/매도 신호가 나오게 해주세요.
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2023-05-08 08:42:56

안녕하세요 예스스탁입니다. //@version=4 // This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/ // &#169; KivancOzbilgic //created by: @Anil_Ozeksi //developer: ANIL &#214;ZEK&#350;&#304; //author: @kivancozbilgic var : src(0); src = close; input : length(6),percent(5.1); input : mav(5);//"1:SMA", "2:EMA", "3:WMA", "4:TMA", "5:VAR", "6:WWMA", "7:ZLEMA", "8:TSF"]); var : valpha(0),vud1(0),vdd1(0),vUD(0),vdd(0),vCMO(0),varv(0); var : wwalpha(0),WWMA(0); var : zxLag(0),zxEMAData(0),ZLEMA(0); var : lrc(0),LRs(0),TSF(0),MAvg(0); valpha=2/(length+1); vud1=iff(src>src[1] , src-src[1] , 0); vdd1=iff(src<src[1] , src[1]-src , 0); vUD=AccumN(vud1,9); vDD=AccumN(vdd1,9); vCMO= iff(isnan((vUD-vDD)/(vUD+vDD)) == true,0,(vUD-vDD)/(vUD+vDD)); varv =0.0; varv = iff(isnan(valpha*abs(vCMO)*src) ==true,0,valpha*abs(vCMO)*src)+(1-valpha*abs(vCMO))*iff(isnan(varv[1])==true,0,varv[1]); wwalpha = 1/ length; WWMA = 0.0; WWMA = wwalpha*src + (1-wwalpha)*iff(isnan(WWMA[1])==true,0,WWMA[1]); zxLag = iff(length/2==round(length/2,0) , length/2 , (length - 1) / 2); zxEMAData = (src + (src - src[zxLag])); ZLEMA = ema(zxEMAData, length); TSF = LRL(src, length)+LRS(src, length); if mav== 1 Then #SMA { MAvg = ma(src,Length) ; } if mav== 2 Then #Ema { Mavg = ema(src, Length); } if mav== 3 Then #Ema { Mavg = wma(src, Length); } if mav== 4 Then #Tma { Mavg = ma(ma(src, Ceiling(length / 2)), floor(length / 2) + 1); } if mav== 5 Then #VAR { Mavg = varv; } if mav== 6 Then #WWMA { Mavg = WWMA; } if mav== 7 Then #ZLEMA { Mavg = ZLEMA; } if mav== 8 Then #TSF { Mavg = TSF; } var : fark(0),longStop(0),longStopPrev(0),shortStop(0),shortStopPrev(0); var : dir(0),MT(0),OTT(0),OTTC(0); fark=MAvg*percent*0.01; longStop = MAvg - fark; longStopPrev = iff(isnan(longStop[1]) == true, longStop,longStop[1]); longStop = iff(MAvg > longStopPrev , max(longStop, longStopPrev) , longStop); shortStop = MAvg + fark; shortStopPrev = iff(isnan(shortStop[1]) == true, shortStop,shortStop[1]); shortStop = iff(MAvg < shortStopPrev , min(shortStop, shortStopPrev) , shortStop); dir = 1; dir = iff(isnan(dir[1])==true,dir,dir[1]); dir = iff(dir == -1 and MAvg > shortStopPrev , 1 , IFf(dir == 1 and MAvg < longStopPrev , -1 , dir)); MT = iff(dir==1 , longStop , shortStop); OTT= iff(MAvg>MT , MT*(200+percent)/200 , MT*(200-percent)/200 ); OTTC = IFf(OTT[2] > OTT[3] , green ,red); var1 = MAvg; var2 = IFf(isnan(OTT[2]) == true,0,OTT[1]); if CrossUp(var1,Var2) Then Buy(); if CrossDown(var1,Var2) Then Sell(); 즐거운 하루되세요 > 신대륙발견 님이 쓴 글입니다. > 제목 : 문의 드립니다. > //@version=4 // This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/ // &#169; KivancOzbilgic //created by: @Anil_Ozeksi //developer: ANIL &#214;ZEK&#350;&#304; //author: @kivancozbilgic var : src(0); src = close; input : length(6),percent(5.1); input : mav(5);//"1:SMA", "2:EMA", "3:WMA", "4:TMA", "5:VAR", "6:WWMA", "7:ZLEMA", "8:TSF"]); var : valpha(0),vud1(0),vdd1(0),vUD(0),vdd(0),vCMO(0),varv(0); var : wwalpha(0),WWMA(0); var : zxLag(0),zxEMAData(0),ZLEMA(0); var : lrc(0),LRs(0),TSF(0),MAvg(0); valpha=2/(length+1); vud1=iff(src>src[1] , src-src[1] , 0); vdd1=iff(src<src[1] , src[1]-src , 0); vUD=AccumN(vud1,9); vDD=AccumN(vdd1,9); vCMO= iff(isnan((vUD-vDD)/(vUD+vDD)) == true,0,(vUD-vDD)/(vUD+vDD)); varv =0.0; varv = iff(isnan(valpha*abs(vCMO)*src) ==true,0,valpha*abs(vCMO)*src)+(1-valpha*abs(vCMO))*iff(isnan(varv[1])==true,0,varv[1]); wwalpha = 1/ length; WWMA = 0.0; WWMA = wwalpha*src + (1-wwalpha)*iff(isnan(WWMA[1])==true,0,WWMA[1]); zxLag = iff(length/2==round(length/2,0) , length/2 , (length - 1) / 2); zxEMAData = (src + (src - src[zxLag])); ZLEMA = ema(zxEMAData, length); TSF = LRL(src, length)+LRS(src, length); if mav== 1 Then #SMA { MAvg = ma(src,Length) ; } if mav== 2 Then #Ema { Mavg = ema(src, Length); } if mav== 3 Then #Ema { Mavg = wma(src, Length); } if mav== 4 Then #Tma { Mavg = ma(ma(src, Ceiling(length / 2)), floor(length / 2) + 1); } if mav== 5 Then #VAR { Mavg = varv; } if mav== 6 Then #WWMA { Mavg = WWMA; } if mav== 7 Then #ZLEMA { Mavg = ZLEMA; } if mav== 8 Then #TSF { Mavg = TSF; } var : fark(0),longStop(0),longStopPrev(0),shortStop(0),shortStopPrev(0); var : dir(0),MT(0),OTT(0),OTTC(0); fark=MAvg*percent*0.01; longStop = MAvg - fark; longStopPrev = iff(isnan(longStop[1]) == true, longStop,longStop[1]); longStop = iff(MAvg > longStopPrev , max(longStop, longStopPrev) , longStop); shortStop = MAvg + fark; shortStopPrev = iff(isnan(shortStop[1]) == true, shortStop,shortStop[1]); shortStop = iff(MAvg < shortStopPrev , min(shortStop, shortStopPrev) , shortStop); dir = 1; dir = iff(isnan(dir[1])==true,dir,dir[1]); dir = iff(dir == -1 and MAvg > shortStopPrev , 1 , IFf(dir == 1 and MAvg < longStopPrev , -1 , dir)); MT = iff(dir==1 , longStop , shortStop); OTT= iff(MAvg>MT , MT*(200+percent)/200 , MT*(200-percent)/200 ); OTTC = IFf(OTT[2] > OTT[3] , green ,red); plot1(MAvg,"Support Line",Blue); plot2(IFf(isnan(OTT[2]) == true,0,OTT[1]), "OTT",OTTC); 위 수식에서 두 선이 교차하면 매수/매도 신호가 나오게 해주세요.