幅图把前面的对照幅图合成在了一起 方便观察 能够更好地找到起拉的位置 全部源码
A1:=((MA(C,60)-L)/MA(C,20)),COLOR00FFFF;
B1:=((MA(C,60)-L)/MA(C,60)),COLOR00FF00;
C1:=((MA(C,30)-L)/MA(C,30)),COLORFF00FF;
主力1:50*(A1+B1+C1)/3,COLOR0000FF;
散户1:-50*(A1+B1+C1)/3,COLOR00FF00;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA30:=MA(CLOSE,30);
MA54:=MA(CLOSE,54);
MA60:=MA(CLOSE,60);
MA120:=MA(CLOSE,120);
热度:50/((MA5+MA10+MA20+MA30+MA60+MA120)/6/C)/10,COLORWHITE,DOTLINE;
BBT:热度-主力1,NODRAW;
BBT1:=BBT-REF(BBT,1)
BBT2:=BBT-REF(BBT,1)
STICKLINE(BBT1*BBT,热度,主力1,0,0),COLORFF00FF;
STICKLINE(BBT2*BBT,热度,主力1,0,0),COLORFF8000;
DRAWICON(BBT =1,主力1,11);
{STICKLINE(REF(BBT =0.02,1) AND BBT 0.02,散户*2,热度*2,0.5,0),COLOR8000FF;};
VURH9:=WINNER(C) 0.95 AND HHV(C,13)=C AND 100*(C-MA(C,12))/MA(C,12)
{STICKLINE(VURH9 0,5,9.2,1,0),COLORFF00FF;
DRAWTEXT(VURH9,9.18,'追'),COLORYELLOW;}
日K:= KDJ.K#DAY (9,3,3);
日D:= KDJ.D#DAY (9,3,3);
日YDIF:= MACD.DIF#DAY (14,56,5);
日YDEA:= MACD.DEA#DAY (14,56,5);
日RSI:= RSI.RSI1#DAY (9);
周K:= KDJ.K#WEEK (9,3,3);
周D:= KDJ.D#WEEK (9,3,3);
周YDIF:= MACD.DIF#WEEK (14,56,5);
周YDEA:= MACD.DEA#WEEK (14,56,5);
周RSI:= RSI.RSI1#WEEK (9);
月K:= KDJ.K#MONTH (9,3,3);
月D:= KDJ.D#MONTH (9,3,3);
月YDIF:= MACD.DIF#MONTH (14,56,5);
月YDEA:= MACD.DEA#MONTH (14,56,5);
月RSI:= RSI.RSI1#MONTH (9);
XY1:=日K
XY2:=日YDIF 日YDEA;
XY3:=日RSI
XY4:=周K
XY5:=周YDIF 周YDEA;
XY6:=周RSI
XY7:=月K
XY8:=月YDIF 月YDEA;
XY9:=月RSI
黑码初显:=XY1 AND XY2 AND XY3 AND XY4 AND XY5 AND XY6 AND XY7 AND XY8 AND XY9;
{STICKLINE(黑码初显,0.05,5,1,0),COLORBLUE;
STICKLINE(黑码初显 AND C/REF(C,1) 1.05,0.05,5,2,0)COLORYELLOW;
STICKLINE(黑码初显 AND C/REF(C,1) 1.05,0.05,5,1,0),COLORRED;
DRAWTEXT(黑码初显,5,'黑'),COLORWHITE;}
DIFX:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEAX:=EMA(DIFX,9);
AAAT:=(DIFX-DEAX)*2*60;
启动:=CROSS(AAAT-REF(AAAT,1),15),COLORRED,LINETHICK2;
{DRAWTEXT(启动,2,'↖金牛启动'),COLORYELLOW,LINETHICK2;}
DIFK:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEAK:=EMA(DIFK,9);
{STICKLINE(DIFK =DEAK,-10,-13,5,0),COLOR0000BB;
STICKLINE(DIFK DEAK,-10,-13,5,1),COLOR696969;}
周MD:=MACD.DIF#WEEK;
周MA:=MACD.DEA#WEEK;
STICKLINE(周MD =周MA,-13.5,-16.5,5,0),COLOR0000BB;
STICKLINE(周MD 周MA,-13.5,-16.5,5,1),COLOR696969;
月MD:=MACD.DIF#MONTH;
月MA:=MACD.DEA#MONTH;
STICKLINE(月MD =月MA,-16.5,-19.5,5,0),COLOR0000BB;
STICKLINE(月MD 月MA,-16.5,-19.5,5,1),COLOR696969;
RSVX:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));
KX:=SMA(RSVX,3,1);
DHX:=SMA(KX,3,1);
JX:=3*KX-2*DHX;
STICKLINE(KX =DHX,-20.5,-23.5,5,0),COLOR0000FF;
STICKLINE(KX DHX,-20.5,-23.5,5,1),COLOR696969;
周XK:= KDJ.K#WEEK
周XD:= KDJ.D#WEEK
STICKLINE(周XK =周XD,-24.5,-27.5,5,0),COLOR0000FF;
STICKLINE(周XK 周XD,-24.5,-27.5,5,1),COLOR696969;
月XK:= KDJ.K#MONTH
月XD:= KDJ.D#MONTH
STICKLINE(月XK =月XD,-28.5,-31.5,5,0),COLOR0000FF;
STICKLINE(月XK 月XD,-28.5,-31.5,5,1),COLOR696969;
VUR1:=VOL/CAPITAL;
VUR2:=1.1*(MAX(HIGH,REF(CLOSE,1))/MIN(LOW,REF(CLOSE,1))-1);
VUR3:=2.5*MAX(VUR1,VUR2);
VUR4:=DMA(CLOSE,VUR3);
VUR5:=20*(VUR4/REF(VUR4,1)-1)*38;
VUR6:=EMA(VUR5,2);
VUR7:=EMA(VUR5,2);
VUR8:=EMA(VUR7,3);
VURS:=EMA(VUR7,8);
VUR9:=1.1*(MAX(INDEXH,REF(INDEXC,1))/MIN(INDEXL,REF(INDEXC,1))-1);
VURA:=2.5*MAX(VUR1,VUR9);
VURB:=DMA(INDEXC,VURA);
VURC:=EMA(20*(VURB/REF(VURB,1)-1),1)*38;
VURD:=EMA(VURC,2);
VURE:=EMA(VURC,2);
{D强:STICKLINE(VURD 0,0,VURD,3.3,1),COLORMAGENTA;
D弱:STICKLINE(VURD 0,0,VURD,3.3,1),COLORCYAN;
极强:STICKLINE(VUR5 0,0,VUR5,3.3,0),COLORYELLOW;
STICKLINE(VUR5 0,0,VUR5,2.5,0),COLOR00BBBB;
STICKLINE(VUR5 0,0,VUR5,1.5,0),COLOR00FFFF;
强势:STICKLINE(VUR6 0,0,VUR6,3.3,0),COLOR0000AA;
STICKLINE(VUR6 0,0,VUR6,2.5,0),COLOR0000BB;
STICKLINE(VUR6 0,0,VUR6,1.5,0),COLOR0000FF;
极弱:STICKLINE(VUR5 0,0,VUR5,3.3,0),COLOR00AA00;
STICKLINE(VUR5 0,0,VUR5,2.5,0),COLOR00BB00;
STICKLINE(VUR5 0,0,VUR5,1.5,0),COLOR00FF00;
弱势:STICKLINE(VUR6 0,0,VUR6,3.3,0),COLOR005AAA;
STICKLINE(VUR6 0,0,VUR6,2.5,0),COLOR007BBB;
STICKLINE(VUR6 0,0,VUR6,1.5,0),COLOR009FFF;}
DX:=VURE,LINETHICK2,COLOR1088FF;
界:=VURS,LINETHICK2,COLOR6CBC10;
控:=VUR8,LINETHICK2,COLORFF10FF;
零:=0,COLORCCCCCC;
额:AMOUNT/100000000,COLORBROWN,NODRAW;
VAR1:=AMOUNT/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
流入亿:IF(CLOSE OPEN,VAR1*(HIGH-LOW),IF(CLOSE OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),AMOUNT/2))/100000000,COLORRED,NODRAW;
流出亿:IF(CLOSE OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN- LOW)),IF(CLOSE OPEN,0-VAR1*(HIGH-LOW),0-AMOUNT/2))/100000000,COLOR00FF00,NODRAW;
差:(流入亿+流出亿),NODRAW;
强:=EMA((CLOSE-REF(CLOSE,1))/CLOSE*10,2);
主力:=EMA(差,1),COLORFF00FF,LINETHICK5;
差A:3*EMA(EMA(EMA(EMA(强,2),2),2),2),NODRAW;
净流:3*EMA(EMA(EMA(EMA(差A,1),2),2),2), COLORRED,NODRAW;
MID:= MA(CLOSE,26);
AB:= EMA((EMA(CLOSE,3)+EMA(CLOSE,5)+EMA(CLOSE,8)+EMA(CLOSE,13))/4,2)LINETHICK2;
UPPER:= IF(DATE 1090501,MID+2*STD(CLOSE,26),0);
AUPPER:= IF(DATE 1090501,MID+1.7*2*STD(CLOSE,26),0);
LOWER:= IF(DATE 1090501,MID-2*STD(CLOSE,26),0);
ALOWER:= IF(DATE 1090501,MID-1.7*2*STD(CLOSE,26),0);
{DRAWTEXT(CROSS(AB,MID),0,'追击');}
K30:=SMA(((CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100),3,1);
MD1:=K30-REF(K30,1)
MD2:=V/REF(V,1) 2.4 OR REF(COUNT(ABS((C-REF(C,1))/REF(C,1))*100 2,6)=6,1) OR REF(V/REF(V,1) 2.4,1) ;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
{暴张:IF(MD1 AND MD2 AND DIFF DEA,6,0),COLORYELLOW;
DRAWTEXT(暴张,5,暴张),COLORYELLOW;
STICKLINE(MD1 AND MD2,0,5,2.5,0),COLORFF00FF,LINETHICK2;}
{DRAWTEXT(MD1 AND MD2 ,暴张,'暴张'),COLORWHITE;}
STICKLINE(月MD =月MA AND KX =DHX AND 周MD =周MA AND DIFK =DEAK AND 周XK =周XD AND 月XK =月XD,-31,-10,2,0),COLOR00FFFF;
STICKLINE((月MD =月MA)+(KX =DHX)+(周MD =周MA)+(DIFK =DEAK)+(周XK =周XD)+(月XK =月XD)=5,-31,-10,1,0),COLORFF8000;
STICKLINE((月MD =月MA)+(KX =DHX)+(周MD =周MA)+(DIFK =DEAK)+(周XK =周XD)+(月XK =月XD)=4,-31,-10,1,0),COLORFFFFFF;
