量价主图 + 均价变化 + MACD趋势 （一组公式）

好股网(www.goodgupiao.com)提示：您正在下载的是：量价主图 + 均价变化 + MACD趋势 （一组公式）

{价量主图--理想“君俊”}
DRAWLINE(l=sysparam(5),l,barpos=SYSPARAM(3)-1,l,1),Color006A6A,linethick2,ColorFF15A6;
DRAWLINE(h=sysparam(4),h,barpos=SYSPARAM(3)-1,h,1),Color65636A,linethick2,ColorFF15A6;

x:ma(c,5);
n1:=sysparam(3);
n:=n1-sysparam(2)+1;
hh:=hhv(x,n);
ll:=llv(x,n);
tsh:=hhvbars(x,n);
tsl:=llvbars(x,n);
最高:hh[n1],POINTDOT;
最低:ll[n1],POINTDOT;
drawicon(barpos=n1-tsh[n1],l,5);
drawicon(barpos=n1-tsl[n1],l,4);

dx:=ma(indexc,5);//大盘的--代码再重复一遍
dn1:=sysparam(3);
dn:=dn1-sysparam(2)+1;
dhh:=hhv(dx,dn);
dll:=llv(dx,dn);
dtsh:=hhvbars(dx,dn);
dtsl:=llvbars(dx,dn);
d最高:=dhh[dn1];
d最低:=dll[dn1];
drawicon(barpos=dn1-dtsh[dn1],l,11);
drawicon(barpos=dn1-dtsl[dn1],l,10);

dzf: d最高/d最低*sgn(dtsl[dn1]-dtsh[dn1]),linethick0,colorred;//大盘涨幅
gzf: (最高/最低)*sgn(tsl[n1]-tsh[n1]),linethick0,colorred;//个股涨幅
indexc/d最低,linethick0,colorgreen;
c/最低,linethick0,colorgreen;

a:=(hhv(h,3)+llv(l,2))/2;
b:=ema((ema(a,3)+a)/2,2);
z:=if(a>b,a,b);
z0:=ema(z,2);
z1:if(z>z0,z,z0),linethick2;
f:=abs(z1-ref(z1,1));

stickline(c=o and c>ref(c,1),c,o,8,0),Color0000FF;
stickline(c=o and c<ref(c,1),c,o,8,0),ColorA6FF00;
stickline(c=o and c>ref(c,1),h,l,0,0),Color0000FF;
stickline(c=o and c<=ref(c,1),h,l,0,0),ColorA6FF00;
stickline(c=o and c<=ref(c,1),c,o,8,0),ColorA6FF00;
stickline(c>o,h,l,0,0),Color0000FF;
stickline(c<o,h,l,0,0),ColorA6FF00;
stickline(c>o,c,o,8,0),Color0000c8;
stickline(c>o,c,o,6,0),Color0000d4;
stickline(c>o,c,o,4,0),Color0000ef;
stickline(c>o,c,o,2,0),Color0000fd;
stickline(c>o,c,o,1,0),Color0000FF;
stickline(c<o,c,o,8,0),ColorA6cc00;
stickline(c<o,c,o,6,0),ColorabFf0c;
stickline(c<o,c,o,4,0),Colorbbef15;
stickline(c<o,c,o,2,0),Colorcff32e;
stickline(c<o,c,o,1,0),ColorA6FF00;

a:=SYSPARAM(4)-sysparam(5);//画面高低差幅
ab:=sysparam(4)+a/3;

P1:=0;
P2:=VOL;
N1:=SYSPARAM(2);
N2:=SYSPARAM(3);
FOR I=N1 TO N2 DO
BEGIN
IF P1<P2[I] THEN
P1:= P2[I];
END;
b:=p1;//最大量
d:=b/a*2;//倍数系数
e:=sysparam(5)-a/2;//最低位置
vx:=v/d+e;
stickline((c>o or c>ref(c,1)),e,vx,6,0),Color0090FF;
stickline(c<o or c<=ref(c,1),e,vx,6,0),COLORCYAN;

STICKLINE(C>=REF(C,1),e,vx,8,0),Color0000B7;
STICKLINE(C>=REF(C,1),e,vx,7,0),Color0000D5;
STICKLINE(C>=REF(C,1),e,vx,6,0),Color0000EC;
STICKLINE(C>=REF(C,1),e,vx,5,0),Color0000FF;
STICKLINE(C>=REF(C,1),e,vx,4,0),Color2F2FFF;
STICKLINE(C>=REF(C,1),e,vx,3,0),Color4444FF;
STICKLINE(C>=REF(C,1),e,vx,2,0),Color5B5BFF;
STICKLINE(C>=REF(C,1),e,vx,1,0),Color7575FF;
{STICKLINE(C>=REF(C,1),e,vx,0.8,0),ColorAAAAFF;
STICKLINE(C>=REF(C,1),e,vx,0.2,0),ColorCACAFF;}

STICKLINE(C<REF(C,1),e,vx,8,0),Color262626;
STICKLINE(C<REF(C,1),e,vx,7,0),Color262626;
STICKLINE(C<REF(C,1),e,vx,6,0),Color333333;
STICKLINE(C<REF(C,1),e,vx,5,0),Color3A3A3A;
STICKLINE(C<REF(C,1),e,vx,4,0),Color4C4C4C;
STICKLINE(C<REF(C,1),e,vx,3,0),Color717171;
STICKLINE(C<REF(C,1),e,vx,2,0),Color8F8F8F;
STICKLINE(C<REF(C,1),e,vx,1,0),ColorB0B0B0;
{STICKLINE(C<REF(C,1),e,vx,0.8,0),ColorC5C5C5;
STICKLINE(C<REF(C,1),e,vx,0.2,0),ColorE7E7E7;}
jl:fft(ma(vx,3),20)COLORMAGENTA,coloryellow,linethick2;
cl:=ema(forcast(vx,5),55),linethick2;
partline(cl>ref(cl,1),cl),Color8450EE,linethick2;
partline(cl<ref(cl,1),cl),Color008244,linethick2;
PARTLINE(jl<ref(jl,1),jl),colorblue,linethick2;

DRAWTEXT(SYSPARAM(2)=BARSCOUNT(C),sysparam(4),'[版块]:'+BLKNAME),Color00A600;

wtm:=(cross(ma(c,5),ref(ma(c,5),1)) or ma(c,5)>ref(ma(c,5),1)) and c/ma(c,5)>1.028;
stickline(wtm,ma(c,5)*1.03,ma(c,5)*1.03,10,0);

ema(x+abs(ema(z1-x,2))*2,2),linethick2;

DRAWLINE(v=b,vx,barpos=SYSPARAM(3)-1,vx,1),ColorFF15A6,linethick2;

 

 

好股网(www.goodgupiao.com)提醒您：股市有风险，投资需谨慎。