大智慧主图（金戈铁马），在出现买点处的选股_大智慧8.29策略投资破

主图源码，

{ 金戈铁马 }{主图叠加}{大智慧L2}{原公式限制：2009年 10月 19号}

MA30:MA(C,30),COLOR0000FF,LINETHICK1;

a1:=BIGORDER(1) - BIGORDER(2);

a2:=(BIGORDER(1,3)) - (BIGORDER(2,3));

a3:=((DYNAINFO(104) - DYNAINFO(105)) / VOL) * 100;

a4:=WINNER(CLOSE) * 100;

a5:=DYNAINFO(102) - DYNAINFO(103);

a6:=DYNAINFO(101);

D:SUM(((EMA(((HIGH + LOW) / 2),1)) / 3),3),linethick1,colorYellow;

E:EMA(D,3),linethick1,colorWhite;

F:EMA(E,3),linethick1,colorMagenta;

DRAWGBK((((D > E) AND (E > F)) AND (LOW > F)),STRIP(RGB(200,100,150),RGB(5,2,5),0));

DRAWICON(((CROSS(D,E)) = 1),(D * 0.99),7),ALIGN1;

DRAWTEXT(((CROSS(D,E)) = 1),(D * 0.96),'买点'),ALIGN1,colorRed;

DRAWFLAGTEXT((CLOSE > 0),CLOSE,'…… '+STKNAME+' ('+STKLABEL+')'+' …… 价:'+NUMTOSTRN(CLOSE,3)),colorYellow;

DRAWFLAGTEXT((((DYNAINFO(104) - DYNAINFO(105)) > 0) AND (BARSTATUS = 2)),LOW,'机构净吃:'+NUMTOSTRN(a5,0)+'笔 '+'净吃量:'+NUMTOSTRN((DYNAINFO(104) - DYNAINFO(105)),0)+'手'+' 增仓'+NUMTOSTRN(((a3 * VOL) / CAPITAL),2)+'%'),colorRed;

DRAWFLAGTEXT((((DYNAINFO(104) - DYNAINFO(105)) < 0) AND (BARSTATUS = 2)),LOW,'机构净吐:'+NUMTOSTRN(a5,0)+'笔 '+'净吐量:'+NUMTOSTRN((DYNAINFO(104) - DYNAINFO(105)),0)+'手'+' 减仓'+NUMTOSTRN(((a3 * VOL) / CAPITAL),2)+'%'),colorGreen;

DRAWFLAGTEXT(((a6 > 0) AND (BARSTATUS = 2)),LOW,'机构净挂:'+NUMTOSTRN(a6,0)+'单, '+'买 单:'+NUMTOSTRN(DYNAINFO(99),0)+'单,'+' 卖单'+NUMTOSTRN(DYNAINFO(100),0)+' 单'),colorRed;

DRAWFLAGTEXT(((a6 < 0) AND (BARSTATUS = 2)),LOW,'机构净挂:'+NUMTOSTRN(a6,0)+'单, '+'买 单:'+NUMTOSTRN(DYNAINFO(99),0)+'单,'+' 卖单'+NUMTOSTRN(DYNAINFO(100),0)+' 单'),colorGreen;

DRAWFLAGTEXT((a1 >= 0),CLOSE,'主力净买：'+NUMTOSTRN((a1 * 100),2)+'% 增仓:'+NUMTOSTRN((((a1 * VOL) / CAPITAL) * 100),2)),colorRed;

DRAWFLAGTEXT((a1 < 0),CLOSE,'主力净卖：'+NUMTOSTRN((a1 * 100),2)+'% 减仓:'+NUMTOSTRN((((a1 * VOL) / CAPITAL) * 100),2)),colorGreen;

DRAWFLAGTEXT((a4 <= 15),CLOSE,'获 利 盘：'+NUMTOSTRN(a4,2)+'%'+' 价值区'),colorRed;

DRAWFLAGTEXT(((a4 > 15) AND (a4 < 50)),CLOSE,'获 利 盘：'+NUMTOSTRN(a4,2)+'%'+' 安全区');

DRAWFLAGTEXT((a4 >= 50),CLOSE,'获 利 盘：'+NUMTOSTRN(a4,2)+'%'+' 危险区'),colorYellow;

a7:=SUM((((a1 * VOL) / CAPITAL) * 100),5);

DRAWFLAGTEXT(((((a1 * VOL) / CAPITAL) * 100) < -0.7),CLOSE,'操盘建议： 主力出逃 赶快清仓'),colorGreen;

DRAWFLAGTEXT((((((a1 * VOL) / CAPITAL) * 100) > -0.7) AND ((((a1 * VOL) / CAPITAL) * 100) < -0.3)),CLOSE,'操盘建议： 主力出货 适当减仓'),Color62EC9F;

DRAWFLAGTEXT((((((a1 * VOL) / CAPITAL) * 100) > -0.3) AND ((((a1 * VOL) / CAPITAL) * 100) < 0.3)),CLOSE,'操盘建议： 远离观望 等待转机'),ColorF6B590;

DRAWFLAGTEXT((((((a1 * VOL) / CAPITAL) * 100) > 0.3) AND ((((a1 * VOL) / CAPITAL) * 100) < 0.7)),CLOSE,'操盘建议： 持股待涨 适当补仓'),Color9F00EA;

DRAWFLAGTEXT((((((a1 * VOL) / CAPITAL) * 100) > 0.7) AND (a7 > 0)),CLOSE,'操盘建议： 主力强劲 买入补仓'),Color0080FF;

a8:=FINANCE2(35);

a9:=FINANCE2(37);

a10:=FINANCE2(3);

a11:=DYNAINFO(39);

a12:=FINANCE2(11);

a13:=FINANCE2(10);

a14:=PFFIN(1609,0);

a15:=FINANCE2(5);

DRAWTEXT((FILTER(((((a1 * VOL) / CAPITAL) * 100) < -0.7),5)),CLOSE,'逃'),linethick3,ALIGN1,colorGreen;

DRAWICON((FILTER(((((a1 * VOL) / CAPITAL) * 100) < -0.7),5)),(CLOSE * 0.95),2),ALIGN1,colorGreen;

DRAWTEXTABS(20,62,'主营范围:'+F10TEXT((F10FIND('主营范围',1)),10)),colorYellow;

DRAWTEXTABS(20,49,'所属板块:'+BKNAME),colorRed;

DRAWTEXTABS(240,10,'净利增长:'+NUMTOSTRN(a13,0)+'%'),colorYellow;

DRAWTEXTABS(140,10,'市 盈 率:'+NUMTOSTRN(a11,2)),colorYellow;

DRAWTEXTABS(20,10,'总 股 本:'+NUMTOSTRN((a8 / 10000),2)+'亿股'),colorYellow;

DRAWTEXTABS(240,23,'主营增长:'+NUMTOSTRN(a12,0)+'%'),colorYellow;

DRAWTEXTABS(140,23,'每股收益:'+NUMTOSTRN(a10,3)),colorYellow;

DRAWTEXTABS(20,23,'流通 A股:'+NUMTOSTRN((a9 / 10000),2)+'亿股'),colorYellow;

DRAWTEXTABS(240,36,'资产收益:'+NUMTOSTRN(a15,0)+'%'),colorYellow;

DRAWTEXTABS(140,36,'每股净资:'+NUMTOSTRN(FINANCE2(4),2)),colorYellow;

DRAWTEXTABS(20,36,'获 利 盘:'+NUMTOSTRN(a4,2)+'%'),colorYellow;

DRAWRECTABS(0,0,332,70,6558740),linethick5,Color00A1FF;

IF(((LLVALL(LOW) * 1.1) < HHVALL(HIGH)),(LLVALL(LOW) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

IF((((LLVALL(LOW) * 1.1) * 1.1) < HHVALL(HIGH)),((LLVALL(LOW) * 1.1) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

IF(((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) < HHVALL(HIGH)),(((LLVALL(LOW) * 1.1) * 1.1) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

IF((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) < HHVALL(HIGH)),((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

IF(((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) < HHVALL(HIGH)),(((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

IF((((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) < HHVALL(HIGH)),((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

IF(((((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) < HHVALL(HIGH)),(((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

IF((((((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) < HHVALL(HIGH)),((((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

IF(((((((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) < HHVALL(HIGH)),(((((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

IF((((((((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) < HHVALL(HIGH)),((((((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

IF(((((((((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) < HHVALL(HIGH)),(((((((((((LLVALL(LOW) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1) * 1.1),HHVALL(HIGH)),DOTLINE,Color000046;

DRAWTEXTREL(20,910,'金戈铁马 qq00000000 群0000000 00000000'),linethick3,colorWhite;

 

 

解答如下：

D:=SUM(((EMA(((HIGH + LOW) / 2),1)) / 3),3);

E:=EMA(D,3);

XG:CROSS(D,E);