커뮤니티
부탁드립니다
2024-01-10 11:01:38
920
글번호 175585
1.현 시간대에 나올 수 있도록 매 20분마다 전최고점 전전최고점, 전전최고점과 전전전최고점을 연결하는 추세선과 전최저점과 전전최저점, 전전최저점과 전전전최저점을 우측으로 서로 연장하는 추세선을 구현해 주세요, 동시에 매 40분마다 전최고점과 전전최고점, 전전최고점과 전전전최고점을 연결하는 추세선과 전최저점과 전전최저점, 전전최저점과 전전전최저점을 우측으로 서로 연장하는 추세선을 구현해 주세요
(최고점이나 최저점이 동일 가격인 경우 시간 상 가장 늦게 만들어진 봉을 기준으로 해 주세요)
고맙습니다.
답변 1
예스스탁 예스스탁 답변
2024-01-10 18:28:26
안녕하세요
예스스탁입니다.
input : 분1(20),분2(40);
var : S1(0),D1(0),TM(0),TF1(0),TF2(0),cnt(0);
var : TL1(0),TL2(0),TL3(0),TL4(0);
var : TL5(0),TL6(0),TL7(0),TL8(0);
Array : HH1[10](0),HD1[10](0),HT1[10](0),LL1[10](0),LD1[10](0),LT1[10](0);
Array : HH2[10](0),HD2[10](0),HT2[10](0),LL2[10](0),LD2[10](0),LT2[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;
TF1 = TM%분1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 분1 > 1 and TF1 < TF1[1]) or
(Bdate == Bdate[1] and 분1 > 1 and TM >= TM[1]+분1) or
(Bdate == Bdate[1] and 분1 == 1 and TM > TM[1]) Then
{
for cnt = 9 downto 1
{
HH1[cnt] = HH1[cnt-1];
HD1[cnt] = HD1[cnt-1];
HT1[cnt] = HT1[cnt-1];
LL1[cnt] = LL1[cnt-1];
LD1[cnt] = LD1[cnt-1];
LT1[cnt] = LT1[cnt-1];
}
HH1[0] = H;
HD1[0] = sDate;
HT1[0] = sDate;
LL1[0] = L;
LD1[0] = sDate;
LT1[0] = sTime;
TL_Delete(TL1);
if HH1[2] > 0 Then
{
TL1 = TL_new(HD1[2],HT1[2],HH1[2],HD1[1],HT1[1],HH1[1]);
TL_SetColor(TL1,Red);
TL_SetExtRight(TL1,true);
}
TL_Delete(TL2);
if HH1[3] > 0 Then
{
TL2 = TL_new(HD1[3],HT1[3],HH1[3],HD1[2],HT1[2],HH1[2]);
TL_SetColor(TL2,Red);
TL_SetExtRight(TL2,true);
}
TL_Delete(TL3);
if LL1[2] > 0 Then
{
TL3 = TL_new(LD1[2],LT1[2],LL1[2],LD1[1],LT1[1],LL1[1]);
TL_SetColor(TL3,Blue);
TL_SetExtRight(TL3,true);
}
TL_Delete(TL4);
if LL1[3] > 0 Then
{
TL4 = TL_new(LD1[3],LT1[3],LL1[3],LD1[2],LT1[2],LL1[2]);
TL_SetColor(TL4,Blue);
TL_SetExtRight(TL4,true);
}
}
if H >= HH1[0] Then
{
HH1[0] = H;
HD1[0] = sDate;
HT1[0] = sTime;
}
if L <= LL1[0] Then
{
LL1[0] = L;
LD1[0] = sDate;
LT1[0] = sTime;
}
TF2 = TM%분2;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 분2 > 1 and TF2 < TF2[1]) or
(Bdate == Bdate[1] and 분2 > 1 and TM >= TM[1]+분2) or
(Bdate == Bdate[1] and 분2 == 1 and TM > TM[1]) Then
{
for cnt = 9 downto 1
{
HH2[cnt] = HH2[cnt-1];
HD2[cnt] = HD2[cnt-1];
HT2[cnt] = HT2[cnt-1];
LL2[cnt] = LL2[cnt-1];
LD2[cnt] = LD2[cnt-1];
LT2[cnt] = LT2[cnt-1];
}
HH2[0] = H;
HD2[0] = sDate;
HT2[0] = sDate;
LL2[0] = L;
LD2[0] = sDate;
LT2[0] = sTime;
TL_Delete(TL5);
if HH2[2] > 0 Then
{
TL5 = TL_new(HD2[2],HT2[2],HH2[2],HD2[1],HT2[1],HH2[1]);
TL_SetColor(TL5,Magenta);
TL_SetExtRight(TL5,true);
}
TL_Delete(TL6);
if HH2[3] > 0 Then
{
TL6 = TL_new(HD2[3],HT2[3],HH2[3],HD2[2],HT2[2],HH2[2]);
TL_SetColor(TL6,Magenta);
TL_SetExtRight(TL6,true);
}
TL_Delete(TL7);
if LL2[2] > 0 Then
{
TL7 = TL_new(LD2[2],LT2[2],LL2[2],LD2[1],LT2[1],LL2[1]);
TL_SetColor(TL7,Cyan);
TL_SetExtRight(TL7,true);
}
TL_Delete(TL8);
if LL2[3] > 0 Then
{
TL8 = TL_new(LD2[3],LT2[3],LL2[3],LD2[2],LT2[2],LL2[2]);
TL_SetColor(TL8,Cyan);
TL_SetExtRight(TL8,true);
}
}
if H >= HH2[0] Then
{
HH2[0] = H;
HD2[0] = sDate;
HT2[0] = sTime;
}
if L <= LL2[0] Then
{
LL2[0] = L;
LD2[0] = sDate;
LT2[0] = sTime;
}
}
즐거운 하루되세요
> 서태공 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> 1.현 시간대에 나올 수 있도록 매 20분마다 전최고점 전전최고점, 전전최고점과 전전전최고점을 연결하는 추세선과 전최저점과 전전최저점, 전전최저점과 전전전최저점을 우측으로 서로 연장하는 추세선을 구현해 주세요, 동시에 매 40분마다 전최고점과 전전최고점, 전전최고점과 전전전최고점을 연결하는 추세선과 전최저점과 전전최저점, 전전최저점과 전전전최저점을 우측으로 서로 연장하는 추세선을 구현해 주세요
(최고점이나 최저점이 동일 가격인 경우 시간 상 가장 늦게 만들어진 봉을 기준으로 해 주세요)
고맙습니다.
다음글
이전글