예스스탁
예스스탁 답변
2021-09-15 14:23:01
안녕하세요
예스스탁입니다.
유동비율은 랭귀지에 제공되지 않아 제외했습니다.
1. 시스템
input : N1(8),N2(20);
var : cnt(0);
var : 전환선(0),기준선(0),선행스팬1(0),선행스팬2(0);
var : H1(0),H1index(0),L1(0),H2(0),PV(0),NV(0),PVmax(0),NVmax(0);
var : count1(0),count2(0),H1H(0),H1C(0),H1O(0);
var : emav1(0),emav2(0),emav3(0),Hv(0),HVindex(0),Vma(0);
전환선 = (highest(H,9)+lowest(L,9))/2;
기준선 = (highest(H,26)+lowest(L,26))/2;
선행스팬1 = (전환선[25]+기준선[25])/2;
선행스팬2 = (highest(H,52)[25]+lowest(L,52)[25])/2;
H1 = Highest(H,30);
H1index = NthHighestBar(1,H,30);
H1H = H[H1index];
H1C = C[H1index];
H1O = O[H1index];
L1 = Lowest(H,30);
H2 = Highest(H,112);
if C > O Then
PV = V;
Else
PV = 0;
if C < O Then
NV = V;
Else
NV = 0;
PVmax = Highest(PV,30);
NVmax = Highest(NV,30);
Emav1 = Ema(C,15);
Emav2 = Ema(C,33);
emav3 = Ema(c,224);
count1 = 0;
count2 = 0;
for cnt = 0 to H1index
{
if L[cnt] < Emav3[1] Then
count1 = count1+1;
if L[cnt] < 선행스팬1[1] or L[cnt] < 선행스팬2[1] Then
count2 = count2+1;
}
HV = Highest(V,30);
HVindex = NthHighestBar(1,V,30);
Vma = ma(V,112);
if H1 >= L1*1.30 and
H1 == H2 and
CountIf(C>=C[1]*1.14,30) >= 1 and
C > emav3*1.10 and
count1 == 0 and
count2 == 0 and
PVmax > NVmax and
AccumN(M,30) >= 50000000000 and
H1H - max(H1C,H1O) < abs(H1C-H1O)*2 and
Highest(V,30) >= Vma[HVindex+1]*10 Then
{
if H1index < 8 and CrossDown(c,N1) Then
Buy("b1");
if H1index < 20 and CrossDown(c,N2) Then
Buy("b2");
}
2 종목검색
input : N1(8),N2(20);
var : cnt(0);
var : 전환선(0),기준선(0),선행스팬1(0),선행스팬2(0);
var : H1(0),H1index(0),L1(0),H2(0),PV(0),NV(0),PVmax(0),NVmax(0);
var : count1(0),count2(0),H1H(0),H1C(0),H1O(0);
var : emav1(0),emav2(0),emav3(0),Hv(0),HVindex(0),Vma(0);
전환선 = (highest(H,9)+lowest(L,9))/2;
기준선 = (highest(H,26)+lowest(L,26))/2;
선행스팬1 = (전환선[25]+기준선[25])/2;
선행스팬2 = (highest(H,52)[25]+lowest(L,52)[25])/2;
H1 = Highest(H,30);
H1index = NthHighestBar(1,H,30);
H1H = H[H1index];
H1C = C[H1index];
H1O = O[H1index];
L1 = Lowest(H,30);
H2 = Highest(H,112);
if C > O Then
PV = V;
Else
PV = 0;
if C < O Then
NV = V;
Else
NV = 0;
PVmax = Highest(PV,30);
NVmax = Highest(NV,30);
Emav1 = Ema(C,15);
Emav2 = Ema(C,33);
emav3 = Ema(c,224);
count1 = 0;
count2 = 0;
for cnt = 0 to H1index
{
if L[cnt] < Emav3[1] Then
count1 = count1+1;
if L[cnt] < 선행스팬1[1] or L[cnt] < 선행스팬2[1] Then
count2 = count2+1;
}
HV = Highest(V,30);
HVindex = NthHighestBar(1,V,30);
Vma = ma(V,112);
Condition1 = False;
if H1 >= L1*1.30 and
H1 == H2 and
CountIf(C>=C[1]*1.14,30) >= 1 and
C > emav3*1.10 and
count1 == 0 and
count2 == 0 and
PVmax > NVmax and
AccumN(M,30) >= 50000000000 and
H1H - max(H1C,H1O) < abs(H1C-H1O)*2 and
Highest(V,30) >= Vma[HVindex+1]*10 Then
{
if H1index < 8 and CrossDown(c,N1) Then
Condition1 = true;
if H1index < 20 and CrossDown(c,N2) Then
Condition1 = true;
}
if Condition1 == true Then
Find(1);
3
input : N1(8),N2(20);
var : cnt(0);
var : 전환선(0),기준선(0),선행스팬1(0),선행스팬2(0);
var : H1(0),H1index(0),L1(0),H2(0),PV(0),NV(0),PVmax(0),NVmax(0);
var : count1(0),count2(0),H1H(0),H1C(0),H1O(0);
var : emav1(0),emav2(0),emav3(0),Hv(0),HVindex(0),Vma(0),tx(0);
전환선 = (highest(H,9)+lowest(L,9))/2;
기준선 = (highest(H,26)+lowest(L,26))/2;
선행스팬1 = (전환선[25]+기준선[25])/2;
선행스팬2 = (highest(H,52)[25]+lowest(L,52)[25])/2;
H1 = Highest(H,30);
H1index = NthHighestBar(1,H,30);
H1H = H[H1index];
H1C = C[H1index];
H1O = O[H1index];
L1 = Lowest(H,30);
H2 = Highest(H,112);
if C > O Then
PV = V;
Else
PV = 0;
if C < O Then
NV = V;
Else
NV = 0;
PVmax = Highest(PV,30);
NVmax = Highest(NV,30);
Emav1 = Ema(C,15);
Emav2 = Ema(C,33);
emav3 = Ema(c,224);
count1 = 0;
count2 = 0;
for cnt = 0 to H1index
{
if L[cnt] < Emav3[1] Then
count1 = count1+1;
if L[cnt] < 선행스팬1[1] or L[cnt] < 선행스팬2[1] Then
count2 = count2+1;
}
HV = Highest(V,30);
HVindex = NthHighestBar(1,V,30);
Vma = ma(V,112);
if H1 >= L1*1.30 and
H1 == H2 and
CountIf(C>=C[1]*1.14,30) >= 1 and
C > emav3*1.10 and
count1 == 0 and
count2 == 0 and
PVmax > NVmax and
AccumN(M,30) >= 50000000000 and
H1H - max(H1C,H1O) < abs(H1C-H1O)*2 and
Highest(V,30) >= Vma[HVindex+1]*10 Then
{
if H1index < 8 and CrossDown(c,N1) Then
{
PlotPaintBar(H,L,"강조",MAGENTA);
tx = Text_New(sDate,sTime,H,NumToStr(C,0));
Text_SetStyle(TX,2,1);
Text_SetColor(TX,MAGENTA);
}
if H1index < 20 and CrossDown(c,N2) Then
{
PlotPaintBar(H,L,"강조",MAGENTA);
tx = Text_New(sDate,sTime,H,NumToStr(C,0));
Text_SetStyle(TX,2,1);
Text_SetColor(TX,MAGENTA);
}
}
즐거운 하루되세요
> 찬영아빠 님이 쓴 글입니다.
> 제목 : 종목검색 및 강조수식 부탁드립니다.
> 다이빙기법 전략
조건1. 30봉 중 최저가 최고가 30% 이상이다.
조건2. 30봉 중 최고가는 112봉 최고가이다.
조건3. 30봉 중 전일 종가 대비 당일 종가 상승률 14%은 1회 이상이다.
조건4. 현재 종가는 224지수이평보다 10% 위에 있어야 한다.
조건5. 30봉 최고가 이후 저가가 224지수이평 이하로 내려간 적이 없다.
조건6. 30봉 최고가 이후 저가가 선행스팬1(9,26,52)와 선행스팬2(9,26,52)이하로 내려간 적이 없다.
조건7. 30일 동안 양봉의 최대거래량이 음봉 최대거래량보다 크다
조건8. 30일 동안 누적 거래대금은 500억 이상이다.
조건9. 30봉 중 최고가의 봉은 꼬리가 몸통보다 2배 이상이면 안된다.
양봉이지만 꼬리가 너무 길 경우 음봉의 거래량으로 고려되기 때문(첨부파일1 참조)
조건10. 기업의 유동비율은 400% 미만이다.
조건11. 30봉중 최고거래량 봉의 거래량은 이전 112개 봉의 평균 거래량의 10배 이상이다.
매수조건1 현재가가 15일 지수이평을 데드크로스
15일 지수이평 데드크로스는 30봉중 최고가 이후 8봉 이내에 나와야 한다.
8봉 이후에 매수사인 나와도 매수안함
매수조건2 현재가가 15일 지수이평을 데드크로스
33일 지수이평 데드크로스는 30봉중 최고가 이후 20봉 이내에 나와야 한다.
20봉 이후에 매수사인 나와도 매수안함
매수조건의 8봉과 20봉은 input으로 입력 가능하게 부탁드립니다.
위 조건의 종목검색과 강조 수식을 부탁드립니다. 또한 데드크로스 값을 봉옆에 표시해 주시면 감사하겠습니다.