通达信色彩峰未加密选股指标公式源码

源码正文：

VARA:=ema(REF(CLOSE,1),4);
色彩峰:=(SMA(maX(CLOSE-VARA,0),6,1)/SMA(Abs(CLOSE-VARA),6,1)*100);
stICKLINE(色彩峰,0,150,5,0),COLOR8BA4FF{XG51};
STICKLINE(色彩峰,0,-100,5,0),COLOR8BA433{XG51};
STICKLINE(色彩峰>0,0,色彩峰,5,0),COLOR66FF00{XG51};
AA:=100*EMA((100*(HIGH-REF(LOW,1))/REF(LOW,1)-2.618),2){XG51};
VARA1:=vol/CAPITAL/100< 0.015{XG51};
VARA2:=C/REF(C,1)> 1.05 AND C>O;
VARA3:=CLOSE<=1.47*LLV(CLOSE,58) AND CLOSE<=15;
VARA4:=(-100)*(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3)){XG51};
VARZ:=IF(VARA1 AND VARA2 AND VARA4<40,1,0){XG51};
PF1 :=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RSV:=SMA(PF1,9,1){XG51};
difF := EMA(CLOSE,12) - EMA(CLOSE,26){XG51};
DEA :=EMA(DIFF,9){XG51};
macd :=2000* (2*(DIFF-DEA))/EMA(C,30),LINETHICK0{XG51};
FASTK1:=SMA(RSV,3,1){XG51};
K1:=SMA(FASTK1,2,1), COLORBLUE{XG51};
D1:=SMA(K1,5,1),COLORB56C00{XG51};
T3:=(K1-D1)>REF((K1-D1),5){XG51};
STICKLINE(MacD>=0,0,MACD,4,0),COLOR666666{XG51};
STICKLINE(MACD>=0 AND MACD>REF(MACD,1),0,MACD,3,0),COLOREAEAEA{XG51};
STICKLINE(MACD<0,0,0.3*MACD,0.1,0),COLOR9A9A9A{XG51};
STICKLINE(MACD<0 AND MACD>REF(MACD,1),0,0.3*MACD,0.1,0),COLOR666666{XG51};
RSV2:= (CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100{XG51};
FASTK:=SMA(RSV2,3,1){XG51};
K:=SMA(FASTK,2,1), COLORBLUE{XG51};
D:=SMA(K,5,1),COLORB56C00{XG51};
STICKLINE(K1>=D1,D1,K1,2,0),COLORLIMAGENTA{XG51};
STICKLINE(K1<D1,D1,K1,2,0),COLORB56C00{XG51};
STICKLINE(K>=D,D,K,1,0),COLORLIMAGENTA{XG51};
STICKLINE(K<D,D,K,1,0),COLORB56C00{XG51};
DRAWTEXT(色彩峰<3.5,-50,'ャ'),COLORDBDBDB{XG51};
DRAWTEXT(色彩峰<3.5,-50,'︼'),COLOR688EC1{XG51};
DRAWTEXT(CROSS(色彩峰,90),98,'ヲ'),COLORDBDBDB{XG51};
DRAWTEXT(FILTER(MACD<0 AND MACD>REF(MACD,1) AND 色彩峰<20,5) AND T3,-1,'Ψ'), COLORGRAY{X-G?5^1-C-N-{};

源码正文：

阳涨幅:=5{XG51};
阳倍量:=2{XG51};
单阳:=C>O*(1+阳涨幅/100) AND vol>REF(VOL,1)*阳倍量{XG51};
DRAWTEXT(CURRBARSCOUNT<100 AND 单阳,L*0.98,'阳'),COLOR00BBBB{XG51};
stICKLINE(CURRBARSCOUNT<100 AND 单阳,O,C,0.8,0),COLOR00FFFF{XG51};
高不破价:=REF(C,BArslAST(单阳)){XG51};
中不破价:=REF((C+L)/2,BARSLAST(单阳)){XG51};
低不破价:=REF(L,BARSLAST(单阳)){XG51};
单阳不破:=CURRBARSCOUNT<100 AND BARSLAST(单阳)<11 AND
(LLV(C,BARSLAST(单阳))>低不破价 OR LLV(C,BARSLAST(单阳))=低不破价){XG51};
STICKLINE(单阳不破,低不破价-低不破价*0.002,
低不破价-低不破价*0.002,4.1,0),COLORWHITE{XG51};
量:V,NODRAW{XG51};
单阳量:REF(V,BARSLAST(单阳)),NODRAW{XG51};
单阳后均量:SUM(V,BARSLAST(单阳)-1)/(BARSLAST(单阳)-1),NODRAW{XG51};
单阳后缩量:单阳后均量<单阳量*0.75,NODRAW{XG51};
单阳线体:=REF(C-O,BARSLAST(单阳)),NODRAW{XG51};
小线体:=Abs(C-O)<单阳线体/2.5,NODRAW{XG51};
小线体严:COUNT(小线体,BARSLAST(单阳)-1)>BARSLAST(单阳)-2,NODRAW{XG51};
小线体松:COUNT(小线体,BARSLAST(单阳)-1)>BARSLAST(单阳)-3 AND C<REF(C,1)*1.03,NODRAW{XG51};
两天:=LLV(C,BARSLAST(单阳))>低不破价 OR LLV(C,BARSLAST(单阳))=低不破价{XG51};
一般:=LLV(C,BARSLAST(单阳)-2)>低不破价 OR LLV(C,BARSLAST(单阳)-2)=低不破价{XG51};
一般选股:STICKLINE(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 一般,低不破价,低不破价,2,0),COLOR88FF00{XG51};
较强:=LLV(C,BARSLAST(单阳)-2)>中不破价 OR LLV(C,BARSLAST(单阳)-2)=中不破价{XG51};
较强选股:STICKLINE(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 较强,中不破价,中不破价,2,0),COLOR0088FF{XG51};
最强:=LLV(C,BARSLAST(单阳)-2)>高不破价 OR LLV(C,BARSLAST(单阳)-2)=高不破价{XG51};
最强选股:STICKLINE(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 最强,高不破价,高不破价,2,0),COLOR00FFFF{XG51};
DRAWTEXT(BARSLAST(单阳)=1 AND 单阳不破,低不破价-低不破价*0.02,'1'),COLOR00BB00{XG51};
DRAWTEXT(BARSLAST(单阳)=2 AND 单阳不破,低不破价-低不破价*0.02,'2'),COLOR00BB00{XG51};
DRAWTEXT(BARSLAST(单阳)=3 AND 单阳不破,低不破价-低不破价*0.02,'3'),COLOR00BB00{XG51};
DRAWTEXT(BARSLAST(单阳)=4 AND 单阳不破,低不破价-低不破价*0.02,'4'),COLOR00BB00{XG51};
DRAWTEXT(BARSLAST(单阳)=5 AND 单阳不破,低不破价-低不破价*0.02,'5'),COLOR00BB00{XG51};
DRAWTEXT(BARSLAST(单阳)=6 AND 单阳不破,低不破价-低不破价*0.02,'6'),COLOR00BB00{XG51};
DRAWTEXT(BARSLAST(单阳)=7 AND 单阳不破,低不破价-低不破价*0.02,'7'),COLOR00BB00{XG51};
DRAWTEXT(BARSLAST(单阳)=8 AND 单阳不破,低不破价-低不破价*0.02,'8'),COLOR00BB00{XG51};
DRAWTEXT(BARSLAST(单阳)=9 AND 单阳不破,低不破价-低不破价*0.02,'9'),COLOR00BB00{XG51};
DRAWTEXT(BARSLAST(单阳)=10 AND 单阳不破,低不破价-低不破价*0.02,'10'),COLOR00BB00{XG51};
工作线:ema(C,14),COLOR00FFFF,LINETHICK1{XG51};
二号线:Ema(C,25),COLORFF8800,LINETHICK1{X-G+5_1-C-N-{};