收集:中国股票市场经济分析网
{ 成交统计 }
Var1:=IF(BUYVOL<=REF(ASKVOL(1),1) AND CLOSE=REF(ASKPRICE(1),1),BUYVOL,0);
Var2:=IF(BUYVOL<=REF(ASKVOL(1),1)+REF(ASKVOL(2),1) AND CLOSE=REF(ASKPRICE(2),1),BUYVOL,0);
Var3:=IF(BUYVOL<=REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1) AND CLOSE=REF(ASKPRICE(3),1),BUYVOL,0);
Var4:=IF(CLOSE0 AND REF(ASKVOL(1),1)>0,BUYVOL,0);
Var5:=IF(BUYVOL>REF(ASKVOL(1),1) AND CLOSE>REF(ASKPRICE(1),1) AND CLOSEVar6:=IF(BUYVOL>REF(ASKVOL(1),1)+REF(ASKVOL(2),1) AND CLOSE>REF(ASKPRICE(2),1) AND CLOSEVar7:=IF(SELLVOL<=REF(BIDVOL(1),1) AND CLOSE=REF(BIDPRICE(1),1),SELLVOL,0);
Var8:=IF(SELLVOL<=REF(BIDVOL(1),1)+REF(BIDVOL(2),1) AND CLOSE=REF(BIDPRICE(2),1),SELLVOL,0);
Var9:=IF(SELLVOL<=REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1) AND CLOSE=REF(BIDPRICE(3),1),SELLVOL,0);
VarA:=IF(CLOSE>REF(BIDPRICE(1),1) AND REF(ASKVOL(1),1)>0 AND REF(BIDVOL(1),1)>0,SELLVOL,0);
VarB:=IF(SELLVOL>REF(BIDVOL(1),1) AND CLOSEREF(BIDPRICE(2),1),SELLVOL,0);
VarC:=IF(SELLVOL>REF(BIDVOL(1),1)+REF(BIDVOL(2),1) AND CLOSEREF(BIDPRICE(3),1),SELLVOL,0);
VarD:=IF(REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1)=0 AND REF(BIDVOL(1),1)>0,BUYVOL,0);
VarE:=IF(REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1)=0 AND REF(ASKVOL(1),1)>0,SELLVOL,0);
主动买: SUM(Var1+Var2+Var3,0), , COLORRED;
对敲买: SUM(Var4+Var5+Var6,0), , COLORMAGENTA;
主动卖: SUM(Var7+Var8+Var9,0), ,COLORGREEN;
对敲卖: SUM(VarA+VarB+VarC,0), ,COLORCYAN;
涨跌停: SUM(VarD+VarE,0), , COLORWHITE;
{ 成交分析 }
Var1:=IF(BUYVOL<=REF(ASKVOL(1),1) AND CLOSE=REF(ASKPRICE(1),1),BUYVOL,0);
Var2:=IF(BUYVOL<=REF(ASKVOL(1),1)+REF(ASKVOL(2),1) AND CLOSE=REF(ASKPRICE(2),1),BUYVOL,0);
Var3:=IF(BUYVOL<=REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1) AND CLOSE=REF(ASKPRICE(3),1),BUYVOL,0);
Var4:=IF(CLOSE0 AND REF(ASKVOL(1),1)>0,BUYVOL,0);
Var5:=IF(BUYVOL>REF(ASKVOL(1),1) AND CLOSE>REF(ASKPRICE(1),1) AND CLOSEVar6:=IF(BUYVOL>REF(ASKVOL(1),1)+REF(ASKVOL(2),1) AND CLOSE>REF(ASKPRICE(2),1) AND CLOSEVar7:=IF(SELLVOL<=REF(BIDVOL(1),1) AND CLOSE=REF(BIDPRICE(1),1),SELLVOL,0);
Var8:=IF(SELLVOL<=REF(BIDVOL(1),1)+REF(BIDVOL(2),1) AND CLOSE=REF(BIDPRICE(2),1),SELLVOL,0);
Var9:=IF(SELLVOL<=REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1) AND CLOSE=REF(BIDPRICE(3),1),SELLVOL,0);
VarA:=IF(CLOSE>REF(BIDPRICE(1),1) AND REF(ASKVOL(1),1)>0 AND REF(BIDVOL(1),1)>0,SELLVOL,0);
VarB:=IF(SELLVOL>REF(BIDVOL(1),1) AND CLOSEREF(BIDPRICE(2),1),SELLVOL,0);
VarC:=IF(SELLVOL>REF(BIDVOL(1),1)+REF(BIDVOL(2),1) AND CLOSEREF(BIDPRICE(3),1),SELLVOL,0);
VarD:=IF(REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1)=0 AND REF(BIDVOL(1),1)>0,BUYVOL,0);
VarE:=IF(REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1)=0 AND REF(ASKVOL(1),1)>0,SELLVOL,0);
VarF:=IF(ASKVOL(1)SELLVOL,REF(ASKVOL(1),1)-ASKVOL(1),0);
Var10:=IF(ASKVOL(3)Var11:=IF(REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1)=0 AND REF(ASKVOL(1),1)>0 AND REF(ASKVOL(1),1)-ASKVOL(1)Var12:=IF(ASKVOL(2)Var13:=IF(ASKVOL(3)Var14:=IF(BIDVOL(1)REF(BIDPRICE(1),1) AND REF(BIDVOL(1),1)-BIDVOL(1)<>BUYVOL,REF(BIDVOL(1),1)-BIDVOL(1),0);
Var15:=IF(BIDVOL(3)REF(BIDPRICE(3),1),REF(BIDVOL(3),1)-BIDVOL(3),0);
Var16:=IF(REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1)=0 AND REF(BIDVOL(1),1)>0 AND REF(BIDVOL(1),1)-BIDVOL(1)Var17:=IF(BIDVOL(2)REF(BIDPRICE(3),1),REF(BIDVOL(3),1)-BIDVOL(2),0);
Var18:=IF(BIDVOL(3)REF(BIDPRICE(2),1),REF(BIDVOL(2),1)-BIDVOL(3),0);
Var19:=IF(BUYVOL<=REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1) AND CLOSE>=REF(ASKPRICE(3),1),BUYVOL,0);
Var1A:=IF(SELLVOL<=REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1) AND CLOSE<=REF(BIDPRICE(3),1),SELLVOL,0);
买入: Var1+Var2+Var3, , COLORRED;
对敲买: Var4+Var5+Var6, , COLORMAGENTA;
卖出: Var7+Var8+Var9, , COLORGREEN;
对敲卖: VarA+VarB+VarC, , COLORCYAN;
撤卖: IF(VarF+Var10+Var11+Var12+Var13>BUYVOL,VarF+Var10+Var11+Var12+Var13-BUYVOL,0), , COLORYELLOW;
撤买: IF(Var14+Var15+Var16+Var17+Var18>SELLVOL,Var14+Var15+Var16+Var17+Var18-SELLVOL,0), , COLORWHITE;
涨跌停: VarD+VarE, , ;
DRAWTEXT(Var19>100 AND Var19<500,BUYVOL+50,’扫盘’), , COLORYELLOW;
DRAWTEXT(Var19>=500,BUYVOL-100,’扫盘’), , COLORYELLOW;
DRAWTEXT(Var1A>100 AND Var1A<500,SELLVOL+50,’扫盘’), , COLORWHITE;
DRAWTEXT(Var1A>=500,SELLVOL-100,’扫盘’), , COLORWHITE;