커뮤니티
67037 재질의에 대한 답변 부탁드려요
2020-04-17 11:40:38
952
글번호 138030
67037번 시스템 수식에 대하여 false값을 대체하여 시물레이션 차트에서도 구현되게
부탁드립니다.
답변 3
예스스탁 예스스탁 답변
2020-04-17 15:30:13
안녕하세요
예스스탁입니다.
올려주신 수식은 해당 되는 부분이 없습니다.
input : length(20),mult(2);
올려주신 수식에서 input변수로 true나 false가 지정된 변수가 없습니다.
input 변수에 true나 false 혹은 스트링으로 지정한 변수가 있을때만
해당 되는 부분입니다.
즐거운 하루되세요
> 임진사댁원장 님이 쓴 글입니다.
> 제목 : 67037 재질의에 대한 답변 부탁드려요
> 67037번 시스템 수식에 대하여 false값을 대체하여 시물레이션 차트에서도 구현되게
부탁드립니다.
임진사댁원장
2020-04-17 16:20:02
죄송합니다.
제가 다른 수식지료를 올린듯합니다.
아래 수식지료에서 시물레이션 차트에서 구현될수 있게 부탁드립니다.
죄송합니다.
아래 수식에서 시물레이션 차트에서 구현될수 있게 부탁드립니다.
제가 다른 차트수식을 잘못 올렸네요..
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),pi(0);
src = (H+L)/2;
sp = (4*src + 3*src[1] + 2*src[2] + src[3]) / 10.0;
pi = 3.1415926;
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, 2*pi/atan(im/re),p);
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 = 180/pi*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]);
fama = .5*alpha*mama + (1 - .5*alpha)*(fama[1]);
예스스탁 예스스탁 답변
2020-04-17 16:28:42
안녕하세요
예스스탁입니다.
pa(false),fr(false),ebc(false)
올려주신 수식에서는 위 외부변수가 선언만 되어 있고
수식안에서는 사용되는 부분이 없습니다.
아마 이전 다른 랭귀지의 원본식에서 다른 부분을 표현할떄
사용하는 외부변수인것 같습니다.
해당 부분 삭제하시면 됩니다.
input : fl(0.5),sl(0.05);
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),pi(0);
src = (H+L)/2;
sp = (4*src + 3*src[1] + 2*src[2] + src[3]) / 10.0;
pi = 3.1415926;
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, 2*pi/atan(im/re),p);
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 = 180/pi*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]);
fama = .5*alpha*mama + (1 - .5*alpha)*(fama[1]);
즐거운 하루되세요
> 임진사댁원장 님이 쓴 글입니다.
> 제목 : 다시 한번만 수정부탁드립니다
> 죄송합니다.
제가 다른 수식지료를 올린듯합니다.
아래 수식지료에서 시물레이션 차트에서 구현될수 있게 부탁드립니다.
죄송합니다.
아래 수식에서 시물레이션 차트에서 구현될수 있게 부탁드립니다.
제가 다른 차트수식을 잘못 올렸네요..
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),pi(0);
src = (H+L)/2;
sp = (4*src + 3*src[1] + 2*src[2] + src[3]) / 10.0;
pi = 3.1415926;
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, 2*pi/atan(im/re),p);
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 = 180/pi*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]);
fama = .5*alpha*mama + (1 - .5*alpha)*(fama[1]);