이번에도 부탁드립니다
월-주-일-60
주봉에 월봉
일봉에 월주
60분네 월주일
10분에 월주일60분식 대입 부탁드립니다
input : n1(20),n2(6);
var1 = h[n1];
var2 = l[n1];
var3 = (var1+var2)/2;
var4 = h[n2];
var5 = l[n2];
var6 = (var1+var2)/2;
plot1(var1);
plot2(var2);
plot3(var3);
plot4(var4);
plot5(var5);
plot6(var6);
답변 1
예스스탁
예스스탁 답변
2020-07-16 11:46:48
안녕하세요
예스스탁입니다.
1 월
input : n1(20),n2(6);
var : cnt(0);
Array : C1[50](0),H1[50](0),L1[50](0);
if Bdate > Bdate[1]+30 Then
{
H1[0] = H;
L1[0] = L;
for cnt = 1 to 49
{
C1[cnt] = C1[cnt-1][1];
H1[cnt] = H1[cnt-1][1];
L1[cnt] = L1[cnt-1][1];
}
}
C1[0] = C;
if H > H1[0] then
H1[0] = H;
if L < L1[0] then
L1[0] = L;
if H1[n1] > 0 and L1[n1] > 0 then
{
var1 = h1[n1];
var2 = l1[n1];
var3 = (var1+var2)/2;
plot1(var1);
plot2(var2);
plot3(var3);
}
if H1[n2] > 0 and L1[n2] > 0 then
{
var4 = h1[n2];
var5 = l1[n2];
var6 = (var1+var2)/2;
plot4(var4);
plot5(var5);
plot6(var6);
}
2 주
input : n1(20),n2(6);
var : cnt(0);
Array : C1[50](0),H1[50](0),L1[50](0);
if dayofweek(Bdate) < dayofweek(Bdate[1]) Then
{
H1[0] = H;
L1[0] = L;
for cnt = 1 to 49
{
C1[cnt] = C1[cnt-1][1];
H1[cnt] = H1[cnt-1][1];
L1[cnt] = L1[cnt-1][1];
}
}
C1[0] = C;
if H > H1[0] then
H1[0] = H;
if L < L1[0] then
L1[0] = L;
if H1[n1] > 0 and L1[n1] > 0 then
{
var1 = h1[n1];
var2 = l1[n1];
var3 = (var1+var2)/2;
plot1(var1);
plot2(var2);
plot3(var3);
}
if H1[n2] > 0 and L1[n2] > 0 then
{
var4 = h1[n2];
var5 = l1[n2];
var6 = (var1+var2)/2;
plot4(var4);
plot5(var5);
plot6(var6);
}
3 일
input : n1(20),n2(6);
if dayhigh(n1) > 0 and daylow(n1) > 0 then
{
var1 = dayhigh(n1);
var2 = daylow(n1);
var3 = (var1+var2)/2;
plot1(var1);
plot2(var2);
plot3(var3);
}
if dayhigh(n2) > 0 and daylow(n2) > 0 then
{
var4 = dayhigh(n2);
var5 = daylow(n2);
var6 = (var1+var2)/2;
plot4(var4);
plot5(var5);
plot6(var6);
}
4 분
input : ntime(60),n1(20),n2(6);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
Array : C1[50](0),H1[50](0),L1[50](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
{
H1[0] = H;
L1[0] = L;
for cnt = 1 to 49
{
C1[cnt] = C1[cnt-1][1];
H1[cnt] = H1[cnt-1][1];
L1[cnt] = L1[cnt-1][1];
}
}
C1[0] = C;
if H > H1[0] then
H1[0] = H;
if L < L1[0] then
L1[0] = L;
if H1[n1] > 0 and L1[n1] > 0 then
{
var1 = h1[n1];
var2 = l1[n1];
var3 = (var1+var2)/2;
plot1(var1);
plot2(var2);
plot3(var3);
}
if H1[n2] > 0 and L1[n2] > 0 then
{
var4 = h1[n2];
var5 = l1[n2];
var6 = (var1+var2)/2;
plot4(var4);
plot5(var5);
plot6(var6);
}
}
즐거운 하루되세요
> 에리카 님이 쓴 글입니다.
> 제목 : 지표
> 이번에도 부탁드립니다
월-주-일-60
주봉에 월봉
일봉에 월주
60분네 월주일
10분에 월주일60분식 대입 부탁드립니다
input : n1(20),n2(6);
var1 = h[n1];
var2 = l[n1];
var3 = (var1+var2)/2;
var4 = h[n2];
var5 = l[n2];
var6 = (var1+var2)/2;
plot1(var1);
plot2(var2);
plot3(var3);
plot4(var4);
plot5(var5);
plot6(var6);