N:=30;
HHX:=H>=HV(H,N)&&(H-REF(L,BARSLAST(L<=LV(L,N)))) / REF(L,BARSLAST(L<=LV(L,N)))>=0.013,ICON(1,'ICO1');
NH:=BARSLAST(HHX)+1;
LLX:=L<=LV(L,N)&&ABS(L-REF(H,BARSLAST(H>=HV(H,N))))/REF(H,BARSLAST(H>=HV(H,N)))>=0.013,ICON(1,'ICO2');
NL:=BARSLAST(LLX)+1;
AH:BACKSET((COUNT(LLX,NH)&&LLX||ISLASTBAR)&&EXIST(HHX,SUMBARS(LLX||ISLASTBAR,2)),HHVBARS(IF(HHX,H,0),SUMBARS(LLX,2))+1),NODRAW;
AL:=BACKSET((COUNT(HHX,NL)&&HHX||ISLASTBAR)&&EXIST(LLX,SUMBARS(HHX||ISLASTBAR,2)),LLVBARS(IF(LLX,L,999999),SUMBARS(HHX,2))+1);
TT:=BACKSET(ISLASTBAR,2760);
DRAWLINE1(CROSS(AH=1,0.5)&&TT,H,CROSS(AL=1,0.5)&&TT,L,0),LINETHICK2,COLORGREEN;
DRAWLINE1(CROSS(AL=1,0.5)&&TT,L,CROSS(AH=1,0.5)&&TT,H,0),LINETHICK2,COLORRED;
CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(AH=1,0.5)&&TT,2)),0.5),NODRAW;
DRAWTEXT(CROSS(AH=1,0.5)&&TT,H,'¡ñ'),FONTSIZE35;
DRAWTEXT(CROSS(AL=1,0.5)&&TT,L,'¡ñ'),FONTSIZE35,VALIGN0;
HH2:=H>=HV(H,N+1);
NH2:=BARSLAST(HH2)+1;
LL2:=L<=LV(L,N+1);
NL2:=BARSLAST(LL2)+1;
AH2:BACKSET(COUNT(LL2,NH2)&&LL2&&EXIST(HH2,SUMBARS(LL2,2)),HHVBARS(IF(HH2,H,0),SUMBARS(LL2,2))+1),NODRAW;
AL2:BACKSET(COUNT(HH2,NL2)&&HH2&&EXIST(LL2,SUMBARS(HH2,2)),LLVBARS(IF(LL2,L,999999),SUMBARS(HH2,2))+1);


HH:CROSS(BACKSET(BARSLAST(CROSS(AL2=1,0.5))>BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR,SUMBARS(CROSS(AH=1,0.5),1))=1,0.5);
HL:CROSS(BACKSET(BARSLAST(CROSS(AL2=1,0.5))>BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR,LLVBARS(L,SUMBARS(CROSS(AH=1,0.5),1))+1)=1,0.5);
XL1:=TRENDLINES(HH,H,HL,L);
DRAWLINE3(BARSLAST(CROSS(AL2=1,0.5))>BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR&&VALUEWHEN(HL,L)<VALUEWHEN(HH,H)/1.03,VALUEWHEN(HL,L),BARSLAST(HL),1,
VALUEWHEN(HL,REF(XL1,INTPART(BARSLAST(HH)/4))),BARSLAST(HL)+VALUEWHEN(HL,INTPART(BARSLAST(HH)/4)),0),COLORGREEN,LINETHICK3;

HL1:CROSS(BACKSET(BARSLAST(CROSS(AL2=1,0.5))>BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR,SUMBARS(CROSS(AL2,0.5),1))=1,0.5);
XL11:=TRENDLINES(HL1,L,HH,H);
DRAWLINE3(BARSLAST(CROSS(AL2=1,0.5))>BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR&&VALUEWHEN(HH,H)>VALUEWHEN(HL1,L)*1.03,VALUEWHEN(HH,H),BARSLAST(HH),1,
VALUEWHEN(HH,REF(XL11,INTPART(BARSLAST(HL1)/4))),BARSLAST(HH)+VALUEWHEN(HH,INTPART(BARSLAST(HL1)/4)),0),COLORYELLOW,LINETHICK3;

LH1:CROSS(BACKSET(BARSLAST(CROSS(AL2=1,0.5))>BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR,SUMBARS(CROSS(AH,0.5),2))=1,0.5);
XL22:=TRENDLINES(LH1,H,HL1,L);
DRAWLINE3(BARSLAST(CROSS(AL2=1,0.5))>BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR&&VALUEWHEN(HL1,L)<VALUEWHEN(LH1,H)/1.03,VALUEWHEN(HL1,L),BARSLAST(HL1),1,
VALUEWHEN(HL1,REF(XL22,INTPART(BARSLAST(LH1)/4))),BARSLAST(HL1)+VALUEWHEN(HL1,INTPART(BARSLAST(LH1)/4)),0),COLORYELLOW,LINETHICK3;


LL:=CROSS(BACKSET(BARSLAST(CROSS(AL2=1,0.5))<BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR,SUMBARS(CROSS(AL2=1,0.5),1))=1,0.5);
LH:=CROSS(BACKSET(BARSLAST(CROSS(AL2=1,0.5))<BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR,HHVBARS(H,SUMBARS(CROSS(AL2=1,0.5),1))+1)=1,0.5);
XL2:=TRENDLINES(LL,L,LH,H);
DRAWLINE3(BARSLAST(CROSS(AL2=1,0.5))<BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR&&VALUEWHEN(LH,H)>VALUEWHEN(LL,L)*1.03,VALUEWHEN(LH,H),BARSLAST(LH),1,
VALUEWHEN(LH,REF(XL2,INTPART(BARSLAST(LL)/4))),BARSLAST(LH)+VALUEWHEN(LH,INTPART(BARSLAST(LL)/4)),0),COLORRED,LINETHICK3;