编个＂绝密买点＂选股

九毛八公式指标

公式模块：

源码如下，谢谢了！！
Var1:=IF(YEAR>3050 AND MONTH>2,0,1);
Var2:=CLOSE*vol;
Var3:=EMA((MA(Var2,4)/MA(VOL,4)+MA(Var2,6)/MA(VOL,6)+MA(Var2,13)
/MA(VOL,13)+MA(Var2,24)/MA(VOL,24))/4,1);
Var4:=EMA(CLOSE,34);

DIFF :=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
macd :=2*(DIFF-DEA);
drawicon(ref(macd,1)=llv(macd,3),l,1),align1;

V1:=EMA(EMA(EMA(CLOSE,8),13),55);
V2:=(REF(HIGH,1)+REF(LOW,1))/2;
V3:=MA(CLOSE,20)+2*STD(CLOSE,20);
DRAWICON(crOSS(V2,V3),HIGH*1.035,10);
DRAWTEXT(CROSS(V2,V3),HIGH*1.02,'绝卖'),COLORblue;
V4:=REF(CLOSE,1);
V5:=SMA(MAX(CLOSE-V4,0),7,1)/SMA(ABS(CLOSE-V4),7,1)*100;
V6:=CROSS(79,V5);
V7:=FILTER(V6,4);
DRAWICON(V7,HIGH*1.035,10);
DRAWTEXT(V7,HIGH*1.02,'绝卖'),COLORgreen;

a1:=ref(c,5)<ref(O,5) and ref(c,4)<ref(O,4) and ref(c,3)<ref(O,3);
DRAWTEXT((a1 AND all(C>O,2)) OR (a1 AND C>O AND REF(C,1)<REF(O,1) AND REF(C,2)>REF(O,2)),L*0.965,'绝密买点');
drawtextabs(0,10,bkname),colorred;

a1:=ref(c,5)<ref(O,5) and ref(c,4)<ref(O,4) and ref(c,3)<ref(O,3);
(a1 AND all(C>O,2)) OR (a1 AND C>O AND REF(C,1)<REF(O,1) AND REF(C,2)>REF(O,2));