通达信指标"理财专家"选股公式

编写要求：

请在“活筹”大于100时选股。先谢谢老师了 。源码如下：{参数 D:34,90,72} VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20; VAR2:=2*ABS(VAR1); VAR3:=100-3*SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1); VAR4:=100-3*SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1); VAR5:=(HIGH+LOW+CLOSE)/3; VAR6:=(VAR5-MA(VAR5,14))/(0.015*AVEDEV(VAR5,14)); VAR7:=(VAR5-MA(VAR5,89))/(0.015*AVEDEV(VAR5,89)); VAR8:=IF(VAR6>=150 AND VAR6=150 AND VAR7-200 AND VAR7-200,-10,VAR8); VARA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; VARB:=100-ABS(VARA); VARC:=3*SMA((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA ((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1); VARD:=3*SMA((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA ((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1); VARE:=REF(LOW,1)*0.9; VARF:=LOW*0.9; VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL; VAR11:=EMA(VAR10,30); VAR12:=VAR11-CLOSE; VAR13:=REF(CLOSE,1); VAR14:=SMA(MAX(CLOSE-VAR13,0),7,1)/SMA(ABS(CLOSE-VAR13),7,1)*100; VAR15:=SMA(MAX(CLOSE-VAR13,0),13,1)/SMA(ABS(CLOSE-VAR13),13,1)*100; VAR16:=BARSCOUNT(CLOSE); VAR17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100; VAR18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2; VAR19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100; VAR1A:=(SMA(VAR19,4,1)-50)*2; VAR1B:=SMA(VAR1A,3,1); VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100; VAR1D:=SMA(VAR1C,4,1); VAR1E:=SMA(VAR1D,3,1); VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100; VAR20:=IF(VAR1720 AND VAR1B=-0.25 AND VAR1450,80,0); 活筹OAMV: VAR3,COLORFF00FF; OX: IF(VARB0,VAR1,0); 核能: IF(VAR1=200 AND VAR6>=150,15,IF(VAR70,1000*VAR26/VAR24,0),COLORRED,LINETHICK2; STICKLINE(VAR3>=REF(VAR4,1),VAR3,VAR4,8,1),COLORRED; STICKLINE(VAR3MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1); VAR28:=CLOSE50 AND 预警>60 AND OX=100; VAR2A:=VAR21>48 AND 预警>60 AND OX38 AND 预警50 AND OXREF(VOL,1) AND CLOSE>REF(CLOSE,1); VAR2E:=VAR3>=REF(VAR4,1) AND CLOSE=REF(核能,1) AND VARC

股票网解答：

D:=72;

VAR3:100-3*SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1)>100;

 

>