커뮤니티
부탁드립니다.
2017-12-11 16:46:43
144
글번호 114896
수식 부탁드립니다.
아래수식을 갭보정으로 부탁드립니다.
-----------------------------------------
INPUT : TPA(8), HAA(8), TAL(4)
VAR : TCHAN(0), BCHAN(0);
VAR : haclose(0), haopen(0), hahigh(0), halow(0),hae(0),tpae(0),trendae(0),typ(0),h4(0),tv(0);
if Accum(1) > 1 then {typ=(H+L+C)/3;
haclose=(Open + HIGH + LOW +CLOSE ) / 4 ;
haopen = (haopen[1] + haclose[1]) / 2;
hahigh=Max(H,haopen,haclose);
halow=Min(L,haopen, haclose);
H4=(haclose+haopen+hahigh+halow)/4;
hae = MA(h4, HAA) ;
tpae= MA(typ, TPA);
trendae=MA(C,TAL);
tv=IFF(tpae>hae and C>O AND C > trendae,1,
IFF(tpae<=hae and C<=O and C<=trendae,-1,tv[1]));
plot1(0,"0");
plot2(tv,"tv");
답변 1
예스스탁 예스스탁 답변
2017-12-12 11:29:20
안녕하세요
예스스탁입니다.
INPUT : TPA(8), HAA(8), TAL(4);
VAR : TCHAN(0), BCHAN(0);
VAR : haclose(0), haopen(0), hahigh(0), halow(0),hae(0),tpae(0),trendae(0),typ(0),h4(0),tv(0);
var : gap(0),sumgap(0),GO(0),GH(0),GL(0),GC(0),R(0),MI(0);
if bdate!=bdate[1] THen {
gap = Open-Close[1];
sumGap = sumGap+gap;
}
GO = O - sumGap;
GH = H - sumGap;
GL = L - sumGap;
GC = C - sumGap;
if Accum(1) > 1 then {
typ=(GH+GL+GC)/3;
haclose=(GO + GH + GL +GC ) / 4 ;
haopen = (haopen[1] + haclose[1]) / 2;
hahigh=Max(GH,haopen,haclose);
halow=Min(GL,haopen, haclose);
H4=(haclose+haopen+hahigh+halow)/4;
hae = MA(h4, HAA) ;
tpae= MA(typ, TPA);
trendae=MA(GC,TAL);
tv=IFF(tpae>hae and GC>GO AND GC > trendae,1,
IFF(tpae<=hae and GC<=GO and GC<=trendae,-1,tv[1]));
plot1(0,"0");
plot2(tv,"tv");
}
즐거운 하루되세요
> 비류천 님이 쓴 글입니다.
> 제목 : 부탁드립니다.
> 수식 부탁드립니다.
아래수식을 갭보정으로 부탁드립니다.
-----------------------------------------
INPUT : TPA(8), HAA(8), TAL(4)
VAR : TCHAN(0), BCHAN(0);
VAR : haclose(0), haopen(0), hahigh(0), halow(0),hae(0),tpae(0),trendae(0),typ(0),h4(0),tv(0);
if Accum(1) > 1 then {typ=(H+L+C)/3;
haclose=(Open + HIGH + LOW +CLOSE ) / 4 ;
haopen = (haopen[1] + haclose[1]) / 2;
hahigh=Max(H,haopen,haclose);
halow=Min(L,haopen, haclose);
H4=(haclose+haopen+hahigh+halow)/4;
hae = MA(h4, HAA) ;
tpae= MA(typ, TPA);
trendae=MA(C,TAL);
tv=IFF(tpae>hae and C>O AND C > trendae,1,
IFF(tpae<=hae and C<=O and C<=trendae,-1,tv[1]));
plot1(0,"0");
plot2(tv,"tv");
다음글
이전글