커뮤니티
부탁 드립니다.
2021-11-23 17:34:45
660
글번호 153854
도움에 늘 감사 드립니다.
타주기 수식
1)분봉수식을 분봉에서
2)일봉수식을 분봉에서
부탁 드립니다.
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : ii(0),cts(0);
cts = 0;
For ii = 초기값 to 최종값 step 증가값
{
if C >= C[ii] Then
cts = cts + (h-l);
Else
cts = cts +-(h-l);
}
var1=ma(cts,sig)/최종값;
참고수식)
input : Ntime1(60);
var : TF(0),S1(0),D1(0),TM(0),cnt(0);
var : sum1(0),sum2(0),sum3(0);
Array : HH[100](0),LL[100](0),CC[100](0),VV[100](0);
Array : V5[100](0),V9[100](0),V12[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%ntime1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and Ntime1 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and Ntime1> 1 and TM >= TM[1]+Ntime1) or
(Bdate == Bdate[1] and Ntime1 == 1 and TM > TM[1]) Then
{
답변 3
예스스탁 예스스탁 답변
2021-11-24 11:20:25
안녕하세요
예스스탁입니다.
1
input : ntime(30);
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),ii(0),sum(0);
Array : CC[500](0),cts[500](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%ntime;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and ntime > 1 and TF < TF[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
{
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[최종값] > 0 Then
{
cts[0] = 0;
For ii = 초기값 to 최종값 step 증가값
{
if C >= C[ii] Then
cts[0] = cts[0] + (h-l);
Else
cts[0] = cts[0] + -(h-l);
}
}
if CC[최종값+sig] > 0 Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + cts[cnt];
}
var1 = (sum/sig)/최종값;
Plot1(var1);
}
}
2
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),ii(0),sum(0);
Array : CC[500](0),cts[500](0);
if Bdate != Bdate[1] Then
{
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[최종값] > 0 Then
{
cts[0] = 0;
For ii = 초기값 to 최종값 step 증가값
{
if C >= C[ii] Then
cts[0] = cts[0] + (h-l);
Else
cts[0] = cts[0] + -(h-l);
}
}
if CC[최종값+sig] > 0 Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + cts[cnt];
}
var1 = (sum/sig)/최종값;
Plot1(var1);
}
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움에 늘 감사 드립니다.
타주기 수식
1)분봉수식을 분봉에서
2)일봉수식을 분봉에서
부탁 드립니다.
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : ii(0),cts(0);
cts = 0;
For ii = 초기값 to 최종값 step 증가값
{
if C >= C[ii] Then
cts = cts + (h-l);
Else
cts = cts +-(h-l);
}
var1=ma(cts,sig)/최종값;
참고수식)
input : Ntime1(60);
var : TF(0),S1(0),D1(0),TM(0),cnt(0);
var : sum1(0),sum2(0),sum3(0);
Array : HH[100](0),LL[100](0),CC[100](0),VV[100](0);
Array : V5[100](0),V9[100](0),V12[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%ntime1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and Ntime1 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and Ntime1> 1 and TM >= TM[1]+Ntime1) or
(Bdate == Bdate[1] and Ntime1 == 1 and TM > TM[1]) Then
{
yes
2021-11-24 12:00:51
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁 드립니다.
> 안녕하세요
예스스탁입니다.
1
input : ntime(30);
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),ii(0),sum(0);
Array : CC[500](0),cts[500](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%ntime;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and ntime > 1 and TF < TF[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
{
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[최종값] > 0 Then
{
cts[0] = 0;
For ii = 초기값 to 최종값 step 증가값
{
if C >= C[ii] Then
cts[0] = cts[0] + (h-l);
Else
cts[0] = cts[0] + -(h-l);
}
}
if CC[최종값+sig] > 0 Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + cts[cnt];
}
var1 = (sum/sig)/최종값;
Plot1(var1);
}
}
2
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),ii(0),sum(0);
Array : CC[500](0),cts[500](0);
if Bdate != Bdate[1] Then
{
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[최종값] > 0 Then
{
cts[0] = 0;
For ii = 초기값 to 최종값 step 증가값
{
if C >= C[ii] Then
cts[0] = cts[0] + (h-l);
Else
cts[0] = cts[0] + -(h-l);
}
}
if CC[최종값+sig] > 0 Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + cts[cnt];
}
var1 = (sum/sig)/최종값;
Plot1(var1);
}
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움에 늘 감사 드립니다.
타주기 수식
1)분봉수식을 분봉에서
2)일봉수식을 분봉에서
부탁 드립니다.
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : ii(0),cts(0);
cts = 0;
For ii = 초기값 to 최종값 step 증가값
{
if C >= C[ii] Then
cts = cts + (h-l);
Else
cts = cts +-(h-l);
}
var1=ma(cts,sig)/최종값;
참고수식)
input : Ntime1(60);
var : TF(0),S1(0),D1(0),TM(0),cnt(0);
var : sum1(0),sum2(0),sum3(0);
Array : HH[100](0),LL[100](0),CC[100](0),VV[100](0);
Array : V5[100](0),V9[100](0),V12[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%ntime1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and Ntime1 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and Ntime1> 1 and TM >= TM[1]+Ntime1) or
(Bdate == Bdate[1] and Ntime1 == 1 and TM > TM[1]) Then
{
예스스탁 예스스탁 답변
2021-11-24 15:57:51
안녕하세요
예스스탁입니다.
값이 잘못지정된 부분이 있어 수정해 드립니다.
차트에 과거주기의 값을 계산할만큼 데이타가 충분해야 계산및 지표출력이 가능합니다.
1
input : ntime(30);
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),ii(0),sum(0);
Array : CC[500](0),HH[500](0),LL[500](0),cts[500](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%ntime;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and ntime > 1 and TF < TF[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
{
hh[0] = H;
LL[0] = l;
for cnt = 1 to 499
{
CC[cnt] = CC[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
CTS[cnt] = CTS[cnt-1][1];
}
}
CC[0] = C;
if HH[0] > 0 and H > HH[0] Then
HH[0] = H;
if LL[0] > 0 and L < LL[0] Then
LL[0] = L;
if CC[최종값] > 0 Then
{
cts[0] = 0;
For ii = 초기값 to 최종값 step 증가값
{
if CC[0] >= CC[ii] Then
cts[0] = cts[0] + (hh[0]-ll[0]);
Else
cts[0] = cts[0] + -(hh[0]-ll[0]);
}
}
if CC[최종값+sig] > 0 Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + cts[cnt];
}
var1 = (sum/sig)/최종값;
Plot1(var1);
}
}
2
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),ii(0),sum(0);
Array : CC[500](0),HH[500](0),LL[500](0),cts[500](0);
if Bdate != Bdate[1] Then
{
hh[0] = H;
LL[0] = l;
for cnt = 1 to 499
{
CC[cnt] = CC[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
CTS[cnt] = CTS[cnt-1][1];
}
}
CC[0] = C;
if HH[0] > 0 and H > HH[0] Then
HH[0] = H;
if LL[0] > 0 and L < LL[0] Then
LL[0] = L;
if CC[최종값] > 0 Then
{
cts[0] = 0;
For ii = 초기값 to 최종값 step 증가값
{
if CC[0] >= CC[ii] Then
cts[0] = cts[0] + (hh[0]-ll[0]);
Else
cts[0] = cts[0] + -(hh[0]-ll[0]);
}
}
if CC[최종값+sig] > 0 Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + cts[cnt];
}
var1 = (sum/sig)/최종값;
Plot1(var1);
}
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : Re : Re : 그림과 같이 수정 부탁 드립니다.
>
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁 드립니다.
> 안녕하세요
예스스탁입니다.
1
input : ntime(30);
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),ii(0),sum(0);
Array : CC[500](0),cts[500](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%ntime;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and ntime > 1 and TF < TF[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
{
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[최종값] > 0 Then
{
cts[0] = 0;
For ii = 초기값 to 최종값 step 증가값
{
if C >= C[ii] Then
cts[0] = cts[0] + (h-l);
Else
cts[0] = cts[0] + -(h-l);
}
}
if CC[최종값+sig] > 0 Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + cts[cnt];
}
var1 = (sum/sig)/최종값;
Plot1(var1);
}
}
2
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),ii(0),sum(0);
Array : CC[500](0),cts[500](0);
if Bdate != Bdate[1] Then
{
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[최종값] > 0 Then
{
cts[0] = 0;
For ii = 초기값 to 최종값 step 증가값
{
if C >= C[ii] Then
cts[0] = cts[0] + (h-l);
Else
cts[0] = cts[0] + -(h-l);
}
}
if CC[최종값+sig] > 0 Then
{
sum = 0;
For cnt = 0 to sig-1
{
sum = sum + cts[cnt];
}
var1 = (sum/sig)/최종값;
Plot1(var1);
}
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움에 늘 감사 드립니다.
타주기 수식
1)분봉수식을 분봉에서
2)일봉수식을 분봉에서
부탁 드립니다.
input : 초기값(5),최종값(300),증가값(5),sig(30);
var : ii(0),cts(0);
cts = 0;
For ii = 초기값 to 최종값 step 증가값
{
if C >= C[ii] Then
cts = cts + (h-l);
Else
cts = cts +-(h-l);
}
var1=ma(cts,sig)/최종값;
참고수식)
input : Ntime1(60);
var : TF(0),S1(0),D1(0),TM(0),cnt(0);
var : sum1(0),sum2(0),sum3(0);
Array : HH[100](0),LL[100](0),CC[100](0),VV[100](0);
Array : V5[100](0),V9[100](0),V12[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%ntime1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and Ntime1 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and Ntime1> 1 and TM >= TM[1]+Ntime1) or
(Bdate == Bdate[1] and Ntime1 == 1 and TM > TM[1]) Then
{
다음글
이전글