通达信【悟道突破+与庄共舞+底部轨迹】主副图套装 追寻主力运动的轨迹

{悟道突破主图源码如下}



DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);

DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);

DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);

历低价:LOWRANGE(L),COLORLICYAN NODRAW;

历高价:TOPRANGE(H),COLORMAGENTA,NODRAW;

历低量:LOWRANGE(V),COLORLICYAN NODRAW;

历高量:TOPRANGE(V),COLORMAGENTA,NODRAW;

NHL:=COUNT(BARSLAST(MA(C,250)>REF(MA(C,250),1))>=220,30)>=1 AND BARSLAST(MA(C,250)<=REF(MA(C,250),1))>=1;

NOTEXTQ:IF(MA(C,250)>=REF(MA(C,250),1),MA(C,250),DRAWNULL)COLORRED LINETHICK2;

NOTEXTR:IF(MA(C,250)<REF(MA(C,250),1),MA(C,250),DRAWNULL)COLORLICYAN LINETHICK2;

NOTEXTD:IF(COUNT(BARSLAST(MA(C,250)>REF(MA(C,250),1))>=220,30)>=1 AND BARSLAST(MA(C,250)<=REF(MA(C,250),1))>=1 AND MA(C,20)>MA(C,250),MA(C,250),DRAWNULL)COLORMAGENTA LINETHICK5;

NO2:=REF(IF(REF(V>=REF(V,1)*1.87 AND C>=(REF(C,1),O) AND TOPRANGE(V)>=20,1) AND L>REF(O,1),REF(O,1),REF(IF(L>REF(H,1),REF(H,1),O),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5)))),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND

(CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5)));

NOD:=REF(IF(REF(L,1)>REF(H,2),REF(H,2),NO2),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5)));

DRAWKLINE(H,O,L,C);

STICKLINE(REF(O,1),REF(IF(REF(L,1)>REF(H,2),REF(H,2),NO2),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5))),REF(IF(REF(L,1)>REF(H,2),REF(H,2),NO2),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5))),2,0),COLOR404080;

STICKLINE(H,REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),1,0),COLORBLUE;

STICKLINE(H,REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),1,0),COLORLIGRAY;

STICKLINE(V>=REF(V,1)*1.87 AND C>=(REF(C,1),O) AND TOPRANGE(V)>=20,O,C,3,0)COLORBLUE;

STICKLINE(V/REF(V,1)>=2.9 AND C>=O AND TOPRANGE(V)>=20,O,C,(-1),0)COLORMAGENTA;

STICKLINE((C-REF(C,1))/REF(C,1)*100<IF(CODELIKE('68'),-9.0,-6.9) AND (C-REF(C,1))/REF(C,1)*100<IF(CODELIKE('30'),-9.0,-6.9),O,C,(-1),0),COLORGREEN;

STICKLINE((C/REF(C,1)-1)*100<IF(CODELIKE('68'),-9.0,-6.9) AND (C-REF(C,1))/REF(C,1)*100<IF(CODELIKE('30'),-9.0,-6.9) AND H<REF(L,1),O,C,(-1),0),COLORBLACK;

STICKLINE((SUM(AMOUNT,1)/SUM(V,1)/100>REF(C,1) AND C<=O) OR (SUM(AMOUNT,1)/SUM(V,1)/100>REF(C,1) AND C>REF(C,1) AND C<O AND C>300) AND NOT((C-REF(C,1))/REF(C,1)*100>=9.71 AND O=C) AND NOT((C-REF(C,1))/REF(C,1)*100<=-9.71 AND O=C) AND NOT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H) OR AMOUNT/V/100<REF(C,1) AND C>O AND C<300 AND SUM(AMOUNT,1)/SUM(V,1)/100<REF(C,1) AND NOT((C-REF(C,1))/REF(C,1)*100>=9.71 AND O=C) AND NOT((C-REF(C,1))/REF(C,1)*100<=-9.71 AND O=C),MIN(O,C),MIN(O,C)+(MAX(O,C)-MIN(O,C))*0.5,1,0)COLORFF80FF;

STICKLINE(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,O,C,(3),0)COLORRED;

STICKLINE((O-C)/O>0.02 AND C<REF(C,1),(C+O)/2,(C+O)/2,2,1)COLORCYAN;

STICKLINE((C-O)/O>0.02 AND C>REF(C,1),(C+O)/2,(C+O)/2,2,1)COLORCYAN;

STICKLINE(TOPRANGE(V)>=88 AND C>O,(MAX(C,O)-MIN(C,O))*0.50+MIN(C,O),C,(-1),0)COLOR4080FF;

STICKLINE((H-REF(C,1))/REF(C,1)*100>IF(CODELIKE('68'),19.71,9.71) AND (H-REF(C,1))/REF(C,1)*100>IF(CODELIKE('30'),19.71,9.71) AND C<H,MAX(C,O),MAX(C,O)*0.995,(2),0)COLORBLACK;

{换手:(100*V/CAPITAL);}

DRAWICON(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5),H+0.05,9)DRAWABOVE;

DRAWTEXT(REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3)))>0 AND CURRBARSCOUNT=1,REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),' 高量换手阴') DRAWABOVE COLORFF8000;

DRAWTEXT(REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)))>0 AND CURRBARSCOUNT=1,REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND {换手>=15 AND} C>=REF(C,1),1))),' 高量换手阳') DRAWABOVE COLORYELLOW;

DRAWNUMBER(REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3)))>0 AND CURRBARSCOUNT=1,REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))), REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3)))),COLORBLUE;

DRAWNUMBER(REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)))>0 AND CURRBARSCOUNT=1,REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))), REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)))),COLORLIMAGENTA;

{板底:IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))),1)+1)+1,CONST(REF(NOD,REF(BARSLAST(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))),1)+0)),DRAWNULL),COLORMAGENTA,LINETHICK2;DRAWGBK(DATE>1231231,RGB(0,255,0),RGB(255,0,0),0,0,0);}

高阳:IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)),1)+1)+1,CONST(REF(REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),REF(BARSLAST(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1)),1)+1)),DRAWNULL),COLORYELLOW,LINETHICK9;

高阴:IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1)),1)+1)+1,CONST(REF(REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),REF(BARSLAST(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1)),1)+1)),DRAWNULL),COLORFF8000 ,LINETHICK9;

DRAWTEXT(高阳,(LOW * 0.989),'←一高阳'),COLORGREEN;



{与庄共舞副图源码如下}



DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);



DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);



DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',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);

主力活跃力度:=(((价量-LLV(价量,27))/(HHV(价量,27)-LLV(价量,27)))*(4))*(25);

快线:=(((价量-LLV(价量,9))/(HHV(价量,9)-LLV(价量,9)))*(4))*(25);

RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;

K1:=SMA(RSV,3,1);

D1:=SMA(K1,3,1);

KK:=INTPART(K1);

DD:=INTPART(D1);

TFXXS:=KK+DD;

TGLXS:=(TFXXS-REF(TFXXS,1));

主力筹码:=EMA(WINNER(CLOSE)*70,3);

散户筹码:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);

散户套牢筹码:=散户筹码/(主力筹码+散户筹码)*100;

主升浪波段:主力筹码/(主力筹码+散户筹码)*100,COLORFF6100,NODRAW;

主力主导行情:EMA(主升浪波段,55),NODRAW,COLORFF00FF;

疯牛压力平台:=HHV((H+L)/2,120);

金叉疯牛:=EMA((EMA(CLOSE,4)+EMA(CLOSE,6)+EMA(CLOSE,12)+EMA(CLOSE,24))/4,2);

界:=MA(CLOSE,27);

ER:=V/FINANCE(7)*100;

A0:=TMA(ER,(1-ER),1);

MAXCYC:=DMA((C+O)/2,ER/TMA(ER,(1-ER),1));

T1:=BARSLAST(C>MAXCYC*POW(1.1,0.9));

T2:=BARSLAST(C<MAXCYC*POW(1.1,-0.9));

T3:=CROSS(T1,T2) OR CROSS(T2,T1) OR BARSSINCE(T1+1)=0 OR BARSSINCE(T2+1)=0 OR BARSCOUNT(C)=0;

T4:=REF(MAXCYC,BARSLAST(T3));

主力最大盈利:LN(C/T4)/LN(1.1)*10,NODRAW,COLORFF0080;



SSL:=IF(主力最大盈利>0,BARSLAST(主力最大盈利<0 OR BARSCOUNT(C)=0),-1*BARSLAST(主力最大盈利>0 OR BARSCOUNT(C)=0)),NODRAW;



牛股出现预警:=WINNER(C/1.20)*100;

主力赢利25持仓:=WINNER(C/1.25)*100;

主力赢利35锁仓:=WINNER(C/1.35)*100;

主力拉升预警线:=30;

主线:=EMA(EMA(C,1),5);

本:=EMA(HHV(主线,5),1);

急:=EMA(HHV(本,21),1);

稳:=EMA(HHV(急,21),2);

投:=EMA(HHV(稳,21),3);

散:=EMA(HHV(投,21),4);

集:=EMA(HHV(散,21),5);

日线:=CLOSE;

疯牛马线:=EMA(HHV(集,21),6);

Y:=(H+O+L+3*C)/6;

净资金流向:=EMA(100-(100/(1+SUM(IF(Y>REF(Y,1),Y*VOL,0),14)/SUM(IF(Y<REF(Y,1),Y*VOL,0),14))),5);

VAR1:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100;

VAR2:=(CLOSE-LLV(LOW,43))/(HHV(HIGH,43)-LLV(LOW,43))*100;

VAR3:=SMA(VAR2,2,1);

VAR4:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;

主力运作强势线:=IF(C>200,C,DMA(VAR4,VOL/CAPITAL))*1.1;

黑马线:=SMA(VAR3,2,1);

VAR5:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;

主力做空能量线:=SMA(VAR5,3,1);

VAR6:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

主力做多能量线:=SMA(VAR6,5,1)-8;

主力能量监控:=(主力做多能量线-主力做空能量线);

主升浪时段:=IF((黑马线>60)AND(牛股出现预警>30)AND(净资金流向>50)AND(日线>疯牛马线)AND(主力能量监控>50),-40,0);

{主力持续增仓}

VOLUME:=VOL;

五日均量:=MA(VOLUME,5);

半年均量:=MA(VOLUME,135);

VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);

OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);

能量监控:=(OBV-MA(OBV,20))/10000;

能量差额监控:=(能量监控-REF(能量监控,1))/REF(能量监控,1)*100;



DRAWBAND(主升浪波段,RGB(255,192,203),主力活跃力度,RGB(0,0,0));



STICKLINE(主力最大盈利>0,主力最大盈利,0,1.5,0),COLORFF0080;



V1:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);

HY1:=REF(EMA(V1,3),1);



多空趋势:=(MA((CLOSE - HY1) * 10,2))*0.1;



换手:=V*100/CAPITAL;



主力:=MA(换手,4);



大户:=MA(换手,9);



中户:=MA(换手,17);



散户:=MA(换手,34);



均量:=(主力+大户+中户+散户)/4;



成交量:=V;



机构主力拉升:(主力-均量)*30,COLORRED,NODRAW;



大户主力拉升:(大户-均量)*30,COLOR3366FF,NODRAW;



中户能量:=(中户-均量);

散户能量:=(散户-均量);



中户线:=(REFDATE(HHV(散户能量,108),DATE)*1.02)-(REFDATE(LLV(中户能量,108),DATE))*20,COLORYELLOW,DOTLINE;



大户线:=((中户线+(REFDATE(HHV(中户能量,108),DATE)))*1.02)-(REFDATE(LLV(大户主力拉升,108)*20,DATE));



主力线:=((大户线+(REFDATE(HHV(大户主力拉升,108),DATE)))*1.02)-(REFDATE(LLV(机构主力拉升,108),DATE))*20;



多空线:=((主力线+(REFDATE(HHV(机构主力拉升,108),DATE)))*1.02)-(REFDATE(LLV(多空趋势,108),DATE));





STICKLINE(机构主力拉升>=0 AND 机构主力拉升>=REF(机构主力拉升,1),280,280+机构主力拉升,1.5,0),COLORRED;



STICKLINE(机构主力拉升>=0 AND 机构主力拉升< REF(机构主力拉升,1),280,280+机构主力拉升,1.5,0),COLORYELLOW;



STICKLINE(机构主力拉升<0 AND 机构主力拉升>=REF(机构主力拉升,1),280,280+机构主力拉升,1.5,0),COLORFF6100;





DRAWTEXT(ISLASTBAR=1,IF(机构主力拉升>=0,280,280+1),'机构'),COLORRED;





STICKLINE(大户主力拉升>=0 AND 大户主力拉升>=REF(大户主力拉升,1),180,180+大户主力拉升,1.5,0),COLOR3366FF;



STICKLINE(大户主力拉升>=0 AND 大户主力拉升< REF(大户主力拉升,1),180,180+大户主力拉升,1.5,0),COLORFFFF00;



STICKLINE(大户主力拉升<0 AND 大户主力拉升>=REF(大户主力拉升,1),180,180+大户主力拉升,1.5,0),COLORGREEN;



STICKLINE(大户主力拉升<0 AND 大户主力拉升< REF(大户主力拉升,1),180,180+大户主力拉升,1.5,0),COLORGREEN;



DRAWTEXT(ISLASTBAR=1,IF(大户主力拉升>=0,180,180),' 大户'),COLORRED;

STICKLINE(C>0,散户套牢筹码,主升浪波段,1.5,0),COLOR808080;

{主力控盘筹码}

STICKLINE(主升浪波段>REF(主升浪波段,1) AND 主升浪波段>20 ,主升浪波段,0,1.5,0 ),COLORYELLOW;

STICKLINE(主升浪波段<=REF(主升浪波段,1) AND 主升浪波段>20,主升浪波段,0,1.5,0 ),COLORYELLOW;

STICKLINE(主升浪波段>REF(主升浪波段,1) AND 主升浪波段<20,主升浪波段,0,1.5,0 ),COLORYELLOW;

STICKLINE(主升浪波段<=REF(主升浪波段,1) AND 主升浪波段<20,主升浪波段,0,1.5,0 ),COLORYELLOW;

STICKLINE(主升浪波段<散户套牢筹码 AND 主力主导行情>50 AND 主力赢利25持仓>40,主升浪波段,0,1.5,0 ),COLORFF00FF;

{主升浪区马线之下}

STICKLINE(主升浪波段>主力主导行情 AND 主力活跃力度>55 AND 主力赢利25持仓>40,主升浪波段,0,1.5,0),COLOR0089FF;

{主升浪区马线之上}

STICKLINE(主升浪波段>主力主导行情 AND 主力赢利25持仓>20 AND 金叉疯牛>界 AND 日线>疯牛马线,主升浪波段,0,1.5,0),COLORFF6100;

{主力拉升区}

STICKLINE(主升浪波段>主力主导行情 AND 主力赢利25持仓>40 AND 日线>疯牛马线,主升浪波段,0,1.5,0 ),COLORFF6100;

STICKLINE(主升浪波段>主力主导行情 AND 主力主导行情<50 AND 主升浪波段>50 AND 主力主导行情>REF(主力主导行情,1) AND 主力赢利25持仓<60,主升浪波段,30,1.5,0 ),COLORFF00FF;

STICKLINE(主升浪波段<=10 AND 主升浪时段<-10,0,0,1.5,0),COLORFF6100;

介入就亏时段:IF((散户筹码>主力筹码),-40,0),COLORGREEN,NODRAW;

DRAWBAND(0,RGB(0,255,0),介入就亏时段,RGB(255,0,0));

主力亏损区:IF((主力最大盈利<=0),-30,0),COLORBLUE,NODRAW;

DRAWBAND(0,RGB(0,0,255),主力亏损区,RGB(0,255,0));



持股时段:IF((金叉疯牛>界)AND(散户筹码<主力筹码)AND((主力活跃力度>50)OR(主力活跃力度>REF(主力活跃力度,1))),-40,0),COLORRED,NODRAW;

DRAWBAND(0,RGB(255,0,0),持股时段,RGB(34,139,34));



DRAWBAND(0,RGB(255,0,0),主升浪时段,RGB(0,255,0));



底仓主动吸筹:IF((主力最大盈利>0)AND(主力活跃力度>50)AND(金叉疯牛<疯牛马线),-30,0),COLOR000080,NODRAW;

DRAWBAND(0,RGB(178,34,34),底仓主动吸筹,RGB(0,255,0));





获利了结区:IF((黑马线>60)AND(牛股出现预警>30)AND(主力活跃力度<50)AND(主力最大盈利>70)AND(REF(主力活跃力度,1)>=主力活跃力度),-40,0),COLORGREEN,LINETHICK1;

DRAWBAND(0,RGB(0,255,0),获利了结区,RGB(255,0,0));

{滞涨卖出规避风险}

DF:=(REF(C,4)-C)/REF(C,4)*100;

STICKLINE((C<HHV(C,3))AND(能量监控<HHV(能量监控,4))AND(主力能量监控<50)AND(主升浪波段<HHV(主升浪波段,3))AND(获利了结区=-40)AND(C/REF(C,20)>1.3)AND(MA((H-L)/REF(C,1)*100,2)>6)AND(主力赢利25持仓>65)AND(主力活跃力度<主升浪波段)AND(主力活跃力度<60),0,128,8,0),COLORGREEN;



高效进攻吸筹:IF((主力活跃力度>主升浪波段)AND(主力筹码>散户筹码)AND(主力赢利25持仓<70)AND(主力最大盈利<70)AND(主力能量监控>50),-15,0),COLOR0089FF,NODRAW;

DRAWBAND(0,RGB(255,125,64),高效进攻吸筹,RGB(255,0,0));





{空头释放副图源码如下}



DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);



DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);



DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);

V11A:=((((H>L) AND (C>O)) AND (H=C)) AND (L=O));

V12A:=((V*(C-O))/(H-L));

VD1A:=IF(V11A,V12A,0);

VZ1A:=IF(V11A,0,0);

V21A:=((((H>L) AND (C>O)) AND (H=C)) AND (L<O));

V22A:=(V*(((C-O)/(H-L)) + (((2/3)*(O-L))/(H-L))));

V23A:=((((V*1)/3)*(O-L))/(H-L));

VD2A:=IF(V21A,V22A,0);

VZ2A:=IF(V21A,V23A,0);

V31A:=((((H>L) AND (C>O)) AND (H>C)) AND (L=O));

V32A:=(V*(((C-O)/(H-L)) + (((1/3)*(H-C))/(H-L))));

V33A:=((((V*2)/3)*(H-C))/(H-L));

VD3A:=IF(V31A,V32A,0);

VZ3A:=IF(V31A,V33A,0);

V41A:=((((H>L) AND (C>O)) AND (H>C)) AND (L<O));

V42A:=(V*((((C-O)/(H-L)) + (((1/3)*(H-C))/(H-L))) + (((2/3)*(O-L))/(H-L))));

V43A:=(V*((((2/3)*(H-C))/(H-L)) + (((1/3)*(O-L))/(H-L))));

VD4A:=IF(V41A,V42A,0);

VZ4A:=IF(V41A,V43A,0);

V51A:=((((H>L) AND (C<O)) AND (H=O)) AND (L=C));

V52A:=((V*(O-C))/(H-L));

VD5A:=IF(V51A,0,0);

VZ5A:=IF(V51A,V52A,0);

V61A:=((((H>L) AND (C<O)) AND (H=O)) AND (L<C));

V62A:=((((V*(C-L))/(H-L))*2)/3);

V63A:=(V*(((O-C)/(H-L)) + (((1/3)*(C-L))/(H-L))));

VD6A:=IF(V61A,V62A,0);

VZ6A:=IF(V61A,V63A,0);

V71A:=((((H>L) AND (C<O)) AND (H>O)) AND (L=C));

V72A:=((((V*1)/3)*(H-O))/(H-L));

V73A:=(V*(((O-C)/(H-L)) + (((2/3)*(H-O))/(H-L))));

VD7A:=IF(V71A,V72A,0);

VZ7:=IF(V71A,V73A,0);

V81A:=((((H>L) AND (C<O)) AND (H>O)) AND (L<C));

V82A:=(V*((((1/3)*(H-O))/(H-L)) + (((2/3)*(C-L))/(H-L))));

V83A:=(V*((((O-C)/(H-L)) + (((2/3)*(H-O))/(H-L))) + (((1/3)*(C-L))/(H-L))));

VD8A:=IF(V81A,V82A,0);

VZ8A:=IF(V81A,V83A,0);

V91A:=((((H>L) AND (C=O)) AND (H=C)) AND (L<C));

V92A:=((V*2)/3);

V93A:=((V*1)/3);

VD9A:=IF(V91A,V92A,0);

VZ9A:=IF(V91A,V93A,0);

V101A:=((((H>L) AND (C=O)) AND (H>C)) AND (L=C));

V102A:=((((V*1)/3)*(H-L))/(H-L));

V103A:=((((V*2)/3)*(H-L))/(H-L));

VD10A:=IF(V101A,V102A,0);

VZ10A:=IF(V101A,V103A,0);

V111A:=((((H>L) AND (C=O)) AND (H>C)) AND (L<C));

V112A:=(V*((((1/3)*(H-C))/(H-L)) + (((2/3)*(C-L))/(H-L))));

V113A:=(V*((((2/3)*(H-C))/(H-L)) + (((1/3)*(C-L))/(H-L))));

VD11A:=IF(V111A,V112A,0);

VZ11A:=IF(V111A,V113A,0);

V121A:=(((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)>9.75));

VD12A:=IF(V121A,V,0);

V122A:=(((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<(0-9.75)));

VZ12A:=IF(V122A,V,0);

V131A:=((((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<9.75)) AND ((((C-REF(C,1))/REF(C,1))*100)>(0-9.75)));

VD13A:=IF(V131A,(0.5*V),0);

V132A:=((((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<9.75)) AND ((((C-REF(C,1))/REF(C,1))*100)>(0-9.75)));

VZ13A:=IF(V132A,(0.5*V),0);

真神:=VD1A + VD2A + VD3A + VD4A + VD5A + VD6A + VD7A + VD8A + VD9A + VD10A + VD11A + VD12A + VD13A;

V11:=((((H>L) AND (C>O)) AND (H=C)) AND (L=O));

V12:=((V*(C-O))/(H-L));

VD1:=IF(V11,V12,0);

VZ1:=IF(V11,0,0);

V21:=((((H>L) AND (C>O)) AND (H=C)) AND (L<O));

V22:=(V*(((C-O)/(H-L)) + (((2/3)*(O-L))/(H-L))));

V23:=((((V*1)/3)*(O-L))/(H-L));

VD2:=IF(V21,V22,0);

VZ2:=IF(V21,V23,0);

V31:=((((H>L) AND (C>O)) AND (H>C)) AND (L=O));

V32:=(V*(((C-O)/(H-L)) + (((1/3)*(H-C))/(H-L))));

V33:=((((V*2)/3)*(H-C))/(H-L));

VD3:=IF(V31,V32,0);

VZ3:=IF(V31,V33,0);

V41:=((((H>L) AND (C>O)) AND (H>C)) AND (L<O));

V42:=(V*((((C-O)/(H-L)) + (((1/3)*(H-C))/(H-L))) + (((2/3)*(O-L))/(H-L))));

V43:=(V*((((2/3)*(H-C))/(H-L)) + (((1/3)*(O-L))/(H-L))));

VD4:=IF(V41,V42,0);

VZ4:=IF(V41,V43,0);

V51:=((((H>L) AND (C<O)) AND (H=O)) AND (L=C));

V52:=((V*(O-C))/(H-L));

VD5:=IF(V51,0,0);

VZ5:=IF(V51,V52,0);

V61:=((((H>L) AND (C<O)) AND (H=O)) AND (L<C));

V62:=((((V*(C-L))/(H-L))*2)/3);

V63:=(V*(((O-C)/(H-L)) + (((1/3)*(C-L))/(H-L))));

VD6:=IF(V61,V62,0);

VZ6:=IF(V61,V63,0);

V71:=((((H>L) AND (C<O)) AND (H>O)) AND (L=C));

V72:=((((V*1)/3)*(H-O))/(H-L));

V73:=(V*(((O-C)/(H-L)) + (((2/3)*(H-O))/(H-L))));

VD7:=IF(V71,V72,0);

VZ7A:=IF(V71,V73,0);

V81:=((((H>L) AND (C<O)) AND (H>O)) AND (L<C));

V82:=(V*((((1/3)*(H-O))/(H-L)) + (((2/3)*(C-L))/(H-L))));

V83:=(V*((((O-C)/(H-L)) + (((2/3)*(H-O))/(H-L))) + (((1/3)*(C-L))/(H-L))));

VD8:=IF(V81,V82,0);

VZ8:=IF(V81,V83,0);

V91:=((((H>L) AND (C=O)) AND (H=C)) AND (L<C));

V92:=((V*2)/3);

V93:=((V*1)/3);

VD9:=IF(V91,V92,0);

VZ9:=IF(V91,V93,0);

V101:=((((H>L) AND (C=O)) AND (H>C)) AND (L=C));

V102:=((((V*1)/3)*(H-L))/(H-L));

V103:=((((V*2)/3)*(H-L))/(H-L));

VD10:=IF(V101,V102,0);

VZ10:=IF(V101,V103,0);

V111:=((((H>L) AND (C=O)) AND (H>C)) AND (L<C));

V112:=(V*((((1/3)*(H-C))/(H-L)) + (((2/3)*(C-L))/(H-L))));

V113:=(V*((((2/3)*(H-C))/(H-L)) + (((1/3)*(C-L))/(H-L))));

VD11:=IF(V111,V112,0);

VZ11:=IF(V111,V113,0);

V121:=(((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)>9.75));

VD12:=IF(V121,V,0);

V122:=(((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<(0-9.75)));

VZ12:=IF(V122,V,0);

V131:=((((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<9.75)) AND ((((C-REF(C,1))/REF(C,1))*100)>(0-9.75)));

VD13:=IF(V131,(0.5*V),0);

V132:=((((((H=L) AND (C=O)) AND (H=C)) AND (L=C)) AND ((((C-REF(C,1))/REF(C,1))*100)<9.75)) AND ((((C-REF(C,1))/REF(C,1))*100)>(0-9.75)));

VZ13:=IF(V132,(0.5*V),0);

魔鬼:=VZ1 + VZ2 + VZ3 + VZ4 + VZ5 + VZ6 + VZ7 + VZ8 + VZ9 + VZ10 + VZ11 + VZ12 + VZ13;

量比A:(V/MA(V,5)),LINETHICK0,COLORYELLOW;

V10:=真神;

V20:=魔鬼;

JX1:=BARSSINCE(V10);

JY1:=IF(((121>JX1) AND (JX1>0)),JX1,120);

JY2:=IF(((4>JX1) AND (JX1>0)),JX1,3);

V30:=MA(V,JY2);

动神:V10,COLORF00FF0;

鬼力:V20,COLORBBBBBB;

神比:=(动神/V30);

鬼比:=(鬼力/V30); V2:=(H-L);

V3:=ABS((O-C));

V4:=(H-IF((C>O),C,O));

V5:=(IF((C>O),O,C)-L);

V6:=((V3/V2)*V);

V7:=((V4/V2)*V);

V8:=((V5/V2)*V);

V9:=IF(((V/CAPITAL)>0.001),1,EXP(ABS(LOG(((V/CAPITAL)*100)))));

VA:=(((C-MA(C,5))/MA(C,5))*100);

VB:=(((MA(C,5)>MA(C,10)) AND (MA(C,10)>MA(C,30))) AND (MA(C,30)>MA(C,60)));

VC:=((MA(C,5)<MA(C,10)) AND (MA(C,10)<MA(C,30)));

V40:=((IF((((V6 >= V7) AND (V6 >= V8)) AND (C>O)),V6,动神) + 动神)/2);

V41B:=((IF(((V7>V6) AND (V7>V8)),V7,动神) + 动神)/2);

V42B:=((IF(((V8>V6) AND (V8>V7)),V8,动神) + 动神)/2);

V50:=((IF((((V6 >= V7) AND (V6 >= V8)) AND (C<O)),V6,鬼力) + 鬼力)/2);

STICKLINE((鬼力>0),鬼力,0,3,0),COLORFF3399;

多头:STICKLINE((C>MA(C,30)),0,V,3,1),COLORRED;

空头:STICKLINE((C<MA(C,30)),0,V,3,0),COLORGREEN;

STICKLINE((鬼力>0),鬼力,0,3,0),COLORFF3399;

上攻量:STICKLINE((((V6 >= V7) AND (V6 >= V8)) AND (C>O)),0,V6,3,0),COLOR66FFFF;

下攻量:STICKLINE((((V6 >= V7) AND (V6 >= V8)) AND (C<O)),0,V6,3,0),COLOR6633FF;

上探量:STICKLINE(((V7>V6) AND (V7>V8)),0,V7,3,0),COLORCCCC66;

下探量:STICKLINE(((V8>V6) AND (V8>V7)),0,V8,3,0),COLORFF6633;

相对地量:STICKLINE(((V9>2) AND (V<(MA(V,5)/2))),0,V,3,0),COLOR9966CC;

地量:DRAWTEXT(((V9>2) AND (V<(MA(V,5)/2))),V,'地量'),COLORF00FF0;

放量:STICKLINE((V>(MA(V,5)*2.5)),0,V,3,0),COLORFFFFFF;

STICKLINE((动神>0),动神,0,1.5,0),COLORF00FF0;

逢高出货:DRAWTEXT(((((((((V7>V6) AND (VA>2)) AND (V9>V8)) AND (C>MA(C,5))) AND (C>MA(C,30))) AND (H>MA(C,60))) AND (V>MA(V,5))) AND (V7 >= MA(V,5))),V,'逢高出货'),COLORF00FF0;

逢低跟进:DRAWTEXT(((((((V8>V6) AND (V8>V7)) AND (VA<(0-2))) AND (C<MA(C,30))) AND (V8<(MA(V,5)/2))) AND (MA(V,5)<MA(V,10))),V,'低进'),COLORFF00FF;

强势参与:DRAWTEXT((((((V6>(MA(V,5)*2)) AND (V6 >= V7)) AND (V6 >= V8)) AND (C>O)) OR ((V>(MA(V,5)*3)) AND VB)),V,'强势参与'),COLORCC99CC;

空头释放:DRAWTEXT(((((((V6 >= V7) AND (V6 >= V8)) AND (C<O)) AND ((V6/V)>0.7)) AND VC) AND (V6>MA(V,5))),(V6*2),'空头释放'),COLORF00FF0;




{底部轨迹副图源码如下}



DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);



DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);



DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);

LC:=REF(CLOSE,1);

RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);

TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);

HD:=(HIGH - REF(HIGH,1));

LD:=(REF(LOW,1) - LOW);

DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);

DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);

PDI:=((DMP * 100) / TR1);

MDI:=((DMM * 100) / TR1);

ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);

AV:=(RSI5 + ADX);

WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));

NEWVOL:=(RSI5 - WR10);

XA_1:=(AV + NEWVOL);

XA_2:=IF(CROSS(XA_1,0),1,0);

VAR1:=SMA(XA_2,3,1);

VAR2:=SMA(VAR1,3,1);

VAR3:=SMA(VAR2,3,1);

VAR4:=3;

VAR5:=(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));

底部启动:=CROSS(VAR5,VAR4);

放牛:=CROSS(VAR2,VAR3) AND (VAR2<40);

RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 50);

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=3*K-2*D;

XA_20:=CROSS(J,3);

底部轨迹:XA_20 AND 放牛 AND 底部启动;







{底部轨迹选股源码如下}




LC:=REF(CLOSE,1);

RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);

TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);

HD:=(HIGH - REF(HIGH,1));

LD:=(REF(LOW,1) - LOW);

DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);

DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);

PDI:=((DMP * 100) / TR1);

MDI:=((DMM * 100) / TR1);

ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);

AV:=(RSI5 + ADX);

WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));

NEWVOL:=(RSI5 - WR10);

XA_1:=(AV + NEWVOL);

XA_2:=IF(CROSS(XA_1,0),1,0);

VAR1:=SMA(XA_2,3,1);

VAR2:=SMA(VAR1,3,1);

VAR3:=SMA(VAR2,3,1);

VAR4:=3;

VAR5:=(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));

底部启动:=CROSS(VAR5,VAR4);

放牛:=CROSS(VAR2,VAR3) AND (VAR2<40);

RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 50);

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=3*K-2*D;

XA_20:=CROSS(J,3);

底部轨迹:XA_20 AND 放牛 AND 底部启动;



未来函数检测结果如下:
该公式包含未来函数:WINNER
该公式包含未来函数:CAPITAL
该公式包含未来函数:FINANCE
解密、编写股票、期货策略请联系QQ或微信同号:88652583
相关股票指标公式

联系我们  |  指标公式网  |  指标网   |  指标公式  |   加入收藏   |  设为主页

@2005-2023 浙ICP备2024071487号-2 指标公式网别名指标网仅为互联网文章,所有指标公式及文章仅供学习研究,并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。指标公式网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
QQ:88652583 微信 88652583
sitemap站点地图