通达信盘中参考主图指标公式源码

通达信盘中参考主图指标公式源码

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,75))/(hhv(high,75)-llv(low,75))*100,20,1)+2*sma(sma((close-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1),15,1);
var4:=100-3*sma((open-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1)+2*sma(sma((open-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1),15,1);
var5:=(high+low+close)/3;
var6:=(var5-ma(var5,14))/(0.015*avedev(var5,14));
var7:=(var5-ma(var5,70))/(0.015*avedev(var5,70));
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,75))/(hhv(indexh,75)-llv(indexl,75))*100,20,1)-2*sma(sma((indexc-llv(indexl,75))/(hhv(indexh,75)-llv(indexl,75))*100,20,1),15,1);
vard:=3*sma((indexo-llv(indexl,75))/(hhv(indexh,75)-llv(indexl,75))*100,20,1)-2*sma(sma((indexo-llv(indexl,75))/(hhv(indexh,75)-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);
情报: var3;
天线: if(varb<90,varb,100);
红军: if(var1>0,var1,0),colorred, linestick;
绿军: if(var1<0,var2,0),colorgreen,linestick;
导弹: var20;
预警系统: if(var7>=200 and var6>=150,15,if(var7<=-200 and var6<=-150,-15,var9))+60;
stickline(var3>=ref(var4,1),var3,var4,8,0);
stickline(var3<ref(var4,1),var3,var4,8,0);
var21:=close>ma(close,20) and ma(close,20)>=ref(ma(close,20),1);
var22:=close<ma(close,20) and ma(close,20)<ref(ma(close,20),1);
var23:=红军>50 and 预警系统>60 and 天线=100;
var24:=红军>48 and 预警系统>60 and 天线<100;
var25:=绿军>38 and 预警系统<55;
var26:=导弹>50 and 天线<90;
var27:=var3<ref(var4,1) and vol>ref(vol,1) and close>ref(close,1);
var28:=var3>=ref(var4,1) and close<ref(close,1) and 预警系统=60 and 导弹=0 and 绿军>=ref(绿军,1) and varc<ref(vard,1);
drawtext(var21 and count(var21,30)=1,100,'上升通道，持股待长或高抛低吸！');
drawtext(var22 and count(var22,30)=1,90,'下降通道，小心无量阴跌！ ');
drawtext(var23 and count(var23,30)=1,70,'上涨过急，需要调整，短线先抛出！ ');
drawtext(var24 and count(var24,30)=1,80,'庄家出货，大跌在即，中线抛出！ ');
drawtext(var25 and count(var25,30)=1,50,'不必杀跌，应有小反弹 ,跌停除外!');
drawtext(var26 and count(var26,30)=1,30,'坚决抢反弹，但巨量封跌停除外 ');
drawtext(var27 and count(var27,30)=1,40,'有大资金进场迹象，关注！');
drawtext(var28 and count(var28,30)=1,20,'见顶回落');