Var1:=AMOUNT/VOL/100; Var2:=REF(ASKPRICE(1),1); Var3:=REF(BIDPRICE(1),1); Var4:=(Var2-Var3)*0.35; Var5:=IF(Var1>=Var2-Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,BUYVOL,0)); Var6:=IF(Var1<=Var3+Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,SELLVOL,0)); 买一:=if(BARSTATUS=1 and DYNAINFO(4)>=DYNAINFO(3),vol,if(c=DYNAINFO(55),0,if(c=DYNAINFO(54),vol,var5))); 卖一:=if(BARSTATUS=1 and DYNAINFO(4)<DYNAINFO(3),vol,if(c=DYNAINFO(54),0,if(c=DYNAINFO(55),vol,var6))); 主动买单:=if(买一>0 and AMOUNT>=500000 ,买一,0); 主动卖单:=if(卖一>0 and AMOUNT>=500000 ,卖一,0); 主动买单一:=if(买一>0 and AMOUNT<200000 ,买一,0); 主动卖单一:=if(卖一>0 and AMOUNT<200000 ,卖一,0); 大买量:sum(主动买单,0); 大卖量:sum(主动卖单,0); 小买量:sum(主动买单一,0); 小卖量:sum(主动卖单一,0); 总量:大买量+大卖量+小买量+小卖量,linethick0; 买卖差:大买量-大卖量; 买差比:(买卖差/总量)*100; 实际流通盘:SELFDATA(实际流通盘); 买差比二:买卖差/capital*100; 主动买单二:=if(买一>0 and AMOUNT>=500000 ,买一,0); 主动卖单二:=if(卖一>0 and AMOUNT>=500000 ,卖一,0); 五十万买卖差:主动买单二-主动卖单二; 五十万净量:sum(五十万买卖差,0); 总量一:sum(vol,0); 大资金比:五十万净量/总量一*100; 五十万增仓率:买卖差/capital*100; {9点30分} ZL9D:=REF(五十万增仓率,BARSLAST(TIME>=091500 AND TIME<=093000)); 集合竞价增仓:REF(五十万增仓率,BARSLAST(TIME<=093300)),linethick0; 集合竞价增仓1:REF(五十万增仓率,BARSLAST(TIME>091500 AND TIME<=093100))>0.28,linethick0; 集合竞价增仓2:REF(五十万增仓率,BARSLAST(TIME>091500 AND TIME<=103100)),linethick0; 集合竞价增仓4:REF(五十万增仓率,BARSLAST(TIME>091500 AND TIME<=093100)),linethick0; {10点}{www.tzj123.com} ZL10D:REF(五十万增仓率,BARSLAST(TIME<=100000)); {10点半} ZL10DB:=REF(五十万增仓率,BARSLAST(TIME>100000 AND TIME<=103000)); {11点} ZL11D:=REF(五十万增仓率,BARSLAST(TIME>103000 AND TIME<=110000)); {11点半} ZL11DB:=REF(五十万增仓率,BARSLAST(TIME>110000 AND TIME<=113000)); {13点半} ZL13DB:=REF(五十万增仓率,BARSLAST(TIME>130000 AND TIME<=133000)); {14点} ZL14D:=REF(五十万增仓率,BARSLAST(TIME>133000 AND TIME<=140000)); {14点半} ZL14DB:=REF(五十万增仓率,BARSLAST(TIME>140000 AND TIME<=143000)); {15点} ZL15D:=REF(五十万增仓率,BARSLAST(TIME>143000 AND TIME<=150000)); 尾盘增仓:REF(五十万增仓率,BARSLAST(TIME>143000 AND TIME<=150000));
|