예스스탁
예스스탁 답변
2020-02-19 13:33:09
안녕하세요
예스스탁입니다.
1
Input : length1(8),a1(0.7),Length12(5),a12(0.618);
Var : e1(0), Pree1(0);
Var : e2(0), Pree2(0);
Var : e3(0), Pree3(0);
Var : e4(0), Pree4(0);
Var : e5(0), Pree5(0);
Var : e6(0), Pree6(0);
var : C1(0),C2(0),C3(0),C4(0),T3(0);
Var : e12(0), Pree12(0);
Var : e22(0), Pree22(0);
Var : e32(0), Pree32(0);
Var : e42(0), Pree42(0);
Var : e52(0), Pree52(0);
Var : e62(0), Pree62(0);
var : C12(0),C22(0),C32(0),C42(0),T32(0);
e1 = ema((high + low + 2*close)/4,length1);
e2 = ema(e1,length1);
e3 = ema(e2,length1);
e4 = ema(e3,length1);
e5 = ema(e4,length1);
e6 = ema(e5,length1);
e12 = ema((high + low + 2*close)/4,Length12);
e22 = ema(e12,Length12);
e32 = ema(e22,Length12);
e42 = ema(e32,Length12);
e52 = ema(e42,Length12);
e62 = ema(e52,Length12);
c1=-a1*a1*a1;
c2=3*a1*a1+3*a1*a1*a1;
c3=-6*a1*a1-3*a1-3*a1*a1*a1;
c4=1+3*a1+a1*a1*a1+3*a1*a1;
T3=c1*e6+c2*e5+c3*e4+c4*e3;
c12=-a12*a12*a12;
c22=3*a12*a12+3*a12*a12*a12;
c32=-6*a12*a12-3*a12-3*a12*a12*a12;
c42=1+3*a12+a12*a12*a12+3*a12*a12;
T32=c12*e62+c22*e52+c32*e42+c42*e32;
var1=c-(t3+t32)/2;
plot1(var1);
2
Input : n(33),length1(8),a1(0.7),T3FiboLine(false),Length12(5),a12(0.618);
var : S1(0),D1(0),TM(0),TF1(0),Ep1(0),Ep2(0),ii(0);
Var : e1(0), Pree1(0);
Var : e2(0), Pree2(0);
Var : e3(0), Pree3(0);
Var : e4(0), Pree4(0);
Var : e5(0), Pree5(0);
Var : e6(0), Pree6(0);
var : C1(0),C2(0),C3(0),C4(0),T3(0);
Var : e12(0), Pree12(0);
Var : e22(0), Pree22(0);
Var : e32(0), Pree32(0);
Var : e42(0), Pree42(0);
Var : e52(0), Pree52(0);
Var : e62(0), Pree62(0);
var : C12(0),C22(0),C32(0),C42(0),T32(0);
var : idx(0);
Ep1 = 2/(length1+1);
Ep2 = 2/(length12+1);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
idx = 0;
}
Else
idx = idx+1;
if D1 > 0 then
{
TF1 = idx%n;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then
{
ii = ii+1;
Pree1 = e1[1];
Pree2 = e2[1];
Pree3 = e3[1];
Pree4 = e4[1];
Pree5 = e5[1];
Pree6 = e6[1];
Pree12 = e12[1];
Pree22 = e22[1];
Pree32 = e32[1];
Pree42 = e42[1];
Pree52 = e52[1];
Pree62 = e62[1];
}
if ii <= 1 then {
e1 = (high + low + 2*close)/4;
e2 = e1;
e3 = e2;
e4 = e3;
e5 = e4;
e6 = e5;
e12 = (high + low + 2*close)/4;
e22 = e12;
e32 = e22;
e42 = e32;
e52 = e42;
e62 = e52;
}
else{
e1 = (high + low + 2*close)/4 * EP1 + Pree1 * (1-EP1);
e2 = e1 * EP1 + Pree2 * (1-EP1);
e3 = e2 * EP1 + Pree3 * (1-EP1);
e4 = e3 * EP1 + Pree4 * (1-EP1);
e5 = e4 * EP1 + Pree5 * (1-EP1);
e6 = e5 * EP1 + Pree6 * (1-EP1);
e12 = (high + low + 2*close)/4 * EP2 + Pree12 * (1-EP2);
e22 = e12 * EP2 + Pree22 * (1-EP2);
e32 = e22 * EP2 + Pree32 * (1-EP2);
e42 = e32 * EP2 + Pree42 * (1-EP2);
e52 = e42 * EP2 + Pree52 * (1-EP2);
e62 = e52 * EP2 + Pree62 * (1-EP2);
}
c1=-a1*a1*a1;
c2=3*a1*a1+3*a1*a1*a1;
c3=-6*a1*a1-3*a1-3*a1*a1*a1;
c4=1+3*a1+a1*a1*a1+3*a1*a1;
T3=c1*e6+c2*e5+c3*e4+c4*e3;
c12=-a12*a12*a12;
c22=3*a12*a12+3*a12*a12*a12;
c32=-6*a12*a12-3*a12-3*a12*a12*a12;
c42=1+3*a12+a12*a12*a12+3*a12*a12;
T32=c12*e62+c22*e52+c32*e42+c42*e32;
var1=c-(t3+t32)/2;
plot1(var1);
}
3
Input : ntime(30),length1(8),a1(0.7),Length12(5),a12(0.618);
var : S1(0),D1(0),TM(0),TF1(0),Ep1(0),Ep2(0),ii(0);
Var : e1(0), Pree1(0);
Var : e2(0), Pree2(0);
Var : e3(0), Pree3(0);
Var : e4(0), Pree4(0);
Var : e5(0), Pree5(0);
Var : e6(0), Pree6(0);
var : C1(0),C2(0),C3(0),C4(0),T3(0);
Var : e12(0), Pree12(0);
Var : e22(0), Pree22(0);
Var : e32(0), Pree32(0);
Var : e42(0), Pree42(0);
Var : e52(0), Pree52(0);
Var : e62(0), Pree62(0);
var : C12(0),C22(0),C32(0),C42(0),T32(0);
Ep1 = 2/(length1+1);
Ep2 = 2/(length12+1);
if DayOfWeek(bdate) < DayOfWeek(Bdate[1]) Then
{
ii = ii+1;
Pree1 = e1[1];
Pree2 = e2[1];
Pree3 = e3[1];
Pree4 = e4[1];
Pree5 = e5[1];
Pree6 = e6[1];
Pree12 = e12[1];
Pree22 = e22[1];
Pree32 = e32[1];
Pree42 = e42[1];
Pree52 = e52[1];
Pree62 = e62[1];
}
if ii <= 1 then
{
e1 = (high + low + 2*close)/4;
e2 = e1;
e3 = e2;
e4 = e3;
e5 = e4;
e6 = e5;
e12 = (high + low + 2*close)/4;
e22 = e12;
e32 = e22;
e42 = e32;
e52 = e42;
e62 = e52;
}
else
{
e1 = (high + low + 2*close)/4 * EP1 + Pree1 * (1-EP1);
e2 = e1 * EP1 + Pree2 * (1-EP1);
e3 = e2 * EP1 + Pree3 * (1-EP1);
e4 = e3 * EP1 + Pree4 * (1-EP1);
e5 = e4 * EP1 + Pree5 * (1-EP1);
e6 = e5 * EP1 + Pree6 * (1-EP1);
e12 = (high + low + 2*close)/4 * EP2 + Pree12 * (1-EP2);
e22 = e12 * EP2 + Pree22 * (1-EP2);
e32 = e22 * EP2 + Pree32 * (1-EP2);
e42 = e32 * EP2 + Pree42 * (1-EP2);
e52 = e42 * EP2 + Pree52 * (1-EP2);
e62 = e52 * EP2 + Pree62 * (1-EP2);
c1=-a1*a1*a1;
c2=3*a1*a1+3*a1*a1*a1;
c3=-6*a1*a1-3*a1-3*a1*a1*a1;
c4=1+3*a1+a1*a1*a1+3*a1*a1;
T3=c1*e6+c2*e5+c3*e4+c4*e3;
c12=-a12*a12*a12;
c22=3*a12*a12+3*a12*a12*a12;
c32=-6*a12*a12-3*a12-3*a12*a12*a12;
c42=1+3*a12+a12*a12*a12+3*a12*a12;
T32=c12*e62+c22*e52+c32*e42+c42*e32;
}
if DayOfWeek(bdate) < DayOfWeek(Bdate[1]) Then
var1 = 0;
Else
var1=c-(t3+t32)/2;
plot1(var1);
즐거운 하루되세요
> 뮬리 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움에 늘 감사 드립니다.
질문1) 타주기용 아닌 예를 들어 10분봉차트에서 10분봉 지표를 나타 내도록,
질문2) 타주기 분용을 틱용으로 사용 토록,
질문3) 주봉용 에서 사용토록 수식을 수정 하되
주초(월요일)에서 var1값이 zero로 출발 하도록 부탁 드립니다.
Input : ntime(30),length1(8),a1(0.7),T3FiboLine(false),Length12(5),a12(0.618);
var : S1(0),D1(0),TM(0),TF1(0),Ep1(0),Ep2(0),ii(0);
Var : e1(0), Pree1(0);
Var : e2(0), Pree2(0);
Var : e3(0), Pree3(0);
Var : e4(0), Pree4(0);
Var : e5(0), Pree5(0);
Var : e6(0), Pree6(0);
var : C1(0),C2(0),C3(0),C4(0),T3(0);
Var : e12(0), Pree12(0);
Var : e22(0), Pree22(0);
Var : e32(0), Pree32(0);
Var : e42(0), Pree42(0);
Var : e52(0), Pree52(0);
Var : e62(0), Pree62(0);
var : C12(0),C22(0),C32(0),C42(0),T32(0);
Ep1 = 2/(length1+1);
Ep2 = 2/(length12+1);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF1 = TM%ntime;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and ntime > 1 and TF1 < TF1[1]) or
(Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime)or
(Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then
{
ii = ii+1;
Pree1 = e1[1];
Pree2 = e2[1];
Pree3 = e3[1];
Pree4 = e4[1];
Pree5 = e5[1];
Pree6 = e6[1];
Pree12 = e12[1];
Pree22 = e22[1];
Pree32 = e32[1];
Pree42 = e42[1];
Pree52 = e52[1];
Pree62 = e62[1];
}
if ii <= 1 then {
e1 = (high + low + 2*close)/4;
e2 = e1;
e3 = e2;
e4 = e3;
e5 = e4;
e6 = e5;
e12 = (high + low + 2*close)/4;
e22 = e12;
e32 = e22;
e42 = e32;
e52 = e42;
e62 = e52;
}
else{
e1 = (high + low + 2*close)/4 * EP1 + Pree1 * (1-EP1);
e2 = e1 * EP1 + Pree2 * (1-EP1);
e3 = e2 * EP1 + Pree3 * (1-EP1);
e4 = e3 * EP1 + Pree4 * (1-EP1);
e5 = e4 * EP1 + Pree5 * (1-EP1);
e6 = e5 * EP1 + Pree6 * (1-EP1);
e12 = (high + low + 2*close)/4 * EP2 + Pree12 * (1-EP2);
e22 = e12 * EP2 + Pree22 * (1-EP2);
e32 = e22 * EP2 + Pree32 * (1-EP2);
e42 = e32 * EP2 + Pree42 * (1-EP2);
e52 = e42 * EP2 + Pree52 * (1-EP2);
e62 = e52 * EP2 + Pree62 * (1-EP2);
}
c1=-a1*a1*a1;
c2=3*a1*a1+3*a1*a1*a1;
c3=-6*a1*a1-3*a1-3*a1*a1*a1;
c4=1+3*a1+a1*a1*a1+3*a1*a1;
T3=c1*e6+c2*e5+c3*e4+c4*e3;
c12=-a12*a12*a12;
c22=3*a12*a12+3*a12*a12*a12;
c32=-6*a12*a12-3*a12-3*a12*a12*a12;
c42=1+3*a12+a12*a12*a12+3*a12*a12;
T32=c12*e62+c22*e52+c32*e42+c42*e32;
var1=c-(t3+t32)/2;
plot1(var1);
}