利用磐矜老师的指标，同辉煌之星源码提供者重新组合，得到垃圾辉煌之星，不对请指正。高手们不要吐血啊。
{三套数据选择}
INPUT: P1(60,0,100),P2(5,0,100),P3(10,0,100),N1(5,0,100),N2(10,0,100),N3(3,0,100);
REFLINE:0;
zbddx:="DDx.DDx";
TODAY:=zbDDx>ref(zbDDx,1) or zbDDx<ref(zbDDx,1);
TODAY1:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT;
TODAY2:=zbDDx=0;{判断是否有正版数据}
TDM1:=SELFDATA('特大买入');
TDC1:=SELFDATA('特大卖出');
DDM1:=SELFDATA('大单买入');
DDC1:=SELFDATA('大单卖出');
pjddx:=(TDM1+DDM1- (TDC1+DDC1)) * VOL/CAPITAL * 100;
yxzb:=IF(TODAY,zbddx,pjddx);
特买:=IF(TODAY2,"DDEDATA@BIGORDER"(1,3),bigorder(1,3));
特卖:=IF(TODAY2,"DDEDATA@BIGORDER"(2,3),bigorder(2,3));
大买:=IF(TODAY2,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)));
大卖:=IF(TODAY2,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)));
中买:=IF(TODAY2,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)));
中卖:=IF(TODAY2,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)));
TDM2:=特买;
TDC2:=特卖;
DDM2:=大买;
DDC2:=大卖;
VAR0:=MIN((COUNT(if(DDM1=0,ORDER(2),DDM1),0)),P1);
lxddx:=(TDM2+DDM2- (TDC2+DDC2)) * VOL/CAPITAL * 100;
DDX:=IF(TODAY1,if(lxDDX=0,pjddx,lxDDX),yxzb);
每日DDx:=ddx;
短期:MA(每日DDx,N1),coloryellow;
中期:MA(每日DDx,N2),coloryellow;
五日涨幅:=(c-REF(c,N1))/REF(c,N1)*100;
买点:CROSS(短期,中期) AND 短期>REF(短期,1) AND count(每日DDx>0,10)>1 AND REF(五日涨幅,1)< 5 AND REF(LAST(中期 > 短期),1) >N3,linethick0;
FILLRGN(短期,中期,短期>中期,RGB(255,0,0),短期<中期,RGB(0,0,255));
DRAWICON(买点,中期,6),ALIGN1;
0,DOTLINE,coloryellow;
 {点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
