Línea de soporte SSL de Flush Stressless Cómo agregar
TS:= (0,999,500);
N:= (0,999,95);
DA1:=IF(TSgt; TOTALBARSCOUNT, TOTALBARSCOUNT, TS) ;
DA:=IF(CURRBARSCOUNTgt.DA1,0,DA1);
HI:=REFDATE(HHV(H,DA),DATE); {Precio más alto} p>
LO:=REFDATE(LLV(L,DA),DATE);
C1:=IF(CURRBARSCOUNTlt;=DA,C,DRAWNULL);
p >
GZ:=EXP(LN(HI/LO)/15); {valor de cuadrícula de registro}
LH1:=SUM(IF(C1gt;=(HI/GZ),V ,0 ),DA);
LH2:=SUM(IF(C1gt;=(HI/POW(GZ,2)))And C1lt;(HI/GZ),V,0),DA );
LH3:=SUM(IF(C1gt;=(HI/POW(GZ, 3)) AND C1lt; (HI/POW(GZ, 2)), V, 0), DA) ;
LH4:=SUM(IF(C1gt;=(HI/POW(GZ, 4))AND C1lt; (HI/POW(GZ, 3)), V, 0), DA); p>
LH5:=SUM(IF(C1gt;=(HI/POW(GZ, 5)) AND C1lt; (HI/POW(GZ, 4)), V, 0), DA); >
LH6:= SUMA(IF(C1gt;=(HI/POW(GZ, 6)) AND C1lt; (HI/POW(GZ, 5)), V, 0), DA p>);
LH7:=SUM(IF(C1gt;=(HI/POW(GZ, 7)) y C1lt; (HI/POW(GZ, 6)), V, 0), DA
<); p>LH8:=SUM(IF(C1gt;=(HI/POW(GZ, 8)) AND C1lt; (HI/POW(GZ, 7)), V, 0), DA))LH9:=SUM(IF(C1gt;=(HI/POW(GZ,9))AND C1lt;LO* POW(GZ,7),V,0),DA);
LH10: =SUM(IF(C1gt;=(LO*POW(GZ,5)) AND C1lt;LO*POW(GZ,6),V,0),DA);
LH11:= SUMA( IF(C1gt;=(LO*POW(GZ,4))AND C1lt;LO*POW(GZ,5),V,0),DA);
LH12:=SUM(SI (C1gt ;=(LO*POW(GZ,3)) AND C1lt;LO*POW(GZ,4),V,0),DA);
LH13:=SUM(SI(C1gt ) =( LO*POW(GZ,2))AND C1lt;LO*POW(GZ,3),V,0),DA);
LH14:=SUM( IF(C1gt;=(LO *GZ ) AND C1lt;LO*POW(GZ,2),V,0),DA);
LH15:=SUM( IF(C1gt;=LO AND C1lt;LO*GZ,V, 0) , DA);
L1:=REFDATE(HHV(LH1,DA),FECHA);
L2:=REFDATE(HHV(LH2,DA),FECHA);
/p>
L3:=REFDATE(HHV(LH3,DA),FECHA);
L4:=REFDATE(HHV(LH4,DA),FECHA);
L5:=REFDATE(HHV(LH5,DA),FECHA);
L6:=REFDATE(HHV(LH6,DA),FECHA);
L7:=REFDATE(HHV (LH7, DA), FECHA);
L8:=REFDATE(HHV(LH8,DA),FECHA);
L9:=REFDATE(HHV(LH9,DA), FECHA);
L10:=REFDATE(HHV(LH10,DA),FECHA);
L11:=REFDATE(HHV(LH11,DA),FECHA);
L12:=REFDATE(HHV(LH12,DA),FECHA);
L13:=REFDATE(HHV(LH13,DA),FECHA);
L14: =REFDATE(HHV(LH14,DA),FECHA);
L15:=REFDATE(HHV(LH15,DA),FECHA);
SS:=(L1 L2 L3 L4 L5 L6 L7 L8 L9 L10 L11 L12 L13 L14 L15);
STICKLINE(TECHO(DA*L1/SS)*3gt;=CURRBARSCOUNT,HI*N/100,HI/GZ,6,0) COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L2/SS)*3gt;=CURRBARSCOUNT,HI/POW(GZ,1)*N/100,HI/POW(GZ,2),6 ,0)COLOR606060,LINETHICK3;
STICKLINE( TECHO(DA*L3/SS)*3gt;=CURRBARSCOUNT,HI/POW(GZ,2)*N/100,HI/POW(GZ,3 ),6,0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L4/SS)*3gt;=CURRBARSCOUNT,HI/POW(GZ,3)*N/100,HI/POW( GZ,4),6,0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L5/SS)*3gt;=CURRBARSCOUNT,HI/POW(GZ,4)*N/100,HI /POW(GZ,5),6,0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L6/SS)*3gt;=CURRBARSCOUNT,HI /POW(GZ,5)*N/ 100,HI/POW(GZ,6),6,0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L7/SS)*3gt;=CURRBARSCOUNT,HI/POW(GZ,6) *N/100, HI/POW(GZ,7),6,0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L8/SS)*3gt;=CURRBARSCOUNT,LO*POW(G
Z,7),LO*POW(GZ,8)*N/100,6,0)COLOR606060,LINETHICK3 0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L9/SS)*3gt ;=CURRBARSCOUNT,LO*POW(GZ,6),LO*POW(GZ,7)*N/100,6,0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L10/SS )*3gt;=CURRBARSCOUNT,LO*POW(GZ,5),LO*POW(GZ,6)*N/100,6,0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*) L11/SS)*3gt;=CURRBARSCOUNT,LO*POW(GZ,4),LO*POW(GZ,5)*N/100,6,0)COLOR606060,LINETHICK3;
STICKLINE( TECHO (DA*L12/SS)*3gt;=CURRBARSCOUNT,LO*POW(GZ,3),LO*POW(GZ,4)*N/100,6,0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L13/SS)*3gt;=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*N/100,6,0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L14/SS)*3gt;=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*N/100,6,0)COLOR606060,LINETHICK3;
STICKLINE(TECHO(DA*L15/SS)*3gt;=CURRBARSCOUNT, LO, LO*POW(GZ, 1)*N/100, 6, 0)COLOR606060, LINETHICK3;
DRAWKLINE(H, O, L, C); {
Presión de soporte: MA(C, 5) COLORLIMAGENTA;};
C3:=REF(C, 1) ;
Arriba:=IF((C-C3)*100/C3gt;=(10-0.01*100/C3),1,0);
STICKLINE(ARRIBA, ABRIR, CERRAR, 0.5, 0), COLORAMARILLO;
ABAJO:=IF((C3-C)*100/C3gt;=(10-0.01*100/C3),1,0);
STICKLINE(ABAJO, ABRIR, CERRAR, 0.5, 0), COLOR666600;