打工皇帝 ，源码

N:=20;

N1:=7;

N2:=69;

T1:=IF((DATE<=1341231),1,0);

M3:=EMA(CLOSE,3);

M6:EMA(CLOSE,6),COLOR008000,LINETHICK3;

M12:EMA(M6,12),COLOR0000FF,LINETHICK3;

VAR1:=EMA(M12,62);

VAR2:=(CLOSE+HIGH+LOW)/(3);

VAR3:=(EMA(VAR2,10))*(T1);

VAR4:=(REF(VAR3,1))*(T1);

STICKLINE((VAR3>VAR4),VAR3,VAR4,4,0),COLOR00FFFF;

STICKLINE((VAR3<VAR4),VAR3,VAR4,4,0),COLORFF0000;

VAR5:=((REF(HIGH,1)+REF(LOW,1))/(2))*(T1);

VAR6:=MA(CLOSE,N)+((2)*(STD(CLOSE,N)))*(T1);

DRAWTEXT(CROSS(VAR3,VAR4),(VAR3)*(0.98),'★'),COLOR00FFFF;

DRAWTEXT(CROSS(VAR5,VAR6),(HIGH)*(1.04),'↓卖'),COLOR008000;

VAR7:=REF(CLOSE,1);

VAR8:=((SMA(MAX(CLOSE-VAR7,0),N1,1))/(SMA(ABS(CLOSE-VAR7),N1,1)))*(100);

VAR9:=CROSS(N2,VAR8);

VARA:=(FILTER(VAR9,4))*(T1);

DRAWTEXT(VARA,(HIGH)*(1.04),'↓卖'),COLORFFFFFF;

VARB:=((2)*(CLOSE)+HIGH+LOW)/(4);

VARC:=LLV(LOW,34);

VARD:=HHV(HIGH,34);

VARE:=(EMA(((VARB-VAR1)/(VAR5-VAR1))*(100),7))*(T1);

VARF:=(EMA((0.667)*(REF(VARE,1))+(0.333)*(VARE),5))*(T1);

DRAWTEXT(IF(((COUNT((CLOSE<REF(CLOSE,1)),6))/(6)>0.6) AND (VOL>=(1.5)*(MA(VOL,5))) AND COUNT((VARE>=VARF),3) AND (REF(LOW,1)=LLV(LOW,120)),1,0),LOW,'●买进'),COLORFF00FF;

DRAWTEXT(IF(((COUNT((CLOSE<REF(CLOSE,1)),12))/(12)>0.6) AND COUNT((VARE>VARF),6) AND (REF(LOW,5)=LLV(LOW,120)) AND REF((CLOSE>=OPEN),4) AND REF((CLOSE>OPEN),3) AND REF((CLOSE>OPEN),2) AND REF((OPEN>CLOSE),1) AND (OPEN>REF(CLOSE,1)),1,0),LOW,'●买进'),COLOR00FFFF;DRAWTEXT_FIX(C>O,0.01,0.01,0,' 分析家公式网WWW.70822.com'),COLORFF8000;

VAR10:=(MA(CLOSE,80)-(MA(CLOSE,10))/(3))*(T1);

DRAWTEXT(IF((CLOSE<VAR10) AND ((VOL)/(240)>(MA(VOL,5))/(240)) AND (CLOSE>(REF(CLOSE,1))*(1.08)) AND (CLOSE<(MA(CLOSE,12))*(1.3)),1,0),LOW,'●抄底'),COLOR0000FF;