커뮤니티
지표식 부탁드립니다.
2012-05-14 18:51:22
398
글번호 50996
아래식을 분봉에서 주봉 데이터로 볼 수 있게 요청드립니다.
감사합니다.
INPUTS: LENGTH1(26),SigP1(10);
VARS: TEMA1(0),Signal1(0), 기준선(0), 테마기준선(0);
TEMA1 = (3 * Ema(c,LENGTH1)) - (3 * Ema(Ema(c,LENGTH1),LENGTH1)) +
(Ema(Ema(Ema(c,LENGTH1),LENGTH1),LENGTH1));
Signal1 = ema(TEMA1,SigP1);
기준선 = (highest(H,LENGTH1)+lowest(L,LENGTH1))/2;
테마기준선 = (highest(TEMA1,LENGTH1)+lowest(TEMA1,LENGTH1))/2;
PLOT1(TEMA1,"TEMA1");
PLOT2(Signal1,"Signal1");
PLOT3(기준선,"기준선");
PLOT4(테마기준선,"테마기준선");
답변 1
예스스탁 예스스탁 답변
2012-05-14 20:00:34
안녕하세요
예스스탁입니다.
실시간 차트가 최대 5000개봉까지만 제공되므로
분봉의 주기에 따라 주봉으로는 몇주되지 않습니다.
지수이평을 사용하는 계산식은 차트의 봉갯수에 영향을 받으므로
보통 분봉에서 주봉과 관련된 작성된 수식과 실제 주봉차트에서 적용한
수치사이에 가격차가 발생할 수 있습니다.
또한 N주간 특정값의 최고가최저가를 이용한 수식도
사용하시는 차트에서 수식에서 필요한 주봉수가 되지 않으면 0값으로 출력됩니다.
해당 내용 감안하고 보셔야 합니다.
Input : LENGTH1(26),SigP1(10);
Var : Ep(0), WINDEX(0),JISU1(0),JISU2(0),JISU3(0),WTEMA(0),SigEp(0),cnt(0);
var : PreJISU1(0),PreJISU2(0),PreJISU3(0),WTEMASig(0),PreWTEMASig(0);
var : HHH(0),LLL(0),기준선(0),HHHH(0),LLLL(0),테마기준선(0);
Array : HH[51](0),LL[51](0),TT[51](0);
var1 = DayOfWeek(sdate);
Ep = 2/(LENGTH1+1);
SigEp = 2/(SigP1+1);
if (var1 < var1[1]) then{
WINDEX = WINDEX + 1;
PreJISU1 = JISU1[1];
PreJISU2 = JISU2[1];
PreJISU3 = JISU3[1];
PreWTEMASig = WTEMASig[1];
HH[0] = H;
LL[0] = L;
for cnt = 1 to 50{
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
TT[cnt] = TT[cnt-1][1];
}
}
if WINDEX <= 1 then
JISU1 = C;
else
JISU1 = C * EP + PreJISU1 * (1-EP);
if WINDEX <= 2 then
JISU2 = JISU1;
else
JISU2 = JISU1 * EP + PreJISU2 * (1-EP);
if WINDEX <= 3 then
JISU3 = JISU2;
else
JISU3 = JISU2 * EP + PreJISU3 * (1-EP);
if WINDEX >= 3 then
WTEMA = (3 * JISU1) - (3 * JISU2) + (JISU3);
if WINDEX >= 5 then
WTEMASig = WTEMA * SigEp + PreWTEMASig * (1-SigEp);
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
TT[0] = WTEMA;
if HH[LENGTH1] > 0 Then{
HHH = HH[0];
LLL = LL[0];
for cnt = 0 to LENGTH1-1{
if HH[cnt] > HHH Then
HHH = HH[cnt];
if LL[cnt] < LLL Then
LLL = LL[cnt];
}
기준선 = (HHH+LLL)/2;
}
if TT[LENGTH1] > 0 Then{
HHHH = TT[0];
LLLL = TT[0];
for cnt = 0 to LENGTH1-1{
if TT[cnt] > HHHH Then
HHHH = TT[cnt];
if TT[cnt] < LLLL Then
LLLL = TT[cnt];
}
테마기준선 = (HHHH+LLLL)/2;
}
PLOT1(WTEMA,"WTEMA");
PLOT2(WTEMASig,"WTEMASig");
PLOT3(기준선,"기준선");
PLOT4(테마기준선,"테마기준선");
즐거운 하루되세요
> 엠제이 님이 쓴 글입니다.
> 제목 : 지표식 부탁드립니다.
> 아래식을 분봉에서 주봉 데이터로 볼 수 있게 요청드립니다.
감사합니다.
INPUTS: LENGTH1(26),SigP1(10);
VARS: TEMA1(0),Signal1(0), 기준선(0), 테마기준선(0);
TEMA1 = (3 * Ema(c,LENGTH1)) - (3 * Ema(Ema(c,LENGTH1),LENGTH1)) +
(Ema(Ema(Ema(c,LENGTH1),LENGTH1),LENGTH1));
Signal1 = ema(TEMA1,SigP1);
기준선 = (highest(H,LENGTH1)+lowest(L,LENGTH1))/2;
테마기준선 = (highest(TEMA1,LENGTH1)+lowest(TEMA1,LENGTH1))/2;
PLOT1(TEMA1,"TEMA1");
PLOT2(Signal1,"Signal1");
PLOT3(기준선,"기준선");
PLOT4(테마기준선,"테마기준선");
다음글
이전글