通达信指标——周K金副图(副图)
通达信KDJ.MACD日周月共振副图指标公式

通达信KDJ.MACD日周月共振副图指标公式通达信KDJ.MACD日周月共振副图指标公式DIF60:=EMA(CLOSE,12/2)-EMA(CLOSE,26/2);DEA60:=EMA(DIF60,9/2);STICKLINE(DIF60>=DEA60,42,46,5,0),COLOR00BBBB;STICKLINE(DIF60<DEA60,42,46,5,1),COLOR696969;DRAWTEXT(CURRBARSCOUNT=13,44,'★60分钟MACD★'),COLORWHITE;DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIF,9);STICKLINE(DIF>=DEA,36,40,5,0),COLOR0000BB;STICKLINE(DIF<DEA,36,40,5,1),COLOR696969;DRAWTEXT(CURRBARSCO UNT=13,38,'★MACD日线★'),COLOR00FFFF;周MD:=MACD.DIF#WEEK;周MA:=MACD.DEA#WEEK;STICKLINE(周MD>=周MA,30,34,5,0),COLORBB00BB;STICKLINE(周MD<周MA,30,34,5,1),COLOR696969;DRAWTEXT(CURRBARSCOUNT=13,32,'★MACD周线★'),COLOR00FFFF;月MD:=MACD.DIF#MONTH;月MA:=MACD.DEA#MONTH;STICKLINE(月MD>=月MA,24,28,5,0),COLORBBBB00;STICKLINE(月MD<月MA,24,28,5,1),COLOR696969;DRAWTEXT(CURRBARSCOUNT=13,26,'★月MACD★'),COLORWHITE;RSV60:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36));K60:=SMA(RSV60,3,1);D60:=SMA(K60,3,1);STICKLINE(K60>= D60,18,22,5,0),COLOR00FFFF;STICKLINE(K60 < D60,18,22,5,1),COLOR696969;DRAWTEXT(CURRBARSCOUNT=13,20,'★60分钟KDJ★ '),COLORFF00FF;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;STICKLINE(K>=D,12,16,5,0),COLOR0000FF;STICKLINE(K<D,12,16,5,1),COLOR696969;DRAWTEXT(CURRBARSCOUNT=13,14,'★KDJ日线★'),COLORFFFFFF;周K:="KDJ.K#WEEK" ;周D:="KDJ.D#WEEK" ;STICKLINE(周K>=周D,6,10,5,0),COLORFF00FF;STICKLINE(周K<周D,6,10,5,1),COLOR696969;DRAWTEXT(CURRBARSCOUNT=13,8,'★KDJ周线★'),COLORWHITE;月K:="KDJ.K#MONTH" ;月D:="KDJ.D#MONTH" ;STICKLINE(月K>=月D,0,4,5,0),COLORFF00FF;STICKLINE(月K<月D,0,4,5,1),COLOR696969;DRAWTEXT(CURRBARSCOUNT=13,2,'★KDJ月线★'),COLORWHITE;{原文链接:}。
通达信指标公式源码聚宝主力资金副图指标

A:=VOL*CLOSE;B:=SUM(A,1)/SUM(VOL,1);B1:=EMA(B,17);主力:=(B-B1)*500/B,COLORRED;进:STICKLINE(主力>=0 AND 0>=REF(0,1),0,主力,1,0),COLORRED; 出:STICKLINE(主力<0 AND 0>=REF(0,1),0,主力,1,0),COLORGREEN; K2:=EMA(C,5),COLORFFFF00;K3:=EMA(C,10),COLORFFFF00;K5:=EMA(C,30),COLORFFFF00;KK5:=EMA(INDEXC,30),COLORFFFF00; K6:=2*(K2-K5);K7:=2*(K2-K3);K8:=2*(K7+K6),COLORRED;RSV1:= (CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100; FASTK:=SMA(RSV1,3,1);龙K:=SMA(FASTK,2,1);龙D:=SMA(龙K,5,1);VA06:=(2*CLOSE+HIGH+LOW)/4;VA07:=LLV(LOW,13);VA08:=HHV(HIGH,13);VA09:=EMA((VA06-VA07)/(VA08-VA07)*100,13);VAA1:=EMA(0.667*REF(VA09,1)+0.333*VA09,2);STICKLINE(CROSS(K8,0) AND 龙K>=龙DANDVA09>VAA1,0,1,8,0) ,COLORRED;K1:=IF(K8>REF(K8,5) AND K3<REF(K3,5) ,1,0 ),COLORYELLOW;K21:=IF(K8>REF(K8,7) AND K3<REF(K3,7) ,1,0 ),COLORYELLOW;K31:=IF(K8>REF(K8,9) AND K3<REF(K3,9) ,1,0 ),COLORYELLOW;K4:=IF(K8>REF(K8,11) AND K3<REF(K3,11) ,1,0 ),COLORYELLOW; 底部:=(K1 OR K21 OR K31 OR K4) AND K8<0 ANDK8>REF(K8,1),NODRAW ,COLORYELLOW;STICKLINE(底部AND COUNT(底部,6)=1,0.4,0,8,0) ,COLORYELLOW;VA1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);VA2:=SMA(ABS(LOW-VA1),13,1)/SMA(MAX(LOW-VA1,0),10,1);VA3:=EMA(VA2,10)/100;VA4:=LLV(LOW,33);VA5:=EMA(IF(LOW<=VA4,VA3,0),3);洗盘:=IF(VA5<REF(VA5,1),VA5,0),COLORGREEN,NODRAW;STICKLINE(VA5<REF(VA5,1) {ANDCOUNT(VA5>REF(VA5,1),10)=1},0,VA5*2,3,0 ),COLORBLUE;拉升:=IF(VA5>REF(VA5,1) {AND 平均线>=REF(平均线,1)} ,VA5,0),COLORRED,NODRAW;VA6:=IF(VA5>=100,100,VA5);STICKLINE(VA5>REF(VA5,1){AND 平均线>=REF(平均线,1) ANDCOUNT(VA5<REF(VA5,1),5)=1},0,VA6*2,3,0),COLORLIRED;XP:=REF(洗盘,1);LS:=拉升;XPLS:=(XP AND LS);VR3:=(CLOSE+HIGH+LOW)/3;VR4:=EMA(VR3,10);VR5:=REF(VR4,1);主力线:=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 ),LINETHICK1,POINTDOT;VAR3:=MA(CLOSE,13);VAR4:=(100-ABS((CLOSE-VAR3)/VAR3*100))/100;VAR5:=LLV(LOW,75);VAR6:=HHV(HIGH,75);VAR7:=(VAR6-VAR5)/100;VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1);VARA:=3*VAR8-2*SMA(VAR8,15,1);吸筹A:=(100-VARA)/100,COLOR0099FF,LINETHICK2;吸筹:=IF(吸筹A>1.09*REF(吸筹A,1),1,0),COLORRED,NODRAW; STICKLINE(吸筹,0,1,2,1 ),COLORYELLOW;大底:=EXIST(CROSS( 吸筹A,1),6),NODRAW,COLORMAGENTA;VARD:=吸筹A>VAR4;差:=吸筹A-VAR4,COLORYELLOW,NODRAW;JX:=(MA(C,10)*30+MA(C,30)*10+MA(C,60)*5+MA(C,120)*3)/(3+5+10+30); JXMA:=MA(JX,10);DRAWICON(CROSS(JX,JXMA),-0.3,1);DRAWICON(CROSS(JXMA,JX),2,2);DRAWICON(CLOSE>REF(HHV(HIGH,20),1),2,6);DRAWICON(CLOSE<REF(LLV(LOW,20),1),-0.5,1),COLORYELLOW;VAR200:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;VAR300:=SMA(SMA(VAR200,3,1),3,1)/28.57;VAR400:=EMA(VAR300,5);操盘:=3*VAR300-2*VAR400;A1:=CROSS(操盘,VAR300) AND VAR300<2.1 AND C>O;STICKLINE(A1,主力,主力+0.4,8,0),COLORYELLOW;STICKLINE(A1,主力,主力+0.3,4,0),COLORBB00BB;DRAWTEXT(A1 AND 主力<0 AND VR4>=VR5 ,主力-0.06,'底部'),COLORGREEN; DRAWTEXT(XPLS {AND VR4>=VR5} AND COUNT(XPLS,6)=1,1.35,'洗尾'),COLORGREEN;VARE:=REF(LOW,1)*0.9;VARF:=LOW*0.9;VAR11:=EMA(VARF,30);VAR12:=CLOSE-REF(CLOSE,1);VAR13:=MAX(VAR12,0);VAR14:=ABS(VAR12);VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100;VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100;VAR17:=BARSCOUNT(CLOSE);VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100;VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100; VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1);VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100; VAR1D:=SMA(VAR1C,4,1);VAR1E:=SMA(VAR1D,3,1);VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;VAR20:=VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50;STICKLINE(VARD,VAR4,吸筹*3,1,0),COLORRED;STICKLINE(VAR20,0,1.20,1,0),COLORBROWN,LINETHICK2;VAR61:=(HIGH+LOW)/2;VAR81:=LLV(LOW,35);VARB1:=HHV(HIGH,35);BB:=EMA((VAR61-VAR81)/(VARB1-VAR81)*100,9);金聚宝:=EMA(0.667*REF(BB,1)+0.333*BB,2),LINETHICK0;GC3:=LLV(BB,198);GC4:=HHV(BB,188);DRAWTEXT(FILTER(GC4>REF(GC4,1),7) ,2.8,'见顶');CC0:=(BB-金聚宝<0.3)AND (BB<25)AND (HIGH+LOW)/2<MA((HIGH+LOW)/2,13)*0.98 AND (HIGH+LOW)/2>REF((HIGH+LOW)/2,1);DD:=FILTER(CC0,10);DRAWTEXT(DD ,主力+0.2,'还有一跌');{DRAWICON(DD,19,9);}GG:=(BB-金聚宝<0.6)AND (BB<30)AND (HIGH+LOW)/2<MA(C,13)*0.996 AND (HIGH+LOW)/2>REF((HIGH+LOW)/2,1);HH:=FILTER(GG,10);{DRAWTEXT(HH AND QS<20,25,'逃底点'),COLOR43D0FA;} {DRAWICON(HH,20,10);}EE:=(BB-金聚宝>0.55)AND (BB>70) AND(HIGH+LOW)/2>MA((HIGH+LOW)/2,13)*0.96 AND(HIGH+LOW)/2<REF((HIGH+LOW)/2,1);{FF:=FILTER(EE,10);DRAWTEXT(FF AND QS>80,70,'逃'),COLOR43D0FA;}DRAWTEXT(FILTER(GC3>REF(GC3,1),5)AND BB<40 AND 金聚宝>REF(金聚宝,1),主力-0.2,'将见底');DIFF1:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA1:=EMA(DIFF1,9);买:=CROSS(DIFF1,DEA1),NODRAW;DRAWTEXT(买AND COUNT(买,25)=1,主力-0.6,'☆买'),COLORMAGENTA; DFQS:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1) -3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3 ,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30, 4,1),3,1),2,1);TX:=78.89;{DRAWICON(CROSS(TX,DFQS),1.02*H,6);}STICKLINE(CROSS(TX,DFQS),1,2,5,0),COLOR00FF00;DRAWTEXT(FILTER(CROSS(TX,DFQS),10) ,2.2,'逃顶'),COLORFF6699;VAR301:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA (SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);趋势:=EMA(VAR301,3)-10,COLORFF0000;A13:=CROSS(趋势,0);OK:=REF(CLOSE,1);RSI1:=SMA(MAX(CLOSE-OK,0),7,1)/SMA(ABS(CLOSE-OK),7,1)*100,COLORW HITE;RSI2:=SMA(MAX(CLOSE-OK,0),7,1)/SMA(ABS(CLOSE-OK),7,1)*100,COLORW HITE;鱼:=SMA(MAX(CLOSE-OK,0),7,1)/SMA(ABS(CLOSE-OK),7,1)*100,COLORRED, DOTLINE;RSI4:=SMA(鱼,7,1),LINETHICK1,COLORWHITE;趋势A:=MA(((CLOSE-LLV(LOW,48))/(HHV(HIGH,48)-LLV(LOW,48))*50),17)+9,CO LORFFFFFF;趋势B:=MA(((CLOSE-LLV(LOW,53))/(HHV(HIGH,53)-LLV(LOW,53))*50),17)+9,COLOR3377DD;AZ1:=MA(趋势A,7)*1.372,COLORGREEN,LINETHICK1;AZ2:=AZ1*1.0887;AZ3:=(1.5*(趋势B+RSI4)-(AZ2+AZ1))+12,COLORGREEN,LINETHICK1,DOTLINE;鱼网:=IF((CROSS(RSI2,RSI4) OR CROSS(RSI2,AZ3) AND AZ3<38 ANDRSI1<51),18,0),COLORYELLOW,LINETHICK2;买入:=IF(EXIST(鱼网=18,8)AND 鱼>45 AND鱼>REF( 鱼,2),1,0),COLORMAGENTA,,LINETHICK3;{STICKLINE(A13,0,主力*2+3,5,0),COLORMAGENTA;}DRAWTEXT(A13 ,主力*2+2,'启动'),COLORWHITE;最小值:=LLV(LOW,25);最大值:=HHV(HIGH,25);波动线:=EMA((CLOSE-最小值)/(最大值-最小值)*100,4);平均线:=EMA(波动线,3);反转:=COUNT(MA(C,10)<REF(MA(C,10),1),3)>=2 AND CROSS(C,MA(C,20)) AND C>=MA(C,30) AND 平均线>=REF(平均线,1);DRAWTEXT(反转,主力*2+2.3,'反转'),COLORWHITE;STICKLINE(反转OR XPLS {AND VR4>=VR5} ,0,主力*2+2,5,0),COLORCYAN; 必买: DRAWICON(REF(TROUGHBARS(3,15,1),1)=0 ANDHIGH>LOW,-1.2,25),COLORRED ,LINETHICK4;必卖: DRAWICON(REF(PEAKBARS(3,15,1),1)=1,主力+2.2,27),COLORRED,LINETHICK8;DRAWTEXT(REF(PEAKBARS(3,15,1),1)=1 ,主力+3.2,' 必卖'),COLORGREEN; A7:=C-REF(C,1);A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);买1:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)); DRAWTEXT(FILTER(买1=1,5) AND (平均线>=REF(平均线,1) OR VR4>=VR5) ,主力-0.45,'↖买进'),COLORYELLOW;STICKLINE(买1,主力,0,2,0),COLORYELLOW;A11:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,3 0))/(HHV(H,30)-LLV(L,30))*100,5);A14:=EMA(A11,5);A15:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100;DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);DEA :=EMA(DIFF,9);基础:=(DIFF<-0.1 AND DIFF>DEA);中线买入:=(CROSS(A11,A14)AND (A15-A14)>40 AND 基础OR 买入)AND VR4>=VR5 ;STICKLINE(中线买入AND COUNT(中线买入,5)=1 ,0,主力+3,2,0),COLORRED; DRAWTEXT(中线买入AND COUNT(中线买入,10)=1,主力*2+3,'买入'),COLORMAGENTA;买多: ( (XPLS OR 中线买入OR 大底OR A1 OR 买入OR 买OR A13) OR VR4>=VR5),NODRAW,COLORRED;DRAWTEXT_FIX( ISLASTBAR AND 买多,0.52,0.04,0,'【买多】'),COLORRED; 买空: ( (FILTER(GC4>REF(GC4,1),10) OR DD ORFILTER(CROSS(TX,DFQS),10)) OR VR4<VR5),NODRAW,COLORCYAN; DRAWTEXT_FIX( ISLASTBAR AND 买空,0.52,0.04,0,'【买空】'),COLORCYAN; 超短线:(((主力线-LLV(主力线,21))/(HHV(主力线,21)-LLV(主力线,21)))*(4))*(0.5),COLORYELLOW,LINETHICK3;IF(超短线>=REF(超短线,1),超短线,DRAWNULL),COLORMAGENTA,LINETHICK5;IF(超短线<REF(超短线,1),超短线,DRAWNULL),COLORBLUE,LINETHICK5;震仓: IF(VR4,-0.038,DRAWNULL),COLORYELLOW,LINETHICK9;红买: IF(VR4>=VR5 ,-0.038,DRAWNULL), COLORRED,LINETHICK5;蓝卖: IF(VR4<VR5 ,-0.036,DRAWNULL),,COLORBLUE,LINETHICK5;E:=(HIGH+LOW+OPEN+2*CLOSE)/5;阻力:=(E+(HIGH-LOW)) ;支撑:=(E-(HIGH-LOW));DRAWTEXT_FIX(ISLASTBAR,0.15,0.04,0,'阻力'),COLORWHITE; DRAWNUMBER_FIX(ISLASTBAR,0.22,0.04,0,阻力),COLORWHITE; DRAWTEXT_FIX(ISLASTBAR,0.35,0.04,0,'支撑'),COLORLIRED; DRAWNUMBER_FIX(ISLASTBAR,0.42,0.04,0,支撑),COLORRED;ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算}SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//小筹码估算}ZSHTL:=SHCM/(ZLCM+SHCM)*100;{//小股民套牢筹码比率}ZZLKP:=ZLCM/(ZLCM+SHCM)*100;{//主力控盘筹码比率}ZCMZL:=MA(ZLCM+SHCM,13);{//市场筹码总量}ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);{//走牛天数} ZSHJJ:=EMA(ZSHTL,89);{//小股民警戒}ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);RSVB:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;KK1:=SMA(RSVB,10,1);D1:=SMA(KK1,5,1);KK:=INTPART(KK1);DDB:=INTPART(D1);TFXXS:=KK+DDB;{//变异KD风险系数}T1:=CONST( ZCMZL>REF(ZCMZL,1) AND DKB=1);T2:=CONST( ZCMZL>REF(ZCMZL,1) AND DKB=0);T3:=CONST( ZCMZL=REF(ZCMZL,1));T4:=CONST( ZCMZL<REF(ZCMZL,1) AND DKB=1);T5:=CONST( ZCMZL<REF(ZCMZL,1) AND DKB=0);T6:=CONST(TFXXS<=50 );T7:=CONST(TFXXS>=160 );T8:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS<=100 );T9:=CONST( TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS>100);T10:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS>100 );T11:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS<=100 );T12:=CONST( ZSHTL>90 );T13:=CONST( ZZLKP>75 );T14:=CONST(CROSS(ZCMZL,ZZLJJ) AND ZZLKP>ZZLJJ AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1) );T15:=CONST(CROSS(ZCMZL,ZZLKP) AND ZZLKP>ZZLJJ AND ZZLKP<ZSHTL AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1) );T16:=CONST( CROSS(ZCMZL,ZSHTL) AND ZSHTL>ZZLKP ANDZCMZL>REF(ZCMZL,1));T17:=CONST( CROSS(ZCMZL,100) AND ZCMZL>REF(ZCMZL,1));T18:=CONST(REF(ZSHTL,1)>90 AND ZSHTL<90 );TS1:=IF(T1=1,0+0.03,0);TS2:=IF(T2=1,TS1+0.03,TS1);TS3:=IF(T3=1,TS2+0.03,TS2);TS4:=IF(T4=1,TS3+0.03,TS3);TS5:=IF(T5=1,TS4+0.03,TS4);TS6:=IF(T6=1,0+0.73,0);TS7:=IF(T7=1,TS6+0.03,TS6);TS8:=IF(T8=1,TS7+0.03,TS7);TS9:=IF(T9=1,TS8+0.03,TS8);TS10:=IF(T10=1,TS9+0.03,TS9);TS11:=IF(T11=1,TS10+0.03,TS10);TS12:=IF(T12,0+0.03,0);TS13:=IF(T13=1,TS12+0.03,TS12);TS14:=IF(T14=1,TS13+0.03,TS13);TS15:=IF(T15=1,TS14+0.03,TS14);TS16:=IF(T16=1,TS15+0.03,TS15);TS17:=IF(T17=1,TS16+0.03,TS16);TS18:=IF(T8=1,TS17+0.03,TS17);DRAWTEXT_FIX(T1 ,0.66,TS1,0,'★监控:主力增仓'),COLOR8080FF; DRAWTEXT_FIX(T2 ,0.66,TS2,0,'★监控:主力减仓'),COLORFFFF00; DRAWTEXT_FIX(T3 ,0.66,TS3,0,'★监控:多空平衡'),COLORGRAY; DRAWTEXT_FIX(T4 ,0.66,TS4,0,'★监控:主力回补'),COLORFF9933; DRAWTEXT_FIX(T5 ,0.66,TS5,0,'★监控:主力出逃'),COLORFFFF00; DRAWTEXT_FIX(T6 ,0.56,0.25,0,'★操作:买入风险'),COLORYELLOW; DRAWTEXT_FIX(T7 ,0.56,0.25,0,'★操作:卖出风险'),COLORFFFF00; DRAWTEXT_FIX(T8 ,0.56,0.25,0,'★操作:追涨博弈'),COLOR8080FF; DRAWTEXT_FIX(T9 ,0.56,0.25,0,'★操作:稳健持股'),COLOR8080FF;DRAWTEXT_FIX(T10 ,0.56,0.25,0,'★操作:盘跌减仓'),COLORFFFF00; DRAWTEXT_FIX(T11 ,0.56,0.25,0,'★操作:杀跌空仓'),COLORFFFF00; DRAWTEXT_FIX(T12,0.36,TS12,0,'☆特别提示:筑底散兵坑'),COLOR66FFCC; DRAWTEXT_FIX(T13,0.36,TS13,0,'☆特别提示:铸顶风险区'),COLORFFFF00; DRAWTEXT_FIX(T14,0.36,TS14,0,'☆特别提示:穿越主力'),COLOR8080FF; DRAWTEXT_FIX(T15,0.36,TS15,0,'☆特别提示:穿越主力'),COLORYELLOW; DRAWTEXT_FIX(T16,0.36,TS16,0,'☆特别提示:穿越散户'),COLORGREEN; DRAWTEXT_FIX(T17,0.36,TS17,0,'☆特别提示:全盘穿越'),COLOR3399FF; DRAWTEXT_FIX(T18,0.36,TS18,0,'☆特别提示:神秘黑洞'),COLOR9966FF; 量价:=(VOL/CLOSE)/3;{好}BB2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);BB3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0);BB6:=BB2+BB3;DD1:=1;比:=BB2/BB3;BBB1:=STRCAT(STRCAT('买= ',CON2STR((100*BB2)/BB6,0)),'%');BBB2:=STRCAT(STRCAT('卖= ',CON2STR((100*BB3)/BB6,0)),'%');BBB3:=STRCAT(STRCAT('差= ',CON2STR((100*(BB2-BB3))/BB6,0)),'%'); DRAWTEXT_FIX(DD1=1 ,0,0.02,0,BBB1),COLORRED;DRAWTEXT_FIX(DD1=1 ,0,0.13,0,BBB2),COLORGREEN;DRAWTEXT_FIX(DD1=1 ,0,0.24,0,BBB3),COLOR00FFFF;。
通达信指标公式源码聚宝主力资金副图指标

A:=VOL*CLOSE;B:=SUM(A,1)/SUM(VOL,1);B1:=EMA(B,17);主力:=(B-B1)*500/B,COLORRED;进:STICKLINE(主力>=0 AND 0>=REF(0,1),0,主力,1,0),COLORRED; 出:STICKLINE(主力<0 AND 0>=REF(0,1),0,主力,1,0),COLORGREEN; K2:=EMA(C,5),COLORFFFF00;K3:=EMA(C,10),COLORFFFF00;K5:=EMA(C,30),COLORFFFF00;KK5:=EMA(INDEXC,30),COLORFFFF00; K6:=2*(K2-K5);K7:=2*(K2-K3);K8:=2*(K7+K6),COLORRED;RSV1:= (CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100; FASTK:=SMA(RSV1,3,1);龙K:=SMA(FASTK,2,1);龙D:=SMA(龙K,5,1);VA06:=(2*CLOSE+HIGH+LOW)/4;VA07:=LLV(LOW,13);VA08:=HHV(HIGH,13);VA09:=EMA((VA06-VA07)/(VA08-VA07)*100,13);VAA1:=EMA(0.667*REF(VA09,1)+0.333*VA09,2);STICKLINE(CROSS(K8,0) AND 龙K>=龙DANDVA09>VAA1,0,1,8,0) ,COLORRED;K1:=IF(K8>REF(K8,5) AND K3<REF(K3,5) ,1,0 ),COLORYELLOW;K21:=IF(K8>REF(K8,7) AND K3<REF(K3,7) ,1,0 ),COLORYELLOW;K31:=IF(K8>REF(K8,9) AND K3<REF(K3,9) ,1,0 ),COLORYELLOW;K4:=IF(K8>REF(K8,11) AND K3<REF(K3,11) ,1,0 ),COLORYELLOW; 底部:=(K1 OR K21 OR K31 OR K4) AND K8<0 ANDK8>REF(K8,1),NODRAW ,COLORYELLOW;STICKLINE(底部AND COUNT(底部,6)=1,0.4,0,8,0) ,COLORYELLOW;VA1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);VA2:=SMA(ABS(LOW-VA1),13,1)/SMA(MAX(LOW-VA1,0),10,1);VA3:=EMA(VA2,10)/100;VA4:=LLV(LOW,33);VA5:=EMA(IF(LOW<=VA4,VA3,0),3);洗盘:=IF(VA5<REF(VA5,1),VA5,0),COLORGREEN,NODRAW;STICKLINE(VA5<REF(VA5,1) {ANDCOUNT(VA5>REF(VA5,1),10)=1},0,VA5*2,3,0 ),COLORBLUE;拉升:=IF(VA5>REF(VA5,1) {AND 平均线>=REF(平均线,1)} ,VA5,0),COLORRED,NODRAW;VA6:=IF(VA5>=100,100,VA5);STICKLINE(VA5>REF(VA5,1){AND 平均线>=REF(平均线,1) ANDCOUNT(VA5<REF(VA5,1),5)=1},0,VA6*2,3,0),COLORLIRED;XP:=REF(洗盘,1);LS:=拉升;XPLS:=(XP AND LS);VR3:=(CLOSE+HIGH+LOW)/3;VR4:=EMA(VR3,10);VR5:=REF(VR4,1);主力线:=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 ),LINETHICK1,POINTDOT;VAR3:=MA(CLOSE,13);VAR4:=(100-ABS((CLOSE-VAR3)/VAR3*100))/100;VAR5:=LLV(LOW,75);VAR6:=HHV(HIGH,75);VAR7:=(VAR6-VAR5)/100;VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1);VARA:=3*VAR8-2*SMA(VAR8,15,1);吸筹A:=(100-VARA)/100,COLOR0099FF,LINETHICK2;吸筹:=IF(吸筹A>1.09*REF(吸筹A,1),1,0),COLORRED,NODRAW; STICKLINE(吸筹,0,1,2,1 ),COLORYELLOW;大底:=EXIST(CROSS( 吸筹A,1),6),NODRAW,COLORMAGENTA;VARD:=吸筹A>VAR4;差:=吸筹A-VAR4,COLORYELLOW,NODRAW;JX:=(MA(C,10)*30+MA(C,30)*10+MA(C,60)*5+MA(C,120)*3)/(3+5+10+30); JXMA:=MA(JX,10);DRAWICON(CROSS(JX,JXMA),-0.3,1);DRAWICON(CROSS(JXMA,JX),2,2);DRAWICON(CLOSE>REF(HHV(HIGH,20),1),2,6);DRAWICON(CLOSE<REF(LLV(LOW,20),1),-0.5,1),COLORYELLOW;VAR200:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;VAR300:=SMA(SMA(VAR200,3,1),3,1)/28.57;VAR400:=EMA(VAR300,5);操盘:=3*VAR300-2*VAR400;A1:=CROSS(操盘,VAR300) AND VAR300<2.1 AND C>O;STICKLINE(A1,主力,主力+0.4,8,0),COLORYELLOW;STICKLINE(A1,主力,主力+0.3,4,0),COLORBB00BB;DRAWTEXT(A1 AND 主力<0 AND VR4>=VR5 ,主力-0.06,'底部'),COLORGREEN; DRAWTEXT(XPLS {AND VR4>=VR5} AND COUNT(XPLS,6)=1,1.35,'洗尾'),COLORGREEN;VARE:=REF(LOW,1)*0.9;VARF:=LOW*0.9;VAR11:=EMA(VARF,30);VAR12:=CLOSE-REF(CLOSE,1);VAR13:=MAX(VAR12,0);VAR14:=ABS(VAR12);VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100;VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100;VAR17:=BARSCOUNT(CLOSE);VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100;VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100; VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1);VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100; VAR1D:=SMA(VAR1C,4,1);VAR1E:=SMA(VAR1D,3,1);VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;VAR20:=VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50;STICKLINE(VARD,VAR4,吸筹*3,1,0),COLORRED;STICKLINE(VAR20,0,1.20,1,0),COLORBROWN,LINETHICK2;VAR61:=(HIGH+LOW)/2;VAR81:=LLV(LOW,35);VARB1:=HHV(HIGH,35);BB:=EMA((VAR61-VAR81)/(VARB1-VAR81)*100,9);金聚宝:=EMA(0.667*REF(BB,1)+0.333*BB,2),LINETHICK0;GC3:=LLV(BB,198);GC4:=HHV(BB,188);DRAWTEXT(FILTER(GC4>REF(GC4,1),7) ,2.8,'见顶');CC0:=(BB-金聚宝<0.3)AND (BB<25)AND (HIGH+LOW)/2<MA((HIGH+LOW)/2,13)*0.98 AND (HIGH+LOW)/2>REF((HIGH+LOW)/2,1);DD:=FILTER(CC0,10);DRAWTEXT(DD ,主力+0.2,'还有一跌');{DRAWICON(DD,19,9);}GG:=(BB-金聚宝<0.6)AND (BB<30)AND (HIGH+LOW)/2<MA(C,13)*0.996 AND (HIGH+LOW)/2>REF((HIGH+LOW)/2,1);HH:=FILTER(GG,10);{DRAWTEXT(HH AND QS<20,25,'逃底点'),COLOR43D0FA;} {DRAWICON(HH,20,10);}EE:=(BB-金聚宝>0.55)AND (BB>70) AND(HIGH+LOW)/2>MA((HIGH+LOW)/2,13)*0.96 AND(HIGH+LOW)/2<REF((HIGH+LOW)/2,1);{FF:=FILTER(EE,10);DRAWTEXT(FF AND QS>80,70,'逃'),COLOR43D0FA;}DRAWTEXT(FILTER(GC3>REF(GC3,1),5)AND BB<40 AND 金聚宝>REF(金聚宝,1),主力-0.2,'将见底');DIFF1:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA1:=EMA(DIFF1,9);买:=CROSS(DIFF1,DEA1),NODRAW;DRAWTEXT(买AND COUNT(买,25)=1,主力-0.6,'☆买'),COLORMAGENTA; DFQS:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1) -3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3 ,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30, 4,1),3,1),2,1);TX:=78.89;{DRAWICON(CROSS(TX,DFQS),1.02*H,6);}STICKLINE(CROSS(TX,DFQS),1,2,5,0),COLOR00FF00;DRAWTEXT(FILTER(CROSS(TX,DFQS),10) ,2.2,'逃顶'),COLORFF6699;VAR301:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA (SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);趋势:=EMA(VAR301,3)-10,COLORFF0000;A13:=CROSS(趋势,0);OK:=REF(CLOSE,1);RSI1:=SMA(MAX(CLOSE-OK,0),7,1)/SMA(ABS(CLOSE-OK),7,1)*100,COLORW HITE;RSI2:=SMA(MAX(CLOSE-OK,0),7,1)/SMA(ABS(CLOSE-OK),7,1)*100,COLORW HITE;鱼:=SMA(MAX(CLOSE-OK,0),7,1)/SMA(ABS(CLOSE-OK),7,1)*100,COLORRED, DOTLINE;RSI4:=SMA(鱼,7,1),LINETHICK1,COLORWHITE;趋势A:=MA(((CLOSE-LLV(LOW,48))/(HHV(HIGH,48)-LLV(LOW,48))*50),17)+9,CO LORFFFFFF;趋势B:=MA(((CLOSE-LLV(LOW,53))/(HHV(HIGH,53)-LLV(LOW,53))*50),17)+9,COLOR3377DD;AZ1:=MA(趋势A,7)*1.372,COLORGREEN,LINETHICK1;AZ2:=AZ1*1.0887;AZ3:=(1.5*(趋势B+RSI4)-(AZ2+AZ1))+12,COLORGREEN,LINETHICK1,DOTLINE;鱼网:=IF((CROSS(RSI2,RSI4) OR CROSS(RSI2,AZ3) AND AZ3<38 ANDRSI1<51),18,0),COLORYELLOW,LINETHICK2;买入:=IF(EXIST(鱼网=18,8)AND 鱼>45 AND鱼>REF( 鱼,2),1,0),COLORMAGENTA,,LINETHICK3;{STICKLINE(A13,0,主力*2+3,5,0),COLORMAGENTA;}DRAWTEXT(A13 ,主力*2+2,'启动'),COLORWHITE;最小值:=LLV(LOW,25);最大值:=HHV(HIGH,25);波动线:=EMA((CLOSE-最小值)/(最大值-最小值)*100,4);平均线:=EMA(波动线,3);反转:=COUNT(MA(C,10)<REF(MA(C,10),1),3)>=2 AND CROSS(C,MA(C,20)) AND C>=MA(C,30) AND 平均线>=REF(平均线,1);DRAWTEXT(反转,主力*2+2.3,'反转'),COLORWHITE;STICKLINE(反转OR XPLS {AND VR4>=VR5} ,0,主力*2+2,5,0),COLORCYAN; 必买: DRAWICON(REF(TROUGHBARS(3,15,1),1)=0 ANDHIGH>LOW,-1.2,25),COLORRED ,LINETHICK4;必卖: DRAWICON(REF(PEAKBARS(3,15,1),1)=1,主力+2.2,27),COLORRED,LINETHICK8;DRAWTEXT(REF(PEAKBARS(3,15,1),1)=1 ,主力+3.2,' 必卖'),COLORGREEN; A7:=C-REF(C,1);A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);买1:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)); DRAWTEXT(FILTER(买1=1,5) AND (平均线>=REF(平均线,1) OR VR4>=VR5) ,主力-0.45,'↖买进'),COLORYELLOW;STICKLINE(买1,主力,0,2,0),COLORYELLOW;A11:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,3 0))/(HHV(H,30)-LLV(L,30))*100,5);A14:=EMA(A11,5);A15:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100;DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);DEA :=EMA(DIFF,9);基础:=(DIFF<-0.1 AND DIFF>DEA);中线买入:=(CROSS(A11,A14)AND (A15-A14)>40 AND 基础OR 买入)AND VR4>=VR5 ;STICKLINE(中线买入AND COUNT(中线买入,5)=1 ,0,主力+3,2,0),COLORRED; DRAWTEXT(中线买入AND COUNT(中线买入,10)=1,主力*2+3,'买入'),COLORMAGENTA;买多: ( (XPLS OR 中线买入OR 大底OR A1 OR 买入OR 买OR A13) OR VR4>=VR5),NODRAW,COLORRED;DRAWTEXT_FIX( ISLASTBAR AND 买多,0.52,0.04,0,'【买多】'),COLORRED; 买空: ( (FILTER(GC4>REF(GC4,1),10) OR DD ORFILTER(CROSS(TX,DFQS),10)) OR VR4<VR5),NODRAW,COLORCYAN; DRAWTEXT_FIX( ISLASTBAR AND 买空,0.52,0.04,0,'【买空】'),COLORCYAN; 超短线:(((主力线-LLV(主力线,21))/(HHV(主力线,21)-LLV(主力线,21)))*(4))*(0.5),COLORYELLOW,LINETHICK3;IF(超短线>=REF(超短线,1),超短线,DRAWNULL),COLORMAGENTA,LINETHICK5;IF(超短线<REF(超短线,1),超短线,DRAWNULL),COLORBLUE,LINETHICK5;震仓: IF(VR4,-0.038,DRAWNULL),COLORYELLOW,LINETHICK9;红买: IF(VR4>=VR5 ,-0.038,DRAWNULL), COLORRED,LINETHICK5;蓝卖: IF(VR4<VR5 ,-0.036,DRAWNULL),,COLORBLUE,LINETHICK5;E:=(HIGH+LOW+OPEN+2*CLOSE)/5;阻力:=(E+(HIGH-LOW)) ;支撑:=(E-(HIGH-LOW));DRAWTEXT_FIX(ISLASTBAR,0.15,0.04,0,'阻力'),COLORWHITE; DRAWNUMBER_FIX(ISLASTBAR,0.22,0.04,0,阻力),COLORWHITE; DRAWTEXT_FIX(ISLASTBAR,0.35,0.04,0,'支撑'),COLORLIRED; DRAWNUMBER_FIX(ISLASTBAR,0.42,0.04,0,支撑),COLORRED;ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算}SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//小筹码估算}ZSHTL:=SHCM/(ZLCM+SHCM)*100;{//小股民套牢筹码比率}ZZLKP:=ZLCM/(ZLCM+SHCM)*100;{//主力控盘筹码比率}ZCMZL:=MA(ZLCM+SHCM,13);{//市场筹码总量}ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);{//走牛天数} ZSHJJ:=EMA(ZSHTL,89);{//小股民警戒}ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);RSVB:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;KK1:=SMA(RSVB,10,1);D1:=SMA(KK1,5,1);KK:=INTPART(KK1);DDB:=INTPART(D1);TFXXS:=KK+DDB;{//变异KD风险系数}T1:=CONST( ZCMZL>REF(ZCMZL,1) AND DKB=1);T2:=CONST( ZCMZL>REF(ZCMZL,1) AND DKB=0);T3:=CONST( ZCMZL=REF(ZCMZL,1));T4:=CONST( ZCMZL<REF(ZCMZL,1) AND DKB=1);T5:=CONST( ZCMZL<REF(ZCMZL,1) AND DKB=0);T6:=CONST(TFXXS<=50 );T7:=CONST(TFXXS>=160 );T8:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS<=100 );T9:=CONST( TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS>100);T10:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS>100 );T11:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS<=100 );T12:=CONST( ZSHTL>90 );T13:=CONST( ZZLKP>75 );T14:=CONST(CROSS(ZCMZL,ZZLJJ) AND ZZLKP>ZZLJJ AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1) );T15:=CONST(CROSS(ZCMZL,ZZLKP) AND ZZLKP>ZZLJJ AND ZZLKP<ZSHTL AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1) );T16:=CONST( CROSS(ZCMZL,ZSHTL) AND ZSHTL>ZZLKP ANDZCMZL>REF(ZCMZL,1));T17:=CONST( CROSS(ZCMZL,100) AND ZCMZL>REF(ZCMZL,1));T18:=CONST(REF(ZSHTL,1)>90 AND ZSHTL<90 );TS1:=IF(T1=1,0+0.03,0);TS2:=IF(T2=1,TS1+0.03,TS1);TS3:=IF(T3=1,TS2+0.03,TS2);TS4:=IF(T4=1,TS3+0.03,TS3);TS5:=IF(T5=1,TS4+0.03,TS4);TS6:=IF(T6=1,0+0.73,0);TS7:=IF(T7=1,TS6+0.03,TS6);TS8:=IF(T8=1,TS7+0.03,TS7);TS9:=IF(T9=1,TS8+0.03,TS8);TS10:=IF(T10=1,TS9+0.03,TS9);TS11:=IF(T11=1,TS10+0.03,TS10);TS12:=IF(T12,0+0.03,0);TS13:=IF(T13=1,TS12+0.03,TS12);TS14:=IF(T14=1,TS13+0.03,TS13);TS15:=IF(T15=1,TS14+0.03,TS14);TS16:=IF(T16=1,TS15+0.03,TS15);TS17:=IF(T17=1,TS16+0.03,TS16);TS18:=IF(T8=1,TS17+0.03,TS17);DRAWTEXT_FIX(T1 ,0.66,TS1,0,'★监控:主力增仓'),COLOR8080FF; DRAWTEXT_FIX(T2 ,0.66,TS2,0,'★监控:主力减仓'),COLORFFFF00; DRAWTEXT_FIX(T3 ,0.66,TS3,0,'★监控:多空平衡'),COLORGRAY; DRAWTEXT_FIX(T4 ,0.66,TS4,0,'★监控:主力回补'),COLORFF9933; DRAWTEXT_FIX(T5 ,0.66,TS5,0,'★监控:主力出逃'),COLORFFFF00; DRAWTEXT_FIX(T6 ,0.56,0.25,0,'★操作:买入风险'),COLORYELLOW; DRAWTEXT_FIX(T7 ,0.56,0.25,0,'★操作:卖出风险'),COLORFFFF00; DRAWTEXT_FIX(T8 ,0.56,0.25,0,'★操作:追涨博弈'),COLOR8080FF; DRAWTEXT_FIX(T9 ,0.56,0.25,0,'★操作:稳健持股'),COLOR8080FF;DRAWTEXT_FIX(T10 ,0.56,0.25,0,'★操作:盘跌减仓'),COLORFFFF00; DRAWTEXT_FIX(T11 ,0.56,0.25,0,'★操作:杀跌空仓'),COLORFFFF00; DRAWTEXT_FIX(T12,0.36,TS12,0,'☆特别提示:筑底散兵坑'),COLOR66FFCC; DRAWTEXT_FIX(T13,0.36,TS13,0,'☆特别提示:铸顶风险区'),COLORFFFF00; DRAWTEXT_FIX(T14,0.36,TS14,0,'☆特别提示:穿越主力'),COLOR8080FF; DRAWTEXT_FIX(T15,0.36,TS15,0,'☆特别提示:穿越主力'),COLORYELLOW; DRAWTEXT_FIX(T16,0.36,TS16,0,'☆特别提示:穿越散户'),COLORGREEN; DRAWTEXT_FIX(T17,0.36,TS17,0,'☆特别提示:全盘穿越'),COLOR3399FF; DRAWTEXT_FIX(T18,0.36,TS18,0,'☆特别提示:神秘黑洞'),COLOR9966FF; 量价:=(VOL/CLOSE)/3;{好}BB2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);BB3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0);BB6:=BB2+BB3;DD1:=1;比:=BB2/BB3;BBB1:=STRCAT(STRCAT('买= ',CON2STR((100*BB2)/BB6,0)),'%');BBB2:=STRCAT(STRCAT('卖= ',CON2STR((100*BB3)/BB6,0)),'%');BBB3:=STRCAT(STRCAT('差= ',CON2STR((100*(BB2-BB3))/BB6,0)),'%'); DRAWTEXT_FIX(DD1=1 ,0,0.02,0,BBB1),COLORRED;DRAWTEXT_FIX(DD1=1 ,0,0.13,0,BBB2),COLORGREEN;DRAWTEXT_FIX(DD1=1 ,0,0.24,0,BBB3),COLOR00FFFF;。
黄金KD (通达信 大智慧 指标源码 副图 贴图 不加密 )

黄金KD (通达信大智慧指标源码副图贴图不加密)最近在网上浏览看到一款大智慧的“黄金KD”副图指标,试着改编成通达信的源码指标,并在通达信上编译通过。
为让喜欢自己动手的股友们参考,今特在理想论坛上与股友们分享,包括通达信和大智慧的两个指标。
通达信的指标上增加“▲ ▼”图标,以示“进出”,因为“KDJ”是一款经典指标,所以其图示应该明了,不多说,上图上指标。
DRAWRECTREL(76,1000,0,880,RGB(255,255,0));DRAW TEXT_FIX(ISLASTBAR,0,2,0,'常怡_28改编'),COLORLIRED;N:=9;M1:=3;M2:=3;M3:=4;LOWV:=LLV(L OW,N);HIGHV:=HHV(HIGH,N);RSV:=EMA((CLOSE-LOW V)/(HIGHV-LOWV)*100,M1);K:EMA(RSV,M2);D:MA(K,M3 );J:3*K-2*D,LINETHICK1;趋势:SMA(D,10,1),LINETHICK0;乾:80,POINTDOT,COLORBBBBBB;艮:50,POINTDOT,COLORBBBBBB;坤:20,POINTDOT,COLORBBBBBB;DRAWBAND(D,RGB( 0,148,68),K,RGB(255,203,12));IF(趋势>REF(趋势,1),趋势,DRAWNULL),COLORWHITE,LINETHICK3;IF(趋势REF(J,1),J,DRAWNULL),LINETHICK2,COLORRED;IF(JR EF(J,1),J,DRAWNULL),LINETHICK4,POINTDOT,COLOR WHITE;IF(J75{ AND 趋势>50},100,39);DRAWICON(CROSS(K,D)AND D<25{ AND 趋势<50},0,38);。
通达信指标公式源码通达信主买卖盘控盘力度资金副图指标

通达信主买卖盘控盘力度资金副图指标AB1:=VOL*CLOSE;{A} AB2:=SUM(AB1,1)/SUM(VOL,1);{B} AB3:=EMA(AB2,17);{B1}AB4:=(C*2+H+L)/4*10;{V1B} AB5:=EMA(AB4,13)-EMA(AB4,34);{V2B}AB6:=EMA(AB5,5);{V3B} AB7:=2*(AB5-AB6)*5.5;{V4B}AB8:=(INDEXC*2+INDEXH+INDEXL)/4;{V8B} AB9:=EMA(AB8,13)-EMA(AB8,34);{V9B} AB10:=EMA(AB9,3);{VA} AB11:=(AB9-AB10)/2;{VB} 个股资金:=(AB2-AB3)*100/AB2;主力资金:=AB7; 大资金:=AB11; 红点主力进场:IF(个股资金>0 AND 主力资金>0 AND 大资金>0,-10,DRAWNULL),COLORRED,CIRCLEDOT,LINETHICK1;V1:=EMA(EMA(CLOSE,20),20);{V1} 力度:=(V1-REF(V1,1))/REF(V1,1)*1000,COLORFF00FF,LINETHICK2;{控盘力度} 开始控盘:IF(CROSS(力度,0),20,0),LINETHICK2,COLORYELLOW; 【庄控盘】:IF(力度>REF(力度,1) AND 力度>0,8,0),LINETHICK2,COLORRED; 白线主力减仓:IF(力度< REF(力度,1) AND 力度>0,力度,0),LINETHICK2,COLORWHITE; 绿点主力出场:IF(个股资金<=0 AND 主力资金<=0 AND 大资金<=0,-10,DRAWNULL),COLORGREEN,CIRCLEDOT,LINETHICK1; 主力动态:(个股资金+主力资金+大资金),COLORYELLOW,NODRAW; STICKLINE(主力动态>0,0,主力动态,1,0),COLORFF00FF; STICKLINE(主力动态<=0,0,ABS(主力动态),1,0),COLORGREEN; 比例:(主力动态-REF(主力动态,1))/REF(主力动态,1),NODRAW;底部:0,COLORFFCC66,LINETHICK2; 虚:IF(CURRBARSCOUNT=1 ANDPERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚,0,-1,-1),COLOR00C0C0;实:VOL,VOLSTICK; 换手:=VOL/CAPITAL*100; 贰换:SUM(V/CAPITAL*100,20),NODRAW,COLORMAGENTA; 动态市盈:=C/FINANCE(33),COLOR16CDEC,LINETHICK0 ;VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 主动买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK2; 主动卖盘:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*( HIGH-LOW),0-VOL/2)),LINETHICK2; 买卖盘:=-(主动买盘/主动卖盘),NODRAW,COLORYELLOW; 日净入(WS):(主动买盘+主动卖盘)/10000,NODRAW,COLORMAGENTA; STICKLINE(主动买盘>0,0,主动买盘,1,0),COLORRED; STICKLINE(主动卖盘<0,VOL,主动买盘,1,0),COLOR00FF00; STICKLINE(换手>0 ,0, 主动买盘,0,0),COLORYELLOW; STICKLINE(换手>0,VOL, 主动买盘, 0,0) ,COLORRED; AHC2:=(HIGH - LOW); AHC3:=ABS((OPEN - CLOSE));AHC4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); AHC5:=(IF((CLOSE >OPEN),OPEN,CLOSE) - LOW); AHC6:=((AHC3 / AHC2) * VOL); AHC7:=((AHC4 / AHC2) * VOL); AHC8:=((AHC5 / AHC2) * VOL); AHCA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); AHCB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); AHCC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); AB601:=HHV(V,5); AB602:=O>C; AB702:=C>O;AB703:=C=O; AB704:=((SUM(V,5)/AB601)); AB705:=IF(AB704>0.3,1,0);AB706:=IF(AB602 AND AB705,V,0); AB707:=IF(AB702 AND AB705,V,0); 钱出A:=SUM(AB706,5),COLORGREEN,LINETHICK2; 钱入A:=SUM(AB707,5),COLORRED,LINETHICK2; 钱出:=SUM(AB706,20),COLORGREEN,LINETHICK2; 钱入:=SUM(AB707,20),COLORRED,LINETHICK2; 伍净入(SW):(钱入A-钱出A)/100000,COLORYELLOW,NODRAW; 贰净入:(钱入-钱出)/100000,COLORRED,NODRAW; P5:MA(实,5),COLORMAGENTA,LINETHICK2; P35:MA(实,35),COLORBLUE,LINETHICK2;P135:MA(实,135),COLORWHITE,LINETHICK2; DRAWTEXT(CROSS(P5,P135),(V *1.05),'★'),COLORYELLOW; 0,COLORBROWN;。
通达信副图指标理财专家(附源码)

通达信副图指标理财专家(附源码){参数D:34,90,72}VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;VAR2:=2*ABS(VAR1);VAR3:=100-3*SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((CLO SE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1);VAR4:=100-3*SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((OPE N-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1);VAR5:=(HIGH+LOW+CLOSE)/3;VAR6:=(VAR5-MA(VAR5,14))/(0.015*AVEDEV(VAR5,14));VAR7:=(VAR5-MA(VAR5,89))/(0.015*AVEDEV(VAR5,89));VAR8:=IF(VAR6>=150 AND VAR6<200 AND VAR7>=150 AND VAR7<200,10,0);VAR9:=IF(VAR6<=-150 AND VAR6>-200 AND VAR7<=-150 AND VAR7>-200,-10,VAR8);VARA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;VARB:=100-ABS(VARA);VARC:=3*SMA((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA ((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1);VARD:=3*SMA((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA ((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1);VARE:=REF(LOW,1)*0.9;VARF:=LOW*0.9;VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;VAR11:=EMA(VAR10,30);VAR12:=VAR11-CLOSE;VAR13:=REF(CLOSE,1);VAR14:=SMA(MAX(CLOSE-VAR13,0),7,1)/SMA(ABS(CLOSE-VAR13),7,1)*100;VAR15:=SMA(MAX(CLOSE-VAR13,0),13,1)/SMA(ABS(CLOSE-VAR13),13,1)*100;VAR16:=BARSCOUNT(CLOSE);VAR17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;VAR18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2;VAR19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;VAR1A:=(SMA(VAR19,4,1)-50)*2;VAR1B:=SMA(VAR1A,3,1);VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;VAR1D:=SMA(VAR1C,4,1);VAR1E:=SMA(VAR1D,3,1);VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;VAR20:=IF(VAR17<=25 AND VAR18<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR12>=-0.25 AND VAR14<22 AND VAR15<28 AND VAR16>50,80,0);活筹OAMV: VAR3,COLORFF00FF;OX: IF(VARB<90,VARB,100),COLORFFCC66;VAR21:=IF(VAR1>0,VAR1,0);核能: IF(VAR1<0,VAR2,0), LINESTICK;牛角: VAR20,COLORYELLOW;预警: IF(VAR7>=200 AND VAR6>=150,15,IF(VAR7<=-200 AND VAR6<=-150,-15,VAR9))+60,COLOR00FF00;VAR22:=100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34));VAR23:=MA(VAR22,3);VAR24:=EMA(AMOUNT/VOL/100,5);VAR25:=EMA(AMOUNT/VOL/100,13);VAR26:=VAR24-VAR25;势能: IF(1000*VAR26/VAR24>0,1000*VAR26/VAR24,0),COLORRED,LINETHICK2;STICKLINE(VAR3>=REF(VAR4,1),VAR3,VAR4,8,1),COLORRED;STICKLINE(VAR3<REF(VAR4,1),VAR3,VAR4,8,1),COLOR00FF00;VAR27:=CLOSE>MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1);VAR28:=CLOSE<MA(CLOSE,20) AND MA(CLOSE,20)<REF(MA(CLOSE,20),1);VAR29:=VAR21>50 AND 预警>60 AND OX=100;VAR2A:=VAR21>48 AND 预警>60 AND OX<100;VAR2B:=核能>38 AND 预警<55;VAR2C:=牛角>50 AND OX<90;VAR2D:=VAR3<REF(VAR4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);VAR2E:=VAR3>=REF(VAR4,1) AND CLOSE<REF(CLOSE,1) AND 预警=60 AND 牛角=0 AND 核能>=REF(核能,1) AND VARC<REF(VARD,1);DRAWTEXT(VAR27 AND COUNT(VAR27,30)=1,90,'持股待涨'),COLORFF00FF;DRAWTEXT(VAR28 AND COUNT(VAR28,30)=1,10,'出局为佳'),COLOR00FF00;DRAWTEXT(VAR29 AND COUNT(VAR29,30)=1,70,'上涨过急,需要调整'),COLORWHITE; DRAWTEXT(VAR2A AND COUNT(VAR2A,30)=1,80,'拉升在即狂牛!'),COLORYELLOW; DRAWTEXT(VAR2B AND COUNT(VAR2B,30)=1,20,'不必杀跌有反弹'),COLORWHITE; DRAWTEXT(VAR2C AND COUNT(VAR2C,30)=1,30,'角斗士,阶段底部'),COLORYELLOW; DRAWTEXT(VAR2D AND COUNT(VAR2D,30)=1,60,'大资金进场'),COLOR0099FF;DRAWTEXT(VAR2E AND COUNT(VAR2E,30)=1,40,'高点回落'),COLORFFCC66;。
通达信2指标——金斗(副图)
{STICKLINE(C>0,-50,120,15,0),COLOR7C221C;}TYP := (HIGH + LOW + CLOSE)/3;CCI1:=(TYP-MA(TYP,6))/(0.015*A VEDEV(TYP,5));差值1:=ABS(REF(CCI1,1)-CCI1),LINETHICK0;CCI2:=(TYP-MA(TYP,10))/(0.015*A VEDEV(TYP,10));差值2:=ABS(REF(CCI2,1)-CCI2),LINETHICK0;CCI3:=(TYP-MA(TYP,20))/(0.015*A VEDEV(TYP,20));差值3:=ABS(REF(CCI3,1)-CCI3),LINETHICK0;CCI4:=(TYP-MA(TYP,30))/(0.015*A VEDEV(TYP,30));差值4:=ABS(REF(CCI4,1)-CCI4),LINETHICK0;CCI5:=(TYP-MA(TYP,60))/(0.015*A VEDEV(TYP,60));差值5:=ABS(REF(CCI5,1)-CCI5),LINETHICK0;CCI:=(CCI1+CCI2+CCI3+CCI4+CCI5)/2,COLORRED,LINETHICK2;天:=100,COLORBLUE;TJ0:=CCI>50;M1:=WINNER( MA(CLOSE,1))*200;M2:=WINNER(MA(CLOSE,20))*200;V AR1:=(CLOSE-LLV(LOW,80))/(HHV(HIGH,80)-LLV(LOW,80))*200;V AR2:=SMA(V AR1,3,1);V AR3:=SMA(V AR2,3,1);V AR4:=3*VAR2-2*V AR3;V AR5:=LLV(LOW,5);V AR6:=HHV(HIGH,5);V AR7:=EMA((CLOSE-V AR5)/(V AR6-V AR5)*100,4)*2;V AR8:=EMA(0.667*REF(V AR7,1)+0.333*V AR7,2);V AR9:=3*VAR7-2*V AR8;V ARA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);V ARB:=POW(MA(LOW,5),2)+MA(LOW,5);V ARC:=POW(MA(HIGH,5),2)+MA(HIGH,5);V ARD:=(VARA-LLV(V ARB,64))/(HHV(V ARC,64)-LLV(V ARB,64))*150+65-10; V ARE:=SMA(VARD,3,1)*1.5-100;V ARF:=SMA(V ARE,3,1);V AR10:=3*VARE-2*V ARF;V AR11:=(HIGH+LOW+CLOSE*2)/4;V AR12:=EMA(V AR11,13);V AR13:=STD(V AR11,13);V AR14:=(V AR11-V AR12)*100/V AR13;V AR15:=EMA(V AR14,5);V AR17:=EMA(V AR15,13)+200-100;V AR18:=EMA(V AR17,10);V AR19:=3*VAR17-2*VAR18;V AR1A:=V AR2+V AR7+V ARE+V AR17;V AR1B:=V AR3+V AR8+VARF+V AR18;V AR1C:=V AR4+V AR9+VAR10+V AR19;V AR1D:=(HIGH+LOW+CLOSE)/3;V AR20:=(V AR1D-MA(V AR1D,34))/(0.015*A VEDEV(V AR1D,34));V AR21:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);V AR22:=(HIGH+LOW+CLOSE+V AR1D)/4;V AR23:=EMA(V AR22,24);V AR24:=STD(V AR22,24);V AR25:=(V AR22-V AR23)/V AR24*100;V AR26:=(V AR1D-MA(V AR1D,24))/(0.015*A VEDEV(V AR1D,24));V AR27:=EMA(V AR25,5);V AR2A:=((V AR27+V AR26+V AR20)/3+165)/4;V AR2B:=(EMA(EMA(EMA(V AR2A,15),10),5)-25)*2+V AR21;V AR2C:=(VAR1A+V AR1B+V AR1C*30)/32/5-15;V AR2D:=EMA(V AR2C,13);{13}V AR2E:=(VAR2A+V AR2C)/2/1.1;V AR28:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;V AR29:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;V AR30:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;V AR31:=REF(CLOSE,1);V AR32:=SMA(MAX(CLOSE-V AR31,0),5,1)/SMA(ABS(CLOSE-V AR31),5,1)*100;V AR33:=(HIGH+LOW+CLOSE)/3;V AR34:=(V AR33-MA(V AR33,14))/(0.015*A VEDEV(V AR33,14));V AR35:=(V AR28>=-15.8 AND V AR28<=-12.2 AND V AR29<=-20.8 AND V AR30<=-27.5 AND V AR32<=11.7 AND V AR34<=-145)*100;多空比例:=IF((M1-M2)>-0.02,M1-M2,-0.02),COLORF0F000;超短:EMA(V AR2E,3),COLORGREEN ;IF(超短>REF(超短,1), 超短,DRAWNULL),LINETHICK2,COLORRED;短线:EMA(超短,5),COLORWHITE;IF(短线>REF(短线,1), 短线,DRAWNULL),LINETHICK2,COLORRED;IF(超短短线, 超短,DRAWNULL),LINETHICK2,COLORYELLOW;STICKLINE(IF(超短>REF(超短,1), 超短,DRAWNULL),0,10,3,0),COLORFF00FF;趋势:EMA((V AR2B+V AR2D)/2,3) ,COLORYELLOW;IF(趋势>REF(趋势,1), 趋势,DRAWNULL),LINETHICK2,COLORRED;底部:=0,COLORF00FF0,LINETHICK2;中位:=50,POINTDOT,COLORYELLOW,LINETHICK4;风险:=80,COLORWHITE,POINTDOT;顶:=100,COLORBLUE;逃命:=120,COLORGREEN,LINETHICK2;STICKLINE(IF(超短DRAWTEXT(CROSS(短线,超短) AND CROSS(趋势,超短) AND CROSS(趋势,短线),REF(超短,2)*1.2,'逃'),COLORGREEN;DRAWBAND(超短,RGB(200,50,55),短线,RGB(0,100,50));TJ1:=CROSS(超短,短线) AND 短线<50 AND TJ0 ;TJ2:=CROSS(超短,短线) AND 短线<0 AND 趋势<0;TJ10:=CROSS(超短,短线) AND 短线<30;DRAWICON(TJ10,短线,26);SL:=CROSS(短线,超短) AND 短线>80;DRAWICON(SL,短线,19);STICKLINE(TJ1,0,20,4,0),COLOR000099;STICKLINE(TJ1,0,20,2,0),COLOR0000BB;STICKLINE(TJ1,0,20,1,0),COLOR0000DD;STICKLINE(TJ1,0,20,0.3,0),COLOR0000FF;DRAWTEXT(TJ1,25,'买底'),COLOR0000FF;STICKLINE(TJ2,0,50,4,0),COLOR009999;STICKLINE(TJ2,0,50,2,0),COLOR00BBBB;STICKLINE(TJ2,0,50,1,0),COLOR00DDDD;STICKLINE(TJ2,0,50,0.3,0),COLOR00FFFF;DRAWTEXT(TJ2,53,'超底'),COLOR00FFFF;{凤凰金叉}XXX:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:=SMA(XXX,3,1);D:=SMA(K,3,1);叉1:=CROSS(K,D);AA:=MACD.DIF;AB:=MACD.DEA;叉2:=CROSS(AA,AB);金叉:=叉1 AND 叉2;STICKLINE(金叉,0,5,4,0),COLORYELLOW;STICKLINE(金叉,0,10,3,0),COLORYELLOW;STICKLINE(金叉,0,19,1,0),COLORYELLOW;STICKLINE(金叉,0,22,0,0),COLORYELLOW;DRAWTEXT(金叉,23,'金塔'),COLOR00FFFF;。
通达信副图指标淘金(附源码)
通达信副图指标淘金(附源码)通达信副图指标淘金(附源码)M:=34;N:=7;ZX:=MA(CLOSE,M);阻力线:(ZX + N*STD(CLOSE,M)),POINTDOT,LINETHICK2,COLORFFFF20;拉升力:=(CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,47))*0.6*CLOSE;拉升力A:=SMA(拉升力,6.3,1);波峰波谷:=SMA(拉升力A,3,1),COLOR09FFFF;拉升力B:=3*拉升力A-2.1*波峰波谷;空方:=3*波峰波谷-1* 拉升力A;多空:IF(空方>拉升力B,拉升力B,空方)*4.5,LINETHICK2,COLOR00FF00;IF(多空>REF(多空,1),多,DRAWNULL),COLORLIMAGENTA,LINETHICK2;IF(多空<=REF(多空,1),多空,DRAWNULL),COLORWHITE,LINETHICK2;短线:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*10,LINETHICK0,COLORYELLOW;中线:=(CLOSE-MA(CLOSE,4))/MA(CLOSE,4)*10,LINETHICK0,COLORWHITE;红柱:SMA(短线,3,1)*4.5,LINETHICK0,COLOR0000FF;蓝柱:SMA(中线,3,1)*4.5,COLORSTICK,COLORFFFF00;STICKLINE(红柱<REF(红柱,1)ND 红柱>0,0,红柱,8,0),COLOR00C400;STICKLINE(红柱<REF(红柱,1)AND 红柱>0,0,红柱,6,0),COLOR00EC00;STICKLINE(红柱<REF(红柱,1)AND 红柱>0,0,红柱,4,0),COLOR33FF33;STICKLINE(红柱>REF(红柱,1)AND 红柱>0,0,红柱,8,0),COLOR0000C4;STICKLINE(红柱>REF(红柱,1)AND 红柱>0,0,红柱,6,0),COLOR0000F7;STICKLINE(红柱>REF(红柱,1)AND 红柱>0,0,红柱,4,0),COLOR2D2DFF;STICKLINE(蓝柱<REF(蓝柱,1) AND 蓝柱>0,0,蓝柱,8,0),COLOR00CACA;STICKLINE(蓝柱<REF(蓝柱,1) AND 蓝柱>0,0,蓝柱,6,0),COLOR00F2F2;STICKLINE(蓝柱<REF(蓝柱,1) AND 蓝柱>0,0,蓝柱,4,0),COLOR26FFFF;STICKLINE(红柱>REF(红柱,1)AND 红柱<0,0,红柱,8,0),COLORC600C6;STICKLINE(红柱>REF(红柱,1)AND 红柱<0,0,红柱,6,0),COLORF900F9;STICKLINE(红柱>REF(红柱,1)AND 红柱<0,0,红柱,4,0),COLORFF33FF;STICKLINE(红柱<REF(红柱,1)AND 红柱<0,0,红柱,8,0),COLORCECE00;STICKLINE(红柱<REF(红柱,1)AND 红柱<0,0,红柱,6,0),COLORFBFB00;STICKLINE(红柱<REF(红柱,1)AND 红柱<0,0,红柱,4,0),COLORFFFF37;STICKLINE(蓝柱>REF(蓝柱,1)AND 蓝柱<0,0,蓝柱,10,0),COLOR00DBDB;STICKLINE(蓝柱>REF(蓝柱,1)AND 蓝柱<0,0,蓝柱,6,0),COLOR02FFFF;STICKLINE(蓝柱>REF(蓝柱,1)AND 蓝柱<0,0,蓝柱,4,0),COLOR2DFFFF;。
通达信周K线副图
通达信周K线副图要先建好第一个OCHL的公式,再建第二个周K线副图公式,发的源码是分开的两个公式. 已经装在我的软件里试用过,我用的是招商证券的通达信软件,用广发证券的也可以,另外要下载好日线数据先建一引用指标副图,名为:OCHLND1970:=(YEAR-1970)*365+INTPART((YEAR-1972)/4)-IF(INTPART(YEAR/4)=YEAR/4,1,0)+DAY+(MONTH-1)*30+IF(MONTH<=8,INTPART(MONTH/2),INTPART((MONTH-7)/2)+4)-IF(MONTH>2 AND INTPART(YEAR/4)=YEAR/4,1,IF(MONTH>2 AND NOT(INTPART(YEAR/4)=YEAR/4),2,0));C1:C;O1:REF(O,BARSLAST(ND1970-REF(ND1970,1)>WEEKDAY-REF(WEEKDAY,1)));H1:HHV(H,BARSLAST(ND1970-REF(ND1970,1)>WEEKDAY-REF(WEEKDAY,1))+1);L1:LLV(L,BARSLAST(ND1970-REF(ND1970,1)>WEEKDAY-REF(WEEKDAY,1))+1);再建一指标,名为:周K线副图,源码为:WO1:="OCHL.O1#WEEK";WC:="OCHL.C1#WEEK";WH:="OCHL.H1#WEEK";WL:="OCHL.L1#WEEK";K1:=WO1=REF(WO1,1) AND WC=REF(WC,1) AND WH=REF(WH,1) AND WL=REF(WL,1);K3:=REF(C,1)=DYNAINFO(3) AND O=DYNAINFO(4) AND C=DYNAINFO(7) AND H=DYNAINFO(5) AND L=DYNAINFO(6);DD:=REF(BARSLAST(K1=0)+1,1),LINETHICK0;DD1:=CROSS(BACKSET((K1=0 OR K3) AND DD=5,4),0.5),NODRAW;DD2:=CROSS(BACKSET((K1=0 OR K3) AND (DD=4 OR DD=3),3),0.5),NODRAW;DD3:=CROSS(BACKSET((K1=0 OR K3) AND DD<=2,2),0.5),LINETHICK0;BK1:=DD1 OR DD2 OR DD3;BK2:=CROSS(BACKSET(K1=0,2),0.5);BK3:=CROSS(BACKSET(K1=0 AND REF(K1=0,1),2),0.5);WO:IF(BARSLAST(K1=0)=0,O,REF(O,BARSLAST(K1=0))),NOD RAW;K0:=WC>WO OR (WC=WO AND WC>REF(WC,BARSLAST(K1=0)+1));STICKLINE(K0 AND BK1,WH,WC,0,0),COLORLIMAGENTA;STICKLINE(K0 AND BK1,WO,WL,0,0),COLORLIMAGENTA;STICKLINE(K0 AND K1=0,WC,WO,0,0),COLORLIMAGENTA;STICKLINE(K0 AND (BK2 OR K3),WC,WO,0,0),COLORLIMAGENTA;STICKLINE(K0 AND ((K1 AND BK2=0 AND K3=0) OR BK3),WC,WC,8,1),COLORLIMAGENTA;STICKLINE(K0 AND ((K1 AND BK2=0 AND K3=0) OR BK3),WO,WO,8,1),COLORLIMAGENTA;STICKLINE(NOT(K0) AND BK1,WH,WO,0,0),COLORCYAN;STICKLINE(NOT(K0) AND BK1,WC,WL,0,0),COLORCYAN;STICKLINE(NOT(K0) AND K1=0,WC,WO,0,0),COLORCYAN;STICKLINE(NOT(K0) AND (BK2 OR K3),WC,WO,0,0),COLORCYAN;STICKLINE(NOT(K0) AND ((K1 AND BK2=0 AND K3=0) OR BK3),WC,WC,8,1),COLORCYAN;STICKLINE(NOT(K0) AND ((K1 AND BK2=0 AND K3=0) OR BK3),WO,WO,8,1),COLORCYAN;MA1:MA(C,20),COLORWHITE;MA2:MA(C,60),COLORYELLOW;MA3:MA(C,120),COLORMAGENTA;。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
天:80,COLORBLUE,LINETHICK2,POINTDOT;
海:20,COLORFF00FF,LINETHICK2,POINTDOT;
ZKK:="KD.K#WEEK"(9,3,3),COLORRED;
ZKD:="KD.D#WEEK"(9,3,3),COLORYELLOW;
KCD:=FILTER(CROSS(ZKK,ZKD) AND REF(ZKD,1)< 30,13); KCD1:=FILTER(CROSS(ZKK,ZKD) AND REF(ZKD,1)> 30,13); DRAWICON(KCD1,20,25);
XG1:=KCD;
STICKLINE(XG1,20,10,4,0),COLOR000099;
STICKLINE(XG1,20,10,2,0),COLOR0000BB;
STICKLINE(XG1,20,10,1,0),COLOR0000DD;
STICKLINE(XG1,0,20,0.3,0),COLOR0000FF;
DRAWTEXT(XG1,20,'K买'),COLOR0000FF;
SCD:=FILTER(CROSS(ZKD,ZKK) AND REF(ZKK,1)> 78,13); STICKLINE(SCD,90,80,4,0),COLOR009900;
STICKLINE(SCD,90,80,2,0),COLOR00BB00;
STICKLINE(SCD,90,80,1,0),COLOR00DD00;
STICKLINE(SCD,100,80,0.3,0),COLOR00FF00;
DRAWTEXT(SCD,95,'K卖'),COLOR00FF00;
DIFW:="MACD.DIF#WEEK"(12,26,9);
DEAW:="MACD.DEA#WEEK"(12,26,9);
FCA:=FILTER(CROSS(DIFW,DEAW) AND REF(DEAW,1)< 0,13); WLT:=DIFW> REF(DIFW,1) AND REF(DIFW,1)< REF(DIFW,2); XG2:=FCA OR WLT;
STICKLINE(XG2,10,20,4,0),COLOR990099;
STICKLINE(XG2,10,20,2,0),COLORBB00BB;
STICKLINE(XG2,10,20,1,0),COLORDD00DD;
STICKLINE(XG2,10,20,0.3,0),COLORFF00FF;
DRAWTEXT(XG2,10,'M买'),COLORFF00FF;
SCA:=FILTER(CROSS(DEAW,DIFW) AND REF(DIFW,1)> 0,13); STICKLINE(SCA,90,80,4,0),COLOR999900;
STICKLINE(SCA,90,80,2,0),COLORBBBB00;
STICKLINE(SCA,90,80,1,0),COLORDDDD00;
STICKLINE(SCA,90,80,0.3,0),COLORFFFF00;
DRAWTEXT(SCA,83,'M卖'),COLORFFFF00;
STICKLINE(XG1 AND XG2,20,80,0.1,0 ),COLORFF00FF; DRAWTEXT(XG1 AND XG2,50,'K.M买'),COLORRED; DRAWTEXT(XG1 AND XG2,43,'全仓'),COLORRED; STICKLINE(SCD AND SCA,20,80,0.1,0 ),COLOR00FF00; DRAWTEXT(SCD AND SCA,50,'K.M卖'),COLORFF0000;
{共振买点}
V AR1:=(CLOSE*2+HIGH+LOW)/4;
SK:= EMA(V AR1,13)-EMA(V AR1,73);
SD:= EMA(SK,2);
V1:=(CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03)
OR (CROSS(SK,SD) AND SK<=-0.14 ) OR (CROSS(SK,SD) AND SK<=0.05
AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035));
DRAWICON(V1,20,15);
N:=9;M1:=3;
V AR2:=REF(LOW,1);
V AR3:=SMA(ABS(LOW-V AR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
V AR4:=EMA(IF(CLOSE*1.3,V AR3*10,V AR3/10),3);
V AR5:=LLV(LOW,13);
V AR6:=HHV(V AR4,13);
V AR7:=IF(MA(CLOSE,34),1,0);
V AR8:=EMA(IF(LOW<= V AR5,(V AR4+V AR6*2)/2,0),3)/618*V AR7;
V AR9:=IF(VAR8> 100,100,V AR8);
吸筹:V AR9,LINETHICK1,COLORF00FF0;
STICKLINE(V AR9> 120,0,V AR9,8,1),COLORFF00FF;
快线:(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,LINETHICK1,COLORRED; 慢线:SMA(快线,M1,1),COLOR00FFFF;
BB:=IF(BARSLAST(CROSS(慢线,快线))>= 3 AND CROSS(快线,慢线) AND 慢线< 30,20,0); AA:=IF(BARSLAST(CROSS(快线,慢线))>= 4 AND CROSS(慢线,快线) AND 快线> 50,20,0); TJ10:=吸筹> 0.02;
TJ20:=CROSS(快线,慢线) AND 慢线< 50;
BUY:=FILTER(TJ10 AND TJ20,5);
DRAWICON(BUY,吸筹,23);。