公式一 三角

{設置參數N 0  200  30}
A1:=MA(C,5);
A2:=LLV(A1,N);
高:=A1-A2;
底長:=N*0.825;
S三角:底長*高/2,COLORWHITE,LINETHICK3;
MS1:=MA(S三角,10);
DRAWBAND(S三角,120,MS1,RGB(36,136,36));
DRAWBAND(S三角,120,2,RGB(36,136,36));
MS5:MA(S三角,5)COLORYELLOW;
MS10:MA(S三角,10)COLORMAGENTA;
A0:=MA(C,1);
A02:=LLV(A1,N);
高1:=A0-A02;
底長1:=N*0.825;
S三角1:=底長1*高1/2,COLORWHITE,LINETHICK1;
STICKLINE(C>=REF(C,1),REF(S三角1,1),S三角1,2,1),COLORRED;
STICKLINE(C<REF(C,1),REF(S三角1,1),S三角1,2,1),COLORCYAN;

公式二 股圣

DIFF:=EMA(CLOSE,N)-EMA(CLOSE,M);
DEA:=EMA(DIFF,9);
MA(C,8),COLORWHITE;
MA(C,21),COLORYELLOW;
多頭:STICKLINE(DIFF>DEA,C,O,3,-1),COLORRED;
STICKLINE(DIFF>DEA,H,L,0,0),COLORWHITE;
空頭:STICKLINE(DIFF<=DEA,C,O,3,0),COLORWHITE;
STICKLINE(DIFF<=DEA,H,L,0,0),COLORWHITE;
DRAWTEXT(CROSS(DIFF,DEA),L*0.98,'買'),COLORYELLOW;                           
DRAWTEXT(CROSS(DEA,DIFF),H*1.02,'賣'),COLORGREEN;
DIFF1:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA1:=EMA(DIFF1,9);
MA(C,8),COLORWHITE;
MA(C,21),COLORYELLOW;
多頭1:STICKLINE(DIFF1>DEA1,C,O,3,0),COLORRED;
STICKLINE(DIFF>DEA1,H,L,0,0),COLORRED;
空頭1:STICKLINE(DIFF1<=DEA1,C,O,3,0),COLORBLUE;
STICKLINE(DIFF1<=DEA1,H,L,0,0),COLORBLUE;
DRAWTEXT(CROSS(DIFF1,DEA1),L*0.98,'買'),COLORWHITE;
DRAWTEXT(CROSS(DEA1,DIFF1),H*1.02,'賣'),COLORGREEN;

謝謝老師