通达信抓涨停的好主图未加密选股指标公式源码

通达信抓涨停的好主图未加密选股指标公式源码

源码正文：

m:=80{XG51};
n:=3{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){XG51};
VAR11:=ma(C,9),COLORWHITE{XG51};
上升通道:IF(VAR11>REF(VAR11,1),VAR11,DRAWNULL),LINETHICK5,COLORWHITE{XG51};
下降通道:IF(VAR11<REF(VAR11,1),VAR11,DRAWNULL),LINETHICK4,COLORCYAN{XG51};
A0:=(L+H+C*2)/4{XG51};
AA:=ema(A0,14)COLORBLUE,LINETHICK1{XG51};
BB:=EMA(A0,25)COLORBLUE,LINETHICK2{XG51};
A1X:=(AA-REF(AA,1))/REF(AA,1)*100{XG51};
A2X:=(BB-REF(BB,1))/REF(BB,1)*100{XG51};
G:=BArslAst(crOSS(A1X,0)){XG51};
CC:=IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLORYELLOW{XG51};
DRAWKLINE(H,O,L,C){XG51};
ZKP:=IF(C>REF(C,1),REF(C,1),DRAWNULL){XG51};
ZSP:=IF(C>REF(C,1),C,DRAWNULL){XG51};
DKP:=IF(C<=REF(C,1),REF(C,1),DRAWNULL){XG51};
DSP:=IF(C<=REF(C,1),C,DRAWNULL){XG51};
DRAWKLINE(H,DKP,L,DSP){XG51};
STICKLINE(C<=REF(C,1),DKP,DSP,3.05,0),COLORYELLOW{XG51};
STICKLINE(C<=REF(C,1),DKP,DSP,2.2,0),COLORFF7700{XG51};
STICKLINE(C<=REF(C,1),DKP,DSP,1.5,0),COLORFF9900{XG51};
STICKLINE(C<=REF(C,1),DKP,DSP,0.5,0),COLORFFBB00{XG51};
DRAWKLINE(H,ZKP,L,ZSP){XG51};
STICKLINE(C>REF(C,1),ZKP,ZSP,3.05,0),COLOR000099{XG51};
STICKLINE(C>REF(C,1),ZKP,ZSP,2.2,0),COLOR0000CC{XG51};
STICKLINE(C>REF(C,1),ZKP,ZSP,1.5,0),COLOR0000FF{XG51};
STICKLINE(C>REF(C,1),ZKP,ZSP,0.5,0),COLORCC66FF{XG51};
STICKLINE(V/REF(V,1)>2 AND CLOSE>=OPEN,ZKP,ZSP,1,0),COLORBLUE{XG51};
TY:=C{XG51};
A1:=REF(TY,10)=HHV(TY,2*10+1){XG51};
B1:=FILTER(A1,10){XG51};
C1:=BacKSET(B1,10+1){XG51};
HD:=FILTER(C1,10){XG51};
A2:=REF(TY,10)=LLV(TY,2*10+1){XG51};
B2:=FILTER(A2,10){XG51};
C2:=BACKSET(B2,10+1){XG51};
LD:=FILTER(C2,10){XG51};
前期高位:REF(C,BARSLAST(HD)),COLOR8000FF,POINTDOT{XG51};
STICKLINE(C,前期高位,前期高位,8,0),COLOR8000FF{XG51};
JRH:=HHV(C,2);
JRL:=LLV(C,2);
VAR01:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));
VAR02:=(REF(VAR01,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR03:=(REF(VAR02,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR04:=(REF(VAR03,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR05:=(REF(VAR04,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR06:=(REF(VAR05,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR07:=(REF(VAR06,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR08:=(REF(VAR07,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR09:=(REF(VAR08,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARA:=(REF(VAR09,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VARB:=(REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARC:=(REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VARD:=(CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2));
VARE:=(REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VARF:=(REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR010:=(REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR011:=(REF(VAR010,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR012:=(REF(VAR011,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR013:=(REF(VAR012,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR014:=(REF(VAR013,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR015:=(REF(VAR014,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR016:=(REF(VAR015,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR017:=(REF(VAR016,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
VAR018:=(REF(VAR017,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
VAR019:=((REF(VARD OR VARE OR VARF OR VAR010 OR VAR011 OR VAR012 OR VAR013 OR VAR014 OR VAR015 OR VAR016 OR VAR017 OR VAR018,1)) AND VAR01);
VAR1A:=((REF(VAR01 OR VAR02 OR VAR03 OR VAR04 OR VAR05 OR VAR06 OR VAR07 OR VAR08 OR VAR09 OR VARA OR VARB OR VARC,1)) AND VARD);
红色持股:=VAR01 OR VAR02 OR VAR03 OR VAR04 OR VAR05 OR VAR06 OR VAR07 OR VAR08 OR VAR09 OR VARA OR VARB OR VARC,COLOR0000FF,NODRAW{XG51};
离场:=IF(红色持股,JRL,DRAWNULL);
明离场价:=离场,COLORFF99FF,NODRAW{XG51};
青色观望:=VARD OR VARE OR VARF OR VAR010 OR VAR011 OR VAR012 OR VAR013 OR VAR014 OR VAR015 OR VAR016 OR VAR017 OR VAR018,COLORFFFF00,NODRAW;
进:=IF(青色观望,JRH,DRAWNULL){XG51};
今离场价:REF(离场,1),COLOR0000FF,NODRAW;
明进场价:进,COLOR33AACC,NODRAW;
今进场价:REF(明进场价,1),COLORCYAN,NODRAW{XG51};
必卖止损价位:REF(A0,G),COLORFFFFFF,LINETHICK4{XG51};
总额:=AMOUNT{XG51};
买:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-Abs(O-C))*(C-L)){XG51};
买%:=买/AMOUNT*100{XG51};
流入:=AMOUNT*买%/10000000000{XG51};
流出:=AMOUNT/100000000-流入{XG51};
净流:=(流入-流出){XG51};
总额3:=SUM(AMOUNT,3){XG51};
流入3:=SUM(流入,3){XG51};
流出3:=SUM(流出,3){XG51};
净流3:=SUM(流入-流出,3){XG51};
总额5:=SUM(AMOUNT,5){XG51};
流入5:=SUM(流入,5){XG51};
流出5:=SUM(流出,5){XG51};
净流5:=SUM(流入-流出,5){XG51};
总额10:=SUM(AMOUNT,10){XG51};
流入10:=SUM(流入,10){XG51};
流出10:=SUM(流出,10){XG51};
净流10:=SUM(流入-流出,10){XG51};
画:=CONST(FINDHIGH(总额10,0,190,1)){XG51};
DRAWTEXT_FIX(1,0.00,0,0,'所属行业：')COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK)COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.14,0,0,'所属地区：')COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.20,0,0,DYBLOCK)COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.30,0.00,0,'主题投资：')COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.36,0.00,0,EXTERNSTR(0,2))COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.00,0.05,0,'主营业务：')COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.06,0.05,0,EXTERNSTR(0,3))COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.00,0.10,0,'解禁日期：')COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.06,0.10,0,EXTERNSTR(0,4))COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.00,0.15,0,'莸利比例:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.06,0.15,0,CONST(WINNER(C )*100)),COLOR0080FF{XG51};
DRAWTEXT_FIX(1,0.12,0.15,0,'动态PE:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.17,0.15,0,CONST(DYNAINFO(39))),COLOR0080FF{XG51};
DRAWTEXT_FIX(1,0.22,0.15,0,'市值:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.26,0.15,0,FINANCE(40)/100000000),COLOR0080FF{XG51};
DRAWTEXT_FIX (1,0.31,0.15,0,'公积金(股):'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.38,0.15,0,FINANCE(18)),COLOR0080FF{XG51};
DRAWTEXT_FIX (1,0.43,0.15,0,'收益:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.47,0.15,0,FINANCE(33)),COLOR0080FF{XG51};
DRAWTEXT_FIX(1,0.00,0.19,0,'净流入(亿):'),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.06,0.19,0,'1日'),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.12,0.19,0,'3日'),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.18,0.19,0,'5日'),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.24,0.19,0,'10日'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.08,0.19,0,CONST((净流))),COLOR0080FF{XG51};
DRAWNUMBER_FIX(1,0.14,0.19,0,CONST((净流3))),COLOR0080FF{XG51};
DRAWNUMBER_FIX(1,0.20,0.19,0,CONST((净流5))),COLOR0080FF{XG51};
DRAWNUMBER_FIX(1,0.265,0.19,0,CONST((净流10))),COLOR0080FF{XG51};
DRAWTEXT_FIX(1,0.00,0.23,0,'愚民导向：'),COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.06,0.23,0,EXTERNSTR(0,5)),COLOR00FFFF{XG51};
VAR111:=zig(3,13){XG51};
STICKLINE((REF(VAR111,2) < REF(VAR111,1)) AND (VAR111 < REF(VAR111,1)),CLOSE,OPEN,3,0),COLOR66FF00{XG51};
DRAWTEXT_FIX(STICKLINE((REF(VAR111,2) < REF(VAR111,1)) AND (VAR111 < REF(VAR111,1)),CLOSE,OPEN,5,0),0.00,0.11,0,''),COLOR00FF00,LINETHICK1;
DRAwrECTREL(0,500,147,999.4,IF(120,RGB(10,0,0),0)){XG51};
超B:=L2_AMO(0,2)/10000.0{XG51};
大B:=L2_AMO(1,2)/10000.0{XG51};
中B:=L2_AMO(2,2)/10000.0{XG51};
小B:=L2_AMO(3,2)/10000.0{XG51};
超S:=L2_AMO(0,3)/10000.0{XG51};
大S:=L2_AMO(1,3)/10000.0{XG51};
中S:=L2_AMO(2,3)/10000.0{XG51};
小S:=L2_AMO(3,3)/10000.0{XG51};
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0){XG51};
大宗进:=(超B)+(大B),NODRAW{XG51};
大宗出:=(超S)+(大S),NODRAW{XG51};
非大宗进:=(中B)+(小B),NODRAW{XG51};
非大宗出:=(中S)+(小S),NODRAW{XG51};
大宗进限制:=IF((超B+大B)=0,0,大宗进){XG51};
大宗出限制:=IF((超S+大S)=0,0,大宗出){XG51};
非大宗进限制:=IF(中B+小B=0,0,非大宗进){XG51};
非大宗出限制:=IF(中S+小S=0,0,非大宗出){XG51};
主力净流入:=(超B+大B)-(超S+大S),COLORWHITE,NODRAW{XG51};
散户净流入:=(中B+小B)-(中S+小S),COLORWHITE,NODRAW{XG51};
净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),COLORWHITE,NODRAW{XG51};
大单流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW{XG51};
大单流入限制:=IF((超B+大B+超S+大S)=0,0,大单流入){XG51};
大单流出比:=(超S+大S)/(超B+大B+超S+大S)*100,NODRAW{XG51};
大单流出限制:=IF((超B+大B+超S+大S)=0,0,大单流出比){XG51};
总流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW{XG51};
总流出比:=(超S+大S+中S+小S)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW{XG51};
成交总量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW{XG51};
机构参与度:=(超B+超S+大B+大S)/成交总量*100,COLORBLUE,NODRAW{XG51};
大单强度:=(超B+大B-超S-大S)/成交总量*100,COLORBLUE,NODRAW{XG51};
大单强度限制:=IF(大单强度=0,-100,大单强度){XG51};
大单强度比:=IF(大单强度>=0,(大单强度限制+100)/2,100-ABS((大单强度限制-100)/2)),NODRAW{XG51};
超单强度:=(超B-超S)/(超B+超S)*100,COLORBLUE,NODRAW{XG51};
超单强度限制:=IF(超单强度=0,-100,超单强度){XG51};
超单强度比:=IF(超单强度>0,(超单强度限制+100)/2,IF(超单强度<0,100-ABS((超单强度限制-100)/2),0)),NODRAW{XG51};
DAZHIV:=CONST(MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出))))),NODRAW{XG51};
DRAWRECTREL(0,CONST(930-(ABS(大宗进)*250/DAZHIV)),35,950,IF(CONST(大宗进>0),RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(37,CONST(930-(ABS(大宗出)*250/DAZHIV)),72,950,IF(CONST(大宗出>0),RGB(23,125,255),RGB(255,0,0))){XG51};
DRAWRECTREL(75,CONST(930-(ABS(非大宗进)*250/DAZHIV)),110,950,IF(CONST(非大宗进>0),RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(112,CONST(930-(ABS(非大宗出)*250/DAZHIV)),147,950,IF(CONST(非大宗出>0),RGB(23,125,255),RGB(255,0,0))){XG51};
DRAWRECTREL(150,CONST(940-(ABS(净流入)*250/DAZHIV))-20,190,950,IF(CONST(净流入>0),RGB(200,0,0),RGB(0,125,50))){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.9,0,STRCAT('',CON2STR(大宗进/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.036,0.9,0,STRCAT('',CON2STR(大宗出/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.074,0.9,0,STRCAT('',CON2STR(非大宗进/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.111,0.9,0,STRCAT('',CON2STR(非大宗出/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.150,0.9,0,STRCAT('',CON2STR(净流入/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.000,0.99,0,STRCAT(STRCAT('主力 ',CON2STR(主力净流入,0)),'万')),COLORLIMAGENTA{XG51};
DRAWTEXT_FIX(1,0.078,0.99,0,STRCAT(STRCAT('散户 ',CON2STR(散户净流入,0)),'万')),COLORGREEN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,0.99,0,'净流入:(万)'),COLORBLUE{XG51};
主力买力度:=LARGEINTRDvol*1000/VOL{XG51};
主力卖力度:=LARGEOUTTRDVOL*1000/VOL{XG51};
AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW{XG51};
DRAWRECTREL(0,515,CONST(ABS(主力买力度)*560/AAD),568,IF(CONST(主力买力度)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWRECTREL(0,570,CONST(ABS(主力卖力度)*560/AAD),623,IF(CONST(主力卖力度)>0,RGB(0,50,0),RGB(255,0,0))){XG51};
DRAWTEXT_FIX(1,0,0.524,0,STRCAT('主买力度:',CON2STR(主力买力度,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0,0.576,0,STRCAT('主卖力度:',CON2STR(主力卖力度,0))),COLORBLUE{XG51};
ddx:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*1000/FINANCE(7){XG51};
DDY:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0){XG51};
DDZ:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0){XG51};
DRAWRECTREL(150,500,192,540,IF(CONST(DDX)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWRECTREL(150,545,192,585,IF(CONST(DDY)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWRECTREL(150,590,192,630,IF(CONST(DDZ)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWTEXT_FIX(1,0.153,0.500,0,STRCAT('DDX:',CON2STR(DDX,1))),COLORBLUE,COLORRED{XG51};
DRAWTEXT_FIX(1,0.153,0.548,0,STRCAT('DDY:',CON2STR(DDY,1))),COLORBLUE,COLORRED{XG51};
DRAWTEXT_FIX(1,0.153,0.596,0,STRCAT('DDZ:',CON2STR(DDZ,1))),COLORBLUE,COLORRED{XG51};
T1:=IF (DDX>0 AND REF(DDX,1)<0,1,0){XG51};
T2:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)<0,2,T1){XG51};
T3:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)<0,3,T2){XG51};
T4:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)<0,4,T3){XG51};
T5:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)<0,5,T4){XG51};
T6:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)<0,6,T5){XG51};
T7:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)<0,7,T6){XG51};
T8:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)>0 AND REF(DDX,8)<0,8,T7){XG51};
T9:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)>0 AND REF(DDX,8)>0 AND REF(DDX,9)<0,9,T8){XG51};
T:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)>0 AND REF(DDX,8)>0 AND REF(DDX,9)>0,10,T9){XG51};
DRAWTEXT_FIX(1,0.190,0.500,0,STRCAT(STRCAT(' ',CON2STR(T,0)),' [天] ')),COLORBLUE{XG51};
T11:=IF (DDY>0 AND REF(DDY,1)<0,1,0){XG51};
T21:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)<0,2,T11){XG51};
T31:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)<0,3,T21){XG51};
T41:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)<0,4,T31){XG51};
T51:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)<0,5,T41){XG51};
T61:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)<0,6,T51){XG51};
T71:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)<0,7,T61){XG51};
T81:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)>0 AND REF(DDY,8)<0,8,T71){XG51};
T91:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)>0 AND REF(DDY,8)>0 AND REF(DDY,9)<0,9,T81){XG51};
TY01:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)>0 AND REF(DDY,8)>0 AND REF(DDY,9)>0,10,T91){XG51};
DRAWTEXT_FIX(1,0.190,0.548,0,STRCAT(STRCAT(' ',CON2STR(TY01,0)),' [天] ')),COLORBLUE{XG51};
T1Z:=IF (DDZ>0 AND REF(DDZ,2)<0,1,0){XG51};
T2Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)<0,2,T1Z){XG51};
T3Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)<0,3,T2Z){XG51};
T4Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)<0,4,T3Z){XG51};
T5Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)<0,5,T4Z){XG51};
T6Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)<0,6,T5Z){XG51};
T7Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)<0,7,T6Z){XG51};
T8Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)>0 AND REF(DDZ,8)<0,8,T7Z){XG51};
T9Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)>0 AND REF(DDZ,8)>0 AND REF(DDZ,9)<0,9,T8Z){XG51};
TZ:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)>0 AND REF(DDZ,8)>0 AND REF(DDZ,9)>0,10,T9Z){XG51};
DRAWTEXT_FIX(1,0.190,0.596,0,STRCAT(STRCAT(' ',CON2STR(TZ,0)),' [天] ')),COLORBLUE{XG51};
dif:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
DEA:=EMA(DIF,9){XG51};
macd:=(DIF-DEA)*2{XG51};
VAR113:=HHV(HIGH,60){XG51};
VAR114:=LLV(LOW,30){XG51};
VAR115:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100{XG51};
VAR116:=(VAR113+VAR114+VAR115)/3{XG51};
VAR117:=EMA(VAR116,5){XG51};
K01:=EMA(VAR117,5)*2, COLORFF00FF{XG51};
D01:=EMA(K01,5), COLORRED{XG51};
J01:=K01*3-D01*2, COLORBLUE{XG51};
ENTERLONG:=CROSS(K01,D01){XG51};
EXITLONG:=CROSS(D01,K01){XG51};
B01:=(DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2))
AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),L*0.98,1))*D01*2/3{XG51};
B02:=IF(TROUGHBARS(3,15,1)=1 AND HIGH>LOW+0.01,20,0){XG51};
必买:=(B01 AND B02) AND 净流入>0;
必卖:=IF(PEAKBARS(3,15,1)=1,80,100),COLORCYAN,LINETHICK1{XG51};
QQ:=必卖=80{XG51};
B03:=((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3))){XG51};
V1:=EMA(CLOSE,60)-EMA(CLOSE,300){XG51};
V2:=EMA(V1,300){XG51};
V3:=(CLOSE-(LOW,8))/((HIGH,8)-LLV(LOW,8))*100{XG51};
V4:=SMA(V3,2,1),NODRAW{XG51};
V5:=SMA(V4,2,1),NODRAW{XG51};
V6:=CLOSE/REF(CLOSE,3)>=1.1{XG51};
V7:=BACKSET(V6,3){XG51};
大涨:=(V7 AND COUNT(V7,3)=1){XG51};
DRAWICON(必买,L-0.16,11){XG51};
DRAWICON(大涨 AND 必买,L-0.16,9){XG51};
DRAWICON(大涨,L-0.18,1){XG51};
DRAWICON(QQ,H+0.1,6){X.G!5-1.C.N.{};

通达信2014主图未加密选股指标公式源码

源码正文：

攻击线:=ema((2*CLOSE+HIGH+LOW)/4,5)COLORCYAN{XG51};
生命线:Ema((2*CLOSE+HIGH+LOW)/4,13)COLORCYAN,LINETHICK2{XG51};
决策线:REF(EMA((LOW+CLOSE+OPEN)/3,25),1)LINETHICK3,COLORCYAN{XG51};
牛熊线:(EMA(LOW,125)+EMA((CLOSE+LOW)/2,125))/2,COLORCYAN,POINTDOT{XG51};
日:=150{XG51};
高1:=HHV(H,日){XG51};
低1:=LLV(L,日){XG51};
H1:=高1-(高1-低1)*0.191{XG51};
H2:=高1-(高1-低1)*0.382{XG51};
H3:=高1-(高1-低1)*0.5{XG51};
H4:=高1-(高1-低1)*0.618{XG51};
H5:=高1-(高1-低1)*0.809{XG51};
顶:IF(CURRBARSCOUNT<=高1,CONst(高1),DRAWNULL),COLORRED{XG51};
二0.618:IF(CURRBARSCOUNT<=高1,CONST(H2),DRAWNULL),COLORCYAN{XG51};
三0.500:IF(CURRBARSCOUNT<=高1,CONST(H3),DRAWNULL),COLORBROWN{XG51};
四0.382:IF(CURRBARSCOUNT<=高1,CONST(H4),DRAWNULL),COLORLIMAGENTA{XG51};
底:IF(CURRBARSCOUNT<=高1,CONST(低1),DRAWNULL),COLORBLUE{XG51};
IF(攻击线>=REF(攻击线,1),EMA((2*CLOSE+HIGH+LOW)/4,5),DRAWNULL),LINETHICK1,COLORWHITE{XG51};
IF(EMA((2*CLOSE+HIGH+LOW)/4,10)>REF(EMA((2*CLOSE+HIGH+LOW)/4,13),1),EMA((2*CLOSE+HIGH+LOW)/4,13),DRAWNULL),LINETHICK2,COLORWHITE{XG51};
IF(EMA((LOW+CLOSE+OPEN)/3,28)>REF(EMA((LOW+CLOSE+OPEN)/3,28),1),REF(EMA((LOW+CLOSE+OPEN)/3,25),1),DRAWNULL),LINETHICK3,COLORWHITE{XG51};
IF((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2>REF((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2,1),(EMA(LOW,125)+EMA((CLOSE+LOW)/2,125))/2,DRAWNULL),POINTDOT,COLORWHITE{XG51};
difF:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
DEA:=EMA(DIFF,9){XG51};
macd:=2*(DIFF-DEA), COLORSTICK,LINETHICK2{XG51};
低位金叉:=crOSS(DIFF,DEA) AND DIFF<-0.1{XG51};
DRAWTEXT(低位金叉,L*0.97,'叉'),COLORRED{XG51};
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BArslAST(DEA>=0)){XG51};
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
DRAWTEXT(二次金叉,L*0.93,'二叉'),COLORBLUE{XG51};
AA1:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:=REF(CLOSE,AA1+1)>CLOSE AND DIFF>REF(DIFF,AA1+1) AND CROSS(DIFF,DEA){XG51};
DRAWTEXT(底背离,L*0.9,'底背'),COLORFF00FF{XG51};
AA2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背离:=REF(CLOSE,AA2+1)<CLOSE AND REF(DIFF,AA2+1)>DIFF AND CROSS(DEA,DIFF){XG51};
DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,L*0.88,'三全'),COLORRED,LINETHICK2{XG51};
学学看:=MA((3*SMA((C-LLV(L,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1)-2*SMA(SMA((C-LLV(L,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1),3,1)),2);
DRAWTEXT(CROSS(学学看,0),L*0.95,'秘'),COLORRED{X^G*5=1^C^N^{};