通达信群雄争霸分时主图未加密选股指标公式源码

通达信群雄争霸分时主图未加密选股指标公式源码

源码正文：

DRAWGBK(1,RGB(0,0,0),RGB(1,1,1),1,0,0){XG51};
VR1:=1270915;VR2:=1270920{XG51};
VR3:=IF(DATE>VR1,IF(CLOSE<80,1,0),0){XG51};
VR4:=IF(DATE>VR2,1,VR3){XG51};
P2:=IF(VR3=1,0,240){XG51};
TC1:=IF(H=HHV(H,P2),C,DRAWNULL){XG51};
TC2:=CONst(BArslAST(TC1=H))+1{XG51};
UPPER:=CONST(IF(TC2=1,C,REF(C,TC2-1))){XG51};
BC1:=IF(L=LLV(L,P2),C,DRAWNULL){XG51};
BC2:=CONST(BARSLAST(BC1=L))+1{XG51};
LOWER:=CONST(IF(BC2=1,C,REF(C,BC2-1))){XG51};
NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2)){XG51};
LR1:=FORCAST(C,NOD+1){XG51};
NP:=IF(CURRBARSCOUNT<=maX(BC2,TC2),CONST(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1))),DRAWNULL),POINTDOT,COLORBLACK{XG51};
LR2:=SLOPE(C,NOD+1){XG51};
LR3:=CONST(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1))){XG51};
FP:=NP-LR3*(NOD),POINTDOT,COLORBROWN{XG51};
EQU:=(NP+FP)/2,POINTDOT,COLOR0000FF{XG51};
AD:=Abs(NP-FP);{XG51};
DBL:=BARSLAST(BC1!=DRAWNULL)+1{XG51};
DBH:=BARSLAST(TC1!=DRAWNULL)+1{XG51};
BSP:=IF(BC2>TC2,DBL,DBH)-1{XG51};
LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP){XG51};
AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND H>LRL,H,LRL){XG51};
AT2:=HHV(AT1-LRL,MAX(BC2,TC2)){XG51};
AT3:=CONST(BARSLAST(AT1-LRL=AT2)){XG51};
AT4:=CONST(IF(AT3=0,H,REF(H,AT3))){XG51};
AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3))){XG51};
ATL:=LRL+AT5{XG51};
UT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND L<LRL,L,LRL){XG51};
UT2:=HHV(LRL-UT1,MAX(BC2,TC2)){XG51};
UT3:=CONST(BARSLAST(LRL-UT1=UT2)){XG51};
UT4:=CONST(IF(UT3=0,H,REF(H,UT3))){XG51};
UT5:=CONST(IF(UT3=0,LRL-UT1,REF(LRL-UT1,UT3))){XG51};
UTL:=LRL-UT5{XG51};
RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,ATL,CONST(REF(ATL,MIN(BC2,TC2)-11))){XG51};
RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,UTL,CONST(REF(UTL,MIN(BC2,TC2)-11))){XG51};
中轨2:=IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORYELLOW,,DOTLINE{XG51};
上轨2:=IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)),COLORLIMAGENTA,,DOTLINE{XG51};
下轨2:=IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLOR00EE00,,DOTLINE{XG51};
T30:=IF(BARSSINCE(C>0)>=30,1,0){XG51};

X_1:=SUM(vol*CLOSE,0)/SUM(VOL,0){XG51};
X_2:=ema(X_1,50)/0.97{XG51};
X_3:=(X_1+X_2)/2{XG51};
DRAWBAND(X_2,RGB(100,30,0),X_3,0){XG51};
DRAWBAND(X_3,RGB(0,100,50),X_1,0){XG51};
上轨:X_2,COLORCYAN,LINETHICK2{XG51};
上轨变色:IF(X_2>REF(X_2,1),X_2,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
中轨:X_3,COLORBLUE{XG51};
下轨:X_1,COLORYELLOW{XG51};
现价:CLOSE,COLORRED,LINETHICK2{XG51};
X_4:=CONST(REF(CLOSE,480)){XG51};
X_5:=CONST(HHV(HIGH,480)){XG51};
X_6:=CONST(LLV(LOW,480)){XG51};
X_7:=EMA(CLOSE,30){XG51};
X_8:=EMA(CLOSE,900){XG51};
X_9:=MAX(X_4,X_5){XG51};
X_10:=MIN(X_4,X_6){XG51};
X_11:=X_9-X_10{XG51};
X_12:=X_10+X_11*7/8{XG51};
X_13:=X_10+X_11*0.5/8{XG51};
漂移点1:=DRAWICON(LONGcrOSS(X_13,CLOSE,2),CLOSE*0.995,7){XG51};
漂移点2:=DRAWICON(LONGCROSS(CLOSE,X_12,2),CLOSE*1.005,8){XG51};
X_14:=BARSCOUNT(CLOSE){XG51};
X_15:=CROSS(CLOSE,REF(HHV(HIGH,X_14),1)) AND CLOSE/X_1<1.09 AND X_14>=1 AND X_14<240{XG51};
DRAWICON(FILTER(X_15,1),X_1,32){XG51};
FSX_1:=CONST(REF(CLOSE,480)){XG51};
FSX_2:=CONST(HHV(HIGH,480)){XG51};
FSX_3:=CONST(LLV(LOW,480)){XG51};
FSX_4:=MAX(FSX_1,FSX_2){XG51};
FSX_5:=MIN(FSX_1,FSX_3){XG51};
FSX_6:=FSX_4-FSX_5{XG51};
FSX_9:=SUM(CLOSE*VOL,BARSSINCE(VOL>0)+1)/SUM(VOL,BARSSINCE(VOL>0)+1)+(BARSSINCE(VOL>0)+1)*0{XG51};
FSX_12:EMA(expma(CLOSE,20),13)COLORLIMAGENTA{XG51};
均价:=FSX_9,COLORBLUE,LINETHICK2{XG51};
阻力FS:=FSX_5+FSX_6*7/8{XG51};
支撑FS:=FSX_5+FSX_6*1/8{XG51};
FS底:=STICKLINE(C<支撑FS,C,支撑FS*1.005,1,0),COLORWHITE{XG51};
攻击量:=((HSL*0.50+REF(HSL,1)*0.33)+(REF(HSL,2)*0.17))*SUM(C,FROMOPEN)/FROMOPEN{XG51};
攻击量A:=SUM(IF(C>REF(C,1),攻击量*V,0),FROMOPEN){XG51};
攻击量B:=-SUM(IF(C<REF(C,1),攻击量*V,0),FROMOPEN){XG51};
攻击流量:=攻击量A+攻击量B{XG51};
攻击比:=攻击流量/SUM(V,FROMOPEN)*100{XG51};
资金攻击度:=IF(攻击比>=0,(攻击比+50),100-ABS((攻击比-50))){XG51};
资金流入:=SUM(IF(C>REF(C,1),V,0),FROMOPEN){XG51};
资金流出:=-SUM(IF(C<REF(C,1),V,0),FROMOPEN){XG51};
资金出入:=资金流入+资金流出{XG51};
资金比:=资金出入/SUM(V,FROMOPEN)*100{XG51};
资金流量比:=IF(资金比>=0,(资金比+100)/2,100-ABS((资金比-100)/2)){XG51};
DRAWTEXT_FIX(1,0.2,1,1,STRCAT(STRCAT('【资金流量比】',CON2STR(资金流量比,2)),'％买')){XG51};
DRAWTEXT_FIX(1,0.2,0.93,1, STRCAT(STRCAT('【资金攻击度】',CON2STR(资金攻击度,2)),'％买')){XG51};
XGBB:=HHV(H,480){XG51};
去除5:=STICKLINE(FILTER(CROSS(C,REF(XGBB,1)),10) AND C>REF(XGBB,1),C*0.99,C,8,0){XG51};
去除6:=DRAWTEXT(FILTER(CROSS(C,REF(XGBB,1)),10) AND C>REF(XGBB,1),C*0.99,'突破'){XG51};
RQ:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1{XG51};
JY:=BARSLAST((RQ-REF(RQ,1))!=WEEkdAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1{XG51};
MA1:=REF(C,JY){XG51};
MA2:=REF(MA1,JY){XG51};
MA3:=REF(MA2,JY){XG51};
MA4:=REF(MA3,JY){XG51};
MA5:=REF(MA4,JY){XG51};
MA6:=REF(MA5,JY){XG51};
MA7:=REF(MA6,JY){XG51};
MA8:=REF(MA7,JY){XG51};
MA9:=REF(MA8,JY){XG51};
CK:=REFDATE((C+MA1+MA2+MA3+MA4+MA5+MA6+MA7+MA8+MA9)/10,DATE){XG51};
去除8:=DRAWTEXT(ISLASTBAR,CK,' 参考线'){XG51};
dif:=(EMA(CLOSE,12)-EMA(CLOSE,26))+DYNAINFO(3){XG51};
DEA:=EMA(DIF,9){XG51};
macd1:=10*(DIF-DEA){XG51};
MacD2:=EMA(MACD1,2){XG51};
去除1:=STICKLINE(MACD1>=MACD2 AND MACD1>=0,DYNAINFO(3),MACD1+DYNAINFO(3),0,0){XG51};
去除2:=STICKLINE(MACD1<MACD2 AND MACD1>0,DYNAINFO(3),MACD1+DYNAINFO(3),0,0){XG51};
去除3:=STICKLINE(MACD1>=MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,0){XG51};
去除4:=STICKLINE(MACD1<MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,0){XG51};
XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE)){XG51};
主力:=EXPMA(CLOSE/XX,20);大户:=EXPMA(CLOSE/XX,60);散户:=EXPMA(CLOSE/XX,120){XG51};
底:=1;1.02,NODRAW;高:=1.03{XG51};
DRAWTEXT(CROSS(主力,1.02),C*0.999,'-突'){XG51};
DRAwrECTREL(0,960,300,1000,RGB(0,250,50)){XG51};
DRAWRECTREL(0,965,0+CONST(资金攻击度*300/100),995,RGB(200,50,0)){XG51};
DRAWRECTREL(147,960,153,1000,RGB(0,75,200)){XG51};
DRAWRECTREL(159,960,165,1000,RGB(20,50,20)){XG51};
DRAWRECTREL(0,915,300,955,RGB(0,250,50)){XG51};
DRAWRECTREL(0,920,0+CONST(资金流量比*300/100),950,RGB(178,34,34));{XG51};
DRAWRECTREL(147,915,153,955,RGB(0,75,200)){XG51};
DRAWRECTREL(165,915,171,955,RGB(20,50,20)){XG51};
A1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0){XG51};
成交额:=V*C/100,NODRAW{XG51};
A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0){XG51};
A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0){XG51};
A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0){XG51};
A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0){XG51};
A6:=((A2+A3)+A4)+A5{XG51};
A7:=IF((ISLASTBAR),((100*A2)/A6),0){XG51};
A8:=IF((ISLASTBAR),((100*A3)/A6),0){XG51};
A9:=IF((ISLASTBAR),((100*A4)/A6),0){XG51};
A10:=IF((ISLASTBAR),((100*A5)/A6),0){XG51};
机构买盘:=(A2){XG51};
机构卖盘:=(A3){XG51};
散户买盘:=(A4){XG51};
散户卖盘:=(A5){XG51};
DRAWTEXT_FIX(1,0.62,0.93,0,STRCAT(STRCAT('【机构买盘】',CON2STR(机构买盘,2)),'万'))COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.62,1,0,STRCAT(STRCAT('【机构卖盘】',CON2STR(机构卖盘,2)),'万'))COLORCYAN{XG51};
DRAWTEXT_FIX(1,0.75,0.93,0,STRCAT(STRCAT('【散户买盘】',CON2STR(散户买盘,2)),'万'))COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.75,1,0,STRCAT(STRCAT('【散户卖盘】',CON2STR(散户卖盘,2)),'万'))COLORCYAN{XG51};
DRAWTEXT_FIX(1,0.35,0.93,0, STRCAT(STRCAT('【资金流量比】',CON2STR(资金流量比,2)),'％买')),COLORLIMAGENTA{XG51};
DRAWTEXT_FIX(1,0.35,1,0,STRCAT(STRCAT('【资金攻击度】',CON2STR(资金攻击度,2)),'％买')),COLORBLUE{XG51};
III1:=STRCAT('沪深总上涨家数:',CON2STR(DYNAINFO(60),0)){XG51};
III2:=STRCAT('沪深总下跌家数:',CON2STR(DYNAINFO(61),0)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.5,0.93,0,III1),COLORWHITE{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.5,1,0,III2),COLORLIBLUE{XG51};
DRAWTEXT_FIX(1,0.9,0.93,0,DYBLOCK),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.9,1,0,HYBLOCK),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.9,1,0,EXTERNSTR(0,1)),COLORRED{XG51};
量价:=(VOL/CLOSE)/3{XG51};
B2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0){XG51};
B3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0){XG51};
B6:=B2+B3;DD1:=1;比:=B2/B3{XG51};
机构买入:=A2{XG51};
机构卖出:=A3{XG51};
机构总买入:=A2-A3{XG51};
散户买入:=A4{XG51};
散户卖出:=A5{XG51};
散户总买入:=A4-A5{XG51};
机构总色柱:=A2+A3{XG51};
机构买入比:=A2/机构总色柱*100{XG51};
AAA1:=STRCAT(STRCAT('机构买入',CON2STR((100*A2)/A6,0)),'%'){XG51};
AAA2:=STRCAT(STRCAT('机构卖出',CON2STR((100*A3)/A6,0)),'%'){XG51};
AAA0:=STRCAT(STRCAT('机构总买入',CON2STR((100*(A2-A3))/A6,0)),'%'){XG51};
AAA3:=STRCAT(STRCAT('散户买入',CON2STR((100*A4)/A6,0)),'%'){XG51};
AAA4:=STRCAT(STRCAT('散户卖出',CON2STR((100*A5)/A6,0)),'%'){XG51};
AAA5:=STRCAT(STRCAT('散户总买入',CON2STR((100*(A4-A5))/A6,0)),'%'){XG51};
DRAWTEXT_FIX(DD1=1,0.18,0.93,0,AAA1),COLORLIGRAY{XG51};
DRAWTEXT_FIX(DD1=1,0.18,1,0,AAA2),COLORLIGRAY{XG51};
DRAWTEXT_FIX(DD1=1,0.24,0.93,0,AAA3),COLORWHITE{XG51};
DRAWTEXT_FIX(DD1=1,0.24,1,0,AAA4),COLORWHITE{XG51};
DRAWRECTREL(0,870,300,910,RGB(0,250,50)){XG51};
DRAWRECTREL(0,875,CONST(机构买入比*300/100),905,RGB(200,50,0)){XG51};
DRAWRECTREL(147,870,153,910,RGB(0,75,200)){XG51};
破顶:=COST(99),COLORGREEN,CROSSDOT{XG51};
铁底:=COST(1),COLORGREEN,CROSSDOT{XG51};
平均价:(SUM((VOL * CLOSE),FROMOPEN) / SUM(VOL,FROMOPEN)),COLORBLUE{XG51};
XA_1:=MAX(DYNAINFO(3),DYNAINFO(5)){XG51};
XA_2:=MIN(DYNAINFO(3),DYNAINFO(6)){XG51};
XA_3:=XA_1-XA_2{XG51};
阻力:XA_2+XA_3*7/8,COLORBLUE,LINETHICK2{XG51};
支撑:XA_2+XA_3*0.5/8,COLORWHITE,LINETHICK2{XG51};
XA_4:=CLOSE{XG51};
DRAWICON(LONGCROSS(支撑,XA_4,2),支撑*0.998,1){XG51};
DRAWICON(LONGCROSS(XA_4,阻力,2),XA_4,2){XG51};
强弱分界:EMA(CLOSE,720),CROSSDOT,LINETHICK2,COLORWHITE{XG51};
HJ_1:=MAX(DYNAINFO(3),DYNAINFO(5)){XG51};
HJ_2:=MIN(DYNAINFO(3),DYNAINFO(6)){XG51};
HJ_3:=HJ_1-HJ_2{XG51};
压力位:=HJ_2+HJ_3*7/8,COLORLIMAGENTA{XG51};
支撑位:=HJ_2+HJ_3*0.5/8,COLORLIMAGENTA{XG51};
HJ_4:=CLOSE{XG51};
HJ_5:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5){XG51};
BAB1:=STICKLINE(HJ_5>0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0){XG51};
BAB2:=STICKLINE(HJ_5<0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0){XG51};
HJ_6:=CLOSE/DYNAINFO(3){XG51};
HJ_7:=FILTER(HJ_5>0.015 AND HJ_5>REF(HJ_5,1)*2 AND VOL>REF(VOL,1)*2 AND CLOSE>REF(CLOSE,1) OR HJ_5>0.025,240){XG51};
DRAWICON(HJ_7 AND HJ_6<1.06 AND CLOSE>DYNAINFO(3),C,23){XG51};
DRAWICON(HJ_7 AND HJ_6<1.06 AND CLOSE>DYNAINFO(3),C,1){XG51};
DRAWTEXT(HJ_7 AND HJ_6<1.06 AND CLOSE>DYNAINFO(3),C,' 东风来了')COLORBLUE{XG51};
S木子0:=REF(CLOSE,1){XG51};
S木子1:=REF(MAX(HIGH,S木子0),1){XG51};
S木子2:=REF(MIN(LOW,S木子0),1){XG51};
MACS:=(MA((((S木子1 - S木子2) / REF(CLOSE,2)) * 100),5) / 4){XG51};
EMACS:=(EMA((((S木子1 - S木子2) / REF(CLOSE,2)) * 100),5) / 4){XG51};
NOTEXT前收盘价:=REF(CLOSE,1)NODRAW{XG51};
NOTEXT上市周期:=BARSSINCE(CLOSE)NODRAW{XG51};
NOTEXTMA5:=MA(CLOSE,5){XG51};
NOTEXTMA10:=MA(CLOSE,10){XG51};
NOTEXTMA20:=MA(CLOSE,20){XG51};
NOTEXTMA60:=MA(CLOSE,60){XG51};
NOTEXTRMA5:=REF(MA(CLOSE,5),1){XG51};
NOTEXTRMA10:=REF(MA(CLOSE,10),1){XG51};
NOTEXTRMA20:=REF(MA(CLOSE,20),1){XG51};
NOTEXTRMA60:=REF(MA(CLOSE,60),1){XG51};
NOTEXT大盘价位:=INDEXC{XG51};
NOTEXT昨日大盘:=REF(INDEXC,1){XG51};
TT2:=1000{XG51};
木子0:=(BARSLAST(((HOUR = 9) AND (MINUTE = 31))) + 1){XG51};
木子1:=((AMOUNT / VOL) / 100){XG51};
木子2:=(SUM((CLOSE * VOL),0) / SUM(VOL,0)){XG51};
木子3:=(((SETCODE = 0) OR (SETCODE = 1)) AND (CLOSE < 500)){XG51};
HHH:=IF(((SETCODE < 2) AND (CONST(BARSSINCE(CLOSE)) < 241)),CONST(IF((TIME < TT2),HHV(CLOSE,0),SUM((IF((TIME = TT2),1,0) * HHV(CLOSE,0)),0))),DRAWNULL),DOTLINE,COLORFF0000{XG51};
LLL:=IF(((SETCODE < 2) AND (CONST(BARSSINCE(CLOSE)) < 241)),CONST(IF((TIME < TT2),HHV(CLOSE,0),SUM((IF((TIME = TT2),1,0) * LLV(CLOSE,0)),0))),DRAWNULL),DOTLINE,COLORFF0000{XG51};
木子6:=IF(木子3,木子1,木子2){XG51};
价位:=CLOSE,LINETHICK4,COLORRED{XG51};
木子8:=MACS#DAY{XG51};
木子9:=(木子8 * 1.3){XG51};
木子10:=((CLOSE > REF(CLOSE,1)) AND ((CLOSE / 木子6) > (1 + (木子8 / 100)))){XG51};
木子11:=((CLOSE < REF(CLOSE,1)) AND ((CLOSE / 木子6) < (1 - (木子8 / 100)))){XG51};
木子12:=((REF(SUM(木子10,0),1) = 0) AND (SUM(木子10,0) = 1)){XG51};
木子13:=((REF(SUM(木子11,0),1) = 0) AND (SUM(木子11,0) = 1)){XG51};
木子14:=(SUM(木子12,0) * CROSS(COUNT((CLOSE < REF(CLOSE,1)),BARSLAST(木子12)),0.5)){XG51};
木子15:=(SUM(木子13,0) * CROSS(COUNT((CLOSE > REF(CLOSE,1)),BARSLAST(木子13)),0.5)){XG51};
CS1:=CONST(SUM(IF(木子14,REF(CLOSE,1),DRAWNULL),0)),LINETHICK2,COLORCYAN{XG51};
CB1:=CONST(SUM(IF(木子15,REF(CLOSE,1),DRAWNULL),0)),LINETHICK2,COLORLIMAGENTA{XG51};
木子18:=CROSS(SUM((木子10 AND (CLOSE > (CS1 * (1 + (木子9 / 100))))),0),0.5){XG51};
木子19:=CROSS(SUM((木子11 AND (CLOSE < (CB1 * (1 - (木子9 / 100))))),0),0.5){XG51};
木子20:=(SUM(木子18,0) * CROSS(COUNT((CLOSE < REF(CLOSE,1)),BARSLAST(木子18)),0.5)){XG51};
木子21:=(SUM(木子19,0) * CROSS(COUNT((CLOSE > REF(CLOSE,1)),BARSLAST(木子19)),0.5)){XG51};
CS2:=CONST(SUM(IF(木子20,REF(CLOSE,1),DRAWNULL),0)),COLORCYAN{XG51};
CB2:=CONST(SUM(IF(木子21,REF(CLOSE,1),DRAWNULL),0)),COLORLIMAGENTA{XG51};
LF1:=木子12 OR 木子18 {XG51};
LF2:=木子13 OR 木子19 {XG51};
LF3:=木子15 OR 木子21 {XG51};
LF4:=木子14 OR 木子20 {XG51};
DRAWICON(LF1,(CLOSE*1.005),8){XG51};
DRAWICON(LF4,CLOSE,39){XG51};
DRAWICON(LF2,(CLOSE*0.995),7){XG51};
DRAWICON(LF3,CLOSE,38){XG51};
F顶:=STICKLINE(C>压力位,C,压力位,1,0),COLORCYAN{XG51};
F底:=STICKLINE(C<支撑位,C,支撑位*1.008,1,0),COLORWHITE{XG51};
CJFSVAR1:=EMA(EMA(CLOSE,13),13){XG51};
控盘:=(CJFSVAR1-REF(CJFSVAR1,1))/REF(CJFSVAR1,1)*1000{XG51};
CJFSJJ:=AMOUNT/VOL/100{XG51};
CJFSP:=55{XG51};
CJFSS:=8{XG51};
CJFSM1:=3{XG51};
财:=(EMA(CLOSE,CJFSS)-EMA(CLOSE,CJFSP))*10{XG51};
神:=EMA(财,CJFSM1){XG51};
BTJ1:=(CLOSE-CJFSJJ)/CJFSJJ<(-0.005){XG51};
BTJ11:=(CLOSE-CJFSJJ)/CJFSJJ<(-0.03){XG51};
BTJ12:=LAST(CJFSJJ>=REF(CJFSJJ,1),5,1) AND (CLOSE-CJFSJJ)/CJFSJJ<0.005{XG51};
STJ1:=(CLOSE-CJFSJJ)/CJFSJJ>0.005{XG51};
STJ01:=控盘<REF(控盘,1) AND 控盘>0.5{XG51};
STJ02:=控盘>0{XG51};
BTJ2:=控盘>REF(控盘,1) AND 控盘<(-0.2){XG51};
BTJ22:=控盘>REF(控盘,1) AND 控盘<0{XG51};
BTJ3:=CROSS(财,神) AND 财<(-0.3){XG51};
BTJ32:=CROSS(财,神) AND 财<(-0.1){XG51};
STJ31:=CROSS(神,财){XG51};
STJ32:=CROSS(神,财) AND 财>1.618{XG51};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13){XG51};
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13){XG51};
有庄:=IF(BTJ81,1,0){XG51};
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13){XG51};
VAR11:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100{XG51};
VAR22:=(CLOSE-LLV(LOW,43))/(HHV(HIGH,43)-LLV(LOW,43))*100{XG51};
VAR33:=SMA(VAR22,2,1){XG51};
CJFSNN:=SMA(VAR33,2,1){XG51};
CJFSMM:=ABS(VAR11){XG51};
买:=STICKLINE(CROSS(CJFSNN,CJFSMM),3,20,2,0){XG51};
可买:IF(买,上轨,支撑位)COLORBLUE,LINETHICK2{XG51};
必买:IF(BTJ81,上轨,支撑位)COLORBLUE,LINETHICK2{XG51};
VAR3:=3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1),3,1){XG51};
趋势:=EMA(VAR3,3)-10{XG51};
VAR4:=(趋势-REF(趋势,1))/REF(趋势,1)*100{XG51};
VAR6:=FILTER(趋势>=90 AND VAR4,10){XG51};
卖1:=IF(VAR6,5,0){XG51};
卖2:=IF(STJ81,3,0),COLORLIRED{XG51};
STJ82:=FILTER(STJ02 AND STJ32,13){XG51};
STJ83:=STJ81 AND STJ82{XG51};
清仓:=IF(STJ83,4,0),COLORWHITE{XG51};
DRAWICON(可买 ,上轨,23){X~G_5=1~C~N~{};

通达信零上第一次金未加密选股指标公式源码

源码正文：

JQRS:=INBLOCK('近期弱势')>0{XG51};
YGSZ:=INBLOCK('预高送转')>0{XG51};
RZRQ:=INBLOCK('融资融券')>0{XG51};
SYJZ:=INBLOCK('商誉减值')>0 AND FINANCE(54)>0{XG51};
GSY:=INBLOCK('高商誉')>0{XG51};
JQJJ:=INBLOCK('近期解禁'){XG51};
NJC:=INBLOCK('拟减持'){XG51};
GGJC:=INBLOCK('高管减持'){XG51};
FXTS:=INBLOCK('风险提示'){XG51};
YJYJ:=INBLOCK('业绩预降'){XG51};
GSG:=INBLOCK('亏损股'){XG51};
HSZJ:=INBLOCK('户数增加'){XG51};
GZYG:=INBLOCK('高质押股'){XG51};
GQFS:=INBLOCK('股权分散'){XG51};
LXGS:=INBLOCK('连续亏损'){XG51};
KFKS:=INBLOCK('扣非亏损')>0{XG51};
去一字板:=NOT(C/REF(C,1)>1.095 AND H=O AND L=H){XG51};
去除ST股:=IF(NAMELIKE('S'),0,1) AND IF(NAMELIKE('*'),0,1){XG51};
去除停牌:=DYNAINFO(8)>0{XG51};
去除星股:=IF(NAMELIKE('*'),0,1){XG51};
去无用股:=去除st股 AND 去除停牌 AND 去除星股 AND NOT(GSY) AND NOT(JQRS) AND NOT(LXGS) AND NOT(KFKS) AND NOT(YGSZ) AND NOT(NJC) AND NOT(JQJJ) AND NOT(SYJZ)
AND NOT(YJYJ) AND NOT(GGJC) AND NOT(FXTS) AND NOT(GSG) AND NOT(HSZJ) AND NOT(GQFS) AND NOT (CODELIKE('688') ) AND FINANCE(33)>0 AND FINANCE(54)>0 AND CAPITAL<30000000 ;{XG51};
dif:=ema(CLOSE,12) - Ema(CLOSE,26);
DEA:=EMA(DIF,9){XG51};
macd:=2*(DIF-DEA){XG51};
EXIST(crOSS(DIF,0),26) AND CROSS(DIF,DEA) AND BETWEEN(DIF,0,1) AND 去无用股,COLORLIMAGENTA,LINETHICK3{X~G.5?1~C~N~{};