{MTM主圖疊加 (湊合,添加修改的),如果你要的是交叉點的K棒開收高低價就要自己再另外添加}
MTM: CLOSE-REF(CLOSE,6),linethick0,colorwhite;
MTMMA: MA(MTM,6),linethick0,coloryellow;
if SYSPARAM(2)=1 then gc:=2 else gc:=SYSPARAM(2);
gm:=SYSPARAM(3);kh:=SYSPARAM(4);kl:=SYSPARAM(5);
MTM_max:=MTM[gm];
MTM_min:=MTM[gm];
for i=gc to gm do begin
if MTM_max<MTM[i] then MTM_max:=MTM[i] else
if MTM_min>MTM[i] then MTM_min:=MTM[i];
end;
MTM_bl:=(kh-kl)/(MTM_max-MTM_min);
MTM_py:=kh-MTM_max*MTM_bl;
MTM1:=MTM*MTM_bl+MTM_py;
partline(MTM1<>0,MTM1),colorwhite;
MTMMA1:=MTMMA*MTM_bl+MTM_py;
partline(MTMMA1<>0,MTMMA1),coloryellow;
//STICKLINE(C>O OR C=O AND C>=REF(C, 1), H, L, 0.5, 1), COLORRED;
//STICKLINE(C<O OR C=O AND C<=REF(C, 1), H, L, 0.5, 1), COLORCYAN;
//STICKLINE(C>O OR C=O AND C>=REF(C, 1), C, O, 6, 1), COLORRED;
//STICKLINE(C<O OR C=O AND C<=REF(C, 1), C, O, 6, 0), COLORCYAN;
x11:=ref(MTM1,1);
x22:=ref(MTMMA1,1);
k1:=(x22-x11)/(MTM1-MTMMA1);
ppp:=cross(MTM1,MTMMA1) or cross(MTMMA1,MTM1);
交叉價:=ref((MTMMA1*k1+x22)/(1+k1),barslast(ppp))*ppp,linethick0,colorwhite;
drawicon(cross(MTM1,MTMMA1),交叉價,10);
drawicon(cross(MTMMA,MTM),交叉價,11);
x1:=ref(MTM,1);
x2:=ref(MTMMA,1);
k:=(x2-x1)/(MTM-MTMMA);
PP:=cross(MTM,MTMMA);
QQ:=cross(MTMMA,MTM);
金叉:ref((MTMMA*k+x2)/(1+k),barslast(cross(MTM,MTMMA)))*PP,linethick0,colorred;
死叉:ref((MTMMA*k+x2)/(1+k),barslast(cross(MTMMA,MTM)))*QQ,linethick0,colorgreen;
|