Código fuente de confirmación de Bull
{KDJ Tres Cruz de Oro}
MA5:=EMA(C, 5);
MA10:=EMA( C , 10);
MV5:=EMA(V, 5);
MV10:=EMA(V, 10); k" (9, 3, 3);
Ding:="KDJ. d"(9,3,3);
v 1:= MA5>REF(MA5,1) y ma 10>REF(MA10,1)y C>REF(C, 1) y C/O >1.01;
vv 1:= MA5>REF(MV5,1) y mv 10>=REF(MV10,1) y V>REF(V, 1)* 1.2;
KD 1:= K>REF(K,1) y D>=REF(D,1);
VA:=COUNT( CROSS(K,D),4)>=1 y COUNT(CROSS (MA5,MA10),4)>=1 y
COUNT(CROSS(MV5,MV10),4)>=1
DIF:=EMA(Cierre, 12) -EMA(Cierre, 26);
DEA:=EMA(DIF, 9);
MACD: = 2 *(DIF-DEA);
A1:=CROSS(DIF,DEA);
A2:=REF(A1, 1);
A3:=COUNT(A2, 21); {He sido cruz de oro durante tres semanas antes de hoy}
A4:=MA(C, 5)>=MA(C, 10) y MA(C, 10)>=MA(C, 30) y MA(C, 30)>=MA(C, 60)
Y MA(C, 60)>=MA(C, 120) y MA( C, 120)>;=MA(C, 250); Acuerdo largo de media móvil}
{Ir a la bolsa de valores para suspender la negociación}
ST:=STRFIND(STKNAME ,' ST ',1)>0;
S:= STRFIND(str name,' S ',1)>0;
suspension:=(dyna info(4) = 0);
Selección de stock: if (v1 y vv1 y kd1 y va, 1, 0) y a1 y a3 y a4 y no (ST)
AND NOT(. Suspended)AND NOT(S);