瘦石分时量能飞狐版

引用：SS分时量能
瘦石:=IF(C>REF(C,1),VOL,0);
x:=(REF(HHV(瘦石,OPENMINUTES(TIME)),239)),LINETHICK1,COLORMAGENTA;
y:=(REF(HHV(瘦石,OPENMINUTES(TIME)),0)),COLORYELLOW,LineThick0;
昨拉升最高值:x[DATACOUNT];
今拉升最高值:y[DATACOUNT];
攻击力度:今拉升最高值/昨拉升最高值,LineThick0;
STICKLINE(C>REF(C,1),0,V,0,0),COLOR0000FF;
STICKLINE(C<REF(C,1),0,V,0,0),COLOR00FF00;
STICKLINE(C=REF(C,1),0,V,0,0),COLORFFFFFF;
飞狐瘦石头量能：
if datatype>=0 then exit;
////////****** 计算指标变换所需的公共数据 *******
rc:=DYNAINFO(3);//前收
q:=datacount;
hh:=DYNAINFO(5);//最高
LL:=DYNAINFO(6);//最低
f:=max(hh-rc,rc-LL);
ff:=f/rc*100;//最大半振幅
////////////////////////////////////////////////////////////////
////////******　㈠副图1叠加RSI指标线******（共3个步骤完成指标变换）
//副图1变换所需数据
q1:=rc-f*1.02;//分时副图1最高位置
q2:=rc-2*f*1.016;//分时副图1最低位置，同时也是分时副图2最高位置
{有了Q1、Q2、Q3，叠加副图指标也就容易了}
r:="SS分时量能.昨拉升最高值";
rh:=hhv(r,0);
rL:=LLv(r,0);
rb:=(q1-q2)/(rh-rL);
ry:=(q1+q2-rb*(rh+rL))/2;
r*rb[q]+ry[q],COLORRED;
画斜线(r*rb[q]+ry[q],h,0,1 ,1),COLORBLUE;