Código fuente del indicador Tirx
MA02:=MA(CERRAR,8);
P01:=SI(CRUZ(MA01,MA02),1,0) ;
P02:=SI(CRUZ(MA02,MA01),-1,0);
P0:= p 01+P02;
MA11: =MA(CIERRE, 8);
MA12:=MA(Cierre, 21);
p 11:= SI(CRUZ(ma 11, MA12), 1, 0) ;
P12:=SI(CRUZ(MA12,MA11),-1,0);
p 1:= p 11+p 12;
RSV:=(CLOSE-LLV(bajo, 6))/(HHV(alto, 6)-LLV(bajo, 6))*
K:=SMA(RSV, 12, 1) ;
D:=SMA(K,24,1);
j:= 3 * K-2 * D;
P21:=SI( CRUZ(K,D)Y D<20,1,0);
P22:=SI(CRUZ(D,K)Y K>80,-1,0);
P23:=SI(CRUZ(J,0),0.5,0);
P24:=SI(CRUZ(100,J),-0.5,0);
p>
P2:= p 21+P22+P23+P24;
DIFF:= EMA(cierre, 12) - EMA(cierre, 26);
DEA : =EMA(DIFF, 9);
MACD:= 2 *(DIFF-DEA);
P31:=IF(CROSS(DIFF,DEA)AND DEA <0 ,1,0);
P32:=SI(CROSS(DEA,DIFF)AND DIFF>0,-1,0);
P3:= p 31+ P32;
WR1:=100*(HHV(alto,13)-cierre)/(HHV(alto,13)-LLV(bajo,113));
p 41 := IF(wr 1 & gt; 80,1,0);
p42:= IF(wr 1 & lt; 20,-1,0);
P4: = p 41+P42;
OB:= SUM(SI(CERRAR>REF(CERRAR,1),VOL,SI(CERRAR<REF(CERRAR,1),-VOL,0 )), 0);
p 51:= SI(OBV & gt; REF(EMA(OBV, 24), 1), 1.5, 0);
p52:= SI(OBV & lt; REF(EMA(OBV, 24), 1), -1.5, 0);
P5:= p 51+P52
BR:=SUM (MAX(0, ALTO; -REF(CERRAR, 1)), 26)/SUM(MAX(0, REF(CERRAR, 1)-LOW), 26)* 100;
AR:=SUM (Apertura alta, 26) /SUM(Apertura baja, 26)* 100;
p 61:= IF(BR>350,3,0);
p62: = IF(BR & lt; 45 ,-3,0);
p63:= SI(AR & gt; 180,3,0);
p64:= SI( AR <45,-3, 0);
P6:= p 61+P62+P63+P64;
TH:= SUM(IF(CLOSE & gt;REF (CLOS
E, 1), VOL, 0), 26);
TL:= SUM(IF(CLOSE & lt; REF(CLOSE, 1), VOL, 0), 26);
TQ:=SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),26);
VR:= 100 *(TH * 2+TQ)/(TL * 2+TQ);
p 71:= SI(VR & gt; 350,3,0);
p72:= SI(VR & lt; 45,-3, 0);
p7:= p 71+P72;
MASA:=SUM(MA(ALTO, BAJO, 9)/MA(MA(ALTO, BAJO, 9), 9), 25 );
MAMASA:=MA(masa, 6
p 81:= SI(MASA & lt; 27 y cruz(masa, 26.5), 2); , 0);
p82:= IF(MASA>27&Cross(Masa,26.5),-2,0);
P8:= p 81+P82;
WVAD:=SUM((cierre-apertura)/(alto-bajo)*VOL, 24)/10000;
maw VAD:=马(,6);
p 91:= SI(WVAD & gt; 0,1,0);
p92:= SI(WVAD & lt; 0,-1,0);
P9 := p 91+P92;
Volumen:=MA(VOL, 10)/VOL;
MID:=100*(Alto+Bajo-REF(Alto+Bajo, 1 ) )/(alto+bajo);
EMV:=MA(medio*volumen*(alto-bajo)/MA(alto-bajo,14),14);
q 11:= SI(EMV & gt; 0,1.5,0);
q 12:= SI(EMV & lt; 0,-1.5,0);
q 1 := q 11+q 12;
TR0:=EMA(EMA(EMA(cierre, 13), 13),
TRIX:=(TR0-REF); ( TR0, 1))/REF(TR0, 1)* 100;
Q21:=SI(CROSS(TRIX, TR0), 1.5, 0);
Q22:= IF (CROSS(TR0, TRIX), -1.5, 0);
Q2:= q 21+Q22;
LC:=REF(cierre, 1);
RSI:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)* 100;
q 31:= SI (RSI & gt; 80,1,0);
q32:= SI(RSI & lt; 20,-1,0);
Q3:= q 31+ P32 ;
OSC:=100*(CLOSE-MA(CLOSE, 20));
MAOSC:=EXPMEMA(OSC, 6);
P41 : =SI(CRUZ(OSC,MAOSC),1,0);
P42:=SI(CRUZ(MAOSC,OSC),-1,0);
P4: = q 41+Q42;
TYP:=(Alto+Bajo+Cerca)/3;
CCI:=(TYP-Caballo (TYP, 13))/(0.015 * AVEDEV (TYP, 13));
q 51:= IF(CCI<180,2,0);
q52:= IF(CCI <-180, -2 ,0);
q5:= q 51+Q52;
TR1:=EXPMEMA(MAX
(MAX(ALTO-BAJO, ABS(ALTO-REF(CERRADO,1))), ABS(REF(CERRADO,1)-BAJO),14);
HD :=ALTO-REF(ALTO ,1);
LD :=REF(LOW,1)-Low;
DMP:= exp mema(IF(HD>0&&HD>LD,HD , 0), 14);
DMM:= exp mema(IF(LD & gt; 0 & amp& ampLD & gtHD, LD, 0),
PDI: = DMP * 100/tr 1); ;
MDI:= DMM * 100/tr 1;
ADX:=EXPMEMA(ABS(inhalador de dosis medida-PDI)/(inhalador de dosis medida) +PDI)* 100,6);
ADXR:=EXPMEMA(ADX,6);
Q61:=IF(CROSS(PDI,MDI),2,0);
Q62:=SI(CRUZ(DMI,PDI),-2,0);
q6:= q 61+Q62;
DPO:= CERRAR-REF( MA(CLOSE,21),21/2+1);
Ma Duobo:=马(,6);
q 71:= IF(DPO & gt;0, 1,0);
q72:= SI(DPO <0,-1,0);
Q7:= q 71+Q72;
MTM:CLOSE-REF(CLOSE, 12);
MAMTM:=MA(MTM, 6
Q81:=IF(CROSS(MTM, MaM), 1, 0); );
Q82:=SI(CROSS(MAMTM, MTM), -1, 0);
q8:= q 81+Q82;
medio 1:= SUM(VOL *(2 *cierre-alto-bajo)/(alto+bajo), 0);
CHO:=MA(MID, 10 )-MA(MID, 20);
Macho:= Caballo (CHO, 6);
q 91:= SI((CERRAR & gt; MA(Cerrar, 90) ) y CRUZ (Cierre, 0), 1.5, 0);
q92:= IF ((CLOSE & lt; MA (Cierre, 90)) y CRUZ (0, Cierre), -1.5, 0 );
q9:= q 91+Q92;
PSY:= COUNT(CLOSE>REF(CLOSE,1),12)/12 * 100;
PSYMA:=MA(,6 );
r 11:= SI(PSY>75,1.5,0);
r 12:= SI(PSY <25,-1.5,0); p>
r 1:= r 11+r 12;
MEDIO2 := MA(cerca de, 20);
SUPERIOR:= MEDIO2+2*STD(CERRADO , 20);
BAJO:= MID2-2*STD(CERRAR, 20);
R21:=SI( CRUZ (CERRAR, INFERIOR), 2, 0); /p>
R22:=IF (cruz (superior, cierre), -2, 0
R2:= r 21+ R22;
TYP1:=(); Alto+Bajo+Cerrar)/3;
v 1:= SUMA(SI(tipo 1 & gt; REF(TIPO1, 1), TIPO1 *VOL, 0), 14)/SUM(SI( tipo 1 & lt; REF(tipo 1, 1),
TYP1*VOL, 0),
>
IMF:= 100-(100/(1+v 1));
r 31:= IF(IMF>80,1,0);
R32 := SI(IMF <20,-1,0);
R3:= r 31+R32;
Vara:= r 1+R2+R3 +q 1+ Q2+Q3+Q4+Q5+Q6+Q7+Q8+Q9+Pp 1+P2+P3+P4+P5+P6+P7+P8+P9;
Curva de Decisión :VARA p>