通达信小散精品主图未加密选股指标公式源码

通达信小散精品主图未加密选股指标公式源码

源码正文：

周O1:=IF(WEEkdAY<REF(WEEKDAY,1),O,DRAWNULL){XG51};
周开:HHV(周O1,WEEKDAY)COLORWHITE,NODRAW{XG51};
周高:HHV(H,WEEKDAY)COLORBLUE,NODRAW{XG51};
周低:LLV(L,WEEKDAY)COLOR32CD32,NODRAW{XG51};
周收:C#WEEK, COLORFF6EC7,NODRAW{XG51};
MC:=C#MONTH,NODRAW{XG51};
MO1:=IF(DAY<REF(DAY,1),O,DRAWNULL){XG51};
MO:=HHV(MO1,DAY),NODRAW{XG51};
stICKLINE(MC>=MO,MO,MC,4,-1)COLOR00009C{XG51};
STICKLINE(MC<MO,MO,MC,4,-1),COLOR4F2F4F{XG51};
STICKLINE(周收>=周开,周开,周收,4,0)COLOR00009C{XG51};
STICKLINE(周收<周开,周开,周收,4,0),COLOR9F3333{XG51};
ma5:MA(C,5){XG51};
MA10:MA(C,10){XG51};
MA20:MA(C,20){XG51};
MA40:MA(C,40){XG51};
MA60:MA(C,60){XG51};
STICKLINE(MA5>=MA60 AND MA60>=MA10,MA10,MA60,1,-1),COLORYELLOW{XG51};
STICKLINE(MA5>=MA10 AND MA5<=MA60,MA10,MA5,1,-1),COLORYELLOW{XG51};
STICKLINE(MA20>=MA60 AND MA60>=MA40,MA40,MA60,1,-1),COLORFF00FF{XG51};
STICKLINE(MA20>=MA40 AND MA20<MA60,MA40,MA20,1,-1),COLORFF00FF{XG51};
STICKLINE(MA5>=MA20 AND MA20>=MA10,MA10,MA20,1,-1),COLORBLUE{XG51};
STICKLINE(MA5>=MA10 AND MA5<MA20,MA10,MA5,1,-1),COLORBLUE{XG51};
上开:=O{XG51};
上收:=C{XG51};
上高:=H{XG51};
上低:=L{XG51};
JJ:=(上开+上高+上低)/3{XG51};
A:=ema(JJ,4){XG51};
黄金线A:=A{XG51};
VA1:=EMA(上收,8){XG51};
VA2:=EMA(上收,20){XG51};
DRAWTEXT(crOSS(VA1,VA2)AND(C>=O)AND 黄金线A>REF(黄金线A,1),VA1*0.97,'B')COLORWHITE{XG51};
VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0){XG51};
DRAWTEXT(VAR3P>90,LOW*0.978,'B')COLORLIMAGENTA{XG51};
DRAWTEXT(CROSS(REF(zig(3,10),1),ZIG(3,10)),HIGH*1.02,'S')COLORCYAN{XG51};
VAR1:=EMA(EMA(CLOSE,13),13){XG51};
控盘:= (VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0{XG51};
SS:=有庄控盘 AND CROSS(EMA(C,3),EMA(C,5)) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA(C,3),EMA(C,12)) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA(C,5),EMA(C,7)) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA(C,3),EMA(C,7)) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 AND CROSS(EMA(C,3),EMA(C,12)){XG51};
DRAWICON(SS,LOW*0.978,36){XG51};
DRAWKLINE(H,O,L,C){XG51};
AAA:=CONST(HHV(H,90)){XG51};
ABB:=MA(CLOSE,20){XG51};
acC:=(CLOSE > MA(CLOSE,5)){XG51};
ADD:=(MA(CLOSE,5) > MA(CLOSE,10)){XG51};
AEE:=(CLOSE > MA(CLOSE,10)){XG51};
AFF:=(MA(CLOSE,5) > MA(CLOSE,20)){XG51};
AGG:=(CLOSE > MA(CLOSE,20)){XG51};
AHH:=REF(ABB,1){XG51};
AII:=(ABB > AHH){XG51};
AVX:=(((((IF(ACC,10,(0 - 10)) + IF(ADD,10,(0 - 10))) + IF(AEE,10,(0 - 10)))
+ IF(AFF,10,(0 - 10))) + IF(AGG,10,(0 - 10))) + IF(AII,10,(0 - 10))){XG51};
DSLX:=(CLOSE / INDEXC){XG51};
DSLX1:=MA(DSLX,5){XG51};
DSLX2:=MA(DSLX,10){XG51};
V1:=MA(vol,5){XG51};
V2:=MA(VOL,10){XG51};
T1:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0)){XG51};
T2:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0)){XG51};
T3:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)),1,0)){XG51};
T4:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)),1,0)){XG51};
T5:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0)){XG51};
T6:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0)){XG51};
T7:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0)){XG51};
T8:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0)){XG51};
T9:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0)){XG51};
T10:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0)){XG51};
T11:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0)){XG51};
T12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0)){XG51};
T13:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0)){XG51};
T14:=CONST(IF( C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0)){XG51};
T15:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0)){XG51};
T16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0)){XG51};
T17:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0)){XG51};
T18:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0)){XG51};
T19:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 < V2)),1,0)){XG51};
T20:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 >= V2)),1,0)){XG51};
T21:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 < V2)),1,0)){XG51};
T22:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)),1,0)){XG51};
T23:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0)){XG51};
T24:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)),1,0)){XG51};
T25:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)),1,0)){XG51};
DRAWTEXT(T1=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'量能理想,明显走强,中线参与，仓位在2/3左右'),COLORFF00FF {XG51};
DRAWTEXT(T2=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'走势趋强,还显不足,短线进场，仓位在1/2左右'),COLORWHITE ;
DRAWTEXT(T3=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'量价良好,没有明显走强，短线进场，仓位1/2左右'),COLORWHITE {XG51};
DRAWTEXT(T4=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'形态尚可，量能不足，未完全走强，短线参与，仓位1/3左右'),COLORWHITE {XG51};
DRAWTEXT(T5=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'形态变坏，重仓者减持大半，清仓者观望'),COLORF0F000 ;
DRAWTEXT(T6=1 AND CURRBARSCOUNT=80,AAA*0.98 ,'随大盘一起下跌，明显缩量走势，考虑到风险，减持或清仓'),COLORF0F000 {XG51};
DRAWTEXT(T7=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'该股放量下跌，走势明显偏弱，离场观望'),COLORF0F000 {XG51};
DRAWTEXT(T8=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'该股缩量下跌，走势偏弱，离场观望'),COLORF0F000 {XG51};
DRAWTEXT(T9=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'该股形态良好，强势明显，量能充足，可以继续持有'),COLORWHITE {XG51};
DRAWTEXT(T10=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'上行趋势不变，强势依然，量能开始转弱，注意风险'),COLORWHITE ;
DRAWTEXT(T11=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓'),COLORFF99FF {XG51};
DRAWTEXT(T12=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'该股走势趋弱，量能不足，减持大部分筹码'),COLOR008FFF {XG51};
DRAWTEXT(T13=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'该股形态不佳，注意成交量的变化，目前不适合参与'),COLORF0F000 ;
DRAWTEXT(T14=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'趋势不明，股价偏弱，注意量能变化，目前不宜参与'),COLORF0F000 ;
DRAWTEXT(T15=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'有走强迹象，但量能不足，趋势不明，不适合操作'),COLORBLUE {XG51};
DRAWTEXT(T16=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'该股走势太弱，没有参与价值'),COLOR008FFF {XG51};
DRAWTEXT(T17=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'大盘理想，有明显走强迹象，中线参与，仓位在2/3左右'),COLORFF00FF {XG51};
DRAWTEXT(T18=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'如前期经过一轮下跌，最佳买点，前期有过一段涨幅需谨慎'),COLORBLUE ;
DRAWTEXT(T19=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'考虑短线进场，仓位在1/2左右，一旦量能放大,加仓买入'),COLORFF00FF ;
DRAWTEXT(T20=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'大盘形态走坏，重仓者可以减去大部分仓位'),COLOR008FFF ;
DRAWTEXT(T21=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'大盘缩量调整，注意风险，短线清仓观望'),COLOR008FFF ;
DRAWTEXT(T22=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'大盘走势良好，量能理想，可以继续持有强势股'),COLORFF00FF ;
DRAWTEXT(T23=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'大盘形态良好，但量能稍显不足，随时准备减仓'),COLORBLUE {XG51};
DRAWTEXT(T24=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'大盘趋势不明，注意成交量变化，目前不适宜进场'),COLORF0F000 {XG51};
DRAWTEXT(T25=1 AND CURRBARSCOUNT=80,AAA-(AAA*0.03),'大盘趋势向下，量能萎缩，不适合进场'),COLORF0F000 {X~G_5+1~C~N~{};

通达信仙女升天主图未加密选股指标公式源码

源码正文：

DOTLINEVAR4:=ema(LOW,3){XG51};
VAR5:=Ema(LOW,10){XG51};
VAR6:=EMA(LOW,20){XG51};
VAR7:=EMA(LOW,30){XG51};
VAR8:=EMA((VAR5 + VAR6 + VAR7) * 0.28,18){XG51};
VAR9:=EMA(HIGH,10){XG51};
VAR10:=EMA(HIGH,20){XG51};
VAR11:=EMA(HIGH,30){XG51};
VAR12:=EMA((VAR9 + VAR10 + VAR11) * 0.382,18){XG51};
POWER:REF(EMA((2 * CLOSE + HIGH + LOW + OPEN)/5,5),1),COLORBLUE{XG51};
VAR13:=EMA((VAR9 + VAR10 + VAR11) * 0.382,10){XG51};
VAR14:=EMA((VAR5 + VAR6 + VAR7) * 0.28,10){XG51};
LIFE:(VAR13 + VAR14)/2,COLORLIMAGENTA{XG51};
BU:=crOSS(POWER,LIFE){XG51};
stICKLINE(BU,OPEN,CLOSE,3.2,0),COLORBLUE{XG51};
VIVIAN:DRAWICON(CROSS(POWER,LIFE),POWER,5){XG51};
FF:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20){XG51};
DD:=dma(CLOSE,FF){XG51};
上:(1+7/100)*DD,DOTLINE,COLORLIMAGENTA{XG51};
下:(1-7/100)*DD,DOTLINE,COLORCYAN{XG51};
中:(上+下)/2,DOTLINE,COLORLIMAGENTA{XG51};
DRAWTEXT("rsi.RSI1">85,H*1.01,'接近天宫'),COLORBLUE{XG51};
DRAWTEXT("RSI.RSI1"<20,L*1.01,'依依不舍'),COLORWHITE{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)){XG51};
YQ:=EVERY(CCI<-100,4) AND CCI>REF(CCI,4) AND C<REF(O,4) AND CCI>-120{XG51};
DRAWTEXT(YQ,L*1.01,'VV仙女升天'),COLOR0099FF{X_G_5.1_C_N_{};