(MA(CLOSE,3)+MA(CLOSE,7)+MA(CLOSE,13)+MA(CLOSE,27))/4;
BB1:=EMA(CLOSE,5);
BB:=IF(ISNULL(BB0),BB1,BB0);
A0:=(H+L+2*O+6*C)/10;
TK:=(C O OR (C REF(H,1) AND C O) OR (C =O AND (H-C) =(C-O) AND C/REF(C,1) 1.02) OR (C=O AND (H-C) =(C-L) AND C/REF(C,1) 1.05));
TP:=((C O AND C/REF(C,1) 0.94 ) OR (C REF(L,1) AND C O) OR (C =O AND (C-L) =(O-C) AND C/REF(C,1) 0.98) OR (C=O AND (C-L) =(H-C) AND C/REF(C,1) 0.95));
C1:=CROSS(A0,BB) AND TK;
C2:=CROSS(BB,A0) AND TP;
A1:=IF(C1,BB*0.98,IF(C2,BB*1.02,A0));
C12:=CROSS(A1,BB) AND TK;
C22:=CROSS(BB,A1) AND TP;
A2:=IF(C12,BB*0.98,IF(C22,BB*1.02,A1));
C13:=CROSS(A2,BB) AND TK;
C23:=CROSS(BB,A2) AND TP;
A3:=IF(C13,BB*0.98,IF(C23,BB*1.02,A2));
C14:=CROSS(A3,BB) AND TK;
C24:=CROSS(BB,A3) AND TP;
A4:=IF(C14,BB*0.98,IF(C24,BB*1.02,A3));
C15:=CROSS(A4,BB) AND TK;
C25:=CROSS(BB,A4) AND TP;
A5:=IF(C15,BB*0.98,IF(C25,BB*1.02,A4));
C16:=CROSS(A5,BB) AND TK;
C26:=CROSS(BB,A5) AND TP;
A6:=IF(C16,BB*0.98,IF(C26,BB*1.02,A5));
C17:=CROSS(A6,BB) AND TK;
C27:=CROSS(BB,A6) AND TP;
A7:=IF(C17,BB*0.98,IF(C27,BB*1.02,A6));
C18:=CROSS(A7,BB) AND TK;
C28:=CROSS(BB,A7) AND TP;
A8:=IF(C18,BB*0.98,IF(C28,BB*1.02,A7));
C19:=CROSS(A8,BB) AND TK;
C29:=CROSS(BB,A8) AND TP;
A9:=IF(C19,BB*0.98,IF(C29,BB*1.02,A8));
C31:=CROSS(A9,BB) AND TK;
C41:=CROSS(BB,A9) AND TP;
A:=IF(C31,BB*0.98,IF(C41,BB*1.02,A9));
MAXS:=MAX(C,O);
MINS:=MIN(C,O);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
JA:=EMA(A,1);
JB:=EMA(A,5);
ZF:=(C/REF(C,1)-1)*100;
ZJ:=(A/BB-1)*100;
KK0:=CROSS(A,BB);
CROSS(BB,A);
JZF:=(H-L)/L;
DRAWTEXT(KK0,L*0.9998, ↑ ),VALIGN0,COLORRED,FONTSIZE35;
DRAWTEXT(PP0,H, ↓ ),COLORGREEN,FONTSIZE35;
K:=A
P:=A
TCY:=K AND ((C =REF(H,1) AND ((H-C) (C-O)) OR ZF =7) OR (C REF(H,1) AND C O AND ZF -3 AND ZJ =10));
TZK:=K AND NOT(TCY);
TKC:=P AND ((C REF(L,1)) OR (C REF(L,1) AND C O AND ZF 3 AND ZJ =-10));
TZD:=P AND NOT(TKC);
RBB:=(SUM(CLOSE,2)/3+SUM(CLOSE,6)/7+SUM(CLOSE,12)/13+SUM(CLOSE,26)/27);
RB1:=4*1.01-1540/2457;
RB2:=4*0.99-1540/2457;
AX1:=RBB/RB1;
AX2:=RBB/RB2;
AXX1:=IF(AX1 L,L*0.998,IF(AX1 BB,BB*0.998,AX1));
AXX2:=IF(AX1 H,H*1.002,IF(AX1 BB,BB*1.002,AX1));
STICKLINE1(CLOSE OPEN AND K,OPEN,CLOSE,3.2,0),COLORRED;
STICKLINE1(CLOSE OPEN AND K,HIGH,CLOSE,0,0),COLORRED;
STICKLINE1(CLOSE OPEN AND K,LOW,CLOSE,0,0),COLORRED;
STICKLINE1(CLOSE =OPEN AND P,OPEN,CLOSE,3.2,0),COLORGREEN;
STICKLINE1(CLOSE OPEN AND P,HIGH,CLOSE,0,0),COLORGREEN;
STICKLINE1(CLOSE OPEN AND P,LOW,CLOSE,0,0),COLORGREEN;
DRAWCOLORKLINE(BARSLAST(KK0) BARSLAST(PP0),COLORRED,1);
DRAWCOLORKLINE(BARSLAST(KK0) BARSLAST(PP0),COLORGREEN,1);
DRAWCOLORKLINE(BARSLAST(KK0) BARSLAST(PP0) ISDOWN,COLORRED,0);
DRAWCOLORKLINE(BARSLAST(KK0) BARSLAST(PP0) ISDOWN,COLORGREEN,0);
