通达信新庄家控盘指标公式源码副图

以下是通达信新控盘指标公式源码和截图

通达信新庄家控盘指标公式源码：

   VAR1:=(3*CLOSE+OPEN+HIGH+LOW)/6;

   MA12:=EMA(VAR1,12);

   MA36:=EMA(VAR1,36);

   MA108:=EMA(VAR1,108);

   MA250:=EMA(VAR1,250);

   控盘度:(EMA(VAR1,12)-REF(EMA(VAR1,36),1))/REF(EMA(VAR1,36),1)*100+50,NODRAW;

   STICKLINE(控盘度 50,0,控盘度-20,2.5,0),COLORFFFF00;

   STICKLINE(控盘度 =60,60,控盘度,2.5,0),COLORRED;

   STICKLINE(控盘度 =80,80,控盘度,2.5,0),COLORMAGENTA;

   低控盘:IF(控盘度 =50,控盘度,0),COLORYELLOW,NODRAW;

   中控盘:IF(控盘度 =60,控盘度,0),COLORRED,NODRAW;

   高控盘:IF(控盘度 =80,控盘度,0),COLORMAGENTA,NODRAW;

   10,COLORWHITE,DOTLINE;

   cyc13:=0.01*EMA(AMOUNT,13)/EMA(,13);

   强弱:50,COLORYELLOW,DOTLINE;

   高度控盘:(CLOSE-CYC13)/CYC13*1000,NODRAW;

   DRAWICON(高度控盘 0AND控盘度 =60AND高度控盘 50,控盘度+20,23);

   STICKLINE(高度控盘 0,0,高度控盘,3,0),COLORRED;

   STICKLINE(高度控盘 0AND控盘度 =60,0,控盘度,3,0),COLOR00FFFF;

   STICKLINE(高度控盘 0,0,高度控盘,3,0),COLORGREEN;

   庄洗盘吸筹:控盘度 =60AND高度控盘 0,COLORC08080,NODRAW;

   STICKLINE(控盘度 =60AND高度控盘 0,0,控盘度,2.5,0),COLORC08080;

   STICKLINE(高度控盘 -50,-50,高度控盘,3,0),COLORLIBLUE;

   STICKLINE(高度控盘 -100,-100,高度控盘,3,0),COLORYELLOW;

   STICKLINE(高度控盘 100,100,高度控盘,3,0),COLORLIRED;

   STICKLINE(高度控盘 150,150,高度控盘,3,0),COLORMAGENTA;

   换手:=VOL/CAPITAL*100;

   VAR5:=IF(CODELIKE('688'),0,1);

   VAR6:=COST(85);

   VAR7:=COST(15);

   VAR8:=VAR6-VAR7;

   VAR9:=(VAR6+VAR7)/2;

   :=VAR8/VAR9*100 30,LINETHICK0;

   BU1:=HHV(HIGH,250);

   BU2:=LLV(LOW,250);

   BU3:=BU1-BU2;

   BU4:=(VAR9-BU2);

   比例:=VAR9 (BU3*04+BU2),LINETHICK0;

   吸筹结束:=筹码AND比例;

   BU5:=C/REF(C,1) 1.04;

   持仓%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3);

   主力持仓:=主力持仓% =75ANDC 0ANDCLOSE OPEN;

   强庄:FILTER(主力持仓AND吸筹结束ANDBU4ANDWINNER(C) =0.90ANDBU5ANDC/REF(C,1) 1.092ANDC=HANDC 40ANDVAR5AND换手 20,10),NODRAW;

   STICKLINE(强庄,控盘度,-10,1,0),COLORFF0080;

   SHORT:=26;LONG:=12;M:=9;P1:=19;P2:=120;K:=-40;G:=-26;

   STICKLINE(C 0,-1,1,6,0),COLOR330066;

   DIF:=((EMA(CLOSE,SHORT)-EMA(CLOSE,LONG)))*-1;

   DEA:=EMA(DIF,M),COLORFF00FF;

   MACD:=2*(DIF-DEA);

   HH:=MA(CLOSE,10);

   GG:=MA(CLOSE,12);

   上:=EMA((MA(HIGH,3)*1.05),30);

   下:=EMA((MA(LOW,3)*0.96),30);

   决战:STICKLINE((((CROSS(DIF,DEA)AND((下-REF(下,1)) 0))AND(MACD =REF(MACD,1)))AND(DIF 0)),DIF,0.4,3,0),COLOR0000FF;

   DRAWICON((((CROSS(DIF,DEA)AND((下-REF(下,1)) 0))AND(MACD =REF(MACD,1)))AND(DIF 0)),0.4,0);

   DRAWTEXT((((CROSS(DIF,DEA)AND((下-REF(下,1)) 0))AND(MACD =REF(MACD,1)))AND(DIF =0)),0.4,'DIFF'),COLOR0000FF;

   STICKLINE(FILTER(((((MACD =REF(MACD,5))AND((下-REF(下,1)) 0))AND(MACD =0))AND((GG-REF(GG,1)) =0)),3),0,0.5,3,0),COLOR00FF00;

   DRAWICON(FILTER(((((MACD =REF(MACD,5))AND((下-REF(下,1)) 0))AND(MACD =0))AND((GG-REF(GG,1)) =0)),3),0.5,0);

   DRAWTEXT(FILTER(((((MACD =REF(MACD,5))AND((下-REF(下,1)) 0))AND(MACD =0))AND((GG-REF(GG,1)) =0)),3),0.5,'绝佳买入'),COLOR00FF00;

   VCF1:=LLV(LOW,5);

   VCF2:=HHV(HIGH,5);

   VCF3:=EMA((((CLOSE-VCF1)/(VCF2-VCF1))*100),4);

   VCF4:=EMA(((0.667*REF(VCF3,1))+(0.333*VCF3)),2);

   VCF5:=((HIGH+LOW)/2);

   VCF6:=DMA(VCF5,(VOL/SUM(VOL,5)));

   VCF7:=DMA(VCF5,(VOL/SUM(VOL,13)));

   VCF8:=DMA(VCF5,(VOL/SUM(VOL,34)));

   VCF9:=DMA(VCF5,(VOL/SUM(VOL,75)));

   VCFA:=EMA(WINNER((0.9*CLOSE)),5);

   VCFB:=(1-EMA(WINNER((1.2*CLOSE)),5));

   VCFC:=EMA(WINNER(CLOSE),5);

   VCFD:=((100*(CLOSE-VCF6))/VCF6);

   VCFE:=((100*(CLOSE-VCF7))/VCF7);

   VCFF:=((100*(MIN(CLOSE,OPEN)-VCF8))/VCF8);

   VCF10:=BARSLAST(((VCF8 VCF9)AND(REF(VCF8,1) =REF(VCF9,1))));

   VCF11:=((((COUNT(((WINNER(CLOSE) 0.11)AND(EMA(WINNER(CLOSE),5) 0.15)),2) 0)OR(((1-WINNER((1.2*CLOSE))) =0.8)AND(WINNER(CLOSE) 0.05)))AND(COUNT((VCFE (0-16)),2) 0))AND(COUNT((VCFF (0-20)),2)

   VCF12:=((((COUNT((VCFD (0-10)),2) 0)AND(COUNT((VCFE (0-15)),2) 0))AND(COUNT((VCFF (0-15)),2) 0))AND(COUNT((VCFA 0.8),VCF10)=0));

   VCF13:=(((COUNT((VCF11ORVCF12),2) 0)AND(VCF3 REF(VCF3,1)))AND(((1-WINNER((1.15*CLOSE)))*100) 80));

   出击1:=IF((VCF13AND(COUNT(VCF13,3) =1)),0.1,0);

   出击:IF((VCF13AND(COUNT(VCF13,3) =1)),0.37,0),LINETHICK3,COLOR0000FF;

   DRAWICON((黑马出击 0),0.37,1);

   DRAWTEXT((黑马出击 0),0.35,'★黑马'),COLORFFFFFF;

   DRAWTEXT((黑马出击 0),0.35,'出击'),COLOR00FF00;

   VAR26:=(((CLOSE-REF(CLOSE,1))/REF(CLOSE,1))*100);

   VAR27:=((EMA(CLOSE,12)-EMA(CLOSE,26))*100);

   VAR28:=EMA(VAR27,9);

   VAR29:=(2*(VAR27-VAR28));

   STICKLINE(((VAR27 (0-50))AND(VAR26 7)),0,(0-0.1),5,0),COLOR0000FF;

   DRAWTEXT((((VAR27 (0-50))AND(VAR26 7))AND(VAR27 VAR28)),(0-0.09),'底'),COLORFFFFFF;

   DRAWTEXT((((VAR27 (0-50))AND(VAR26 7))AND(VAR27 =VAR28)),(0-0.1),'追'),COLORFFFFFF;

   VAR1:=1;

   VAR2:=MA(CLOSE,18);

   VAR3:=(((CLOSE-VAR2)/VAR2)*100);

   VAR4:=MA(VAR3,1);

   升跌:=(VAR4*VAR1);

   VAR5:=BARSLAST((CROSS((0-10),VAR4)=1));

   VAR6:=BARSLAST((CROSS(VAR4,10)=1));

   VAR7:=((VAR4 (0-10))AND(VAR5 =5));

   VAR8:=((VAR4 10)AND(VAR6 =5));

   {C1:(0.01*(IF(((VAR4 (0-10))AND(VAR5 =5)),VAR4,0)*VAR1)),LINETHICK1,COLOR0000FF;

   C2:=C1;}

   C3:=(IF(((VAR4 10)AND(VAR6 =5)),VAR4,0)*VAR1);

   C4:=C3;

   D1:=((((升跌 REF(升跌,1))ANDVAR7)*0.2)*VAR1);

   中期底部:=LLV(CLOSE,30);

   D:(FILTER(((((((升跌 REF(升跌,1))AND(LOW =中期底部))AND(CLOSE 中期底部))ANDVAR7)*0.5)*VAR1),3)*0.5),LINETHICK2,COLOR0000FF;

   DRAWTEXT((D =0.25),D,'★铁底'),COLOR00FFFF;

   STICKLINE(((CROSS(MACD,DIF)AND(MACD =(0-0.05)))AND(MACD =0.02)),MACD,0.23,0,0),LINETHICK2,COLOR00FFFF;

   DRAWTEXT(((CROSS(MACD,DIF)AND(MACD =(0-0.05)))AND(MACD =0.02)),0.23,'＾MACD'),COLOR0000FF;

   DRAWTEXT(((CROSS(MACD,DIF)AND(MACD =(0-0.05)))AND(MACD =0.02)),0.23,'金叉'),LINETHICK4,COLORFFFFFF;

   DRAWICON(((CROSS(MACD,DIF)AND(MACD =(0-0.05)))AND(MACD =0.02)),0.23,1);

   DIFF2:=(EMA(CLOSE,2)-EMA(OPEN,5));

   操盘手:=DIFF2;

   (0.4*((CROSS(操盘手,MACD)AND(MACD =(0-0.11)))AND(LOW =下))),LINETHICK2,COLORFFFFFF;

   DRAWTEXT(((CROSS(操盘手,MACD)AND(LOW =下))AND(MACD =(0-0.11))),0.6,'5%'),COLORB7D16F;

   MA1:=MA(CLOSE,5);

   MA2:=MA(CLOSE,10);

   BB:(0.7*((((((CROSS(DIF,DEA)AND(CLOSE 上))AND((下-REF(下,1)) 0))ANDCROSS(MACD,0))AND(MACD =0))AND(DIF 0))AND(((HH-REF(HH,1)) 0)AND(VOL REF(VOL,1)))));

   DRAWTEXT((((BB =0.7)AND(CLOSE 上))AND((下-REF(下,1)) 0)),0.7,'。量价配合完美'),COLOR00FF00;

   DRAWTEXT((((BB =0.7)AND(CLOSE 上))AND((下-REF(下,1)) 0)),0.7,'。(追)'),COLOR0000FF;

   N15HIGH:=REF(HIGH,15);

   N1LOW:=REF(LOW,1);

   FF:=(((N15HIGH-N1LOW)/N1LOW) 0.15);

   DRAWICON((((((CROSS(MA(CLOSE,P1),MA(CLOSE,P2)) 0)AND(((N15HIGH-N1LOW)/N1LOW) 0.15))AND(OPEN =MA(CLOSE,P1)))AND(CLOSE =MA(CLOSE,P1)))AND(LOW =MA(CLOSE,P1))),0.5,1);

   DRAWTEXT((((((CROSS(MA(CLOSE,P1),MA(CLOSE,P2)) 0)AND(((N15HIGH-N1LOW)/N1LOW) 0.15))AND(OPEN =MA(CLOSE,P1)))AND(CLOSE =MA(CLOSE,P1)))AND(LOW =MA(CLOSE,P1))),0.5,'★＾回头望月'),COLORFF0000;

   VAR10:=(((CLOSE-MA(CLOSE,58))/MA(CLOSE,58))*100);

   VAR11:=((((VAR10 (1*REF(VAR10,1)))AND(VAR10 K))AND(VAR10 G))*1.5);

   VAR12:=((VOL/CAPITAL)*100);

   VAR13:=LLVBARS(LOW,50);

   VAR14:=SUM(VOL,VAR13);

   VAR15:=HHVBARS(HIGH,50);

   VAR16:=SUM(VOL,VAR15);

   VAR17:=(((CLOSE-REF(OPEN,VAR15))/REF(OPEN,VAR15))*100);

   VAR18:=((VAR16/CAPITAL)*100);

   VAR19:=(((CLOSE-REF(OPEN,VAR13))/REF(OPEN,VAR13))*100);

   VAR20:=((VAR14/CAPITAL)*100);

   VAR21:=MA(CLOSE,3);

   VAR22:=(REF(CLOSE,2)*0.865);

   VAR23:=(REF(CLOSE,13)*0.772);

   VAR24:=MIN(VAR22,VAR23);

   VAR25:=MA(CLOSE,13);

   1:(IF((((((CLOSE-VAR24)/CLOSE) 0.03)AND(VAR17 (-35)))AND((SUM(VAR12,5)/5) 1.8)),1,0)*0.4),LINETHICK3,COLORFF0000;

   DRAWTEXT((抄底1 0),抄底1,'★抄底'),LINETHICK3,COLORFFFFFF;

   DRAWTEXT((抄底1 0),抄底1,'成功90%'),LINETHICK3,COLOR00FF00;

   VAR266:=(((CLOSE-REF(CLOSE,1))/REF(CLOSE,1))*100);

   VAR277:=((EMA(CLOSE,12)-EMA(CLOSE,26))*100);

   VAR288:=EMA(VAR277,9);

   VAR299:=(2*(VAR277-VAR288));

   DRAWTEXT((((VAR277 (-50))AND(VAR266 7))AND(VAR277 VAR288)),(-0.08),'★'),COLORFFFFFF;

   DRAWTEXT((((VAR277 (-50))AND(VAR266 7))AND(VAR277 =VAR288)),(-0.1),'●'),COLORFFFFFF;

   VAC:=(LOW*0.9);

   VAB:=EMA(LLV(LOW,90),21);

   VAD:=(((VAC*VOL)+(VAB*(CAPITAL-VOL)))/CAPITAL);

   VAE:=EMA(VAD,30);

   VAF:=(CLOSE-REF(CLOSE,1));

   VA10:=MAX(VAF,0);

   VA11:=ABS(VAF);

   VA12:=((SMA(VA10,7,1)/SMA(VA11,7,1))*100);

   VA13:=((SMA(VA10,13,1)/SMA(VA11,13,1))*100);

   VA14:=((SMA(MAX(VAF,0),6,1)/SMA(ABS(VAF),6,1))*100);

   VA15:=((((-200)*(HHV(HIGH,60)-CLOSE))/(HHV(HIGH,60)-LLV(LOW,60)))+100);

   VA16:=(((CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15)))*100);

   VA17:=SMA(((SMA(VA16,4,1)-50)*2),3,1);

   VA18:=(((INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14)))*100);

   VA19:=SMA(VA18,4,1);

   VA1A:=SMA(VA19,3,1);

   VA1B:=(((HHV(HIGH,30)-CLOSE)/CLOSE)*100);

   VA1C:=((((((((VA14 =25)AND(VA15 (-95)))AND(VA1B 20))AND(VA17 (-30)))AND(VA1A 30))AND((VAE-CLOSE) =(-0.25)))AND(VA12 22))AND(VA13 28));

   低买1:=STICKLINE(VA1C,0,0.1,1,1);

   发射:STICKLINE(VA1C,0,0.7,2,0),LINETHICK2,COLOR0000FF;

   DRAWTEXT((VA1C 0),0.7,'＾★发射'),COLORFFFFFF;

   A4:=BARSLAST(REF(CROSS(DIF,DEA),1));

   B1:=REF(C,A4+1) CANDREF(DIF,A4+1) DIFANDCROSS(DIF,DEA);

   DRAWTEXT(FILTER(B1 0,5),DIF+0.2,'●'),COLORYELLOW;

   STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,2,0),COLORGREEN;

   STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,2,0),COLORFFCC33;

   STICKLINE(MACD REF(MACD,1)ANDMACD,0,MACD,2,0),COLORYELLOW;

   STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,2,0),COLOR8899EE;

   IF(DIF 0,DIF,0),COLORYELLOW,LINETHICK2;

   IF(DIF 0,0,DIF),COLORRED,LINETHICK2;

   IF(DIF DEA,DIF,DEA),COLORWHITE,LINETHICK2;

   IF(DIF DEA,DEA,DEA),{COLORGREEN}COLORFF937F,LINETHICK2;

   缩头:=IF(MACD 0ANDREF(MACD,1) REF(MACD,2)ANDMACD REF(MACD,1),1,0);

   缩脚:=IF(MACD 0ANDREF(MACD,1) REF(MACD,2)ANDMACD REF(MACD,1),1,0);

   阻力:=IF(CROSS(C,MA(C,20))ORCROSS(C,MA(C,60)),1,0);

   支撑:=IF(CROSS(MA(C,20),C)ORCROSS(MA(C,60),C),1,0);

   做多:=IF(CROSS(MACD,DIF)ANDDIF 0ANDMACD 0,1,0);

   放空:=IF(CROSS(DIF,MACD)ANDDIF 0ANDMACD 0,1,0);

   DRAWTEXT(FILTER(缩头,3)AND缩头,MACD,'▼'),COLORFF00FF;

   DRAWTEXT(FILTER(缩头,3)AND缩头,MACD+0.2,'缩头'),COLORFF00FF;

   DRAWTEXT(FILTER(缩脚,3)AND缩脚,MACD,'△'),COLOR00FF00;

   DRAWTEXT(FILTER(缩脚,3)AND缩脚,MACD-0.2,'缩脚'),COLOR00FF00;

   DRAWTEXT(FILTER(阻力,16)ANDMACD =0,MACD+0.01,'¤阻力'),COLOR00FFFF;

   DRAWTEXT(FILTER(支撑,16)ANDMACD 0,MACD,'¤支撑'),COLORFFFFFF;

   多头:=IF(DIF =0ANDMACD =0OR(DIF 0ANDMACD =0),1,0);

   空头趋势:=DIF 0ANDMACD 0OR(DIF =0ANDMACD

   UP:=FILTER(多头趋势,13);

   DRAWTEXT(UP,DIF,'¤多头'),COLORRED;

   PU:=FILTER(空头趋势,13);

   DRAWTEXT(PU,DIF,'¤空头'),COLORFF8800;

   低位金叉:=CROSS(DIF,DEA)ANDDIF -0.1;

   STICKLINE(低位金叉,0,0.08,6,0),COLORYELLOW;

   DRAWTEXT(低位金叉,低位金叉-1.5,'低位金叉'),COLORWHITE;

   JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA =0));

   二次金叉:=CROSS(DIF,DEA)ANDDEA 0ANDCOUNT(JCCOUNT=2,21)=1;

   STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF;

   DRAWICON(二次金叉,DEA*1.04,1);

   DRAWTEXT(二次金叉,0.5,'二次金叉'),COLORYELLOW;

   A1:=BARSLAST(REF(CROSS(DIF,DEA),1));

   底背离:=REF(CLOSE,A1+1) CLOSEANDDIF REF(DIF,A1+1)ANDCROSS(DIF,DEA);

   STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;

   DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORRED,LINETHICK1;

   DRAWTEXT(底背离,0.12,'底背离'),COLORFF00FF;

   A2:=BARSLAST(REF(CROSS(DEA,DIF),1));

   顶背离:=REF(CLOSE,A2+1) CLOSEANDREF(DIF,A2+1) DIFANDCROSS(DEA,DIF);

   DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK1;

   DRAWTEXT(顶背离,0.2,'★顶背离'),COLORYELLOW;

   DRAWGBK(O C,RGB(160,32,240),RGB(56,94,15),0,'背景图',0);

   A01:=(WINNER((CLOSE*1))*100.000);

   A02:=(WINNER((CLOSE*1.1))*100.000);

   A03:=(WINNER((CLOSE*0.9))*100.000);

   A04:=ma(A03,5);

   A06:=(100-MA(A02,5));

   {stICKLINE(1,A06,MA(A02,5),2,1),COLORGREEN;}

   A08:=(MA(A02,5)-MA(A03,5));

   {STICKLINE(1,A04,MA(A02,5),2,1),COLORYELLOW;}

   A0A:=(((((HHV(A04,15)-A03)/A03)*100) 30)AND(HHV(A04,15) 50));

   STICKLINE(A0A,(0-2),2,2,1);

   STICKLINE(NOT(A0A),(0-2),2,2,1),COLORBLUE;

   STICKLINE(A03 REF(A03,1),0,A03,2,0),COLORRED;

   STICKLINE(A03 REF(A03,1),0,A03,2,1),COLORRED;

   获利:=MA(A03,1),COLORMAGENTA,DOTLINE;

   主力:MA(A03,10),COLORMAGENTA,LINETHICK2;

   套牢:=100-A02,COLORLIBLUE,DOTLINE;

   :(100.000-MA(A02,10)),COLORLIBLUE,LINETHICK2;

   浮动:=A02-A03,COLORLIRED,DOTLINE;

   游资:(MA(A02,10)-MA(A03,10)),COLORLIRED,LINETHICK2;

   STICKLINE(1,100,100,5,1),COLORGREEN;

通达信新庄家控盘指标公式截图