N:=(1,100,8);
KK:=(0,2,0);
TYP := (HIGH + LOW + CLOSE)/3;
CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,6));
CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));
CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20));
CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30));
CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60));
CCI:=CCI1+CCI2+CCI3+CCI4+CCI5;
AAAB:=(3*C+H+L+O)/6;
VVAR1:=(8*AAAB+7*REF(AAAB,1)+6*REF(AAAB,2)+5*REF(AAAB,3)+4*REF(AAAB,4)+3*REF(AAAB,5)+2*REF(AAAB,6)+REF(AAAB,8))/36;
VVAR6:=(LLV(VVAR1,2)+LLV(VVAR1,4)+LLV(VVAR1,6))/3;
����:IF(KK=0, VVAR1, DRAWNULL),COLORWHITE;
����:IF(KK=0,VVAR6, DRAWNULL),COLORYELLOW;
DRAWBAND(����,RGB(200,10,10),����,RGB(10,200,10));
DRAWKLINE(H,O,L,C);
�µ�:IF(KK=0 AND VVAR1=VVAR6,VVAR6, DRAWNULL),COLORGREEN;
��:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
�Ϲ�:IF(KK=1,��+3*STD(��,10),DRAWNULL),COLOR000088,LINETHICK1;
IF(KK=1,2*MA(�Ϲ�,12)-MA(C,21),DRAWNULL),COLOR666666;
N1:=(1,100,10);
N2:=(1,100,10);
DISP:=(1,3,2);
K:=IF(PERIOD=5,1,
IF(PERIOD=6,1,
IF(PERIOD=7,1,
IF(PERIOD=8,1,
IF(PERIOD=9,1,
IF(PERIOD=10,1,
IF(PERIOD=11,2,
IF(PERIOD=4,1,
IF(PERIOD=3,1,
IF(PERIOD=2,1,
IF(PERIOD=1,1,1)))))))))))/10;
P1:=PEAK(1,K*N1,1);
P2:=PEAK(1,K*N1,2);
WP1:=PEAKBARS(1,K*N1,1);
WP2:=PEAKBARS(1,K*N1,2);
T1:=TROUGH(2,K*N2,1);
T2:=TROUGH(2,K*N2,2);
WT1:=TROUGHBARS(2,K*N2,1);
WT2:=TROUGHBARS(2,K*N2,2);
TJ1:=P1>T1 AND P2>T2 ;
ZD:=MAX(T1,T2);
ZG:=MIN(P1,P2);
LL:=MIN(T1,T2);
HH:=MAX(P1,P2);
TJ2:=FILTER(ZG>ZD,2);
TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));
TJ4:=TJ1&&TJ2&&NOT(TJ3);
TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1));
TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);
ZSD:=IF(TJ8,ZD,DRAWNULL);
ZSG:=IF(TJ8,ZG,DRAWNULL);
ZSH:=IF(TJ8,HH,DRAWNULL);
ZSL:=IF(TJ8,LL,DRAWNULL);
STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;
STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;
DRAWTEXT(DISP=2,ZSH,'����'),COLORWHITE;
�����:PLOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CIRCLEDOT,COLORLIRED;
�����:PLOYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CIRCLEDOT,COLORLIGREEN;
�������:PLOYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLORRED;
�������:PLOYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLORGREEN;
���Ƹ�:PLOYLINE(DISP=3,ZIG(1,K*N1)),COLORLIBLUE;
���Ƶ�:PLOYLINE(DISP=3,ZIG(2,K*N2)),COLORLIBLUE;
�ֲ��͵�ԤѡA:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
�ֲ��͵�ԤѡB:=BACKSET(�ֲ��͵�ԤѡA=0 AND REF(�ֲ��͵�ԤѡA,1)=1,2);
�ֲ��͵�ԤѡC:=IF(�ֲ��͵�ԤѡB=1 AND REF(�ֲ��͵�ԤѡB,1)=0,-1,0);
�ֲ��ߵ�ԤѡA:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
�ֲ��ߵ�ԤѡB:=BACKSET(�ֲ��ߵ�ԤѡA=0 AND REF(�ֲ��ߵ�ԤѡA,1)=1,2);
�ֲ��ߵ�ԤѡC:=IF(�ֲ��ߵ�ԤѡB=1 AND REF(�ֲ��ߵ�ԤѡB,1)=0,1,0);
ȱ���ж�:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
��ǰ����:=BARSLAST(�ֲ��ߵ�ԤѡC=1);
��ǰ����:=BARSLAST(�ֲ��͵�ԤѡC=-1);
Сֵ����:=LOWRANGE(L);
��ֵ����:=TOPRANGE(H);
�ͱ���AA:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����,1)>REF(��ǰ����,1) AND LLV(L,��ǰ����+1)<REF(LLV(L,��ǰ����+1),1),-1,0);
�ͱ���AB:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����,1)<=REF(��ǰ����,1) AND (��ǰ����>=4 OR LLV(ȱ���ж�,��ǰ����)=-1 OR LLV(L,��ǰ����+2)<REF(LLV(L,��ǰ����+1),1)),-1,0);
�ͱ���S:=IF((�ͱ���AA=-1 OR �ͱ���AB=-1) AND L<REF(H,��ǰ����+1),-1,0);
Ԥ��:=IF((��ǰ����<4 AND HHV(ȱ���ж�,��ǰ����)!=1) OR REF(�ͱ���S,��ǰ����)=0,1,0);
�ж�:=IF(�ֲ��ߵ�ԤѡC=1 AND REF(��ǰ����,1)<=REF(��ǰ����,1) AND Ԥ��=1 AND ��ֵ����>REF(Сֵ����,��ǰ����+1) AND ��ֵ����
>REF(Сֵ����,��ǰ����) AND ��ֵ����>REF(��ֵ����,��ǰ����),1,0);
�߱���A:=IF(�ֲ��ߵ�ԤѡC=1 AND REF(��ǰ����,1)>REF(��ǰ����,1) AND HHV(H,��ǰ����+1)>REF(HHV(H,��ǰ����+1),1),1,0);
�߱���B:=IF(�ֲ��ߵ�ԤѡC=1 AND REF(��ǰ����,1)<=REF(��ǰ����,1) AND REF(�ͱ���S,��ǰ����)=-1 AND (��ǰ����>=4 OR HHV(ȱ���ж�,��ǰ����)=1),1,0);
�߱���:=IF((�߱���A=1 OR �߱���B=1 OR �ж�=1) AND H>REF(L,��ǰ����+1),1,0);
Ԥ��A:=IF((��ǰ����<4 AND HHV(ȱ���ж�,��ǰ����)!=1) OR REF(�߱���,��ǰ����)=0,1,0);
�ж�A:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����,1)<=REF(��ǰ����,1) AND Ԥ��A=1 AND Сֵ����>REF(��ֵ����,��ǰ����+1) AND Сֵ����>REF(��ֵ����,��ǰ����) AND Сֵ����>REF(Сֵ����,��ǰ����),-1,0);
�ͱ���A:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����,1)>REF(��ǰ����,1) AND LLV(L,��ǰ����+1)<REF(LLV(L,��ǰ����+1),1),-1,0);
�ͱ���B:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����,1)<=REF(��ǰ����,1) AND (��ǰ����>=4 OR LLV(ȱ���ж�,��ǰ����)=-1 OR �ж�A=-
1),-1,0);
�ͱ���:=IF((�ͱ���A=-1 OR �ͱ���B=-1) AND L<REF(H,��ǰ����+1),-1,0);
��ǰ����A:=BARSLAST(�߱���=1);
��ǰ����A:=BARSLAST(�ͱ���=-1);
Ԥ��X:=IF((��ǰ����A<4 AND HHV(ȱ���ж�,��ǰ����A)!=1) OR REF(�ͱ���,��ǰ����A)=0,1,0);
�ж�X:=IF(�ֲ��ߵ�ԤѡC=1 AND REF(��ǰ����A,1)<=REF(��ǰ����A,1) AND Ԥ��X=1 AND ��ֵ����>REF(Сֵ����,��ǰ����A+1) AND ��ֵ����>REF(Сֵ����,��ǰ����A) AND ��ֵ����>REF(��ֵ����,��ǰ����A),1,0);
�߱���XA:=IF(�ֲ��ߵ�ԤѡC=1 AND REF(��ǰ����A,1)>REF(��ǰ����A,1) AND HHV(H,��ǰ����A+1)>REF(HHV(H,��ǰ����A+1),1),1,0);
�߱���XB:=IF(�ֲ��ߵ�ԤѡC=1 AND REF(��ǰ����A,1)<=REF(��ǰ����A,1) AND REF(�ͱ���,��ǰ����A)=-1 AND (��ǰ����A>=4 OR HHV(ȱ���ж�,��ǰ����A)=1),1,0);
�߱���X:=IF((�߱���XA=1 OR �߱���XB=1 OR �ж�X=1) AND H>REF(L,��ǰ����A+1),1,0);
Ԥ��XA:=IF((��ǰ����A<4 AND HHV(ȱ���ж�,��ǰ����A)!=1) OR REF(�߱���XA,��ǰ����A)=0,1,0);
�ж�XA:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����A,1)<=REF(��ǰ����A,1) AND Ԥ��XA=1 AND Сֵ����>REF(��ֵ����,��ǰ����A+1) AND Сֵ����>REF(��ֵ����,��ǰ����A) AND Сֵ����>REF(Сֵ����,��ǰ����A),-1,0);
�ͱ���XA:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����A,1)>REF(��ǰ����A,1) AND LLV(L,��ǰ����A+1)<REF(LLV(L,��ǰ����A+1),1),-1,0);
�ͱ���XB:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����A,1)<=REF(��ǰ����A,1) AND (��ǰ����A>=4 OR LLV(ȱ���ж�,��ǰ����A)=-1 OR �ж�XA=-1),-1,0);
�ͱ���X:=IF((�ͱ���XA=-1 OR �ͱ���XB=-1) AND L<REF(H,��ǰ����A+1),-1,0);
��ǰ����YA:=BARSLAST(�߱���X=1);
��ǰ����YA:=BARSLAST(�ͱ���X=-1);
Ԥ��YX:=IF((��ǰ����YA<4 AND HHV(ȱ���ж�,��ǰ����YA)!=1) OR REF(�ͱ���X,��ǰ����YA)=0,1,0);
�ж�YX:=IF(�ֲ��ߵ�ԤѡC=1 AND REF(��ǰ����YA,1)<=REF(��ǰ����YA,1) AND Ԥ��YX=1 AND ��ֵ����>REF(Сֵ����,��ǰ����YA+1) AND
��ֵ����>REF(Сֵ����,��ǰ����YA) AND ��ֵ����>REF(��ֵ����,��ǰ����YA),1,0);
�߱���YXA:=IF(�ֲ��ߵ�ԤѡC=1 AND REF(��ǰ����YA,1)>REF(��ǰ����YA,1) AND HHV(H,��ǰ����YA+1)>REF(HHV(H,��ǰ����YA+1),1),1,0);
�߱���YXB:=IF(�ֲ��ߵ�ԤѡC=1 AND REF(��ǰ����YA,1)<=REF(��ǰ����YA,1) AND REF(�ͱ���X,��ǰ����YA)=-1 AND (��ǰ����YA>=4 OR
HHV(ȱ���ж�,��ǰ����YA)=1),1,0);
�߱���YX:=IF((�߱���YXA=1 OR �߱���YXB=1 OR �ж�YX=1) AND H>REF(L,��ǰ����YA+1),1,0);
Ԥ��YXA:=IF((��ǰ����YA<4 AND HHV(ȱ���ж�,��ǰ����YA)!=1) OR REF(�߱���YXA,��ǰ����YA)=0,1,0);
�ж�YXA:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����YA,1)<=REF(��ǰ����YA,1) AND Ԥ��YXA=1 AND Сֵ����>REF(��ֵ����,��ǰ����YA+1)
AND Сֵ����>REF(��ֵ����,��ǰ����YA) AND Сֵ����>REF(Сֵ����,��ǰ����YA),-1,0);
�ͱ���YXA:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����YA,1)>REF(��ǰ����YA,1) AND LLV(L,��ǰ����YA+1)<REF(LLV(L,��ǰ����YA+1),1),-
1,0);
�ͱ���YXB:=IF(�ֲ��͵�ԤѡC=-1 AND REF(��ǰ����YA,1)<=REF(��ǰ����YA,1) AND (��ǰ����YA>=4 OR LLV(ȱ���ж�,��ǰ����YA)=-1 OR
�ж�YXA=-1),-1,0);
�ͱ���YX:=IF((�ͱ���YXA=-1 OR �ͱ���YXB=-1) AND L<REF(H,��ǰ����YA+1),-1,0);
AAAD:=IF(�߱���YX=1 AND �ͱ���YX=-1 AND H>REF(H,REF(��ǰ����YA,1)+2),1,IF(�߱���YX=1 AND �ͱ���YX=-1 AND L<REF(L,REF(��ǰ����YA,1)+2),-1,0));
���㱣��:=IF(AAAD=0,�߱���YX+�ͱ���YX,AAAD);
�ֲ�����:IF(���㱣��=-1,L,IF(���㱣��=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW;
STICKLINE(C>REF(C,1)*1.099,C,O,2.7,0)COLORRED,LINETHICK2;
STICKLINE(C<REF(C,1)*0.901,C,O,2.7,0)COLORGREEN,LINETHICK2;
DRAWLINE(���㱣��=-1,�ֲ�����,���㱣��=1,�ֲ�����,0),COLORRED;
DRAWLINE(���㱣��=1,�ֲ�����,���㱣��=-1,�ֲ�����,0),COLORGREEN;
DD1:=BARSLAST(ABS(���㱣��)!=1);
DRAWICON(���㱣��=1,�ֲ�����,2);
DRAWICON(���㱣��=-1,�ֲ�����,1);
;
V2:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);
STICKLINE(V2>=1,O,C,1,0),COLORYELLOW;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1);
VB1:=FILTER(A1,10);
C1:=BACKSET(VB1,10+1);
HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1);
VB2:=FILTER(A2,10);
C2:=BACKSET(VB2,10+1);
LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD));
B:=REF(C,BARSLAST(LD));
T11:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD);
T21:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
����:IF(T11,A,A),COLORFF00FF,POINTDOT;
STICKLINE(T11,A,A,9,0),COLORFF00FF;
����:IF(T21,B,B),COLOR80FF00,POINTDOT;
STICKLINE(T21,B,B,9,0),COLOR80FF00;;