均线角度布林幅度量尺 （主图指标 源码）

看到大部分朋友都使用“通达信”软件，把自用的飞狐上的指标挪到“通达信”上仅供朋友参考。指标没有好坏，理解的就是最好的。这组是由“均线 布林线 均线角度 某一区间的低点到当前的幅度 高点到当前的幅度“可知道调整的幅度”。如了解“均线 布林线 均线角度 幅度 K线分价位”的功能用法。可组合研判参考。
{均线角度布林幅度量尺}
{N:1 50 3 ZZ:3 20 5 高B: 0 256 0 J:0 3 0 BLL:0 26 0 N1:0 256 0 N2:0 256 0 N3:0 256 0 }
PFX:= (HIGH + LOW +2* C)/4;
均线:EMA(PFX,N),LINETHICK1,COLOR209FFF;
角度:ATAN((均线/REF(均线,1)-1)*100)*180/3.1416,NODRAW;
TT3:=(CURRBARSCOUNT=6+1) AND 高B>0;
TT1:=(CURRBARSCOUNT=2+1);
BG:=REF(H,高B);
BH := HHV(BG,1);
BHG:=CONST(BH );
高价_:DRAWLINE(TT3, BHG, TT1, BHG, 1),COLOR67A2FA;
DRAWTEXT(ISLASTBAR AND 高B>0,高价_,'高点'),COLOR67A2FA;
FUG:=高价_-C;
高当前幅度:FUG/高价_*100,NODRAW,COLOR67A2FA;
最低:=TROUGHBARS(L,ZZ,1);{调整之字幅度找到低位起点}
低价:=REF(L,BARSLAST(最低=0));
低价_:DRAWLINE(最低=0 AND J=3,L,ISLASTBAR,低价,0),COLORFFFF00;
FU:=C-低价_;
到当前幅度:FU/低价_*100,NODRAW,COLOR00FFFF;
DRAWTEXT(ISLASTBAR AND J=3, C, '← -到当前幅度％'),COLOR00EFFF;
DRAWTEXT(ISLASTBAR AND J=3,低价_,'低点'),COLORFFFF00;
_5%:DRAWLINE(最低=0 AND J=3,L*1.05,ISLASTBAR,低价*1.05,0),COLOR999999;
_8%:DRAWLINE(最低=0 AND J=3,L*1.08,ISLASTBAR,低价*1.08,0),COLOR999999;
_13%:DRAWLINE(最低=0 AND J=3,L*1.13,ISLASTBAR,低价*1.13,0),COLOR999999;
_18%:DRAWLINE(最低=0 AND J=3,L*1.18,ISLASTBAR,低价*1.18,0),COLOR999999;
_25%:DRAWLINE(最低=0 AND J=3,L*1.25,ISLASTBAR,低价*1.25,0),COLOR999999;
DRAWTEXT(ISLASTBAR AND J=3,_5%,'5％'),COLOR208FFF;
DRAWTEXT(ISLASTBAR AND J=3,_8%,'8％'),COLOR208FFF;
DRAWTEXT(ISLASTBAR AND J=3,_13%,'13％'),COLOR208FFF;
DRAWTEXT(ISLASTBAR AND J=3,_18%,'18％'),COLOR208FFF;
DRAWTEXT(ISLASTBAR AND J=3,_25%,'25％'),COLOR208FFF;
AS:=(O+H+L+C)/4;
BL:EMA(AS,17),LINETHICK2,COLOR0000FF;
DRAWICON(CROSS(均线,BL),BL,23);
IF(BL>REF(BL,1),BL,DRAWNULL),LINETHICK2,COLORYELLOW;
IF(BL<REF(BL,1),BL,DRAWNULL),LINETHICK2,COLOR00FF00;
DRAWTEXT(ISLASTBAR AND BL>REF(BL,1),BL,' ↑E17'),COLOR00FFFF;
DRAWTEXT(ISLASTBAR AND BL<REF(BL,1),BL,' ↓E17'),COLOR00FF00;
BLS: BL+2.58*STDP(C,BLL),LINETHICK1,COLOR00FFFF;
BL2: BL+1.96*STDP(C,BLL),LINETHICK1,COLORFF00FF;
BL3: BL-1.96*STDP(C,BLL),LINETHICK1,COLORF0FF00;
BLX: BL-2.58*STDP(C,BLL),LINETHICK1,COLOR00FF00;
FUZ:=L+((H-L)/2);FUS:=O+((C-O)/2); FUSY:=C+((O-C)/2);SSFU:=(FUZ+IF(C>O,FUS,FUSY))/2;
FUZ1:=L+((H-L)*0.333);FUS1:=O+((C-O)*0.333);FUS1Y:=C+((O-C)*0.333);SSFU1:=(FUZ1+IF(C>O,FUS1,FUS1Y))/2;
FUZ2:=L+((H-L)*0.667);FUS2:=O+((C-O)*0.677);FUS2Y:=C+((O-C)*0.667);SSFU2:=(FUZ2+IF(C>O,FUS2,FUS2Y))/2;
STICKLINE(C=C AND J=1,SSFU2,SSFU2,1.5,0),COLOR208FFF,LINETHICK1;
STICKLINE(C=C AND J=1,SSFU1,SSFU1,1.5,0),COLOR208FFF,LINETHICK1;
STICKLINE(C=C AND J=1,SSFU,SSFU,2.6,0),COLOR00FFFF,LINETHICK1;
STICKLINE(C=C AND J=1,IF(C>O,H-((H-C)/2),H-((H-O)/2)),IF(C>O,H-((H-C)/2),H-((H-O)/2)),0.5,0),COLOR00FFFF,LINETHICK1;
STICKLINE(C=C AND J=1,IF(C<O,L+((C-L)/2),L+((O-L)/2)),IF(C<O,L+((C-L)/2),L+((O-L)/2)),0.5,0),COLOR00FFFF,LINETHICK1;
BGD:=C=HHV(C,6),LINETHICK0;
BDD:=C=LLV(C,6),LINETHICK0;
N10:=BARSLAST(BGD);
N20:=BARSLAST(BDD);
高S:=IF(N10,REF(C,N10),REF(C,N10))*1.005,POINTDOT,COLOR00FF00;
低S:=IF(N20,REF(C,N20),REF(C,N20))*0.995,POINTDOT,COLORFF00FF;
STICKLINE(C>0 AND J=2,高S,高S,1,0),COLOR00FF00;
STICKLINE(C>0 AND J=2,低S,低S,1,0),COLORFF00FF;
MAA:MA(C,N1),COLORFFFFFF;
MAB:MA(C,N2),COLOR00FFFF;
MAE:MA(C,N3),COLORFFFF00;
DRAWTEXT(ISLASTBAR AND N1>0 AND MAA>REF(MAA,1),MAA,'↑'),COLORFFFFFF;
DRAWTEXT(ISLASTBAR AND N1>0 AND MAA<REF(MAA,1),MAA,'↓'),COLORFFFFFF;
DRAWTEXT(ISLASTBAR AND N2>0 AND MAB>REF(MAB,1),MAB,' ↑'),COLOR00FFFF;
DRAWTEXT(ISLASTBAR AND N2>0 AND MAB<REF(MAB,1),MAB,' ↓'),COLOR00FFFF;
DRAWTEXT(ISLASTBAR AND N3>0 AND MAE>REF(MAE,1),MAE,' ↑'),COLORFFFF00;
DRAWTEXT(ISLASTBAR AND N3>0 AND MAE<REF(MAE,1),MAE,' ↓'),COLORFFFF00;
低量价:IF(BARSLAST(CONST(LLV(V,30))=V)=0,L,REF(L,BARSLAST(CONST(LLV(V,30))=V))),COLOR00FF00;
N1:=35;
地量:=LLVBARS(V,N1);
地量低价:REF(L,地量),NODRAW;
DRAWTEXT(ISLASTBAR,地量低价,'35日地量低价'),COLORFFFF00;
划线A:IF(CURRBARSCOUNT<=CONST(地量+1),CONST(地量低价),DRAWNULL),LINETHICK1,COLOR999999;

{请设置计算参数:
N: PARAM#0 (1.00--50.00)显示任意角度;
ZZ: PARAM#1 (3.00--20.00)调整任意低点;
高B:PARAM#2 (0.00--256.00)取任意高点;
J: PARAM#3 (0.00--3.00)显示分价线;
BLL:PARAM#4 (0.00--26.00)显示布林线;
N1: PARAM#5 (0.00--256.00)显示均价线;
N2: PARAM#6 (0.00--256.00)显示均价线;
N3: PARAM#7 (0.00--256.00)显示均价线;};