带黄金分割的麒麟指标

源码
N：1 30 13

VAR0:=(CLOSE*2+HIGH+LOW)/4*VOL;
VAR1:=SUM(VAR0,89)/SUM(VOL,89);
搏杀生命线:IF(CLOSE>=VAR1,VAR1*1.001,VAR1*0.999),COLORFF80FF,LINETHICK1;
FL:MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1)),COLORF4E202;
FS:MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1),COLORF4E202,LINETHICK1;
CG:IF(MA(CLOSE,17)<FS,FS,MA(CLOSE,17)),COLORF4E202,LINETHICK1;
持股线:IF(CG=FS,CG,DRAWNULL),COLORYELLOW,LINETHICK1;
日最大涨幅:100*(H-REF(CLOSE,1))/REF(CLOSE,1),NODRAW,COLORYELLOW;
日涨幅:100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1),NODRAW,COLORWHITE;
日最大跌幅:100*(L-REF(CLOSE,1))/REF(CLOSE,1),NODRAW,COLORYELLOW;
实体幅:ABS(100*(CLOSE-OPEN)/OPEN),NODRAW,COLORRED;
上影幅:IF(CLOSE>OPEN,100*(H-C)/C,100*(H-O)/O),NODRAW,COLORYELLOW;
下影幅:IF(CLOSE>OPEN,100*(O-L)/L,100*(C-L)/L),NODRAW,COLORWHITE;
N1:=10;
A:=HHV(HIGH,N1)=HIGH AND HIGH>REF(HIGH,1);A1:=FILTER(A,N1-1);
B:=LLV(LOW,N1)=LOW AND LOW<REF(LOW,1);B1:=FILTER(B,N1-1);
TS1:=BARSLAST(A1);
阻力位:REF(HIGH,TS1),COLORFFFFFF,LINETHICK0;
STICKLINE(1,阻力位,阻力位,1,0),COLORFFFFFF;
TS11:=BARSLAST(B1);
支撑位:REF(LOW,TS11),COLORFF8080, LINETHICK0;
STICKLINE(1,支撑位,支撑位,1,0),COLORFF8080;
HH:=HHV(HIGH,N);
LL:=LLV(LOW,N);
HH1:=BARSLAST((HH > REF(HH,1)));
LL1:=BARSLAST((LL < REF(LL,1)));
STICKLINE((HH1 < LL1),CLOSE,OPEN,1,0),COLOR0000FF;
STICKLINE((HH1 > LL1),CLOSE,OPEN,1,0),COLORFF0000;
NN:=120;
高11:=REFDATE(HHV(H,NN),DATE);
低11:=REFDATE(LLV(L,NN),DATE);
H11:=低11+(高11-低11)*0.191;
H12:=低11+(高11-低11)*0.382;
H13:=低11+(高11-低11)*0.5;
H14:=低11+(高11-低11)*0.618;
H15:=低11+(高11-低11)*0.809;
DRAWTEXT(CURRBARSCOUNT=1,高11,'高'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H11,'0.809'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H12,'0.618'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H13,'0.5'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H14,'0.382'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H15,'0.191'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,低11,'低'),COLORGREEN;
STICKLINE(CURRBARSCOUNT=13,高11,高11,100,-2),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H11,H11,100,-1),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H12,H12,100,-1),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H13,H13,100,-1),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H14,H14,100,-1),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H15,H15,100,-1),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,低11,低11,100,-1),COLORGREEN,LINETHICK2;
DRAWTEXT_FIX(1,0.75,0,0,'所属板块:'),COLORLIGRAY;
DRAWTEXT_FIX(1,0.802,0,0,HYBLOCK),COLORRED;
DRAWTEXT_FIX(1,0.85,0,0,DYBLOCK),COLORRED;
DRAWTEXT_FIX(1,0.75,0.10,0,'涨停价:'),COLORLIGRAY;
DRAWNUMBER_FIX(1,0.79,0.10,0,CONST(REF(C,1)+(REF(C,1))/10)),COLORRED;
DRAWNUMBER(ISLASTBAR=1,CLOSE,CLOSE),COLORFFFFFF;