커뮤니티
부탁들여요
2020-12-20 18:04:17
683
글번호 144818
input : 기간 (1),n(1),k(0),percent(5),percent1(10);
var :count(0),count1(0),count2(0),count3(0),DINDEX(0),LL(0),LL1(0), HL1(0),HL2(0),HL3(0),HL4(0);
LL = Lowest(DayLow,기간 );
if bdate != bdate[1] then
{
DINDEX = DINDEX+1 ;
LL = DayLow;
LL1= DayHigh;
}
if DINDEX <= 1 then
{ LL = LL[0];
LL1 = LL1[0];
for count = 0 to 기간 -1
if dayLow(count) > LL[1] then
LL = dayLow(count );
}
var1 = Lowest(LL[2] , 기간 );
var2 = Lowest( LL[1] , 기간 );
HL1= Var1 - Var1 * percent /100;
HL2= Var1 - Var1 * percent1 /100;
HL3= Var2 - Var2 * percent /100;
HL4= Var2 - Var2 * percent1 /100;
Condition1 = (DayOpen[3] > DayClose[3]or DayOpen[3] < DayClose[3]) and DayOpen[2] > DayClose[2]
and DayLow [3] > DayLow [2] and DayLow [2] < DayLow [1] and (DayOpen[1] < DayClose[1]or DayOpen[1] > DayClose[1])
and( DayOpen < DayClose or DayClose > DayLow [2] or DayHigh[2] < DayHigh);
Condition2 = DayOpen[2] > DayClose[2] and DayLow [2] >= DayLow [1] and DayOpen[1] < DayClose[1]
and DayLow[1] < DayLow and DayLow[1] < DayClose ;
if Condition1 Then
Begin
var3 = HL1;
var4 = HL2 ;
End
Else
if Condition2 Then
Begin
var3 = HL3;
var4 = HL4;
end;
Plot1 ( var3 [n]);
Plot2 ( var4 [n]);
예휴 ~~ 왕초보입니다,
일봉에서 사용중입니다 분봉에서도 같은 가격에 선이 그려지도록 부탁 들입니다
일봉 ---> 분봉
60분봉 --> 10 분봉 으로도 부탁들입니다 수고하세요^^
답변 1
예스스탁 예스스탁 답변
2020-12-21 15:25:33
안녕하세요
예스스탁입니다.
1 일봉-> 분봉
input : 기간(1),n(1),k(0),percent(5),percent1(10);
var :cnt(0),LL(0),LL1(0), HL1(0),HL2(0),HL3(0),HL4(0);
Array : v3[10](0),v4[10](0);
LL = DayLow(0);
var1 = DayLow(2);
Var2 = DayLow(1);
For cnt = 0 to 기간-1
{
if DayLow(cnt) < LL Then
LL = DayLow(cnt);
if DayLow(cnt+2) < var1 Then
var1 = DayLow(cnt+2);
if DayLow(cnt+1) < Var2 Then
Var2 = DayLow(cnt+1);
}
HL1= Var1 - Var1 * percent /100;
HL2= Var1 - Var1 * percent1 /100;
HL3= Var2 - Var2 * percent /100;
HL4= Var2 - Var2 * percent1 /100;
Condition1 = (DayOpen(3) > DayClose(3)or DayOpen(3) < DayClose(3)) and DayOpen(2) > DayClose(2)
and DayLow (3) > DayLow (2) and DayLow (2) < DayLow (1) and (DayOpen(1) < DayClose(1)or DayOpen(1) > DayClose(1))
and( DayOpen < DayClose or DayClose > DayLow (2) or DayHigh(2) < DayHigh);
Condition2 = DayOpen(2) > DayClose(2) and DayLow (2) >= DayLow (1) and DayOpen(1) < DayClose(1)
and DayLow(1) < DayLow and DayLow(1) < DayClose ;
if Condition1 Then
{
v3[0] = HL1;
v4[0] = HL2 ;
}
else if Condition2 Then
{
v3[0] = HL3;
v4[0] = HL4;
}
Else
{
v3[0] = V3[1];
v4[0] = V4[1];
}
if NextBarSdate != sdate[1] Then
{
For cnt = 1 to 9
{
v3[cnt] = v3[cnt-1][1];
v4[cnt] = v4[cnt-1][1];
}
}
Plot1 (v3 [n]);
Plot2 (v4 [n]);
2 60분 --> 10분
input : ntime(60),기간(1),n(1),k(0),percent(5),percent1(10);
var :cnt(0),LL(0),HL1(0),HL2(0),HL3(0),HL4(0);
var : S1(0),D1(0),TM(0),TF(0);
Array : O1[100](0),H1[100](0),L1[100](0),C1[100](0);
Array : v3[10](0),v4[10](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
{
O1[0] = O;
H1[0] = H;
L1[0] = L;
for cnt = 1 to 99
{
O1[cnt] = O1[cnt-1][1];
H1[cnt] = H1[cnt-1][1];
L1[cnt] = L1[cnt-1][1];
C1[cnt] = C1[cnt-1][1];
}
}
C1[0] = C;
if h > h1[0] Then
h1[0] = h;
if L < l1[0] Then
l1[0] = l;
LL = L1[0];
var1 = L1[2];
Var2 = L1[1];
For cnt = 0 to 기간-1
{
if L1[cnt] < LL Then
LL = L1[cnt];
if L1[cnt+2] < var1 Then
var1 = L1[cnt+2];
if L1[cnt+1] < Var2 Then
Var2 = L1[cnt+1];
}
HL1= Var1 - Var1 * percent /100;
HL2= Var1 - Var1 * percent1 /100;
HL3= Var2 - Var2 * percent /100;
HL4= Var2 - Var2 * percent1 /100;
Condition1 = (O1[3] > C1[3] or O1[3] < C1[3]) and O1[2] > C1[2]
and L1[3] > L1[2] and L1[2] < L1[1] and (O1[1] < C1[1] or O1[1] > C1[1])
and (O1[0] < C1[0] or C1[0] > L1[2] or H1[2] < H1[0]);
Condition2 = O1[2] > C1[2] and L1[2] >= L1[1] and O1[1] < C1[1]
and L1[1] < L1[0] and L1[1] < C1[0];
if Condition1 Then
{
v3[0] = HL1;
v4[0] = HL2 ;
}
else if Condition2 Then
{
v3[0] = HL3;
v4[0] = HL4;
}
Else
{
v3[0] = V3[1];
v4[0] = V4[1];
}
if NextBarSdate != sdate[1] Then
{
For cnt = 1 to 9
{
v3[cnt] = v3[cnt-1][1];
v4[cnt] = v4[cnt-1][1];
}
}
Plot1 (v3 [n]);
Plot2 (v4 [n]);
}
즐거운 하루되세요
> 여보세요 님이 쓴 글입니다.
> 제목 : 부탁들여요
> input : 기간 (1),n(1),k(0),percent(5),percent1(10);
var :count(0),count1(0),count2(0),count3(0),DINDEX(0),LL(0),LL1(0), HL1(0),HL2(0),HL3(0),HL4(0);
LL = Lowest(DayLow,기간 );
if bdate != bdate[1] then
{
DINDEX = DINDEX+1 ;
LL = DayLow;
LL1= DayHigh;
}
if DINDEX <= 1 then
{ LL = LL[0];
LL1 = LL1[0];
for count = 0 to 기간 -1
if dayLow(count) > LL[1] then
LL = dayLow(count );
}
var1 = Lowest(LL[2] , 기간 );
var2 = Lowest( LL[1] , 기간 );
HL1= Var1 - Var1 * percent /100;
HL2= Var1 - Var1 * percent1 /100;
HL3= Var2 - Var2 * percent /100;
HL4= Var2 - Var2 * percent1 /100;
Condition1 = (DayOpen[3] > DayClose[3]or DayOpen[3] < DayClose[3]) and DayOpen[2] > DayClose[2]
and DayLow [3] > DayLow [2] and DayLow [2] < DayLow [1] and (DayOpen[1] < DayClose[1]or DayOpen[1] > DayClose[1])
and( DayOpen < DayClose or DayClose > DayLow [2] or DayHigh[2] < DayHigh);
Condition2 = DayOpen[2] > DayClose[2] and DayLow [2] >= DayLow [1] and DayOpen[1] < DayClose[1]
and DayLow[1] < DayLow and DayLow[1] < DayClose ;
if Condition1 Then
Begin
var3 = HL1;
var4 = HL2 ;
End
Else
if Condition2 Then
Begin
var3 = HL3;
var4 = HL4;
end;
Plot1 ( var3 [n]);
Plot2 ( var4 [n]);
예휴 ~~ 왕초보입니다,
일봉에서 사용중입니다 분봉에서도 같은 가격에 선이 그려지도록 부탁 들입니다
일봉 ---> 분봉
60분봉 --> 10 분봉 으로도 부탁들입니다 수고하세요^^
다음글
이전글