金戈铁马主图指标 (源码)

2011-08-25 09:04:00来源:本站整理浏览:153

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(5,5,'股票软件下载网 www.gpxiazai.com'),linethick1,COLOR00EEff;
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;