커뮤니티
부탁드립니다
2024-01-11 10:16:19
745
글번호 175627
1. 종가가 양봉이면서 25개봉의 최고가되면 해당봉 고가와 저가에 새로운 최고가 봉이 다시 생길 때까지 우측 연장으로 계속하여 선을 만들어 주세요. 종가가 음봉이면서 25개봉의 최저가 되면 해당봉 고가와 저가에 새로운 최저가 봉이 다시 생길 때까지 우측 연장으로 계속하여 선을 만들어 주세요
2. 매 10분간격으로 전최고점과 전최저점, 전전최고점과 전전최저점을, 매 20분간격으로 전최고점과 전최저점, 전전최고점과 전전최저점을 우측 수평선으로 연장하여 구현해 주세요
고맙습니다.
답변 1
예스스탁 예스스탁 답변
2024-01-12 10:08:24
안녕하세요
예스스탁입니다.
1
if C > O and C > highest(H,25)[1] Then
{
var1 = H;
Var2 = L;
}
if C < O and C < lowest(L,25)[1] Then
{
var3 = H;
Var4 = L;
}
if var1 > 0 and var2 > 0 Then
{
Plot1(var1);
Plot2(var2);
}
if Var3 > 0 and Var4 > 0 Then
{
Plot3(var3);
Plot4(var4);
}
2
input : 분1(10),분2(20);
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[1] > 0 Then
{
TL1 = TL_new(HD1[1],HT1[1],HH1[1],sDate,sTime,HH1[1]);
TL_SetColor(TL1,Red);
TL_SetExtRight(TL1,true);
}
TL_Delete(TL2);
if HH1[2] > 0 Then
{
TL2 = TL_new(HD1[2],HT1[2],HH1[2],sDate,stime,HH1[2]);
TL_SetColor(TL2,Red);
TL_SetExtRight(TL2,true);
}
TL_Delete(TL3);
if LL1[1] > 0 Then
{
TL3 = TL_new(LD1[1],LT1[1],LL1[1],sDate,sTime,LL1[1]);
TL_SetColor(TL3,Blue);
TL_SetExtRight(TL3,true);
}
TL_Delete(TL4);
if LL1[2] > 0 Then
{
TL4 = TL_new(LD1[2],LT1[2],LL1[2],sDate,sTime,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[1] > 0 Then
{
TL5 = TL_new(HD2[1],HT2[1],HH2[1],sDate,sTime,HH2[1]);
TL_SetColor(TL5,Magenta);
TL_SetExtRight(TL5,true);
}
TL_Delete(TL6);
if HH2[2] > 0 Then
{
TL6 = TL_new(HD2[2],HT2[2],HH2[2],sDate,sTime,HH2[2]);
TL_SetColor(TL6,Magenta);
TL_SetExtRight(TL6,true);
}
TL_Delete(TL7);
if LL2[1] > 0 Then
{
TL7 = TL_new(LD2[1],LT2[1],LL2[1],sDate,sTime,LL2[1]);
TL_SetColor(TL7,Cyan);
TL_SetExtRight(TL7,true);
}
TL_Delete(TL8);
if LL2[2] > 0 Then
{
TL8 = TL_new(LD2[2],LT2[2],LL2[2],sDate,sTime,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. 종가가 양봉이면서 25개봉의 최고가되면 해당봉 고가와 저가에 새로운 최고가 봉이 다시 생길 때까지 우측 연장으로 계속하여 선을 만들어 주세요. 종가가 음봉이면서 25개봉의 최저가 되면 해당봉 고가와 저가에 새로운 최저가 봉이 다시 생길 때까지 우측 연장으로 계속하여 선을 만들어 주세요
2. 매 10분간격으로 전최고점과 전최저점, 전전최고점과 전전최저점을, 매 20분간격으로 전최고점과 전최저점, 전전최고점과 전전최저점을 우측 수평선으로 연장하여 구현해 주세요
고맙습니다.
다음글