?{粉漲停綠跌停立體量柱圖}

 A:=VOL>=2*REF(VOL,1);

STICKLINE(A,MIN(C,O),MAX(C,O),2.5,0),COLOR00DDDD;

 漲停:=(C-REF(C,1))/REF(C,1)*100>9.92;

STICKLINE(漲停,C,O,3,0),COLORFF77FF;

STICKLINE(漲停,C,O,2,0),COLORFF44FF;

STICKLINE(漲停,C,O,1,0),COLORMAGENTA;

跌停:=(C-REF(C,1))/REF(C,1)*100<-9.92;

STICKLINE(跌停,C,O,3,0),COLOR008800;

STICKLINE(跌停,C,O,2,0),COLOR00BB00;

STICKLINE(跌停,C,O,1,0),COLOR00FF00;

MA5:MA(C,5)LINETHICK3,COLOR00CCFF;

{虛擬漲停K}

KXZT:=IF(CURRBARSCOUNT=1 AND PERIOD=5 AND NOT(C>1500 OR DYNAINFO(7)=0) AND C>=O,REF(CLOSE,1)*1.1,DRAWNULL),NODRAW;

STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,KXZT,MAX(OPEN,CLOSE),-1,-1),COLOR00C0C0;

{虛擬跌停K}

KXDT:=IF(CURRBARSCOUNT=1 AND PERIOD=5 AND NOT(C>1500) AND C<O,REF(CLOSE,1)*0.9,DRAWNULL),NODRAW;

STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,KXDT,MIN(OPEN,CLOSE),-1,-1),COLORLIBLUE;

MA10:=MA(C,10);

MA20:=MA(C,20);

MA30:=MA(C,30);

五日乖離率:=(C-MA5)/MA5*100;

BB5:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;

速度5:=SMA(EMA((MA5-REF(MA5,1))/REF(MA5,1),3)*100,3,1);

加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;

IF(BB5>30 AND MA5>REF(MA5,1), MA5,DRAWNULL),LINETHICK3,COLORRED;

BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416;

IF(BB5<0 AND MA5<REF(MA5,1), MA5,DRAWNULL),LINETHICK3,COLORGREEN;

三拾日乖離率:=(C-MA30)/MA30*100,NODRAW;

VAR1:=(MA20-MA30)>REF((MA20-MA30),1) AND MA20>REF(MA20,1) AND MA30>REF(MA30,1);

VAR2:=(MA30-MA20)<REF((MA30-MA20),1) AND MA20<REF(MA20,1) AND MA30<REF(MA30,1);

BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416;

強勢狙擊:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB5,60),10);

加倉:=FILTER(COUNT(CROSS(BB5,30),5)>=1 AND MA5>REF(MA5,1) AND 三拾日乖離率>REF(三拾日乖離率,1) AND MA10>REF(MA10,1)

AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1),10);

清倉:=FILTER(COUNT(CROSS(30,BB5),5)>=1 AND (C>MA30 OR O>MA30) AND MA5<REF(MA5,1)  AND 三拾日乖離率<REF(三拾日乖離率,1) AND MA10<REF(MA10,1),10);

DRAWTEXT(加倉 ,LOW*0.98,'加倉'),COLORYELLOW;

JC:=CROSS(0,五日乖離率) AND 三拾日乖離率<REF(三拾日乖離率,1) AND MA10>REF(MA10,1) ;

減倉:=FILTER(JC,10);

MR:=COUNT(CROSS(五日乖離率,0),3)>=1 AND 三拾日乖離率>REF(三拾日乖離率,1) AND MA5>REF(MA5,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<MA30;

買入:=FILTER(MR,10);

DRAWTEXT(減倉,HIGH*1.01,'險'),COLORCYAN;

DRAWTEXT(買入,LOW*0.99,'★買入'),COLORYELLOW;

DRAWTEXT(清倉 ,HIGH*1.02,'清倉'),COLORGREEN;

DRAWTEXT(強勢狙擊,LOW*0.98,'狙擊'),COLORWHITE;

VAR21:=MAX(ABS(HIGH-AMOUNT/VOL/100),ABS(AMOUNT/VOL/100-LOW));

VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100);

MV:=(VAR21+VAR3)/AMOUNT*VOL*100*50;

壓力:MA(REF(HHV(C,30),1),2),COLORABFF46;

支撐:MA(REF(LLV(C,30),1),2),COLOR9DFFFF;

DRAWTEXT_FIX(1,0.06,0.10,0,HYBLOCK),COLOR0080FF;

DRAWTEXT_FIX(1,0.13,0.10,0,DYBLOCK),COLOR0080FF;

DRAWTEXT_FIX(1,0.20,0.10,0,GNBLOCK),COLOR0080FF;

DRAWTEXT_FIX(1,0.22,0.15,0,'市值:'),COLORYELLOW;

DRAWNUMBER_FIX(1,0.26,0.15,0,FINANCE(40)/100000000),COLOR0080FF;

DRAWTEXT_FIX  (1,0.31,0.15,0,'公積金(股):'),COLORYELLOW;

DRAWNUMBER_FIX(1,0.38,0.15,0,FINANCE(18)),COLOR0080FF;

DRAWTEXT_FIX  (1,0.43,0.15,0,'收益:'),COLORYELLOW;

DRAWNUMBER_FIX(1,0.47,0.15,0,FINANCE(33)),COLOR0080FF;

{起爆點}

A1A:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*1,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*1,5,1),COLOR330066;

A5A:=(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))*1;

DRAWTEXT(CROSS(A1A,EMA(A1A,5))AND EMA(A1A,5)<A5A,L*0.98,'起爆'),COLOR005FFF;

AA:DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.978,'★底') ,LINETHICK2,COLORMAGENTA;

DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.02,'◆拋'),COLORFF3030;