커뮤니티
부탁 드립니다.
2020-10-22 18:51:52
682
글번호 143338
도움에 매번 깊이 감사 드립니다.
타주기수식
1)틱봉에서 틱봉
2)분봉에서 일봉 지표
부탁드립니다.
미리 경배로 감사 인사 올립니다.
질문수식)
input:N(20),sig(5);
var1=(upvol/Upticks);
var2=(downvol/Downticks);
var3=var1+var2;
var4=var1/var3;
var5=var2/var3;
var6=var5-var4;
VAR7=ACCUMN(VAR6,N);
var8=ma(var7,sig);
유사한 타주기 참고 수식)
input : ntick(2),N(20),sig(5);
var : idx(0),TF(0),D1(0),cnt(0),ii(0),upt(0),dnt(0),sum(0);
Array : v2[100](0),v3[100](0);
if Bdate != Bdate[1] Then
{
D1 = bDate;
idx = 0;
}
Else
idx = idx+1;
if D1 > 0 Then
{
TF = idx%Ntick;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
ii = ii+1;
upt = 0;
dnt = 0;
For cnt = 1 to 99
{
v2[cnt] = v2[cnt-1][1];
v3[cnt] = v3[cnt-1][1];
}
}
upt = upt+upticks ;
dnt = dnt+downticks;
v2[0] = upt-dnt;
if ii >= N Then
{
V3[0] = 0;
For cnt = 0 to N-1
{
v3[0] = v3[0] + v2[cnt];
}
}
if II >= N+sig Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + V3[cnt];
}
var4 = sum/sig;
Plot1(Var4);
}
}
답변 1
예스스탁 예스스탁 답변
2020-10-23 13:27:38
안녕하세요
예스스탁입니다.
1
input : ntick(2),N(20),sig(5);
var : idx(0),TF(0),D1(0),cnt(0),ii(0),upv(0),dnv(0),upt(0),dnt(0),sum(0);
Array : v6[100](0),v7[100](0);
if Bdate != Bdate[1] Then
{
D1 = bDate;
idx = 0;
}
Else
idx = idx+1;
if D1 > 0 Then
{
TF = idx%Ntick;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
ii = ii+1;
upv = 0;
dnv = 0;
upt = 0;
dnt = 0;
For cnt = 1 to 99
{
v6[cnt] = v6[cnt-1][1];
v7[cnt] = v7[cnt-1][1];
}
}
upv = upv+Upvol;
dnv = dnv+downvol;
upt = upt+Upticks ;
dnt = dnt+Downticks;
var1 = upv/upt;
var2 = dnv/dnt;
Var3 = var1+Var2;
Var4 = var1/Var3;
Var5 = Var2/Var3;
v6[0] = Var5-Var4;
if ii >= N Then
{
V7[0] = 0;
For cnt = 0 to N-1
{
v7[0] = v7[0] + v6[cnt];
}
}
if II >= N+sig Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + V7[cnt];
}
var8 = sum/sig;
Plot1(Var8);
}
}
2
input : ntick(2),N(20),sig(5);
var : cnt(0),ii(0),upv(0),dnv(0),upt(0),dnt(0),sum(0);
Array : v6[100](0),v7[100](0);
if Bdate != Bdate[1] Then
{
ii = ii+1;
upv = 0;
dnv = 0;
upt = 0;
dnt = 0;
For cnt = 1 to 99
{
v6[cnt] = v6[cnt-1][1];
v7[cnt] = v7[cnt-1][1];
}
}
upv = upv+Upvol;
dnv = dnv+downvol;
upt = upt+Upticks ;
dnt = dnt+Downticks;
var1 = upv/upt;
var2 = dnv/dnt;
Var3 = var1+Var2;
Var4 = var1/Var3;
Var5 = Var2/Var3;
v6[0] = Var5-Var4;
if ii >= N Then
{
V7[0] = 0;
For cnt = 0 to N-1
{
v7[0] = v7[0] + v6[cnt];
}
}
if II >= N+sig Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + V7[cnt];
}
var8 = sum/sig;
Plot1(Var8);
}
즐거운 하루되세요
> 뮬리 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움에 매번 깊이 감사 드립니다.
타주기수식
1)틱봉에서 틱봉
2)분봉에서 일봉 지표
부탁드립니다.
미리 경배로 감사 인사 올립니다.
질문수식)
input:N(20),sig(5);
var1=(upvol/Upticks);
var2=(downvol/Downticks);
var3=var1+var2;
var4=var1/var3;
var5=var2/var3;
var6=var5-var4;
VAR7=ACCUMN(VAR6,N);
var8=ma(var7,sig);
유사한 타주기 참고 수식)
input : ntick(2),N(20),sig(5);
var : idx(0),TF(0),D1(0),cnt(0),ii(0),upt(0),dnt(0),sum(0);
Array : v2[100](0),v3[100](0);
if Bdate != Bdate[1] Then
{
D1 = bDate;
idx = 0;
}
Else
idx = idx+1;
if D1 > 0 Then
{
TF = idx%Ntick;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
ii = ii+1;
upt = 0;
dnt = 0;
For cnt = 1 to 99
{
v2[cnt] = v2[cnt-1][1];
v3[cnt] = v3[cnt-1][1];
}
}
upt = upt+upticks ;
dnt = dnt+downticks;
v2[0] = upt-dnt;
if ii >= N Then
{
V3[0] = 0;
For cnt = 0 to N-1
{
v3[0] = v3[0] + v2[cnt];
}
}
if II >= N+sig Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + V3[cnt];
}
var4 = sum/sig;
Plot1(Var4);
}
}