VAR1:=1;
VAR2:=(2*CLOSE+HIGH+LOW)/4;
天: 80, POINTDOT;
人: 20;
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*VAR1;
莊家: EMA(0.667*REF(散戶,1)+0.333*散戶,2)*VAR3*VAR1;
VAR6:=(HHV(HIGH,4)-VAR2)/(HHV(HIGH,4)-LLV(LOW,4))*100-72;
VAR7:=(VAR2-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
倒影: SMA(VAR6,4,1)*VAR1;
VAR8:=SMA(VAR7,2,1);
黃山: SMA(VAR8,2,1)*VAR1;
地平線: 12;
DRAWTEXT(CROSS(散戶,莊家) AND 散戶<50 AND 29<散戶,20,'進')COLOR00FF00;
DRAWTEXT(CROSS(莊家,散戶) AND 散戶>40 AND 71>散戶,50,'出')COLOR00FFFF;
DRAWTEXT(CROSS(散戶,莊家) AND 散戶<30,0,'吸'),COLOR3399CC;
DRAWTEXT(CROSS(莊家,散戶) AND 散戶>70,75,'減'),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;
VARB:=EMA(EMA(VAR9,10),10)/EMA(EMA(ABS(VAR9),10),10)*100;
VARC:=EMA(EMA(VAR9,20),20)/EMA(EMA(ABS(VAR9),20),20)*100;
賣出: IF(VARA>0 AND CROSS(VARC,VARA),-40,0);
DRAWTEXT(賣出,-30,'逃！'),COLOR0033FF;
DRAWICON(賣出<0,-25,1);