分享] 理财专家原码
网上找的,还可以。
理财专家(原码)
参数描述: N(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<200 AND var7>=150 AND var7<200,10,0);
var9:=IF(var6<=-150 AND var6>-200 AND var7<=-150 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(var17<=25 AND var18<-95 AND var1F>20 AND var1B<-30 AND var1E<30 AND var12>=-0.25 AND var14<22 AND var15<28 AND var16>50,80,0);
活筹OAMV: var3, , [00010001];
OX: IF(varB<90,varB,100), , [00010001];
var21:=IF(var1>0,var1,0);
核能: IF(var1<0,var2,0), LINESTICK;
牛角: var20, , [00010001];
预警: IF(var7>=200 AND var6>=150,15,IF(var7<=-200 AND var6<=-150,-15,var9))+60, , [00010001];
var22:=100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34));
var23:=MA(var22,3);
var24:=EMA(AMOUNT/VOL/100,5);
var25:=EMA(AMOUNT/VOL/100,13);
var26:=var24-var25;
势能: IF(1000*var26/var24>0,1000*var26/var24,0), , [00010002];
STICKLINE(var3>=REF(var4,1),var3,var4,8,0), , [00010001];
STICKLINE(var3<REF(var4,1),var3,var4,8,0), , [00010001];
var27:=CLOSE>MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1);
var28:=CLOSE<MA(CLOSE,20) AND MA(CLOSE,20)<REF(MA(CLOSE,20),1);
var29:=var21>50 AND 预警>60 AND OX=100;
var2A:=var21>48 AND 预警>60 AND OX<100;
var2B:=核能>38 AND 预警<55;
var2C:=牛角>50 AND OX<90;
var2D:=var3<REF(var4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
var2E:=var3>=REF(var4,1) AND CLOSE<REF(CLOSE,1) AND 预警=60 AND 牛角=0 AND 核能>=REF(核能,1) AND varC<REF(varD,1);
DRAWTEXT(var27 AND COUNT(var27,30)=1,90,'上升趋势,持股待涨'), , [00010001];
DRAWTEXT(var28 AND COUNT(var28,30)=1,10,'下降趋势,出局为佳! '), , [00010001];
DRAWTEXT(var29 AND COUNT(var29,30)=1,70,'上涨过急,需要调整'), , [00010001];
DRAWTEXT(var2A AND COUNT(var2A,30)=1,80,'拉升在即,狂牛! '), , [00050001];
DRAWTEXT(var2B AND COUNT(var2B,30)=1,20,'不必杀跌有反弹 '), , [00010001];
DRAWTEXT(var2C AND COUNT(var2C,30)=1,30,'角斗士,阶段底部 '), , [00050001];
DRAWTEXT(var2D AND COUNT(var2D,30)=1,60,'有大资金进场迹象,关注!'), , [00010001];
DRAWTEXT(var2E AND COUNT(var2E,30)=1,40,'阶段高点,回落'), , [00010001];
tdx 的