看了胡立阳的讲座片段，根据视频中涉及的引力线均线，试编辑了个主图指标指标（不知对否，献丑了），同时标识了风险区和机会区。再结合引力线的情况作出它的乖离彩柱图，同时叠加到k线图中，为了能更清楚的看到各阻力位，又同时标识了黄金分割线，运用图中的压力线乖离彩柱进行短线买卖操作感到很方便。（高手飘过）
源码：
胡立阳引力线乖离主图指标
A1:=REFDATE(REF(HHV(H,180),5),DATE);
B1:=REFDATE(REF(LLV(L,180),5),DATE);
D:=((A1)+(B1))/2;{中位线}
MA30:=MA(C,30);
MA72:=MA(C,72);
MA引力:=(MA30+MA72)/2;
风险线:MA引力*1.1,COLOR00FF00;
机会线:MA引力*0.9,COLORFF00FF;
DRAWBAND(风险线,RGB(100,100,0),MA引力,0);
DRAWBAND(MA引力,RGB(120,0,130),机会线,0);
BIASL:=(CLOSE-MA(CLOSE, MA引力))/MA(CLOSE, MA引力)*3;
DRAWBAND(BIASL+D,RGB(200,0,200),D,RGB(0,160,160));
STICKLINE(BIASL>=0,D,D*1.001,2,0),COLOR00FFFF;
引力乖离线:BIASL+D,COLOR00FFFF;
CICA:=BIASL>=0 AND C>=REF(C,1);
CICB:=BIASL>=0 AND C<REF(C,1);
CIBA:=BIASL<0 AND C>=REF(C,1);
CIBB:=BIASL<0 AND C<REF(C,1);
STICKLINE(CICA,H,L,0,0),COLOR0000FF;
STICKLINE(CICA,C,O,3.2,0),COLOR000055;
STICKLINE(CICA,C,O,2.7,0),COLOR000077;
STICKLINE(CICA,C,O,2.1,0),COLOR000099;
STICKLINE(CICA,C,O,1.5,0),COLOR0000BB;
STICKLINE(CICA,C,O,0.9,0),COLOR0000DD;
STICKLINE(CICA,C,O,0.3,0),COLOR0000FF;
STICKLINE(CICB,H,L,0,0),COLOR00FFFF;
STICKLINE(CICB,C,O,3.2,0),COLOR005555;
STICKLINE(CICB,C,O,2.7,0),COLOR007777;
STICKLINE(CICB,C,O,2.1,0),COLOR009999;
STICKLINE(CICB,C,O,1.5,0),COLOR00BBBB;
STICKLINE(CICB,C,O,0.9,0),COLOR00DDDD;
STICKLINE(CICB,C,O,0.3,0),COLOR00FFFF;
STICKLINE(CIBA,H,L,0,0),COLORFF00FF;
STICKLINE(CIBA,C,O,3.2,0),COLOR550055;
STICKLINE(CIBA,C,O,2.7,0),COLOR770077;
STICKLINE(CIBA,C,O,2.1,0),COLOR990099;
STICKLINE(CIBA,C,O,1.5,0),COLORBB00BB;
STICKLINE(CIBA,C,O,0.9,0),COLORDD00DD;
STICKLINE(CIBA,C,O,0.3,0),COLORFF00FF;
STICKLINE(CIBB,H,L,0,0),COLORFFFF00;
STICKLINE(CIBB,C,O,3.2,0),COLOR555500;
STICKLINE(CIBB,C,O,2.7,0),COLOR777700;
STICKLINE(CIBB,C,O,2.1,0),COLOR999900;
STICKLINE(CIBB,C,O,1.5,0),COLORBBBB00;
STICKLINE(CIBB,C,O,0.9,0),COLORDDDD00;
STICKLINE(CIBB,C,O,0.3,0),COLORFFFF00;
N:=100;
高:=REFDATE(HHV(H,N),DATE);
低:=REFDATE(LLV(L,N),DATE);
L1:=低+(高-低)*0.191;
L2:=低+(高-低)*0.382;
L3:=低+(高-低)*0.5;
L4:=低+(高-低)*0.618;
L5:=低+(高-低)*0.809;
DRAWTEXT(CURRBARSCOUNT=1,高*0.996,'高'),COLORGREEN;
阻力1:DRAWTEXT(CURRBARSCOUNT=1,L1*0.996,'191'),COLORFFFFFF;
阻力2:DRAWTEXT(CURRBARSCOUNT=1,L2*0.996,'382'),COLORFFFFFF;
阻力3:DRAWTEXT(CURRBARSCOUNT=1,L3*0.996,'500'),COLORFFFFFF;
阻力4:DRAWTEXT(CURRBARSCOUNT=1,L4*0.996,'618'),COLORFFFFFF;
阻力5:DRAWTEXT(CURRBARSCOUNT=1,L5*0.996,'809'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=1,低*1.004,'低'),COLORRED;
STICKLINE(CURRBARSCOUNT=13,高*1.001,高,100,0),COLOR00FFFF;
STICKLINE(CURRBARSCOUNT=13,L1,L1,100,0),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=13,L2,L2,100,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT=13,L3*1.001,L3,100,0),COLORFFFF00,LINETHICK3;
STICKLINE(CURRBARSCOUNT=13,L4,L4,100,0),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=13,L5,L5,100,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT=13,低*0.999,低,100,0),COLORRED,LINETHICK3;
引力线:MA引力,COLORCCCC00,LINETHICK2;
DRAWNUMBER(ISLASTBAR,C,C),COLOR00FFFF;{股价标识};
|
