커뮤니티
부탁 드립니다.
2020-09-08 02:59:28
1200
글번호 142152
도움에 깊이 감사 드립니다.
1)예를 들어 10분 차트에서 60분 지표 수식
2)60분 차트에서 일봉 지표 수식
부탁 드립니다.
미리 경배로 감사 인사 올립니다.
input :p(10),sig(5);
var1=cmo(p);//기본제공지표
var2=ma(var1,sig);
참고수식)
Input : Length(Numeric);
CMO = 100 * (C-C[Length]) / (AccumN(Abs(C-C[1]), Length));
input : Atime1(60),Length(10),sig(5);
var : TL(0),TH(0),cnt(0),Dcnt(0),preTRange(0),prePlusDM14(0),MinusDM14(0),TRange1(0),preMinusDM14(0);
Var : TRange(0), MyRange(Length), PlusDM14(0), PlusDM(0), MinusDM(0),preADX(0);
Var : CummDMI(0), Cummi(0);
var : S1(0),D1(0),TM(0),TF1(0),CB(0);
Array : HH[61](0),LL[61](0),CC[61](0),TR[61](0),DMIv[61](0),ADXv[61](0);
Array : DPlus[61](0),DMinus[61](0);
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%Atime1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and Atime1 > 1 and TF1 < TF1[1]) or
(Bdate == Bdate[1] and Atime1 > 1 and TM >= TM[1]+Atime1) or
(Bdate == Bdate[1] and Atime1 == 1 and TM > TM[1]) Then
{
답변 2
예스스탁 예스스탁 답변
2020-09-08 14:13:30
안녕하세요
예스스탁입니다.
1
input : 타주기분(30),P(10),sig(5);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : sum(0);
Array : CC[100](0),CMO[100](0);
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;
TF = TM%타주기분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 타주기분 > 1 and TM >= TM[1]+타주기분) or
(Bdate == Bdate[1] and 타주기분 == 1 and TM > TM[1]) Then
{
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[P-1] > 0 Then
{
sum = 0;
For cnt = 0 to P-1
{
sum = sum + abs(CC[cnt]-CC[cnt+1]);
}
CMO[0] = 100 * (CC[0]-CC[P]) / sum;
Plot1(CMO[0]);
}
if CC[P+sig-1] > 0 Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + CMO[cnt];
}
Var2 = sum/sig;
Plot2(Var2);
}
}
2
input : P(10),sig(5);
var : sum1(0),sum2(0),cnt1(0),cnt2(0);
if DayClose[P+sig-1] > 0 Then
{
sum1 = 0;
For cnt1 = 0 to sig-1
{
sum2 = 0;
For cnt2 = 0+cnt1 to P-1+cnt1
{
sum2 = sum2 + Abs(DayClose(cnt2)-DayClose(cnt2+1));
}
value1 = 100 * (DayClose(0+cnt1)-DayClose(P+cnt1)) / sum2;
if cnt1 == 0 Then
var1 = value1;
sum1 = sum1+value1;
}
Var2 = sum1/sig;
Plot1(var1);
plot2(Var2);
}
즐거운 하루되세요
> 뮬리 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움에 깊이 감사 드립니다.
1)예를 들어 10분 차트에서 60분 지표 수식
2)60분 차트에서 일봉 지표 수식
부탁 드립니다.
미리 경배로 감사 인사 올립니다.
input :p(10),sig(5);
var1=cmo(p);//기본제공지표
var2=ma(var1,sig);
참고수식)
Input : Length(Numeric);
CMO = 100 * (C-C[Length]) / (AccumN(Abs(C-C[1]), Length));
input : Atime1(60),Length(10),sig(5);
var : TL(0),TH(0),cnt(0),Dcnt(0),preTRange(0),prePlusDM14(0),MinusDM14(0),TRange1(0),preMinusDM14(0);
Var : TRange(0), MyRange(Length), PlusDM14(0), PlusDM(0), MinusDM(0),preADX(0);
Var : CummDMI(0), Cummi(0);
var : S1(0),D1(0),TM(0),TF1(0),CB(0);
Array : HH[61](0),LL[61](0),CC[61](0),TR[61](0),DMIv[61](0),ADXv[61](0);
Array : DPlus[61](0),DMinus[61](0);
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%Atime1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and Atime1 > 1 and TF1 < TF1[1]) or
(Bdate == Bdate[1] and Atime1 > 1 and TM >= TM[1]+Atime1) or
(Bdate == Bdate[1] and Atime1 == 1 and TM > TM[1]) Then
{
뮬리
2020-09-08 20:35:44
답변 감사 드립니다.
1)
일봉 타주기 지표를 참고하여
주간(weeek_타주기)용으로 사용코자 아래와 같이 편집하였더니 오류 입니다.
정정 부탁 드립니다.
2)
월간용 지표(월봉지표를 분봉지표에) 부탁 드립니다.
input : P(10),sig(5);
var : sum1(0),sum2(0),cnt1(0),cnt2(0);
if weekClose[P+sig-1] > 0 Then
{
sum1 = 0;
For cnt1 = 0 to sig-1
{
sum2 = 0;
For cnt2 = 0+cnt1 to P-1+cnt1
{
sum2 = sum2 + Abs(weekClose(cnt2)-weekClose(cnt2+1));
}
value1 = 100 * (weekClose(0+cnt1)-weekclose(P+cnt1)) / sum2;
if cnt1 == 0 Then
var1 = value1;
sum1 = sum1+value1;
}}
Var2 = sum1/sig;
Plot1(var1);
plot2(Var2);
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁 드립니다.
>
안녕하세요
예스스탁입니다.
1
input : 타주기분(30),P(10),sig(5);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : sum(0);
Array : CC[100](0),CMO[100](0);
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;
TF = TM%타주기분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 타주기분 > 1 and TM >= TM[1]+타주기분) or
(Bdate == Bdate[1] and 타주기분 == 1 and TM > TM[1]) Then
{
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[P-1] > 0 Then
{
sum = 0;
For cnt = 0 to P-1
{
sum = sum + abs(CC[cnt]-CC[cnt+1]);
}
CMO[0] = 100 * (CC[0]-CC[P]) / sum;
Plot1(CMO[0]);
}
if CC[P+sig-1] > 0 Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + CMO[cnt];
}
Var2 = sum/sig;
Plot2(Var2);
}
}
2
input : P(10),sig(5);
var : sum1(0),sum2(0),cnt1(0),cnt2(0);
if DayClose[P+sig-1] > 0 Then
{
sum1 = 0;
For cnt1 = 0 to sig-1
{
sum2 = 0;
For cnt2 = 0+cnt1 to P-1+cnt1
{
sum2 = sum2 + Abs(DayClose(cnt2)-DayClose(cnt2+1));
}
value1 = 100 * (DayClose(0+cnt1)-DayClose(P+cnt1)) / sum2;
if cnt1 == 0 Then
var1 = value1;
sum1 = sum1+value1;
}
Var2 = sum1/sig;
Plot1(var1);
plot2(Var2);
}
즐거운 하루되세요
> 뮬리 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움에 깊이 감사 드립니다.
1)예를 들어 10분 차트에서 60분 지표 수식
2)60분 차트에서 일봉 지표 수식
부탁 드립니다.
미리 경배로 감사 인사 올립니다.
input :p(10),sig(5);
var1=cmo(p);//기본제공지표
var2=ma(var1,sig);
참고수식)
Input : Length(Numeric);
CMO = 100 * (C-C[Length]) / (AccumN(Abs(C-C[1]), Length));
input : Atime1(60),Length(10),sig(5);
var : TL(0),TH(0),cnt(0),Dcnt(0),preTRange(0),prePlusDM14(0),MinusDM14(0),TRange1(0),preMinusDM14(0);
Var : TRange(0), MyRange(Length), PlusDM14(0), PlusDM(0), MinusDM(0),preADX(0);
Var : CummDMI(0), Cummi(0);
var : S1(0),D1(0),TM(0),TF1(0),CB(0);
Array : HH[61](0),LL[61](0),CC[61](0),TR[61](0),DMIv[61](0),ADXv[61](0);
Array : DPlus[61](0),DMinus[61](0);
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%Atime1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and Atime1 > 1 and TF1 < TF1[1]) or
(Bdate == Bdate[1] and Atime1 > 1 and TM >= TM[1]+Atime1) or
(Bdate == Bdate[1] and Atime1 == 1 and TM > TM[1]) Then
{
이전글