감사합니다.
아래 수식은
전일 5분주기 봉발생갯수 중의 최고갯수를 넘어서는
당일 현재봉갯수에서 종가선을 표시한 것입니다.
이것을 다음과 같이 변환하여 주시기 바랍니다.
1. 전일 동시간대비 봉발생갯수의 최고갯수를 넘어서는 당일 동시간대 현재봉갯수에 종가선 표시
2. 전전일 동시간대비 봉발생갯수의 최고갯수를 넘어서는 당일 동시간대 현재봉갯수에 종가선 표시
input : ntime(5);
var : S1(0),D1(0),TM(0),TF(0),B(0);
var : idx(0),idx1(0),idx2(0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
var1 = 0;
value1 = 0;
value11 = value1[1];
}
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
{
B = B+1;
idx = 0;
idx1 = idx[1];
idx2 = idx1[1];
}
idx = idx+1;
if idx > value1 Then
value1 = idx;
if value11 > 0 and CrossUp(idx,value11) Then
var1 = C;
if var1 > 0 Then
Plot1(var1);
Else
NoPlot(1);
}
답변 1
예스스탁
예스스탁 답변
2022-11-23 16:26:40
안녕하세요
예스스탁입니다.
input : ntime(5);
var : S1(0),D1(0),TM(0),TF(0),B(0);
var : idx(0),idx1(0),idx2(0);
var : i1(0),i2(0),i3(0);
var : b1(0),b2(0),b3(0);
var : v1(0),v2(0),cnt(0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
var1 = 0;
var2 = 0;
value1 = 0;
value11 = value1[1];
i1 = Index;
i2 = i1[1];
i3 = i2[1];
b1 = bdate;
b2 = b1[1];
b3 = b2[1];
}
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
{
B = B+1;
idx = 0;
idx1 = idx[1];
idx2 = idx1[1];
}
idx = idx+1;
if idx > value1 Then
value1 = idx;
v1 = -1;
v2 = -1;
For cnt = (Index-i1)+1 to Index-i3
{
if v1 == -1 and Bdate[cnt] == b2 and sTime[cnt] <= sTime Then
{
v1 = value1[cnt];
}
if v2 == -1 and Bdate[cnt] == b3 and sTime[cnt] <= sTime Then
{
v2 = value1[cnt];
}
}
Plot1(v1);
plot2(idx);
if v1 > 0 and CrossUp(idx,v1) Then
{
var1 = C;
}
if var1 > 0 Then
Plot1(var1);
Else
NoPlot(1);
if v2 > 0 and CrossUp(idx,v2) Then
var2 = C;
if var2 > 0 Then
Plot2(var2);
Else
NoPlot(2);
}
즐거운 하루되세요
> jdavid 님이 쓴 글입니다.
> 제목 : 틱봉갯수
> 감사합니다.
아래 수식은
전일 5분주기 봉발생갯수 중의 최고갯수를 넘어서는
당일 현재봉갯수에서 종가선을 표시한 것입니다.
이것을 다음과 같이 변환하여 주시기 바랍니다.
1. 전일 동시간대비 봉발생갯수의 최고갯수를 넘어서는 당일 동시간대 현재봉갯수에 종가선 표시
2. 전전일 동시간대비 봉발생갯수의 최고갯수를 넘어서는 당일 동시간대 현재봉갯수에 종가선 표시
input : ntime(5);
var : S1(0),D1(0),TM(0),TF(0),B(0);
var : idx(0),idx1(0),idx2(0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
var1 = 0;
value1 = 0;
value11 = value1[1];
}
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
{
B = B+1;
idx = 0;
idx1 = idx[1];
idx2 = idx1[1];
}
idx = idx+1;
if idx > value1 Then
value1 = idx;
if value11 > 0 and CrossUp(idx,value11) Then
var1 = C;
if var1 > 0 Then
Plot1(var1);
Else
NoPlot(1);
}