//移動均線

主趨勢線:=EMA(EMA(C,10),10);//EMA10

拐頭:=主趨勢線>REF(主趨勢線,1);

DRAWCOLORLINE(拐頭 ,主趨勢線,COLORRED,COLORGREEN),LINETHICK1;

//SAR

STEP1:=2/100;

MVALUE1:=20/100;

SARLINE:=SAR(4,STEP1,MVALUE1),CIRCLEDOT,COLORRED;

SARLINE1:=-SAR(4,STEP1,MVALUE1),CIRCLEDOT,COLORGREEN;

JC:=SUMBARS(CROSS(SARLINE>0,0.5),1);//金叉

SC:=SUMBARS(CROSS(SARLINE<0,0.5),1);//死叉

//空損

REF( HHV(H,3),SC,1) )

短多:=JC=3 && SARLINE>0 ;

短空:=SC=3 && SARLINE<0 ;

//DRAWICON(JC=3 && SARLINE>0 ,REF( LLV(L,3),JC ) ,'ICO4');//短多上箭頭

//DRAWICON(SC=3 && SARLINE<0 ,REF( HHV(H,3),SC ),'ICO5');//短空下箭頭

AA:=EMA(C,5) > EMA(C,20);

BB:=EMA(C,5) < EMA(C,20);

5上20:=SUMBARS(AA AND AA <> REF (AA,1),1);

5下20:=SUMBARS(BB AND BB <> REF (BB,1),1);

DRAWTEXT(5下20 < 5上20 && CROSS(SARLINE<0,0.5) && L<REF(SARLINE,1) && C<O, REF( HHV(H,3),SC ) ,'▼'),FONTSIZE30,COLORLIGHTGREEN;//加空

PLAYSOUND(5下20 < 5上20 && CROSS(SARLINE<0,0.5) && L<REF(SARLINE,1) && C<O, 'A'); //當條件滿足時，播放聲音'純堿15分鐘空'

DRAWTEXT(5上20 < 5下20 && CROSS(SARLINE>0,0.5) && H>REF(ABS(SARLINE),1) && C>=O, REF( LLV(L,3),JC ) ,'▲'),FONTSIZE30,COLORMAGENTA;//加多

PLAYSOUND(5上20 < 5下20 && CROSS(SARLINE>0,0.5) && H>REF(ABS(SARLINE),1) && C>=O, 'B'); //當條件滿足時，播放聲音'純堿15分鐘多'

日開:REF(O,DAYBARPOS-0.5),NODRAW;//日線開盤價

DRAWSHIFTNUMBER(ISLASTBAR ,日開,日開,2,COLORYELLOW,0,10),ALIGN0,FONTSIZE20,VALIGN0;

KTEXT(ISLASTBAR,-10,日開,0,COLORYELLOW,'日:'),FONTSIZE20,VALIGN0;

周開:REF(O,SUMBARS(WEEKDAY<REF(WEEKDAY,1),1)-0.5),NODRAW;

DRAWSHIFTNUMBER(ISLASTBAR ,周開,周開,2,COLORYELLOW,0,10),ALIGN0,FONTSIZE20,VALIGN2;//

KTEXT(ISLASTBAR ,-10,周開,0,COLORYELLOW,'周:'),FONTSIZE20,VALIGN2;

月開:REF(O,SUMBARS(MONTH<>REF(MONTH,1),1)-0.5),NODRAW;

DRAWSHIFTNUMBER(ISLASTBAR ,月開,月開,2,COLORMAGENTA,0,10),ALIGN0,FONTSIZE20,VALIGN2;//

KTEXT(ISLASTBAR ,-10,月開,0,COLORMAGENTA,'月:'),FONTSIZE20,VALIGN2;