箱頂:=MA(REF(HHV(C,30),1),2),COLOR0000FF,LINETHICK2;
箱底:=MA(REF(LLV(C,30),1),2),COLOR00FF00,LINETHICK2;
{均線系統}
MA10:MA(C,10),COLORWHITE;
MA60:=MA(C,60),COLORYELLOW;
DRAWTEXT(CROSS(MA10,MA60),(LOW * 0.95),'註意'),COLORYELLOW;
多:=EMA(C,3),COLORYELLOW;
空:=EMA(C,5),COLOR00FF00;
均衡:=EMA(空,5),COLORWHITE;
VARF1:=COUNT(CROSS(多,均衡),2)=1;
VARF2:=COUNT(CROSS(空,均衡),2)=1;
ZAI:=FILTER(VARF1 AND VARF2,2);
DRAWTEXT(ZAI,均衡,'主升'),COLORFF00FF;
{中軌:HHV(MA(H,13),13),COLORRED,LINETHICK2;}
{趨勢123:LLV(MA(H,13),1),COLORGREEN,LINETHICK2;}
主升:=IF(ZAI,1,0),COLORWHITE;
{趨勢}
MA15:=EMA(CLOSE,21);
STICKLINE((MA15 > REF(MA15,1)),MA15,MA15,9,6),COLOR00FFFF;
STICKLINE((MA15 < REF(MA15,1)),MA15,MA15,9,6),COLORFF0000;
{K線}
FO:=OPEN;
FH:=HIGH;
FL:=LOW;
FC:=CLOSE;
KK:=IF(FC>=FO AND (FC>=REF(FC,1) OR REF(FC,1)>=REF(FO,1)),1,IF(FC<FO AND (FC<REF(FO,1) OR REF(FC,1)<REF(FO,1)),-1,0));
STICKLINE(FC>FO,FH,FL,0.4,0),COLORFF0000;
STICKLINE(KK=1 AND FC>=FO,FO,FC,8,0),COLORFF0000;
STICKLINE(KK=1 AND FC<FO,FO,FC,8,0),COLORFF0000;
STICKLINE(KK=0 AND FC>=FO,FO,FC,8,0),COLORFF0000;
STICKLINE(KK=0 AND FC<FO,FO,FC,8,0),COLORFF0000;
{趨勢向下K線染灰}
STICKLINE((MA15 < REF(MA15,1)),H,L,0.4,0),COLORGRAY;
STICKLINE((MA15 < REF(MA15,1)),C,O,8,0),COLORGRAY;
{K線塗粉關註}
STICKLINE(MA15 < REF(MA15,1) AND (FC>FO),FH,FL,0.4,0),COLORFF80FF;
STICKLINE(KK=1 AND FC>=FO AND MA15 < REF(MA15,1),FO,FC,8,0),COLORFF80FF;
STICKLINE(KK=1 AND FC<FO AND MA15 < REF(MA15,1),FH,FL,0.4,0),COLORFF80FF;
STICKLINE(KK=1 AND FC<FO AND MA15 < REF(MA15,1),FO,FC,8,0),COLORFF80FF;
STICKLINE(KK=0 AND FC>=FO AND MA15 < REF(MA15,1),FH,FL,0.4,0),COLORFF80FF;
STICKLINE(KK=0 AND FC>=FO AND MA15 < REF(MA15,1),FO,FC,8,0),COLORFF80FF;
STICKLINE(KK=0 AND FC<FO AND MA15 < REF(MA15,1),FH,FL,0.4,0),COLORFF80FF;
STICKLINE(KK=0 AND FC<FO AND MA15 < REF(MA15,1),FO,FC,8,0),COLORFF80FF;
主力持倉:=EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3);
{測試過了,看看落下了什麽沒有,如果滿意請采納}