?紅色開多，綠色開空，止盈止損不用寫

DIFF : =EMA(CLOSE,12) - EMA(CLOSE,26);

DEA? :=EMA(DIFF,9);

MACD:=2*(DIFF-DEA),COLORSTICK,LINETHICK2,NOTEXT;

EMA511:EMA(CLOSE,60);
DRAWCOLORLINE(C>=EMA511,EMA511,COLORRED,COLORGREEN),LINETHICK4;

MA60:MA(C,60),COLORBLACK;

DRAWCOLORKLINE(C>MA60&&DIFF>DEA,COLORRED,0),SOUND('A' );

DRAWCOLORKLINE(C<MA60&&DIFF<DEA,COLORGREEN,1),SOUND('A' );

DRAWCOLORKLINE(NOT(C<MA60&&DIFF<DEA||C>MA60&&DIFF>DEA),COLORGRAY,1);
QQ:=C;
A1:=REF(QQ,10)=HHV(QQ,2*10+1);
B1:=FILTER(A1,10);
C1:=BACKSET(B1,10+1);
HD:=FILTER(C1,10);
A2:=REF(QQ,10)=LLV(QQ,2*10+1);
B2:=FILTER(A2,10);
C2:=BACKSET(B2,10+1);
LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD));
B:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);

支撐:=REF(LOW,BARSLAST(LD)),COLORGREEN,POINTDOT,LINETHICK4;
壓力:=REF(HIGH,BARSLAST(HD)),COLORRED,POINTDOT,LINETHICK4;
DRAWNUMBER1(HD,HIGH,HIGH,0),COLORMAGENTA,ALIGN1,VALIGN2;
DRAWNUMBER1(LD,LOW,LOW,0),COLORRED,ALIGN1,VALIGN0;
DRAWSL(C>0,支撐,0,1,0,COLORGREEN),COLORGREEN,DASHDOTDOT;
DRAWSL(C>0,壓力,0,1,0,COLORRED),COLORRED,DASHDOTDOT;

?

?來源:程序化99