通达信短线高手高抛低吸指标公式

VAR2:=(2*CLOSE+HIGH+LOW)/4;
 VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);
 VAR4:=LLV(LOW,5);
 VAR5:=HHV(HIGH,4);
散户: EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3;
庄家: EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3;
 DRAWTEXT(CROSS(散户,庄家) AND 散户<50 AND 29<散户,20,'进'),COLOR00FF00;
 DRAWTEXT(CROSS(庄家,散户) AND 散户>40 AND 71>散户,70,'出'),COLOR00FFFF;
 DRAWTEXT(CROSS(散户,庄家) AND 散户<30,10,'低吸'),COLOR3399CC;
 DRAWTEXT(CROSS(庄家,散户) AND 散户>85,70,'高抛'),COLORFFFF33;
 DRAWICON(CROSS(散户,庄家) AND 散户<30,20,1);
 DRAWICON(CROSS(庄家,散户) AND 散户>70,80,2);
 VAR9:=CLOSE-REF(CLOSE,5);
 VARA:=EMA(EMA(VAR9,5),5)/EMA(EMA(ABS(VAR9),5),5)*100;
 VARC:=EMA(EMA(VAR9,20),20)/EMA(EMA(ABS(VAR9),20),20)*100;
 DRAWICON(CROSS(散户,庄家) AND CROSS(散户,庄家),散户,1);
 DRAWICON(CROSS(庄家,散户) AND CROSS(庄家,散户),庄家,2);