飞狐起源法则主图指标公式

input: n(2,1,500);
mah:=hhv(h,n);
mal:=llv(l,n);
a:=ref(hhv(ma(c,5),10),barslast(count(backset(islastbar,hhvbars(hhv(ma(c,5),10),10)+1),10)=1));
b:=refx(ma(c,30),ref(hhv(ma(c,5),10),barslast(count(backset(islastbar,hhvbars(hhv(ma(c,5),10),10)+1),10)=1)));
dd:=ma(c,5);
cd:=ma(c,10);
dc:=ma(c,30);
stickline(cd>dc,a,b,300,0),colore6e6e6;
drawtext(filter(cd>dc,300),b+20,'银灰色背景为"调整区"'),color808080;
drawtext(filter(cd>dc,200),a-10,'调整区'),color808080;
bh1:=barslast(mah>ref(mah,1));
le:=barslast(mal<ref(mal,1));
bhh:=barslast(mah>ref(mah,1));
bll:=barslast(mal<ref(mal,1));
buu:=barslast(mah>ref(mah,1));
see:=barslast(mal<ref(mal,1));
partline(bh1<le,mal),Linethick2,colorbb0066;
partline(bh1>le,mah),Linethick2,color1b8800;
drawline(bh1<le,ref(mal,1),bh1>le,ref(mal,1),0),pointdot,shift5,color85dd;
drawline(bh1<le,ref(mal,1),bh1>le,ref(mal,1),0),pointdot,shift10,color85dd;
drawline(bh1<le,ref(mal,1),bh1>le,ref(mal,1),0),pointdot,shift20,color85dd;
drawline(bh1<le,ref(mal,1),bh1>le,ref(mal,1),0),pointdot,shift30,color85dd;
drawline(bh1<le,ref(mal,1),bh1>le,ref(mal,1),0),pointdot,shift40,color85dd;
drawline(bh1<le,ref(mal,1),bh1>le,ref(mal,1),0),pointdot,shift50,color85dd;
drawline(bh1>le,ref(mah,1),bh1<le,ref(mah,1),0),pointdot,shift5,colorff9900;
drawline(bh1>le,ref(mah,1),bh1<le,ref(mah,1),0),pointdot,shift10,colorff9900;
drawline(bh1>le,ref(mah,1),bh1<le,ref(mah,1),0),pointdot,shift20,colorff9900;
drawline(bh1>le,ref(mah,1),bh1<le,ref(mah,1),0),pointdot,shift30,colorff9900;
drawline(bh1>le,ref(mah,1),bh1<le,ref(mah,1),0),pointdot,shift40,colorff9900;
drawline(bh1>le,ref(mah,1),bh1<le,ref(mah,1),0),pointdot,shift50,colorff9900;
stickline(bh1<le,c,o,9,0),colorff;
stickline(bh1<le,h,l,0,0),colorff;
stickline(bh1>le,c,o,9,0),colorff0000;
stickline(bh1>le,h,l,0,0),colorff0000;
drawtext(filter(buu<ref(buu,1),90),l-5,'加♂多'),colorff00ff;
drawtext(filter(bh1>le and buu>see,365),mah,'加♀空'),colorff00;