ZRR:=(YEAR-1992)*365+INTPART((YEAR-1989)/4)+IF(MONTH<=2,DAY+(MONTH-1)*31,DAY+ INTPART(13*(MONTH+1)/5)-7+(MONTH-1)*28+IF(INTPART(YEAR/4)=YEAR/4,1,0)); T:=BARSLAST(ZRR-REF(ZRR,1)>WEEKDAY-REF(WEEKDAY,1))+1; T1:=REF(T,T)+T; T2:=REF(T,T1)+T1; T3:=REF(T,T2)+T2; T4:=REF(T,T3)+T3; T5:=REF(T,T4)+T4; T6:=REF(T,T5)+T5; T7:=REF(T,T6)+T6; T8:=REF(T,T7)+T7; T9:=REF(T,T8)+T8; T10:=REF(T,T9)+T9; T11:=REF(T,T10)+T10; T12:=REF(T,T11)+T11; T13:=REF(T,T12)+T12; T14:=REF(T,T13)+T13; T15:=REF(T,T14)+T14; T16:=REF(T,T15)+T15; T17:=REF(T,T16)+T16; T18:=REF(T,T17)+T17; T19:=REF(T,T18)+T18; T20:=REF(T,T19)+T19; T21:=REF(T,T20)+T20; 三周:(REF(CLOSE,T)+REF(CLOSE,T1)+CLOSE)/3; 五周:(REF(CLOSE,T)+REF(CLOSE,T1)+REF(CLOSE,T2)+REF(CLOSE,T3)+CLOSE)/5; 十周:(REF(CLOSE,T)+REF(CLOSE,T1)+REF(CLOSE,T2)+REF(CLOSE,T3)+REF(CLOSE,T4)+REF(CLOSE,T5)+REF(CLOSE,T6)+REF(CLOSE,T7)+REF(CLOSE,T8)+CLOSE)/10; AA15:=C>COST(85) AND CMA(V,50); A4:=YEAR>2012; RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; 筹码锁定:=A4 AND CROSS(C,A1) AND CROSS(K,D) AND A2 AND C0 AND DIF>0 AND DEA>0 AND DIF>DEA*1.01 AND A3; DRAWTEXT(筹码锁定,LOW,'●筹码锁定'),COLORRED;