답변완료
고저가 라인 연장
input : Period(200),선두께(1);
Var:상승색(Red), 하락색(Blue);
Var:j(0),T(0);
Var: date11(0),date12(0),time11(0),time12(0),
date21(0),date22(0),time21(0),time22(0),
date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0);
var : tl(0),tl1(0),tl2(0),tl3(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];
date21 = date[HiBar[0]];
time21 = stime[HiBar[0]];
date22 = date[0];
time22 = stime[0];
TL_SetEnd(TL2, date11, time11, Loval[1]);
TL_SetextRight(TL2,False);
}
If LoVal[0] > L Then
{
LoVal[0] = L;
LoBar[0] = 0;
date12 = date[LoBar[0]];
time12 = stime[LoBar[0]];
Value12 = LoVal[0];
date22 = date[0];
time22 = stime[0];
}
}
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];
date31 = date[LoBar[0]];
time31 = stime[LoBar[0]];
date32 = date[0];
time32 = stime[0];
TL_SetEnd(TL3, date11, time11, Hival[1]);
TL_SetExtRight(TL3,False);
}
If HiVal[0] < H Then
{
HiVal[0] = H;
HiBar[0] = 0;
date12 = date[HiBar[0]];
time12 = stime[HiBar[0]];
Value12 = HiVal[0];
date32 = date[0];
time32 = stime[0];
}
}
var : hh(0),ll(0);
if Bdate != Bdate[1] Then
{
hh = 0;
ll = 0;
}
if T == 1 and date32 == sDate Then
{
if T == 1 and T[1] != 1 Then
{
TL_Delete(TL3-5);
hh = value12;
TL3 = tl_new(date32,time32,value12,NextBarSdate,NextBarStime,value12);
TL_SetExtRight(TL3,true);
TL_SetColor(TL3,Red);
TL_SetSize(TL3,선두께);
}
if T == T[1] and hh == 0 or (hh > 0 and value12 > hh) Then
{
TL_Delete(TL3-5);
hh = value12;
TL_SetBegin(TL3, date32, time32, Value12);
TL_SetEnd(TL3, NextBarSdate, NextBarStime, Value12);
TL_SetExtRight(TL3,true);
TL_SetColor(TL3,Red);
TL_SetSize(TL3,선두께);
}
}
if T == -1 and date22 == sDate Then
{
if T == -1 and T[1] != -1 Then
{
TL_Delete(TL2-5);
ll = value12;
TL2 = tl_new(date22,time22,value12,NextBarSdate,NextBarStime,value12);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,Blue);
TL_SetSize(TL2,선두께);
}
if T == T[1] and ll == 0 or (ll > 0 and value12 < ll) Then
{
TL_Delete(TL2-5);
ll = value11;
TL_SetBegin(TL2, date22, time22, Value12);
TL_SetEnd(TL2, NextBarSdate, NextBarStime, Value12);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,Blue);
TL_SetSize(TL2,선두께);
}
}
상승추세선 하단에서 시작된 저가라인이 그 상승추세선의 상단(= 다음 하락추세선 시작점)까지만 연장 표시되는데, 이것을 다음 하락추세선의 끝 지점(= 다음 상승추세선 시작 지점)까지 약간 더 연장 표시.
고가라인도 같은 원리로 연장. 고가라인과 저가라인이 위 아래에서 서로 겹치게 됨. 감사합니다.
2023-02-23
1475
글번호 166623
지표
답변완료
종목검색 수식 질문드려요.
안녕하세요.
일봉에서 여러가지 이평선과 볼린저밴드를 사용한 합성 라인을 만들고,
그 라인(이름:스카이라인)을 주가가 골든 크로스 할 때를 종목 검색으로 찾고 싶습니다.
예스트레이더 방식으로 변경 부탁드립니다
-----------------
키움 영웅문에서 작성한 검색식을 보여 드립니다.
M5=eavg(C,5);//지수 이평
M10=eavg(C,10);
M20=eavg(C,20);
M60=eavg(C,60);
M120=eavg(C,120);
M240=eavg(C,240);
M480=eavg(C,480);
BH=BBandsUp(20,2);//볼린저밴드 상단
BC=BBandsC(20,1);//볼린저밴드 중앙
스=((M5*2)+(M10*3)+(M20*2)+(M60*3)+(M120*1)+(M240*2)+(M480*3)+(BH*1)+(BC*1)) / 18;
//각 이평선을 일정 비율로 합하고, 그것을 다시 나눈 것입니다.
스카이라인=Tema(스, 5, 지수);//최종결과물 라인입니다.
-------------
위의 스카이라인을 주가가 상향돌파할 때 종목 검색식을 부탁 드립니다.
감사합니다.~
2023-02-23
1692
글번호 166621
종목검색
답변완료
수식 변경 부탁드립니다
항상 빠른 답변에 감사드립니다
키움 수식입니다
예스트레이더 방식으로 변경 부탁드립니다
★매매선 일목균형표
수식1-매매선
(highest(high,shortPeriod)+lowest(low,shortPeriod)
+highest(high,midPeriod)+lowest(low,midPeriod)
+highest(high,longPeriod)+lowest(low,longPeriod))/6
수식2-기준선%midPeriod%
(highest(high,midPeriod)+lowest(low,midPeriod))/2
수식3-현재가
shift(close,midPeriod-26)
수식4-선행스팬1 %shortPeriod%,%midPeriod% (일목균형표)
(highest(high,shortPeriod)+lowest(low,shortPeriod)
+highest(high,midPeriod)+lowest(low,midPeriod))/4
수식5- 선행스팬2 %longPeriod%, %midPeriod% (일목균형표)
(highest(high,longPeriod)+lowest(low,longPeriod))/2
short period 8
mid period 24
long period 48
2023-02-23
1625
글번호 166614
지표