답변완료
수식문의
최근값만 수평으로 표시하려면 추세선 함수를 이용해야 합니다.
추세선을 점그래프로 지정하고 굵기가 굵으면 선처럼 보이게 됩니다.
수식내 굵기는 0으로 처리해 드립니다.
굵기 조정해 보시기 바랍니다.
input : N(26),굵기(0);
var : hh(0),ll(0),tl1(0),tl2(0),cnt(0);
if Bdate != Bdate[1] Then
{
TL_Delete(tl1);
TL_Delete(tl2);
var1 = sDate;
Var2 = sTime;
hh = 0;
ll = 0;
For cnt = 0 to N-1
{
if hh == 0 or (hh > 0 and DayHigh(cnt) > hh) Then
hh = DayHigh(cnt);
if ll == 0 or (ll > 0 and DayLow(cnt) < ll) Then
ll = DayLow(cnt);
}
tl1 = TL_New(var1,Var2,hh,NextBarSdate,NextBarStime,hh);
tl2 = TL_New(var1,Var2,ll,NextBarSdate,NextBarStime,ll);
TL_SetExtLeft(tl1,true);
TL_SetExtLeft(tl2,true);
TL_SetExtRight(tl1,true);
TL_SetExtRight(tl2,true);
TL_SetColor(tl1,Red);
TL_SetColor(tl2,Blue);
TL_SetStyle(tl1,3);
TL_SetStyle(tl2,3);
TL_SetSize(tl1,굵기);
TL_SetSize(tl2,굵기);
}
Else
{
if hh > 0 and DayHigh(0) > hh Then
{
hh = DayHigh(0);
TL_SetBegin(tl1,var1,Var2,hh);
}
if ll > 0 and DayLow(0) < ll Then
{
ll = DayLow(0);
TL_SetBegin(tl1,var1,Var2,hh);
}
TL_SetEnd(tl1,NextBarSdate,NextBarStime,hh);
TL_SetEnd(tl2,NextBarSdate,NextBarStime,ll);
}
알려 주신 26일 최고, 최저 라인입니다
이 수식을 분봉에 적용할 수 있게 수정 부탁드립니다
행복한 하루 되세요
감사합니다
2023-05-03
1145
글번호 168688
지표
답변완료
추세선 직저
input : Period(150),선두께(2);
Var:상승색(Red), 하락색(Blue);
Var:j(0),T(0);
Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0),tl9(0),
date21(0),date22(0),time21(0),time22(0),
date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0);
Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0);
Plot1(0);
For j = 0 To 19
{
HiBar[j] = HiBar[j] + 1;
LoBar[j] = LoBar[j] + 1;
}
if crossup(c,highest(H,Period)[1]) Then
T = 1;
if CrossDown(c,Lowest(L,Period)[1]) Then
T = -1;
If T == -1 Then
{
If T[1] != -1 Then
{
For j = 18 DownTo 0
{
LoVal[j+1] = LoVal[j];
LoBar[j+1] = LoBar[j];
}
LoVal[0] = L;
LoBar[0] = 0;
date11 = date[HiBar[0]];
time11 = stime[HiBar[0]];
Value11 = HiVal[0];
date12 = date[LoBar[0]];
time12 = stime[LoBar[0]];
Value12 = LoVal[0];
TL_Delete(tl);
TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen);
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
TL_SetColor(TL1,하락색);
date21 = date[HiBar[0]];
time21 = stime[HiBar[0]];
date22 = date[0];
time22 = stime[0];
}
If LoVal[0] > L Then
{
LoVal[0] = L;
LoBar[0] = 0;
date12 = date[LoBar[0]];
time12 = stime[LoBar[0]];
Value12 = LoVal[0];
TL_SetEnd(TL1, date12,time12,Value12);
date22 = date[0];
time22 = stime[0];
TL_Delete(tl);
TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen);
}
}
If T == 1 Then
{
If T[1] != 1 Then
{
For j = 18 DownTo 0
{
HiVal[j+1] = HiVal[j];
HiBar[j+1] = HiBar[j];
}
HiVal[0] = H;
HiBar[0] = 0;
date11 = date[LoBar[0]];
time11 = stime[LoBar[0]];
Value11 = LoVal[0];
date12 = date[HiBar[0]];
time12 = stime[HiBar[0]];
Value12 = HiVal[0];
TL_Delete(tl);
TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen);
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
TL_SetColor(TL1,상승색);
date31 = date[LoBar[0]];
time31 = stime[LoBar[0]];
date32 = date[0];
time32 = stime[0];
}
If HiVal[0] < H Then
{
HiVal[0] = H;
HiBar[0] = 0;
date12 = date[HiBar[0]];
time12 = stime[HiBar[0]];
Value12 = HiVal[0];
TL_SetEnd(TL1, date12,time12,Value12);
date32 = date[0];
time32 = stime[0];
TL_Delete(tl);
TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen);
}
}
TL_SetSize(TL1,선두께);
하락중인 추세선이 바로 직전 하락추세선 저점의 +2틱부터 -3틱 사이 도달시 네모 표시.
네모 삭제; a.직저 -4틱 도달 전에 양전환시 삭제.
b.추가 하락하여 직전 하락추세선 저점의 -4틱 도달시 삭제.
네모 표시는 직전저점의 +2틱 ~ -3틱 사이에서만 존재 (쌍바닥). 감사합니다.
2023-05-03
1610
글번호 168672
지표
답변완료
문의
Var : Pv(0),R1(0),R2(0),S1(0),S2(0);
Pv = (DayHigh(1)+DayLow(1)+DayClose(1))/3;
R1 = 2*Pv-DayLow(1);
R2 = Pv+DayHigh(1)-DayLow(1);
S1 = 2*Pv-DayHigh(1);
S2 = Pv-DayHigh(1)+DayLow(1);
Plot1(Pv, "피봇포인트");
Plot2(R1, "1차저항");
Plot3(R2, "2차저항");
Plot4(S1, "1차지지");
Plot5(S2, "2차지지");
var : tx1(0),tx2(0),tx3(0),tx4(0),tx5(0);
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
Text_Delete(tx4);
Text_Delete(tx5);
tx1 = Text_New(NextBarSdate,NextBarStime,Pv,"피봇중심:"+NumToStr(pv,2));
tx2 = Text_New(NextBarSdate,NextBarStime,R1,"1차저항:"+NumToStr(R1,2));
tx3 = Text_New(NextBarSdate,NextBarStime,R2,"2차저항:"+NumToStr(R2,2));
tx4 = Text_New(NextBarSdate,NextBarStime,S1,"1차지지:"+NumToStr(S1,2));
tx5 = Text_New(NextBarSdate,NextBarStime,S2,"2차지지:"+NumToStr(S2,2));
Text_SetStyle(tx1,0,1);
Text_SetStyle(tx2,0,1);
Text_SetStyle(tx3,0,1);
Text_SetStyle(tx4,0,1);
Text_SetStyle(tx5,0,1);
이걸 항생에 대입하면 피봇이
10시30분부터~17시 30분 까지1개 18시20분부터04시 까지 2개 나옵니다,
10시15분~ 04시까지 1개만 나오게 부탁드립니다.
2023-05-03
1304
글번호 168671
지표