커뮤니티
신규 진입 수식 부탁합니다.
2019-03-22 07:34:53
353
글번호 127296
해당 조건을 모두 만족할때 신규 진입 뜨는 수식 부탁해요..
일봉 차트 - 국내 주식
CCI 일봉 > 0 &&
CCI 주봉 > 0 &&
주봉 20일 이동평균 라인이 우상향 &&
일봉이 5일이동평균(일봉)보다 아래 있을 때
답변 1
예스스탁 예스스탁 답변
2019-03-22 14:25:01
안녕하세요
예스스탁입니다.
Input : CCIP(9),Period(20),P(5);
Var : cnt(0), MD(0), Avgvalue(0),sum1(0),wCCIv(0),CCIv(0);
var : a1(0),a2(0),wmav(0),wmav1(0),mav(0);
Array : HH[100](0),LL[100](0),CC[100](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) Then
{
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
CC[0] = c;
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
if HH[CCIP] > 0 and LL[CCIP] > 0 Then
{
sum1 = 0;
for cnt = 0 to CCIP-1
{
sum1 = sum1 +(HH[cnt]+LL[cnt]+CC[cnt]);
}
Avgvalue = sum1/CCIP;
MD = 0;
For cnt = 0 To CCIP - 1
{
MD = MD + Abs(HH[cnt] + LL[cnt] + CC[cnt] - Avgvalue);
}
MD = MD / CCIP;
If MD == 0 Then
wCCIv = 0;
Else
wCCIv = (HH[0] + LL[0] + CC[0] - Avgvalue) / (0.015 * MD);
}
Else
wCCIv = 0;
CCIv = CCI(CCIP);
if CC[Period] > 0 Then
{
a1 = 0;
a2 = 0;
for cnt = 0 to Period-1
{
a1 = a1 + CC[cnt];
a2 = a2 + CC[cnt+1];
}
wmav = a1/Period;
wmav1 = a2/Period;
}
mav = ma(C,P);
if HH[CCIP] > 0 and LL[CCIP] > 0 and
CC[Period] > 0 and
CCIv > 0 and
wCCIv > 0 and
wmav > wmav1 and
C < mav Then
buy();
즐거운 하루되세요
> 이형지 님이 쓴 글입니다.
> 제목 : 신규 진입 수식 부탁합니다.
> 해당 조건을 모두 만족할때 신규 진입 뜨는 수식 부탁해요..
일봉 차트 - 국내 주식
CCI 일봉 > 0 &&
CCI 주봉 > 0 &&
주봉 20일 이동평균 라인이 우상향 &&
일봉이 5일이동평균(일봉)보다 아래 있을 때
이전글