通达信单阳不破整合主图选股指标公式源码

通达信单阳不破整合主图选股指标公式源码

源码正文：

N:=1;S:=1{XG51};
DRAWTEXT_FIX(ISLAstBAR,0,0,0,'形态一旦有效成立，其调整时间不会超过8根k线，通常运行的第6根K线便进入启动期，行情随时会拉升而起。'),COLOR00C5FF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,'形态上升放量时介入,跌破前大阳线最低价坚决止损出局,最后的上升时间不能拖过第9根K线， '),COLORD6BA63{XG51};
阳涨幅:=4{XG51};
阳倍量:=1.5{XG51};
单阳:=C>O*(1+阳涨幅/100) AND vol>REF(VOL,1)*阳倍量{XG51};
DRAWTEXT(CURRBARSCOUNT<100 AND 单阳,L*0.98,'阳'),COLOR00FFFF{XG51};
高不破价:=REF(C,BArslAST(单阳)){XG51};
中不破价:=REF((C+L)/2,BARSLAST(单阳)){XG51};
低不破价:=REF(L,BARSLAST(单阳)){XG51};
单阳不破:=CURRBARSCOUNT<100 AND BARSLAST(单阳)<11 AND (LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价){XG51};
STICKLINE(单阳不破,低不破价-低不破价*0.003,低不破价,4,0),COLORWHITE{XG51};
DRAWTEXT(BARSLAST(单阳)=1 AND 单阳不破,低不破价*0.98,'1'),COLORCYAN{XG51};
DRAWTEXT(BARSLAST(单阳)=2 AND 单阳不破,低不破价*0.98,'2'),COLORCYAN{XG51};
DRAWTEXT(BARSLAST(单阳)=3 AND 单阳不破,低不破价*0.98,'3'),COLORCYAN{XG51};
DRAWTEXT(BARSLAST(单阳)=4 AND 单阳不破,低不破价*0.98,'4'),COLORCYAN{XG51};
DRAWTEXT(BARSLAST(单阳)=5 AND 单阳不破,低不破价*0.98,'5'),COLORCYAN{XG51};
DRAWTEXT(BARSLAST(单阳)=6 AND 单阳不破,低不破价*0.98,'6'),COLORCYAN{XG51};
DRAWTEXT(BARSLAST(单阳)=7 AND 单阳不破,低不破价*0.98,'7'),COLORCYAN{XG51};
DRAWTEXT(BARSLAST(单阳)=8 AND 单阳不破,低不破价*0.98,'8'),COLORCYAN{XG51};
DRAWTEXT(BARSLAST(单阳)=9 AND 单阳不破,低不破价*0.98,'9'),COLORCYAN{XG51};
DRAWTEXT(BARSLAST(单阳)=10 AND 单阳不破,低不破价*0.98,'10'),COLORCYAN{XG51};
两天:=LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价{XG51};
一般:=LLV(L,BARSLAST(单阳)-2)>低不破价 OR LLV(L,BARSLAST(单阳)-2)=低不破价{XG51};
一般选股:STICKLINE(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 一般,低不破价,低不破价,2,0),COLORRED{XG51};
较强:=LLV(L,BARSLAST(单阳)-2)>中不破价 OR LLV(L,BARSLAST(单阳)-2)=中不破价{XG51};
较强选股:STICKLINE(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 较强,中不破价,中不破价,2,0),COLORmaGENTA{XG51};
最强:=LLV(L,BARSLAST(单阳)-3)>高不破价 OR LLV(L,BARSLAST(单阳)-2)=高不破价{XG51};
最强选股:STICKLINE(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 最强,高不破价,高不破价,4,0),COLORBLUE{XG51};
现价:DRAWLINE(CURRBARSCOUNT=TOTALBARSCOUNT,CONST(C),CURRBARSCOUNT=1,C,3)DOTLINE{XG51};
VARR1:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
买盘:=IF(CLOSE>OPEN,VARR1*(HIGH-LOW),IF(CLOSE<OPEN,VARR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)){XG51};
成交量比:=买盘/VOL*100{XG51};
主力持仓:=ema(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3){XG51};
主力筹码集中度:=WINNER(C)*100{XG51};
散筹筹码集中度:=(WINNER(C*1.1)-WINNER(C*0.9))*100{XG51};
量筹买点:=主力筹码集中度>主力持仓 AND 主力持仓>散筹筹码集中度
AND 成交量比>89.9 AND FINANCE(7)<2500000000 AND DYNAINFO(7)>0{XG51};
DRAWTEXT(量筹买点,REF(CLOSE,1),'量筹'),COLOR000055;  
STICKLINE(量筹买点,CLOSE,O,2.8,0),COLOR000055;    
STICKLINE(量筹买点,CLOSE,O,2,0),COLOR000088;    
STICKLINE(量筹买点,CLOSE,O,1.5,0),COLOR0000AA;    
STICKLINE(量筹买点,CLOSE,O,1,0),COLOR0000CC;    
STICKLINE(量筹买点,CLOSE,O,0.5,0),COLOR0000EE;  
D7:="macd.dif#WEEK"-"MacD.DEA#WEEK"{XG51};
D8:="MACD.DIF#MONTH"-"MACD.DEA#MONTH"{XG51};
黑马抄底:=crOSS("kdj.J#WEEK"(9,3,3),0) AND D8>0 OR CROSS("kdJ.J#MONTH"(9,3,3),0) AND D7>0{XG51};
STICKLINE(黑马抄底,CLOSE,OPEN,3,0),COLORBLUE{XG51};
DRAWTEXT(黑马抄底,LOW-0.03,'黑马'),COLORLIMAGENTA{XG51};
STICKLINE(黑马抄底,CLOSE,OPEN,3.2,0),COLOR000099{XG51};
STICKLINE(黑马抄底,CLOSE,OPEN,2.6,0),COLOR0000AA{XG51};
STICKLINE(黑马抄底,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(黑马抄底,CLOSE,OPEN,1.8,0),COLOR0000DD{XG51};
STICKLINE(黑马抄底,CLOSE,OPEN,1.3,0),COLOR0000FF;
STICKLINE(黑马抄底,CLOSE,OPEN,0.5,0),COLORCC66FF{XG51};
FH11:=REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3) AND REF(MACD,3)<REF(MACD,4){XG51};
FH21:=MACD>=0 AND COUNT(MACD>REF(MACD,1),1)=1{XG51};
FH3:=EMA(C,30)>=REF(EMA(C,30),1) AND COUNT(EMA(C,5)>EMA(C,10) AND EMA(C,10)>EMA(C,30),1)=1{XG51};
FH4:=CROSS(C,EMA(C,30)) OR C>EMA(C,30){XG51};
FH5:=FH11 AND FH21 AND FH3 AND FH4{XG51};
FH6:=FH11 AND FH21 AND FH3 AND FH4 AND ABS((MACD.DIF-MACD.DEA)/C)<0.018{XG51};
FH7:=FH11 AND FH21 AND FH3 AND FH4 AND MACD<0.10{XG51};
腾:=FH5 OR FH6 OR FH7{XG51};
DRAWTEXT(腾,(LOW * 0.985),'腾'),COLOR00FFFF{XG51};
STICKLINE(腾,CLOSE,O,2.8,0),COLOR00FFFF;  
STICKLINE(腾,CLOSE,O,2,0),COLOR0077FF{XG51};
STICKLINE(腾,CLOSE,O,1.5,0),COLOR0099FF;
STICKLINE(腾,CLOSE,O,1,0),COLOR00AAFF{XG51};
STICKLINE(腾,CLOSE,O,0.5,0),COLOR00CCFF{XG51};
M月:=CROSS("MACD.DIF#MONTH","MACD.DEA#MONTH");DRAWTEXT(M月,LOW-0.04,'M月'),COLORLIMAGENTA{XG51};
K月:DRAWTEXT(CROSS("KDJ.K#MONTH"(9,3,3),"KDJ.D#MONTH"(9,3,3)) ,LOW-0.05,'K月'),COLORLIMAGENTA{XG51};
K周:DRAWTEXT(CROSS("KD.K#WEEK"(9,3,3),"KD.D#WEEK"(9,3,3)) ,LOW-0.08,'K周'),COLORWHITE{XG51};
M周:=CROSS("MACD.DIF#WEEK","MACD.DEA#WEEK");DRAWTEXT(M周,LOW-0.1,'M周'),COLORWHITE{XG51};
月叉:DRAWTEXT(CROSS("KDJ.D#MONTH"(9,3,3),"KDJ.K#MONTH"(9,3,3)) ,H+0.05,'K20'),COLORCYAN{XG51};
周叉:DRAWTEXT(CROSS("KDJ.D#WEEK"(9,3,3),"KDJ.K#WEEK"(9,3,3)) ,H+0.08,'K5'),COLORCYAN{XG51};
M5:=CROSS("MACD.DEA#WEEK","MACD.DIF#WEEK"){XG51};
DRAWTEXT(M5,H+0.10,'M5'),COLORCYAN{XG51};
M20:=CROSS("MACD.DEA#MONTH","MACD.DIF#MONTH"){XG51};
DRAWTEXT(M20,(H+0.15),'M20'),COLORCYAN{XG51};
STICKLINE(月叉 OR 周叉  OR M5 OR M20,HIGH,LOW,0.2,0),COLORCYAN{XG51};
STICKLINE(月叉 OR 周叉  OR M5 OR M20,OPEN,CLOSE,0.2, 0),COLORCYAN{XG51};
STICKLINE(M月 OR K月  OR K周 OR M周,OPEN,CLOSE,2.8,0),COLOR808080{XG51};
STICKLINE(M月 OR K月  OR K周 OR M周,OPEN,CLOSE,2.5,0),COLOR919890{XG51};
STICKLINE(M月 OR K月  OR K周 OR M周,OPEN,CLOSE,2.2,0),COLORB4B5AF{XG51};
STICKLINE(M月 OR K月  OR K周 OR M周,OPEN,CLOSE,1.7,0),COLORCCCCCC{XG51};
STICKLINE(M月 OR K月  OR K周 OR M周,OPEN,CLOSE,1.2,0),COLORDDDDDD{XG51};
STICKLINE(M月 OR K月  OR K周 OR M周,OPEN,CLOSE,0.8,0),COLOREEEEEE{XG51};
STICKLINE(M月 OR K月  OR K周 OR M周,OPEN,CLOSE,0.4,0),COLORF5F1F1{XG51};
STICKLINE(M月 OR K月  OR K周 OR M周,OPEN,CLOSE,0.1,0),COLORFFFAFA{XG51};
T0:=BARSCOUNT(CLOSE)>12{XG51};
T1:=CLOSE=LLV(CLOSE,12){XG51};
T2:=rsi.RSI1>LLV(RSI,12){XG51};
T3:=RSI.RSI1<21{XG51};
TRSI:=T0 AND T1 AND T2 AND T3 AND CLOSE/HHV(CLOSE,120)<0.7{XG51};
RSI成W底:=IF(REF(TRSI,1) AND CLOSE>REF(CLOSE,1),1,0){XG51};
DRAWTEXT(RSI成W底,(L*0.98),'W'),COLORMAGENTA{XG51};
STICKLINE(RSI成W底,OPEN,CLOSE,2,0),COLORMAGENTA;
wr:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)){XG51};
WR反向:=(0-WR)-100,COLORBLUE{XG51};
RSI买点:=RSI.RSI1<20 AND RSI.RSI1>REF(RSI.RSI1,1){XG51};
WR反向买点:=WR反向>-80 AND WR反向<REF(WR反向,1){XG51};
梁队长选股:=RSI买点 AND WR反向买点{XG51};
DRAWTEXT(梁队长选股,LOW-0.03,'梁')COLORWHITE{XG51};
STICKLINE(梁队长选股,OPEN,CLOSE,3,0)COLORWHITE;
STICKLINE(梁队长选股,HIGH,LOW,0,1),COLORBLUE,LINETHICK2{XG51};
STICKLINE(梁队长选股,OPEN,CLOSE,2.5,0),COLOR0033FF{XG51};
STICKLINE(梁队长选股,OPEN,CLOSE,2.1,0),COLOR00BEFF{XG51};
STICKLINE(梁队长选股,OPEN,CLOSE,1.7,0),COLOR13BCFF{XG51};
STICKLINE(梁队长选股,OPEN,CLOSE,1.3,0),COLOR13D1FF{XG51};
STICKLINE(梁队长选股,OPEN,CLOSE,0.9,0),COLOR00D6FF{XG51};
STICKLINE(梁队长选股,OPEN,CLOSE,0.4,0),COLOR13E5FF{XG51};
STICKLINE(梁队长选股,OPEN,CLOSE,0,0),COLOR00F6FC{XG51};
LC:=REF(CLOSE,1){XG51};
AG:=REF(RSI.RSI1<45,1) AND RSI.RSI1>45{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)){XG51};
B:=REF(CCI<-100,1) AND CCI>=-100{XG51};
mms:=MA(3*RSI.RSI2-2*SMA(MAX(CLOSE-LC,0),16,1)/SMA(ABS(CLOSE-LC),16,1)*100,3){XG51};
W:=REF(MMS<39,1) AND MMS>=39{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
JG:=3*K-2*D{XG51};
F:=REF(JG<10,1) AND JG>=10{XG51};
牛股:=AG AND B AND W AND F{XG51};
STICKLINE(牛股,OPEN,CLOSE,2.5,0),COLORLIMAGENTA{XG51};
DRAWTEXT(牛股,(L-0.08),'牛股'),COLORLIMAGENTA{XG51};
bias0:= (C-MA(C,2))/MA(C,2)*100{XG51};
D1:=INDEXC{XG51};
D2:=MA(D1,13){XG51};
DR2:=D2>1.050*D1{XG51};
E2:=(C-REF(C,26))/REF(C,26)*10{XG51};
SJ1:=DR2{XG51};
SJ2:=E2<-2.30{XG51};
SJ3:=BIAS0<-2.7{XG51};
SJ5:=SJ1 AND SJ2 AND SJ3{XG51};
SJ6:=CROSS(0.5,SJ5){XG51};
JS1:=CROSS(SJ6,0.5){XG51};
JS2:=BARSLAST(JS1=1){XG51};
JS3:=JS2<=5 AND C<REF(C,JS2){XG51};
赛:=SJ6 OR JS3;
DRAWTEXT(赛,(L*0.97),'赛'),COLORWHITE{XG51};
STICKLINE(赛,OPEN,CLOSE,1,0)COLORWHITE{XG51};
AA05:=MA(C,5){XG51};
五日乖离率:=(C-AA05)/AA05*100{XG51};
AA30:=MA(C,30){XG51};
三拾日乖离率:=(C-AA30)/AA30*100{XG51};
MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30{XG51};
买入:=FILTER(MR,10){XG51};
BIAS1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100{XG51};
BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100{XG51};
BIAS3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100{XG51};
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6{XG51};
乖离:=MA(BIAS,3){XG51};
接近底部:=(乖离<-12 AND 乖离>=-18){XG51};
乖离抄底:=IF(乖离<-18,1,0){XG51};
乖离信号:=乖离抄底 OR 买入{XG51};
DRAWTEXT(乖离信号,(L*0.93),'乖'),COLOR7FFF00{XG51};
VAR41:=CLOSE/MA(CLOSE,30)*100<75{XG51};
VAR42:=CLOSE/MA(CLOSE,50)*100<78{XG51};
VAR43:=HIGH>LOW*1.053{XG51};
VAR44:=VAR43 AND COUNT(VAR43,5)>2{XG51};
VAR45:=VAR44 AND (VAR41 OR VAR42){XG51};
VAR46:=dma(EMA(CLOSE,5),SUM(VOL,8)/2.8/CAPITAL){XG51};
VAR47:=(CLOSE-VAR46)/VAR46*100{XG51};
赢:=REF(VAR47,1)<-34 AND VAR47>REF(VAR47,1) AND REF(VAR47,1)<REF(VAR47,2)
AND VAR47-REF(VAR47,1)>1.76 OR VAR45{XG51};
DRAWTEXT(赢,(L*0.88),'赢'),COLORLIMAGENTA{XG51};
获利:=WINNER(CLOSE)*100{XG51};
获利盘:=WINNER(C)*100{XG51};
近邻筹码:=(WINNER(C*1.07)-WINNER(C*0.93))*85{XG51};
获利纵横:=获利盘-近邻筹码,NODRAW{XG51};
换手率:=V/CAPITAL*100{XG51};
AGA:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3)){XG51};
AGB:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01){XG51};
AGC:=IF(AGB,1,(AGA<(DYNAINFO(5)+0.01) && AGA>(DYNAINFO(6)-0.01))){XG51};
MA21:=IF(AGC,0.01*expma(AMOUNT,21)/EXPMA(VOL,21),EMA((HIGH+LOW+CLOSE)/3,21)){XG51};
MA60:=IF(AGC,0.01*EXPMA(AMOUNT,60)/EXPMA(VOL,60),EMA((HIGH+LOW+CLOSE)/3,60)){XG51};
MA&infin;:=IF(AGC,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120)){XG51};
收盘价:=CLOSE{XG51};
TJ1:=获利>40{XG51};
TJ2:=MA60>MA&infin; AND MA21>MA60{XG51};
TJ3:=收盘价<MA&infin;{XG51};
受伤庄股:=TJ1 AND TJ2 AND TJ3 STICK{XG51};
DRAWTEXT(受伤庄股,(L*0.99),'伤'),COLORGREEN{XG51};
跟进:=COUNT(获利纵横>REF(获利纵横,1),5)=5 AND 获利盘>REF(获利盘,1)STICK{XG51};
DRAWTEXT(跟进,(L*0.995),'横'),COLORWHITE{XG51};
锁仓:=获利盘>=85 AND 近邻筹码<30 AND 换手率<5 STICK{XG51};
DRAWTEXT(锁仓,(L*0.99),'锁'),COLORRED{XG51};
强庄:=CROSS(获利盘,近邻筹码)AND 获利盘>50 AND 获利纵横>30 STICK COLORWHITE{XG51};
DRAWTEXT(强庄,(L*0.97),'强'),COLORWHITE{XG51};
启动:=REF(获利盘,1)<50 AND 获利盘>60 AND 近邻筹码<REF(近邻筹码,1)STICK{XG51};
DRAWTEXT(启动,LOW-0.03,'启'),COLOR5555FF{XG51};
STICKLINE(启动,CLOSE,O,2.8,0),COLOR4444FF;  
STICKLINE(启动,CLOSE,O,2,0),COLOR5555FF;    
STICKLINE(启动,CLOSE,O,1.5,0),COLOR7777FF;    
STICKLINE(启动,CLOSE,O,1,0),COLOR9999FF;    
博弈K线长:=100*(WINNER(CLOSE)-WINNER(OPEN)){XG51};
博弈K线收盘差:=博弈K线长>=20{XG51};
大单动向:(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7),NODRAW{XG51};
HSL:=100*VOL/(FINANCE(7)/100){XG51};
换手:=MA(HSL,1)<3{XG51};
博弈长阳:=博弈K线收盘差 AND 换手   COLORLIMAGENTA{XG51};
DRAWTEXT(博弈长阳,LOW-0.03,'博弈'),COLORLIMAGENTA{XG51};
STICKLINE(博弈长阳,CLOSE,O,2.8,0),COLOR770077{XG51};
STICKLINE(博弈长阳,CLOSE,O,2,0),COLOR990099;  
STICKLINE(博弈长阳,CLOSE,O,1.5,0),COLORBB00BB;    
STICKLINE(博弈长阳,CLOSE,O,1,0),COLORDD00DD{XG51};
STICKLINE(博弈长阳,CLOSE,O,0.5,0),COLORFF00FF{XG51};
三日:=SUM(大单动向,3){XG51};
五日:=SUM(大单动向,5){XG51};
十日:=SUM(大单动向,10){XG51};
二十日:=SUM(大单动向,20){XG51};
三十日:=SUM(大单动向,30){XG51};
六十日:=SUM(大单动向,60){XG51};
涨:=大单动向>0 AND 三日>0 AND 五日>0 AND 十日>0 AND 二十日>0 AND 三十日>0 AND 六十日>0{XG51};
DRAWTEXT(涨,(LOW * 0.99),'资'),COLORWHITE{XG51};
K1:=REF(C,1)=DYNAINFO(3) AND O=DYNAINFO(4) AND C=DYNAINFO(7) AND H=DYNAINFO(5) AND L=DYNAINFO(6){XG51};
K2:=BARSLAST(V=HHV(V,20)){XG51};
K3:=BACKSET(K1,K2+1){XG51};
STICKLINE(K2=0 AND K3=1,H,H*1.003,8*N,0),COLORBLUE{XG51};
收:C,NODRAW{XG51};
DRAWTEXT(S=1&&K2=0&&K3=1,H*1.02,'20天内的最高量'),COLORBLUE{X^G*5=1^C^N^{};