查看完整版本: 那位高手能把大智慧L2的代码转换成飞狐公式

那位高手能把大智慧L2的代码转换成飞狐公式

那位高手能把大智慧L2的代码转换成飞狐公式
在此先谢谢了!
主力大单
input:n1(5);
bo:BIGORDER(1);
so:BIGORDER(2);
bo1:sum(BIGORDER(1)*vol,5)/sum(vol,5);
so1:sum(BIGORDER(2)*vol,5)/sum(vol,5);
龙虎看盘
p1:=bigorder(1,1)*vol;
mb:bigorder(1,1)*100,COLOR000080;
p2:=bigorder(1,2)*vol;
bb:bigorder(1,2)*100,COLOR0000C0;
p3:=bigorder(1,3)*vol;
sb:bigorder(1,3)*100,color0000ff;
STICKLINE(1,0,vol-p1,3,400),COLOR000040;
STICKLINE(1,vol-p1,vol-p2,3,400),COLOR000080;
STICKLINE(1,vol-p2,vol-p3,3,400),COLOR0000C0;
STICKLINE(1,vol-p3,vol,3,400),COLOR0000FF;
n1:=bigorder(2,1)*vol;
ms:bigorder(2,1)*100,COLOR008000;
n2:=bigorder(2,2)*vol;
bs:bigorder(2,2)*100,color00C000;
n3:=bigorder(2,3)*vol;
ss:bigorder(2,3)*100,color00ff00;
STICKLINE(1,0,vol-n1,3,-400),COLOR004000;
STICKLINE(1,vol-n1,vol-n2,3,-400),COLOR008000;
STICKLINE(1,vol-n2,vol-n3,3,-400),COLOR00C000;
STICKLINE(1,vol-n3,vol,3,-400),COLOR00FF00;
主力集散
input:p1(5),p2(10),p3(20),p4(60),p5(120);
sh0:(ORDER(2)-ORDER(1))/(ORDER(1)+ORDER(2));
sh1:sum(ORDER(2)-ORDER(1),p1)/sum(ORDER(1)+ORDER(2),p1);
sh2:sum(ORDER(2)-ORDER(1),p2)/sum(ORDER(1)+ORDER(2),p2);
sh3:sum(ORDER(2)-ORDER(1),p3)/sum(ORDER(1)+ORDER(2),p3);
sh4:sum(ORDER(2)-ORDER(1),p4)/sum(ORDER(1)+ORDER(2),p4);
sh5:sum(ORDER(2)-ORDER(1),p5)/sum(ORDER(1)+ORDER(2),p5);
主力大单2
input:p1(5),p2(10),p3(20),p4(60),p5(120);
DRAWTEXTABS(0,0,'主力大单');
b1:sum(BIGORDER(1)*vol,p1)/sum(vol,p1);
s1:sum(BIGORDER(2)*vol,p1)/sum(vol,p1);
b2:sum(BIGORDER(1)*vol,p2)/sum(vol,p2);
{s2:sum(BIGORDER(2)*vol,p2)/sum(vol,p2);
b3:sum(BIGORDER(1)*vol,p3)/sum(vol,p3);
s3:sum(BIGORDER(2)*vol,p3)/sum(vol,p3);};
龙虎线
DRAWTEXTABS(0,0,'龙虎线');
p1:=bigorder(1,1)*vol;
mb:bigorder(1,1)*100,COLOR000080;
p2:=bigorder(1,2)*vol;
bb:bigorder(1,2)*100,COLOR0000C0;
p3:=bigorder(1,3)*vol;
sb:bigorder(1,3)*100,color0000ff;
STICKLINE(1,0,vol-p1,3,400),COLOR000040;
STICKLINE(1,vol-p1,vol-p2,3,400),COLOR000080;
STICKLINE(1,vol-p2,vol-p3,3,400),COLOR0000C0;
STICKLINE(1,vol-p3,vol,3,400),COLOR0000FF;
n1:=bigorder(2,1)*vol;
ms:bigorder(2,1)*100,COLOR008000;
n2:=bigorder(2,2)*vol;
bs:bigorder(2,2)*100,color00C000;
n3:=bigorder(2,3)*vol;
ss:bigorder(2,3)*100,color00ff00;
STICKLINE(1,0,vol-n1,3,-400),COLOR004000;
STICKLINE(1,vol-n1,vol-n2,3,-400),COLOR008000;
STICKLINE(1,vol-n2,vol-n3,3,-400),COLOR00C000;
STICKLINE(1,vol-n3,vol,3,-400),COLOR00FF00;

用飞狐要自定义扩展数据代替BIGORDER，L2也只能在收费版本里面用．