飞狐公式,其他软件不适合,周期为分钟周期:=DATATYPE; 可见中量:=(HHV(V,SYSPARAM(3)-SYSPARAM(2)+1)+LLV(V,SYSPARAM(3)-SYSPARAM(2)+1))*4/5; V,VOLSTICK; IF 周期>3 THEN BEGIN DRAWTEXT((SYSPARAM(3)-SYSPARAM(2))/2+SYSPARAM(2)=BARPOS,可见中量[DATACOUNT],'30分钟以上周期不用统计');EXIT;END; 开盘:BARSLAST(DATE<>REF(DATE,1))+1,LINETHICK; SUMV:SUM(V,开盘),LINETHICK; VERTLINE(开盘-1=0);IF 周期=1 THEN BEGIN 成交统计1:DRAWNUMBER(开盘=100 AND DATE<>CURRENTDATE,可见中量[DATACOUNT],REFX(SUMV,140),2); 当日1:DRAWNUMBER(开盘=100 AND DATE=CURRENTDATE ,可见中量[DATACOUNT],SUMV[DATACOUNT],2);END;IF 周期=2 THEN BEGIN 成交统计5:DRAWNUMBER(开盘=20 AND DATE<>CURRENTDATE,可见中量[DATACOUNT],REFX(SUMV,28),2); 当日5:DRAWNUMBER(开盘=20 AND DATE=CURRENTDATE ,可见中量[DATACOUNT],SUMV[DATACOUNT],2);END;IF 周期=3 THEN BEGIN 成交统计15:DRAWNUMBER(开盘=7 AND DATE<>CURRENTDATE,可见中量[DATACOUNT],REFX(SUMV,9),2); 当日15:DRAWNUMBER(开盘=7 AND DATE=CURRENTDATE ,可见中量[DATACOUNT],SUMV[DATACOUNT],2);END;
 |