通达信操盘马力主图指标(源码)

仓位马力:IFF(控盘 AND 配置仓位<=50,50,配置仓位),NODRAW,COLOR1658AA;
黄新:=黄 OR (控盘==0 AND 红) OR (控盘 AND 蓝) OR (控盘==0 AND 仓位马力>=60);
蓝新:=蓝 OR (控盘==0 AND 黄);
红新:=红;
修一天:=COUNT(红新,2)==1 AND COUNT(黄新,2)==1;
修二天:=COUNT(红新,3)==1 AND COUNT(黄新,3)==2;
修三天:=COUNT(红新,4)==1 AND COUNT(黄新,4)==3;
修四天:=COUNT(红新,5 )==1 AND COUNT(黄新,5 )==4;
修五天:=COUNT(红新,6 )==1 AND COUNT(黄新,6 )==5;
修六天:=COUNT(红新,7 )==1 AND COUNT(黄新,7 )==6;
修七天:=COUNT(红新,8 )==1 AND COUNT(黄新,8 )==7;
修八天:=COUNT(红新,9 )==1 AND COUNT(黄新,9 )==8;
修九天:=COUNT(红新,10)==1 AND COUNT(黄新,10)==9;
修十天:=COUNT(红新,11)==1 AND COUNT(黄新,11)==10;
修十一天:=COUNT(红新,12)==1 AND COUNT(黄新,12)==11;
红色修正:=修一天 OR 修二天 OR 修三天 OR 修四天 OR 修五天 OR 修六天 OR
修七天 OR 修八天 OR 修九天 OR 修十天 OR 修十一天;
XYELLOW:= (控盘 AND 蓝) OR (控盘 AND 黄) OR (控盘==0 AND 红) OR (控盘==0 AND 仓位马力>=60);
XRED:= (控盘 AND 红) OR 红色修正;
XBLUE:= (控盘==0 AND 蓝) OR (控盘==0 AND 黄);
黄柱:IF((XRED==0) AND XYELLOW,1,DRAWNULL),COLOR0088FF,NODRAW;{ISCOLORYELLOW}
红柱:IF(XRED,1,DRAWNULL),COLOR1816FF,NODRAW;{ISCOLORRED}
蓝柱:IF(XBLUE AND (XYELLOW)==0,1,DRAWNULL),COLORFF8800,NODRAW;{ISCOLORBLUE}
MA5:=MA(CLOSE,5),COLORFFEFDF;
EMA21:EMA(C,21),COLORFF16FF,LINETHICK2;
EMA55:EMA(C,55),COLOR16AA18,LINETHICK2;
EMA89:EMA(C,89),COLOR5856EE,LINETHICK2;
IF(BBI线>REF(BBI线,1),BBI线,DRAWNULL),COLOR18AAFF;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26),COLORAAA818;
DEA:=EMA(DIFF,9),COLORAAFF56,LINETHICK2;
MACD :=2*(DIFF-DEA),COLORAA5678;
牛回头:=CROSS(DEA,DIFF) AND DIFF>0 AND EMA55>REF(EMA55,2) AND MA(VOL,5)<REF(MA(VOL,5),5);
DRAWTEXT(FILTERX(牛回头,BCTC),MIN(EMA55,LOW*0.99),"牛回"),COLOR5816FF;
{箱体顶底}
HLN:=55;
顶线:HHV(MA((HIGH),6),HLN),DOTLINE,COLOR987868;
底线:LLV(MA((LOW),5),HLN),DOTLINE,COLOR688899;
操作:=MA(MID,5);
拉升:HHV(操作,13),DOTLINE,COLORFF18AA;
买卖:LLV(操作,13),DOTLINE,COLORCDFFFF;
STICKLINE((控盘==0 AND 仓位马力>=60),C,O,1.5,0),COLOR0088FF;
STICKLINE(红色修正,C,O,1.5,0),COLOR0000AA;
STICKLINE(控盘 AND 蓝,C,O,1.3,0),COLORFF5816;
STICKLINE(控盘 AND 红,C,O,1.3,0),COLOR0000FF;
STICKLINE(控盘 AND 黄,C,O,1.3,0),COLOR0088FF;
STICKLINE(控盘==0 AND 蓝,C,O,1.5,0),COLORFF8816;
STICKLINE(控盘==0 AND 红,C,O,1.3,0),COLOR0088FF;
STICKLINE(控盘==0 AND 黄,C,O,1.3,0),COLOR00FFFF;
CPM1:=MA(CLOSE,1);
CPM2:=(LOW+HIGH+CLOSE)/3;
CPM3:= MA(CPM2,5);
CPM4:= HHV(CPM3,10);
CPZ:=HHV((CPM1<CPM4),10) OR HHV((CPM1<CPM4),10);
RSI34S:=EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,35)-LLV(LOW,34)),3);
DRAWTEXT(FILTER(CROSS(RSI34S ,60),20),MIN(L*0.97,EMA55),"▲"),COLORYELLOW;
DRAWTEXT(FILTERX(爆发临界,BCTC),MIN(底DWN,EMA55),"界"),COLOR16FF58;
{量支撑}
MV135:=MA(VOL,135);
TJ1:=VOL=HHV(VOL,10) AND VOL>1.7*REF(VOL,1) AND C>=REF(C,1) AND C>=O AND VOL<=MV135*3.5;
STICKLINE(FILTER(TJ1,3),OPEN,CLOSE,1,0),COLORF05FF0;
DRAWTEXT(FILTERX(FILTER(TJ1,3),BCTC),MIN(L*0.965,EMA89),"量撑"),COLORAA16AA;
DRAWTEXT(FILTERX(CROSS(MA(CLOSE,10),MA5),BCTC),LOW*0.95,"坑?"),COLOR18FFAA;
BIAS5:=(CLOSE-MA5)/MA5*100;
DRAWTEXT(FILTERX(CROSS(-7.1,BIAS5),BCTC),MIN(LOW*0.97,EMA89),"鼠"),COLOR18FFAA;
{KDJ短抄底,信号出现等待股价放量上穿EMA14或至前低企稳，如果短抄底信号出现后向下调整，3天不回补，止损}
RSV8:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
操盘K:=SMA(RSV8,2,1);
{V5:=SMA(操盘K,2,1);}
短抄底信号:=操盘K>REF(操盘K,1) AND REF(操盘K,1)<REF(操盘K,2) AND 操盘K<23;
DRAWTEXT(FILTERX(短抄底信号,BCTC),MIN(LOW*0.975,EMA89),"待抄短"),COLOR16DFEF;
{抓主升浪，急涨7-12天卖出，五日内突破创新高就是买入机会}
涨空间L:=(HHV(H,89)-LLV(L,89))*100/LLV(L,89)>35 AND HIGH>REF(HIGH,5) AND HIGH>REF(HHV(H,83),5);
多头排列:=MA(CLOSE,10)>=MA(CLOSE,20) AND MA(CLOSE,20)>REF(MA(CLOSE,20),5){AND CLOSE>MA(CLOSE,10)};
HSL:=VOL/CAPITAL*100;{换手}
低换手30:=LLV(HSL,30)=HSL;
ZF:=(H-L)/REF(C,1)*100;
小振幅:=LLV(ZF,10)=ZF OR ZF<3.5;
主升起爆点:IF(涨空间L AND 多头排列 AND (低换手30 OR 小振幅),EMA21,DRAWNULL),COLORCFFFCF,LINETHICK3;
DRAWTEXT(FILTER(主升起爆点,3),EMA89*0.997,"爆"),COLORCFFFCF;
{强势逃顶卖出}
强势股:=H/REF(L,1)>1.15 OR H/REF(L,2)>1.18;
回调:=L/REF(H,1)<0.97 AND C<REF(C,1);
强势逃顶:=REF(强势股,1) AND 回调;
DRAWTEXT(FILTERX(强势逃顶,BCTC),H*1.039,"调"),COLORAFAF6F;
顶HH:=REF(HHV(H,HLN),0);
底LL:=REF(LLV(L,HLN),0);
F80:=顶HH-(顶HH-底LL)*0.191,COLORFFA816,DOTLINE,NODRAW;
F61:=顶HH-(顶HH-底LL)*0.382,COLORGREEN,DOTLINE,NODRAW;
F中50:=顶HH-(顶HH-底LL)*0.5,COLOR3366AA,DOTLINE,NODRAW;
F38:=顶HH-(顶HH-底LL)*0.618,COLOR18FFFF,DOTLINE,NODRAW;
F19:=顶HH-(顶HH-底LL)*0.809,COLORAA18AA,DOTLINE,NODRAW;

上一页  [1] [2] [3]  下一页