四均线主图:
操盘线:=EMA(((2*C+H+L)/4),5);
PARTLINE(操盘线>REF(操盘线,1),操盘线),Color0000FF,LINETHICK2;//操盘线大于上周期操盘线时,画成黄s;
PARTLINE(操盘线<REF(操盘线,1),操盘线),COLORGREEN,LINETHICK2;//操盘线大于上周期操盘线时,画成绿色;
MA24:MA(C,24);
MA72:MA(C,72);
MA200:MA(C,200);
DRAWICON(CROSS(5,72),L,1);
箱顶:MA(REF(HHV(C,89),1),2),Color80FFFF,LINETHICK2;
箱底:MA(REF(LLV(C,30),1),2),COLOR00FF00,LINETHICK2;
{K线}
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff7700;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORff9900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffbb00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffcc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffdd00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORffee00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORffFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000ff;
{买卖点}
B:=ZIG(3,10);
G:=MA(B,2);
DRAWTEXT(CROSS(G,B),H*1.05,'卖' ),COLOR00FF00;
DRAWTEXT(CROSS(B,G),L*0.95,'★'),COLORRED;
{B点买入}
VAR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.998),8);
DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.984),'B '),Color00FFFF;
{盘面提示}
DRAWTEXTEX(C,0,20,20,'当前盘面提示:'),Color4080FF,LINETHICK1;
DRAWTEXTEX(C,0,115,20,STKLABEL+' '+STKNAME),LINETHICK1,Color0000FF;
流通盘:=FINANCE(7)/1000000*100;
DRAWTEXTEX(C,0,245,20,'流通盘大小:'+NUMTOSTR(流通盘,2)+'亿'),LINETHICK1,ColorFF00FF;
换手:=VOL/CAPITAL*100;
当日换手率:=sum(换手,1);
DRAWTEXTEX(C,0,20,40,'当日换手率: '+NUMTOSTR(当日换手率,2)+'%'),Color00FFFF,LINETHICK1;
五日换手率:=sum(换手,5);
DRAWTEXTEX(C,0,155,40,'5日换手率: '+NUMTOSTR(五日换手率,2)+'%'),Color00FFFF,LINETHICK1;
十日换手率:=SUM(VOL,10)*100/CAPITAL;
DRAWTEXTEX(C,0,275,40,'10日换手率: '+NUMTOSTR(十日换手率,2)+'%'),Color00FFFF,LINETHICK1;
DRAWTEXTEX(C,0,20,2,'■所属板块:'+BLKNAME),Color00FF00;
DRAWTEXTEX(C,0,20,2,'■所属板块:'+BLKNAME),Color00FF00;
DRAWTEXTEX(C,1,550,920,'成交金額:'+NUMTOSTR(DYNAINFO(10)/10000,3)+'万'),colorred;
当日成交总量:=DYNAINFO(8);
成交总金額:=DYNAINFO(10)/10000;
主动卖盘:=DYNAINFO(22);
主动买盘:=DYNAINFO(23);
DRAWTEXTEX(c,1,20,155,'日成交总量:'+NUMTOSTR(当日成交总量,0)+'手'),colorFF00FF;
DRAWTEXTEX(c,1,20,210,'日主动买入量:'+NUMTOSTR(主动买盘,0)+'手'),Color0000FF;
DRAWTEXTEX(c,1,20,260,'日主动卖出量:'+NUMTOSTR(主动卖盘,0)+'手'),Color00FFFF;
DRAWTEXTEX(c,1,20,305,'日净:'+NUMTOSTR(主动买盘-主动卖盘,0)+'手'),ColorFFFF00;
买:=DYNAINFO(23)*c/100;
卖:=DYNAINFO(22)*c/100;
总:=买+卖;
净:=买-卖;
实际差:=总-成交总金額;
DRAWTEXTEX(c,1,200,155,'买:'+NUMTOSTR(买,3)+'万'),Color0000FF;
DRAWTEXTEX(c,1,200,210,'卖:'+NUMTOSTR(卖,3)+'万'),Color00FFFF;
DRAWTEXTEX(c,1,200,260,'总:'+NUMTOSTR(总,3)+'万'),colorFF00FF;
DRAWTEXTEX(c,1,200,305,'净:'+NUMTOSTR(净,3)+'万'),ColorFFFF00;
DRAWTEXTEX(c,1,750,920,'实际差:'+NUMTOSTR(实际差,3)+'万'),ColorFFFF00;
股道卖出价预测:=(CLOSE*2.5/100+CLOSE);
股道买入价预测:=CLOSE-CLOSE*2.5/100;
EXPLAIN(CLOSE>0,'筹码解盘:') colorwhite;
EXPLAINEX(COST(50),'市场平均成本:',COST(50),2,0),COLORYELLOW;
EXPLAINEX(COST(4),'主力平均成本:',COST(4),2,0),COLORRED;
EXPLAINEX(COST(30),'控盘平均成本:',COST(30),2,0),COLORRED;
EXPLAINEX(COST(75),'拉升平均成本:',COST(75),2,0),COLORYELLOW;
EXPLAINEX(COST(95),'顶部平均成本:',COST(95),2,0),COLORYELLOW;
EXPLAINEX(COST(0.05),'底部平均成本:',COST(0.05),2,0),COLORYELLOW;
EXPLAINEX(股道卖出价预测,'股道卖出价预测:',股道卖出价预测,2,0),COLOR0099FF;
EXPLAINEX(股道买入价预测,'股道买入价预测:',股道买入价预测,2,0),COLOR0099FF;
EXPLAINEX(1,'获利盘比例=',WINNER(CLOSE)*100,2,0),COLORRED;
EXPLAINEX(1,'套牢盘比例=',100-WINNER(CLOSE)*100,2,1),COLORCYAN;
{解盘模块}
Explain(ref(open,1)<>ref(close,1) and REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1) > REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02 AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2),'\n* 黄昏之星 -空方势盛 反转信号 跳空成弃婴'),colorwhite;
Explainicon(ref(open,1)<>ref(close,1) and REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1) > REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02 AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2),'30'),align0;
Explain(ref(open,1)<>ref(close,1) and REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1) < REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2),'\n* 晨星 -多方势盛 变盘信号'),colorwhite;
Explainicon(ref(open,1)<>ref(close,1) and REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1) < REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2),'13'),align0;
Explain(MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5),'\n* 倒转槌头 -高位抛压 低位多空争执'),colorwhite;
Explainicon(MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5),'19'),align0;
Explain(HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5),'\n* 槌头 -下影线有多头意义 在下降趋势之后看涨 注意反弹卖压'),colorwhite;
Explainicon(HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5),'\n* 31'),align0;
Explain(HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE > MA(CLOSE,5),'\n* 吊颈线 -高档看跌'),colorwhite;
Explainicon(HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE > MA(CLOSE,5),'12'),align0;
Explain(REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03 AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1),'\n* 曙光 -与乌云盖顶相反 行情将演化为V型反转或止跌横盘趋势'),colorwhite;
Explainicon(REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03 AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1),'曙光'),align0;
Explain((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96 AND CLOSE<REF(OPEN,1) AND OPEN>REF(CLOSE,1)) OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04 AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1)),'\n* 穿头破脚 -若第一根K为阴(阳) 表强劲上涨(下跌)力量'),colorwhite;
Explainicon((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96 AND CLOSE<REF(OPEN,1) AND OPEN>REF(CLOSE,1)) OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04 AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1)),'18'),align0;
Explain(ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04 AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN) > MIN(REF(CLOSE,1),REF(OPEN,1)),'\n* 身怀六甲 -阴(阳)怀阳( |