커뮤니티

문의드립니다.

프로필 이미지
as8282
2020-03-14 17:47:45
242
글번호 136873
답변완료
input : length(10),dev(1),fastLength(12),slowLength(26),signalLength(9); var : fastma(0),slowma(0),macdv(0),stdv(0),Upper(0),Lower(0),mc(0),mc1(0); fastMA = ema(close, fastLength); slowMA = ema(close, slowLength); macdv = fastMA - slowMA; Stdv = std(macdv, length); Upper = (Stdv * dev + (ma(macdv, length))); Lower = ((ma(macdv, length)) - (Stdv * dev)); plot1(Upper,"Upper Band",GRAY); plot2(Lower, "lower Band",GRAY); mc = iff(macdv >= Upper , CYAN, red); // Indicator plot3(macdv,"macd",mc); plot4(0,"Zeroline"); 상기 식에서 1. 지금은 위쪽밴드 위에만 색상이 다르게 나오는데... 밴드위, 밴드안 , 밴드 밑 세가지로 색상을 구분하게 부탁합니다. 2. 밴드안에서 위쪽밴드를 올라가면 매수 밴드안에서 아래쪽밴드를 내려가면 매수 시스템식을 부탁합니다. 3. input : fl(0.5),sl(0.05),pa(false),fr(false),ebc(false); var : src(0),sp(0),dt(0),i1(0),ji(0),jq(0),i2_(0),q2_(0),re_(0); var : im_(0),re(0),im(0),p1(0),p2(0),p3(0),p(0),q1(0),i2(0),q2(0); var : spp(0),phase(0),dphase_(0),dphase(0),mama(0),fama(0),alpha_(0),alpha(0); src = (H+L);2; sp = (4*src + 3*src[1] + 2*src[2] + src[3]) / 10.0; if CurrentBar >= 1 then { dt = (.0962*sp + .5769*(sp[2]) - .5769*(sp[4])- .0962*(sp[6]))*(.075*(p[1]) + .54); q1 = (.0962*dt + .5769*(dt[2]) - .5769*(dt[4])- .0962*(dt[6]))*(.075*(p[1]) + .54); i1 = (dt[3]); jI = (.0962*i1 + .5769*(i1[2]) - .5769*(i1[4])- .0962*(i1[6]))*(.075*(p[1]) + .54); jq = (.0962*q1 + .5769*(q1[2]) - .5769*(q1[4])- .0962*(q1[6]))*(.075*(p[1]) + .54); i2_ = i1 - jq; q2_ = q1 + jI; i2 = .2*i2_ + .8*(i2[1]); q2 = .2*q2_ + .8*(q2[1]); re_ = i2*(i2[1]) + q2*(q2[1]); im_ = i2*(q2[1]) - q2*(i2[1]); re = .2*re_ + .8*(re[1]); im = .2*im_ + .8*(im[1]); p1 = iff(im!=0 and re!=0, 360/atan(im/re), (p[1])); p2 = iff(p1 > 1.5*(p1[1]), 1.5*(p1[1]), iff(p1 < 0.67*(p1[1]), 0.67*(p1[1]), p1)); p3 = iff(p2<6, 6, iff (p2 > 50, 50, p2)); p = .2*p3 + .8*(p3[1]); spp = .33*p + .67*(spp[1]); phase = atan(q1 / i1); dphase_ = (phase[1]) - phase; dphase = iff(dphase_< 1, 1, dphase_); alpha_ = fl / dphase; alpha = iff(alpha_ < sl, sl, iff(alpha_ > fl, fl, alpha_)); mama = alpha*src + (1 - alpha)*(mama[1]); 위쪽 수식중 macd라인을 3번수식 mama라인으로 변경부탁합니다.
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2020-03-16 16:20:45

안녕하세요 예스스탁입니다. 1 상단위 빨강, 하단아래 파랑, 가운데는 검은색으로 출력되게 수정해 드립니다. input : length(10),dev(1),fastLength(12),slowLength(26),signalLength(9); var : fastma(0),slowma(0),macdv(0),stdv(0),Upper(0),Lower(0),mc(0),mc1(0); fastMA = ema(close, fastLength); slowMA = ema(close, slowLength); macdv = fastMA - slowMA; Stdv = std(macdv, length); Upper = (Stdv * dev + (ma(macdv, length))); Lower = ((ma(macdv, length)) - (Stdv * dev)); plot1(Upper,"Upper Band",GRAY); plot2(Lower, "lower Band",GRAY); mc = iff(macdv >= Upper ,red,iff(macdv <= lower,blue,BLACK)); // Indicator plot3(macdv,"macd",mc); plot4(0,"Zeroline"); 2 input : length(10),dev(1),fastLength(12),slowLength(26),signalLength(9); var : fastma(0),slowma(0),macdv(0),stdv(0),Upper(0),Lower(0),mc(0),mc1(0); fastMA = ema(close, fastLength); slowMA = ema(close, slowLength); macdv = fastMA - slowMA; Stdv = std(macdv, length); Upper = (Stdv * dev + (ma(macdv, length))); Lower = ((ma(macdv, length)) - (Stdv * dev)); if crossup(macdv,upper) Then buy(); if CrossDown(macdv,upper) Then sell(); 3 input : fl(0.5),sl(0.05),pa(false),fr(false),ebc(false); input : length(10),dev(1),fastLength(12),slowLength(26),signalLength(9); var : fastma(0),slowma(0),macdv(0),stdv(0),Upper(0),Lower(0),mc(0),mc1(0); var : src(0),sp(0),dt(0),i1(0),ji(0),jq(0),i2_(0),q2_(0),re_(0); var : im_(0),re(0),im(0),p1(0),p2(0),p3(0),p(0),q1(0),i2(0),q2(0); var : spp(0),phase(0),dphase_(0),dphase(0),mama(0),fama(0),alpha_(0),alpha(0); src = (H+L);2; sp = (4*src + 3*src[1] + 2*src[2] + src[3]) / 10.0; if CurrentBar >= 1 then { dt = (.0962*sp + .5769*(sp[2]) - .5769*(sp[4])- .0962*(sp[6]))*(.075*(p[1]) + .54); q1 = (.0962*dt + .5769*(dt[2]) - .5769*(dt[4])- .0962*(dt[6]))*(.075*(p[1]) + .54); i1 = (dt[3]); jI = (.0962*i1 + .5769*(i1[2]) - .5769*(i1[4])- .0962*(i1[6]))*(.075*(p[1]) + .54); jq = (.0962*q1 + .5769*(q1[2]) - .5769*(q1[4])- .0962*(q1[6]))*(.075*(p[1]) + .54); i2_ = i1 - jq; q2_ = q1 + jI; i2 = .2*i2_ + .8*(i2[1]); q2 = .2*q2_ + .8*(q2[1]); re_ = i2*(i2[1]) + q2*(q2[1]); im_ = i2*(q2[1]) - q2*(i2[1]); re = .2*re_ + .8*(re[1]); im = .2*im_ + .8*(im[1]); p1 = iff(im!=0 and re!=0, 360/atan(im/re), (p[1])); p2 = iff(p1 > 1.5*(p1[1]), 1.5*(p1[1]), iff(p1 < 0.67*(p1[1]), 0.67*(p1[1]), p1)); p3 = iff(p2<6, 6, iff (p2 > 50, 50, p2)); p = .2*p3 + .8*(p3[1]); spp = .33*p + .67*(spp[1]); phase = atan(q1 / i1); dphase_ = (phase[1]) - phase; dphase = iff(dphase_< 1, 1, dphase_); alpha_ = fl / dphase; alpha = iff(alpha_ < sl, sl, iff(alpha_ > fl, fl, alpha_)); mama = alpha*src + (1 - alpha)*(mama[1]); fastMA = ema(mama, fastLength); slowMA = ema(mama, slowLength); macdv = fastMA - slowMA; Stdv = std(macdv, length); Upper = (Stdv * dev + (ma(macdv, length))); Lower = ((ma(macdv, length)) - (Stdv * dev)); plot1(Upper,"Upper Band",GRAY); plot2(Lower, "lower Band",GRAY); mc = iff(macdv >= Upper ,red,iff(macdv <= lower,blue,BLACK)); // Indicator plot3(macdv,"macd",mc); plot4(0,"Zeroline"); } 즐거운 하루되세요 > as8282 님이 쓴 글입니다. > 제목 : 문의드립니다. > input : length(10),dev(1),fastLength(12),slowLength(26),signalLength(9); var : fastma(0),slowma(0),macdv(0),stdv(0),Upper(0),Lower(0),mc(0),mc1(0); fastMA = ema(close, fastLength); slowMA = ema(close, slowLength); macdv = fastMA - slowMA; Stdv = std(macdv, length); Upper = (Stdv * dev + (ma(macdv, length))); Lower = ((ma(macdv, length)) - (Stdv * dev)); plot1(Upper,"Upper Band",GRAY); plot2(Lower, "lower Band",GRAY); mc = iff(macdv >= Upper , CYAN, red); // Indicator plot3(macdv,"macd",mc); plot4(0,"Zeroline"); 상기 식에서 1. 지금은 위쪽밴드 위에만 색상이 다르게 나오는데... 밴드위, 밴드안 , 밴드 밑 세가지로 색상을 구분하게 부탁합니다. 2. 밴드안에서 위쪽밴드를 올라가면 매수 밴드안에서 아래쪽밴드를 내려가면 매수 시스템식을 부탁합니다. 3. input : fl(0.5),sl(0.05),pa(false),fr(false),ebc(false); var : src(0),sp(0),dt(0),i1(0),ji(0),jq(0),i2_(0),q2_(0),re_(0); var : im_(0),re(0),im(0),p1(0),p2(0),p3(0),p(0),q1(0),i2(0),q2(0); var : spp(0),phase(0),dphase_(0),dphase(0),mama(0),fama(0),alpha_(0),alpha(0); src = (H+L);2; sp = (4*src + 3*src[1] + 2*src[2] + src[3]) / 10.0; if CurrentBar >= 1 then { dt = (.0962*sp + .5769*(sp[2]) - .5769*(sp[4])- .0962*(sp[6]))*(.075*(p[1]) + .54); q1 = (.0962*dt + .5769*(dt[2]) - .5769*(dt[4])- .0962*(dt[6]))*(.075*(p[1]) + .54); i1 = (dt[3]); jI = (.0962*i1 + .5769*(i1[2]) - .5769*(i1[4])- .0962*(i1[6]))*(.075*(p[1]) + .54); jq = (.0962*q1 + .5769*(q1[2]) - .5769*(q1[4])- .0962*(q1[6]))*(.075*(p[1]) + .54); i2_ = i1 - jq; q2_ = q1 + jI; i2 = .2*i2_ + .8*(i2[1]); q2 = .2*q2_ + .8*(q2[1]); re_ = i2*(i2[1]) + q2*(q2[1]); im_ = i2*(q2[1]) - q2*(i2[1]); re = .2*re_ + .8*(re[1]); im = .2*im_ + .8*(im[1]); p1 = iff(im!=0 and re!=0, 360/atan(im/re), (p[1])); p2 = iff(p1 > 1.5*(p1[1]), 1.5*(p1[1]), iff(p1 < 0.67*(p1[1]), 0.67*(p1[1]), p1)); p3 = iff(p2<6, 6, iff (p2 > 50, 50, p2)); p = .2*p3 + .8*(p3[1]); spp = .33*p + .67*(spp[1]); phase = atan(q1 / i1); dphase_ = (phase[1]) - phase; dphase = iff(dphase_< 1, 1, dphase_); alpha_ = fl / dphase; alpha = iff(alpha_ < sl, sl, iff(alpha_ > fl, fl, alpha_)); mama = alpha*src + (1 - alpha)*(mama[1]); 위쪽 수식중 macd라인을 3번수식 mama라인으로 변경부탁합니다.