JJ:=(CLOSE+HIGH+LOW+OPEN)/4;
A:=EMA(JJ,13);
B:=EMA(JJ,4);
NOTEXT1:=(20*B+19*REF(B,1)+18*REF(B,2)+17*REF(B,3)+16*REF(B,4)+15*REF(B,5)+14*REF(B,6)+13*REF(B,7)+12*REF(B,8)+11*REF(B,9)+10*REF(B,10)+9*REF(B,11)+8*REF(B,12)+7*REF(B,13)+6*REF(B,14)+5*REF(B,15)+4*REF(B,16)+3*REF(B,17)+2*REF(B,18)+REF(B,20))/210;
GREENTJ:CROSS(A<REF(A,1),0.5);
{-----------------------------------}