input:k(1,1,3,1);
hh:= SYSPARAM(4);
ll:= SYSPARAM(5);
HL:=hh-ll;
wH := BARSlast(H=hh);
wL :=BARSlast(L=ll);
KK := wH-wL;
a1 :=if(kk<0,hh- HL*0.25,ll+HL*0.25);
a2 :=if(kk<0,hh- HL*0.75,ll+HL*0.75);

input:w(2,1,3);
u1:=sysparam(3);
u:=u1-sysparam(2)+1;
hh:=hhv(H,u);
ll:=llv(L,u);
最高:=hh[u1],COLORYELLOW;
PARTLINE(C and w<>3,最高),COLORYELLOW;
最低:ll[u1],COLORred;
PARTLINE(C and w<>3,最低),COLORre

a1:=hhv(h,256);
a2:=llv(l,256);
m1:ma(c,64);
m2:ma(c,256);
k1:(0.618*a1+0.382*a2);
k2:(0.5*a1+0.5*a2);
k3:(0.382*a1+0.618*a2);

INPUT:N(15,5,30);
{高低标注}
ddd:=ZIG(4,n );
DRAWTEXT(h=ddd ,h*1.02 ,'高='+ddd),ColorD3A9FF;
DRAWTEXT(l=ddd ,l ,'低='+ddd);
{缺口}
stickline(L>REF(H,1),L,REF(H,1),50,1001),color0000FF;
stickline(REF(L,1)>H,ref(L,1),

HH:HHV(H,450),COLORWHITE,LINETHICK2;
LL:=LLV(L,450),COLORWHITE,LINETHICK2;
VAR1:=(HH-LL);
HL75:HH-VAR1*0.25,COLORFF0000;
HL62:HH-VAR1*0.375,CIRCLEDOT,COLORWHITE;
HL50:HH-VAR1*0.5,COLORYELLOW;
HL38:HH-VAR1*0.625,CIRCLEDO

HH:HHV(H,450),COLORWHITE,LINETHICK2;
LL:LLV(L,450),COLORWHITE,LINETHICK2;
VAR1:=(HH-LL);
HL75:HH-VAR1*0.25,COLORFF0000;
HL62:HH-VAR1*0.375,CIRCLEDOT,COLORWHITE;
HL50:HH-VAR1*0.5,COLORYELLOW;
HL38:HH-VAR1*0.625,CIRCLEDOT

高1:=REF(HHV(H,144),3);
低1:=REF(LLV(L,144),3);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
顶:REFDATE(高1,DATE),POINTDOT,COLORCYAN;
%19:=REFDATE(H

HH:HHV(H,450),COLORWHITE,LINETHICK2;
LL:=LLV(L,450),COLORWHITE,LINETHICK2;
VAR1:=(HH-LL);
HL75:HH-VAR1*0.25,COLORFF0000;
HL62:HH-VAR1*0.375,CIRCLEDOT,COLORWHITE;
HL50:HH-VAR1*0.5,COLORYELLOW;
HL38:HH-VAR1*0.625,CIRCLEDO

{高点 1 999 22
低点 1 999 1}
高点:=22;
低点:=1;
GD:=CONST(FINDHIGH(H,0,高点*10,1));
DD:=CONST(FINDLOW(L,0,低点*10,1));
GT:=CONST(BARSLAST(GD=H))+1;
DT:=CONST(BARSLAST(DD=L))+1;
SH:=CONST(IF(GT=1,H,REF(H,GT-1)));
S

N:=5;
BD8:=(C-REF(C,7))/8;
BD20:=(C-REF(C,19))/20;
BD60:=(C-REF(C,59))/60;
BD168:=(C-REF(C,167))/168;
MA8:MA(CLOSE,8)COLORLICYAN;
明8:MA8+BD8,POINTDOT,COLORLICYAN,NODRAW;
MA20:MA(CLOSE,20)COLORBLUE,LINETHICK2;