主力持仓（飞狐公式）
主力持仓（飞狐公式）
C/C++ www.zegu.cn 择股网提供 Code复制内容到剪贴板
- JJ:=(HIGH+LOW+CLOSE)/3;
- QJ0:=VOL/(IF(HIGH=LOW,4,HIGH-LOW));
- QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*(IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW)));
- QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*(IF(HIGH=LOW,1,JJ-MIN(CLOSE,OPEN))));
- QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*(IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE))));
- QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*(IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-JJ)));
- DRAWTEXTEX(CLOSE,1,0,0,'主力持仓'),colorFFFF;
- SVZL:SUM((QJ1+QJ2-(QJ3+QJ4))/SUM(VOL,24),0);
- CZ:=SVZL-REF(SVZL,1);
- STICKLINE(CZ<0,SVZL+CZ,SVZL,3,0),colorFFFF00;
- STICKLINE(CZ>0,SVZL,SVZL+CZ,3,0),colorFF;
- DRAWTEXT(BARPOS=SYSPARAM(1) AND CZ[SYSPARAM(1)]<0,SVZL+0.1,'主力净卖出占月仓位'+NUMTOSTR(CZ[SYSPARAM(1)]*100,2)+'%'),colorEE00;
- DRAWTEXT(BARPOS=SYSPARAM(1) AND CZ[SYSPARAM(1)]>0,SVZL+0.2,'主力净买入占月仓位'+NUMTOSTR(CZ[SYSPARAM(1)]*100,2)+'%'),colorFF;
