飞狐笔力度（源码）

VAR1:="chzhshch@kxian";
VAR2:="chzhshch@bi";
A:0,colorFFFFFF;
A1:=BARSLAST(VAR2<>0);
A2:=REF(VAR2,A1);
AA1:=REF(A1+1,1);
AA2:=-REF(A2,1);
F:=(AMOUNT-REF(AMOUNT,1))/(FINANCE(7)*CLOSE);
F1:=IF(CLOSE<OPEN,-ABS(F),ABS(F));
F2:=IF(AA2>0,ABS(F1),-ABS(F1));
F3:SUM(F1,AA1),COLORSTICK;
F0:SUM(F2,AA1)/X,LINETHICK2,colorFFFF;
BV:=SUM(F0,0);
BA:=IF(MAX(BV,REF(BV,2))<REF(BV,1) OR MIN(BV,REF(BV,2))>REF(BV,1),1,0);
BC:=BARSLAST(BA)+1;
SMACD:=BV-REF(BV,BC);
VAR3:=IF(F0>0,HHV(ABS(F0),BC),LLV(F0,BC));
VAR5:=SMACD*1;
DRAWNUMBER(REF(F0,1)>0 AND F0<=0,REF(VAR3,1),REF(VAR5,1),0),colorFF00;
DRAWNUMBER(REF(F0,1)<0 AND F0>=0,REF(VAR3,1),REF(VAR5,1),0),colorFF00FF;
DRAWNUMBER(ISLASTBAR AND F0<0,REF(VAR3,1),VAR5,0),ALIGN2,colorFF00FF;
DRAWNUMBER(ISLASTBAR AND F0>0,REF(VAR3,1),VAR5,0),ALIGN2,colorFF00;
M1:=REF(F0,1);
STICKLINE(F0>0 AND F0<=M1,0,F0,3,0),LINETHICK2,colorFFFF;
STICKLINE(F0<0 AND F0>=M1,0,F0,3,0),LINETHICK2,colorFFFFFF;