通达信综合箱体主图选股指标公式源码

通达信综合箱体主图选股指标公式源码

源码正文：

买线:=ema(C,2);
卖线:=Ema(SLOPE(C,21)*20+C,42);
stICKLINE(买线>=卖线,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),5,0),COLOR000055{XG51};
STICKLINE(买线<卖线,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),5,0),COLOR663300;  
DRAWNUMBER(ISLASTBAR, C,C),COLORLIMAGENTA{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){XG51};
TY:=C{XG51};
A1:=REF(TY,10)=HHV(TY,2*10+1);
B1:=FILTER(A1,10); C1:=BacKSET(B1,10+1);
HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1);
B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1);
LD:=FILTER(C2,10);
前期高位:REF(H,BArslAST(HD)), COLORLICYAN,LINETHICK2{XG51};
前期低位:REF(L,BARSLAST(LD)), COLORCYAN,LINETHICK2{XG51};
MA10:=MA(C,10){XG51};
MA20:=MA(C,20){XG51};
MA60:=MA(C,60){XG51};
vol5:=MA(VOL,5),COLORRED{XG51};
VOL10:=MA(VOL,10),COLORBLUE{XG51};
VOL40:=MA(VOL,40),COLORFF00FF {XG51};
量托:=VOL5>=VOL40 AND crOSS(VOL10,VOL40) AND REF(VOL10,1)<REF(VOL40,1){XG51};
DRAWTEXT(量托,L-0.012,'量托'),COLORRED{XG51};
AAA1:=BARSLAST(MA60>MA20 AND (MA20=MA10 OR MA20>MA10)){XG51};
BB1:=REF(COUNT(C<MA60,AAA1)=AAA1,1){XG51};
CC1:=CROSS(C,MA60) AND VOL>MA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3{XG51};
芙蓉出水:=BB AND CC1,COLOR00FF00{XG51};
DRAWTEXT(芙蓉出水,H+0.12,'芙蓉出水'),COLORFF00FF{XG51};
STICKLINE(芙蓉出水,H,L,0.5,1),COLORFF00FF{XG51};
STICKLINE(芙蓉出水,O,C,4,1),LINETHICK2,COLORFF00FF{XG51};
MAA1:=MA(CLOSE,5){XG51};
MAA2:=MA(CLOSE,10){XG51};
MAA3:=MA(CLOSE,30){XG51};
ZJ:=AMOUNT/10000{XG51};
TM:=V-MA(V,10){XG51};
一穿三:=MAA1>O AND MAA2>O AND MAA3>O AND MAA1<C AND MAA2<C AND MAA3<C AND CLOSE>OPEN {XG51};
DRAWTEXT(一穿三,L-0.012,'穿三线'),COLORFF00FF{XG51};
C6:=REF(C,1){XG51};
涨停:=IF((C-C6)*100/C6>=(10-0.01*100/C6),1,0){XG51};
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORLIMAGENTA{XG51};
STICKLINE(涨停,H,L,0,0),COLORLICYAN{XG51};
N:=10{XG51};
T1:=CONST(HHVBARS(V,N)){XG51};
T0:IF(CURRBARSCOUNT<=N+3,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),COLORCC00CC{XG51};
IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),CIRCLEDOT,COLORCC00CC{XG51};
DRAWTEXT(ISLASTBAR,T0,' 量能平台'),COLORCC00CC{XG51};
M:=10{XG51};
Q1:=CONST(REF(HHVBARS(V,M),T1+1)+T1+1){XG51};
Q0:IF(CURRBARSCOUNT<=T1+M+3 AND CURRBARSCOUNT>=T1+1,CONST(REF(C,Q1)),DRAWNULL),COLOR009900{XG51};
IF(CURRBARSCOUNT=Q1+1,Q0,DRAWNULL),CIRCLEDOT,COLOR00CC00{XG51};
M1:=CONST(LLVBARS(V,M)){XG51};
M0:IF(CURRBARSCOUNT<=M+7,CONST(IF(M1=0,O,REF(O,M1))),DRAWNULL);
IF(CURRBARSCOUNT=M1+1,M0,DRAWNULL),CIRCLEDOT{XG51};
DRAWTEXT(ISLASTBAR,M0,' 地量反量能平台'){XG51};
HV:=HHV(V,8)=V OR V/REF(V,1)>=2{XG51};
FT:=BARSLAST(HV){XG51};
量能平台:IF(HV,C,REF(C,FT)),COLORCC00CC,LINETHICK1{XG51};
DP:=IF(C=INDEXC,0,1){XG51};
GJ:=AMOUNT/V/100{XG51};
【明日阻力】:L+(GJ-L)+(C-L),COLORWHITE,NODRAW{XG51};
【明日支撑】:L+(C-GJ),NODRAW{XG51};
年:=YEAR,NODRAW{XG51};
月:=MONTH,NODRAW{XG51};
星期:=WEEkdAY,NODRAW{XG51};
日1:=DATETODAY(DATE){XG51};
上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT){XG51};
自然日:=日1-DATETODAY(上市日)+1{XG51};
ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1)
OR TOTALBARSCOUNT-CURRBARSCOUNT=0{XG51};
本周第几天:=BARSLAST(ZB)+1{XG51};
本月第几天:=BARSLAST(年*100+月!=REF(年*100+月,1))+1{XG51};
MA1:=REF(C,本周第几天){XG51};
MA2:=REF(MA1,本周第几天){XG51};
MA3:=REF(MA2,本周第几天){XG51};
MA4:=REF(MA3,本周第几天){XG51};
MA5:=REF(MA4,本周第几天){XG51};
MA6:=REF(MA5,本周第几天){XG51};
MA7:=REF(MA6,本周第几天){XG51};
MA8:=REF(MA7,本周第几天){XG51};
MA9:=REF(MA8,本周第几天){XG51};
十周价:=(C+MA1+MA2+MA3+MA4+MA5+MA6+MA7+MA8+MA9)/10{XG51};
决策:REFDATE(十周价,DATE),COLORBLUE,LINETHICK2{XG51};
DRAWTEXT(ISLASTBAR,决策,' 决策线'),COLORBLUE{XG51};
AK1:=BARSCOUNT(C);    
AH:=HHV(H,200);    
AL:=LLV(L,200);    
A0:=(AH-AL)/40;    
BK1:=L-A0;    
STICKLINE((AK1+0)/34=FLOOR((AK1+0)/34),BK1,BK1-1.5*A0,2,0),COLORF00FF0;    
DRAWTEXT((AK1+0)/34=FLOOR((AK1+0)/34),BK1-1*A0,'时间窗,变盘'),COLORF00FF0;    
DIR2:=Abs(CLOSE-REF(CLOSE,10)){XG51};
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10){XG51};
ER2:=DIR2/VIR2{XG51};
CS2:=ER2*(0.8-2/24)+2/24{XG51};
CQ2:=CS2*CS2{XG51};
AMA2:EMA(dma(CLOSE,CQ2),2),COLORLIGREEN,LINETHICK3{XG51};
AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
LC:=REF(CLOSE,1){XG51};
VAR28:=SMA(MAX(CLOSE-LC,0),5.5,1)/SMA(ABS(CLOSE-LC),6,1)*100{XG51};
VARA00:=((AMOUNT)/(VOL))/(100){XG51};
VARAB00:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7){XG51};
VARAC00:=((SUM(AMOUNT,7))/(VARA00))/(100){XG51};
VARD0:=DMA(VARAB00,(VOL)/(VARAC00)){XG51};
VARDE0:=((CLOSE-VARD0)/(VARD0))*(100){XG51};
VARDE0F:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100){XG51};
VARDE0JF:=MA(VARDE0,20)+STD(VARDE0,20){XG51};
bias18:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100){XG51};
AA:=SMA(VARDE0F,3,1){XG51};
SS:=(REF(BIAS18,1)>=5) AND CROSS(VARDE0JF,VARDE0) AND (AA>79){XG51};
DRAWTEXT(CROSS(84,rsi) AND CROSS(76,VAR28),H*1.01,'卖出'),LINETHICK4,COLORCYAN{XG51};
红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORBLUE{XG51};
绿轨道:=MA(MA(CLOSE,3),3){XG51};
上升:=IF(红轨道>=绿轨道,绿轨道,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
AA1:=3*SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1)-2*SMA(SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1),3,1){XG51};
加仓:=IF(CROSS(AA1,REF(AA1+0.01,1)) AND LLV(AA1,2)=LLV(AA1,8) AND BETWEEN(AA1,20,60),1,0){XG51};
波段底:=(3)*(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1)) -
(2)*(SMA(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1),3,1)){XG51};
DRAWTEXT(CROSS(波段底,3),L*0.97,'底'){XG51};
A:=(3*C+L+O+H)/6{XG51};
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210{XG51};
mtm:=C-REF(C,1){XG51};
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6){XG51};
CB:=EMA(X,13){XG51};
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(FILTER(买=1,5),LOW-0.03,'买入'),COLORWHITE{XG51};
盘整天数:=5{XG51};
下探幅度:=5{XG51};
上冲幅度:=25{XG51};
涨停1:=(C-REF(C,1))/REF(C,1)>0.09{XG51};
缩量:=HHV(VOL,盘整天数-2)<REF(VOL,盘整天数-1) AND SUM(VOL, 盘整天数)>2* SUM(VOL, 盘整天数-2){XG51};
七伤拳:=缩量 AND REF(涨停1,盘整天数) AND COUNT(涨停1,盘整天数+1)=1 AND (HHV(H,盘整天数)-REF(C,盘整天数))/REF(C,盘整天数)*100<上冲幅度 AND (LLV(L,盘整天数)-REF(C,盘整天数))/REF(C,盘整天数)*100>(下探幅度*-1){XG51};
DRAWTEXT(七伤拳,LOW*0.98,'*七伤拳'),COLORWHITE{XG51};
阳涨幅:=3.5{XG51};
阳倍量:=1.9{XG51};
单阳收:=C{XG51};
单阳开:=O{XG51};
单阳:=单阳收>=REF(C,1)*(1+阳涨幅/100)AND VOL>REF(VOL,1)*阳倍量{XG51};
DRAWTEXT(CURRBARSCOUNT<300 AND 单阳,L*0.98,'阳'),COLOR00FFFF{XG51};
高不破价:=REF(C,BARSLAST(单阳)){XG51};
低不破价:=REF(L,BARSLAST(单阳)){XG51};
单阳不破:=CURRBARSCOUNT<300 AND BARSLAST(单阳)<11 AND (LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价){XG51};
STICKLINE(单阳不破,低不破价-低不破价*0.0005,低不破价,4,0),COLORCYAN{XG51};
STICKLINE(单阳不破,高不破价,高不破价,4,0),COLORWHITE{XG51};
STICKLINE(单阳,单阳开,单阳收,2,0),COLORBLUE{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};
difF:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
DEA:=EMA(DIFF,9){XG51};
macd:=2*(DIFF-DEA){XG51};
MACD1:=CROSS(DIFF,DEA) AND COUNT(MACD>0,1)=1{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,9,1){XG51};
D:=SMA(K,9,1){XG51};
J:=3*K-2*D{XG51};
kdj1:=CROSS(K,D) AND CROSS(J,D){XG51};
均线:=CROSS(MA(C,5),MA(C,10)){XG51};
量线:=CROSS(MA(V,5),MA(V,10)){XG51};
SCC:=MACD1 AND KDJ1 AND 均线 AND 量线{XG51};
SC1:=MACD1 AND KDJ1{XG51};
SC2:=均线 AND 量线{XG51};
SC3:=均线 AND MACD1{XG51};
SC4:=量线 AND KDJ1{XG51};
SC5:=均线 AND KDJ1{XG51};
SC6:=MACD1 AND 量线{XG51};
DRAWICON(SC1 OR SC2 OR SC3 OR SC4 OR SC5 OR SC6,L-0.20,9){XG51};
DRAWICON(SCC,L-0.20,3);{XG51};
AAA:=MA((2*CLOSE+HIGH+LOW)/4,5){XG51};
通1:=AAA*102/100{XG51};
通2:=AAA*(200-102)/100{XG51};
CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20){XG51};
DD:=DMA(CLOSE,CC){XG51};
上:(1+7/100)*DD,CIRCLEDOT,COLORYELLOW{XG51};
下:(1-7/100)*DD,CIRCLEDOT,COLORYELLOW{XG51};
中:(上+下)/2,CIRCLEDOT,COLORYELLOW{XG51};
IF(上>=REF(上,1), 上,DRAWNULL),CIRCLEDOT,COLOR0099FF{XG51};
IF(中>=REF(中,1), 中,DRAWNULL),CIRCLEDOT,COLOR0099FF{XG51};
IF(下>=REF(下,1), 下,DRAWNULL),CIRCLEDOT,COLOR0099FF{X.G.5_1.C.N.{};