大智慧BS主图公式

a:="LTFunc4@FORLT2";
s1:="LTFunc4@LT_S1";
hs:="LTFunc4@LT_HS";
ls:="LTFunc4@LT_LS";
p1:="LTFunc4@LT_P1";
upp:="LTFunc4@LT_UPP";
udd:="LTFunc4@LT_UDD";
{hs;ls;hhs;lls;us;ds;s1;p1;p0;upp;udd};
TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT AND TIME0<55800;
AODAY:=bigorder(1,1)=0 and bigorder(2,1)=0;
VAR0:=MIN(COUNT(ORDER(2),0),P1);
ZDDR:=selfdata('大单买入');
ZDDC:=selfdata('大单卖出');
ZDTR:=selfdata('特大买入');
ZDTC:=selfdata('特大卖出');
SSTR:=IF(AODAY,"DDE@BIGORDER"(1,3),bigorder(1,3));
SSTC:=IF(AODAY,"DDE@BIGORDER"(2,3),bigorder(2,3));
SSDR:=IF(AODAY,("DDE@BIGORDER"(1,2)-"DDE@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)));
SSDC:=IF(AODAY,("DDE@BIGORDER"(2,2)-"DDE@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)));
SZDR:=IF(AODAY,ZDDR,(bigorder(1,2)-bigorder(1,3)));
SZDC:=IF(AODAY,ZDDC,(bigorder(2,2)-bigorder(2,3)));
SZTR:=IF(AODAY,ZDTR,bigorder(1,3));
SZTC:=IF(AODAY,ZDTC,bigorder(2,3));
DDLR:=IF(TODAY,IF(SSDR=0,SZDR,SSDR),SZDR);
DDLC:=IF(TODAY,IF(SSDC=0,SZDC,SSDC),SZDC);
TDLR:=IF(TODAY,IF(SSTR=0,SZTR,SSTR),SZTR);
TDLC:=IF(TODAY,IF(SSTC=0,SZTC,SSTC),SZTC);
ZLLR:=TDLR+DDLR;
ZLLC:=TDLC+DDLC;
ZLJL:=(ZLLR-ZLLC);
DDX:=ZLJL*vol/capital*100;
d1:=ema(abs(DDX),60);
d2:=max(DDX/d1+7.5,7.5);
d3:=min(DDX/d1,10);
fb:=if(s1=0,hs,ls);
tr0:=ifs(p1=1,'明日收盘价<'+numtostrn(udd,2)+',出现S点\n','若明日收盘价>'+numtostrn(upp,2)+',出现B点\n');
tr1:=ifs(s1=1,'明日收盘价<'+numtostrn(ls,2)+',短线卖出机会','若明日收盘价>'+numtostrn(hs,2)+'短线买入机会');