N:=3;
LC:=REF(CLOSE,1);
E:=-100*(HHV(HIGH,84)-CLOSE)/(HHV(HIGH,84)-LLV(LOW,84));
顶:CROSS(-1,E)*7000,COLORGREEN;
DRAWTEXT(CROSS(0,E) , 6500,' 顶 ')COLORGREEN;
VARB:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
VARC:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100;
VARD:=BARSCOUNT(CLOSE);
底:( E<-98)*2000,COLORWHITE;
DRAWTEXT(CROSS(1000,底) , 2100,' 底 ')COLORGREEN;
VAR1:=(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N))*1000-700;
VAR2:=SMA(VAR1,N,1)+100;
VAR3:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*10000;
VAR4:=SMA(VAR3,3,1);
VAR5:=SMA(VAR4,3,1)+100;
VAR6:=VAR5-VAR2;
S:= IF(VAR6>100,VAR6-100,0);
STICKLINE(REF(S,1)<S,S,REF(S,1),8,1)COLORRED;
STICKLINE(REF(S,1)>S,S,REF(S,1),8,1)COLORYELLOW;
A:=IF((C-REF(C,1))/REF(C,1)>0.98,REF(C,1),L);
B:=IF((C-REF(C,1))/REF(C,1)<-0.98,REF(C,1),H);
天时:CROSS((CLOSE-REF(CLOSE,12))/REF(CLOSE,12),0);
地利:CROSS((((HIGH + LOW + CLOSE)/3)-MA(((HIGH + LOW + CLOSE)/3),12))
/(0.015*AVEDEV(((HIGH + LOW + CLOSE)/3),12)),0)*-1;
人和:EMA(CLOSE,12) - EMA(CLOSE,26);
VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34));
F:DRAWTEXT(CROSS(VAR200,MA(VAR300,5)),LOW*0.98,'利多'),,,COLOREE00EE;
洗盘:DRAWTEXT(CROSS(A,0),-0.3,'异动'),COLORGREEN;
