커뮤니티
수식문의드립니다.
2017-05-10 22:51:36
127
글번호 109446
1. 주차트 300틱 차트에 참조데이타(Data2)를 쓰지않고 아래수식 30분봉의 그물[1]~그물[11] 값을 나타내고 싶습니다.
/////////////////////////////////////////////////////////////////
input : 주기(3);
var : 그물_기본가(0);
array : 그물[11](0);
그물_기본가 = (3 * Ema(C,9*주기)) - (3 * Ema(Ema(C,9*주기),9*주기)) +
(Ema(Ema(Ema(C,9*주기),9*주기),9*주기));
그물[1] = ema(그물_기본가,(3 + 2*1) * 주기);
그물[2] = ema(그물_기본가,(3 + 2*2) * 주기);
그물[3] = ema(그물_기본가,(3 + 2*3) * 주기);
그물[4] = ema(그물_기본가,(3 + 2*4) * 주기);
그물[5] = ema(그물_기본가,(3 + 2*5) * 주기);
그물[6] = ema(그물_기본가,(3 + 2*6) * 주기);
그물[7] = ema(그물_기본가,(3 + 2*7) * 주기);
그물[8] = ema(그물_기본가,(3 + 2*8) * 주기);
그물[9] = ema(그물_기본가,(3 + 2*9) * 주기);
그물[10] = ema(그물_기본가,(3 + 2*10) * 주기);
그물[11] = ema(그물_기본가,(3 + 2*11) * 주기);
//////////////////////////////////////////////////////////////////////////
2. 주차트 300틱 차트에 참조데이타(Data2)를 쓰지않고 30분봉의 시가,종가, 고가, 저가를 알고 십습니다.
//////////////////////////////////////////////////////////////////////////
항상 고맙습니다.
답변 1
예스스탁 예스스탁 답변
2017-05-11 11:24:03
안녕하세요
예스스탁입니다.
1
input : 주기(3);
Input : 분봉(30);
Var : Ep(0), DINDEX(0),Tf(0);
var : JISU1(0),JISU2(0),JISU3(0),PreJISU1(0),PreJISU2(0),PreJISU3(0);
var : 그물_기본가(0),ep1(0),ep2(0),ep3(0),ep4(0),ep5(0),ep6(0),ep7(0),ep8(0),ep9(0),ep10(0),ep11(0);
array : 그물[11](0),그물1[11](0);
TF = TimeToMinutes(stime)%분봉;
Ep = 2/((9*주기)+1);
if Bdate != Bdate[1] or (TF < TF[1] and Bdate == Bdate[1]) then{
DINDEX = DINDEX + 1;
PreJISU1 = JISU1[1];
PreJISU2 = JISU2[1];
PreJISU3 = JISU3[1];
그물1[1] = 그물[1][1];
그물1[2] = 그물[2][1];
그물1[3] = 그물[3][1];
그물1[4] = 그물[4][1];
그물1[5] = 그물[5][1];
그물1[6] = 그물[6][1];
그물1[7] = 그물[7][1];
그물1[8] = 그물[8][1];
그물1[9] = 그물[9][1];
그물1[10] = 그물[10][1];
그물1[11] = 그물[11][1];
}
if DINDEX <= 1 then{
JISU1 = C;
JISU2 = JISU1;
JISU3 = JISU2;
}
else{
JISU1 = C * EP + PreJISU1 * (1-EP);
JISU2 = JISU1 * EP + PreJISU2 * (1-EP);
JISU3 = JISU2 * EP + PreJISU3 * (1-EP);
}
그물_기본가 = (3 * JISU1) - (3 * JISU2) + (JISU3);
ep1 = 2/(((3 + 2*1) * 주기)+1);
ep2 = 2/(((3 + 2*2) * 주기)+1);
ep3 = 2/(((3 + 2*3) * 주기)+1);
ep4 = 2/(((3 + 2*4) * 주기)+1);
ep5 = 2/(((3 + 2*5) * 주기)+1);
ep6 = 2/(((3 + 2*6) * 주기)+1);
ep7 = 2/(((3 + 2*7) * 주기)+1);
ep8 = 2/(((3 + 2*8) * 주기)+1);
ep9 = 2/(((3 + 2*9) * 주기)+1);
ep10 = 2/(((3 + 2*10) * 주기)+1);
ep11 = 2/(((3 + 2*11) * 주기)+1);
그물[1] = 그물_기본가 * ep1 + 그물1[1] * (1-ep1);
그물[2] = 그물_기본가 * ep2 + 그물1[2] * (1-ep2);
그물[3] = 그물_기본가 * ep3 + 그물1[3] * (1-ep3);
그물[4] = 그물_기본가 * ep4 + 그물1[4] * (1-ep4);
그물[5] = 그물_기본가 * ep5 + 그물1[5] * (1-ep5);
그물[6] = 그물_기본가 * ep6 + 그물1[6] * (1-ep6);
그물[7] = 그물_기본가 * ep7 + 그물1[7] * (1-ep7);
그물[8] = 그물_기본가 * ep8 + 그물1[8] * (1-ep8);
그물[9] = 그물_기본가 * ep9 + 그물1[9] * (1-ep9);
그물[10] = 그물_기본가 * ep10 + 그물1[10] * (1-ep10);
그물[11] = 그물_기본가 * ep11 + 그물1[11] * (1-ep11);
2
Input : 분봉(30);
Var : cnt(0),TF(0);
array : OO[20](0),HH[20](0),LL[20](0),CC[20](0);
TF = TimeToMinutes(stime)%분봉;
if Bdate != Bdate[1] or (TF < TF[1] and Bdate == Bdate[1]) then{
OO[0] = O;
HH[0] = H;
LL[0] = L;
for cnt = 1 to 19{
OO[cnt] = OO[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
CC[0] = C;
즐거운 하루되세요
> 까시서방 님이 쓴 글입니다.
> 제목 : 수식문의드립니다.
> 1. 주차트 300틱 차트에 참조데이타(Data2)를 쓰지않고 아래수식 30분봉의 그물[1]~그물[11] 값을 나타내고 싶습니다.
/////////////////////////////////////////////////////////////////
input : 주기(3);
var : 그물_기본가(0);
array : 그물[11](0);
그물_기본가 = (3 * Ema(C,9*주기)) - (3 * Ema(Ema(C,9*주기),9*주기)) +
(Ema(Ema(Ema(C,9*주기),9*주기),9*주기));
그물[1] = ema(그물_기본가,(3 + 2*1) * 주기);
그물[2] = ema(그물_기본가,(3 + 2*2) * 주기);
그물[3] = ema(그물_기본가,(3 + 2*3) * 주기);
그물[4] = ema(그물_기본가,(3 + 2*4) * 주기);
그물[5] = ema(그물_기본가,(3 + 2*5) * 주기);
그물[6] = ema(그물_기본가,(3 + 2*6) * 주기);
그물[7] = ema(그물_기본가,(3 + 2*7) * 주기);
그물[8] = ema(그물_기본가,(3 + 2*8) * 주기);
그물[9] = ema(그물_기본가,(3 + 2*9) * 주기);
그물[10] = ema(그물_기본가,(3 + 2*10) * 주기);
그물[11] = ema(그물_기본가,(3 + 2*11) * 주기);
//////////////////////////////////////////////////////////////////////////
2. 주차트 300틱 차트에 참조데이타(Data2)를 쓰지않고 30분봉의 시가,종가, 고가, 저가를 알고 십습니다.
//////////////////////////////////////////////////////////////////////////
항상 고맙습니다.
다음글
이전글