A:=CURRBARSCOUNT; HA:=IF(BETWEEN(DATE,1150601,1150630),H,-999); T:=HHVBARS(HA,0); TT:=BARSLAST(L=LLV(L,T+1)); T1:=BARSLAST(A=CONST(TT)+1); T2:=BARSLAST(A=CONST(T)+1); GT:=CONST(T2)+1; DT:=CONST(T1)+1; AA:=DRAWLINE(A=GT,H,A=DT,L,0); DRAWBAND(AA,RGB(69,139,0),AA,RGB(69,139,0)); HH:=CONST(REF(L,BARSLAST(A=DT+1))); LL:=CONST(REF(H,BARSLAST(A=GT+1))); JJ:=HH-LL; TJ:=ABS(GT-DT); PT:=TJ/2+MIN(GT,DT); PJ:=(HH+LL)/2; LJ:=HH*LL; BT:=2*LJ/TJ; BJ:=LJ/JJ; TJA:=IF(A