同花顺终极作品主图未加密选股指标公式源码

同花顺终极作品主图未加密选股指标公式源码

源码正文：

ma5:MA(C,5),COLORFFFFFF,LINETHICK1;
MA20:MA(C,20),COLORFF80FF,LINETHICK2;
MA120:MA(C,120),colorcyan,LINETHICK2;
角5:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;
角20:ATAN((MA20/REF(MA20,1)-1)*100)*180/3.1416,nodraw,colorwhite;
角120:=ATAN((MA120/REF(MA120,1)-1)*100)*180/3.1416,nodraw,colorwhite;
涨幅:=(C-REF(C,1))/REF(C,1)*100;
TYP:=(HIGH+LOW+CLOSE)/3;
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
乖离:=Abs((MA20-MA120)/MA20*100),NODRAW,colorwhite;
涨:=IF(REF(CCI,1)<100,CCI>120,CCI>100);
跌:=IF(REF(CCI,1)>-100,CCI<-120,CCI<-100);
震荡:=涨=0 AND 跌=0;
//boll线
上:MA20+2*stD(CLOSE,20),COLOR0000FF,DOTLINE;
下:MA20-2*STD(CLOSE,20),COLOR00FF00,DOTLINE;
中上轨:上-(上-下)/6,COLORFFFF00,DOTLINE;
中下轨:下+(上-下)/6,COLORFFFF00,DOTLINE;
两格:=中上轨-MA20;
//用不同颜色画不同行情的k线
STICKLINE(涨=1,H,L,0,0),colorred;
STICKLINE(涨=1 AND C>=O,C,O,10,1),colorred;
STICKLINE(涨=1 AND C<O,C,O,10,0),colorred;
STICKLINE(跌=1,H,L,0,0),COLORFF6400;
STICKLINE(跌=1 AND C>=O,C,O,10,1),COLORFF6400;
STICKLINE(跌=1 AND C<O,C,O,10,0),COLORFF6400;
STICKLINE(震荡=1,H,L,0,0),coloryellow;
STICKLINE(震荡=1 AND C>=O,C,O,10,1),coloryellow;
STICKLINE(震荡=1 AND C<O,C,O,10,0),coloryellow;
//不同周期K线界面显示
IF(PERIODNAME<>"月线")
IF(PERIODNAME<>"周线")
IF(PERIODNAME<>"日线")
IF(PERIODNAME<>"60分钟")
BX:=(L<=中下轨 AND 跌=0 AND LLV(L,3)>LLV(L,20) AND O-C<两格) OR (L<=下 AND 跌 AND LLV(L,3)>LLV(L,20) AND O-C<两格);
SX:=(H>=中上轨 AND 涨=0 AND HHV(H,3)<HHV(H,20) AND C-O<两格) OR (H>=上 AND 涨 AND HHV(H,3)<HHV(H,20) AND C-O<两格);
DRAWICON(BX,L,1);
DRAWICON(SX,H,2);
低吸:=(涨 AND L<上 AND HHV(CCI,3)=HHV(CCI,8)) OR (涨 AND L<中上轨) OR (震荡 AND C>MA20 AND 角20>IF(C>1000,8,20) AND L<=MA20+(上-下)/8) OR (角20>IF(C>1000,0,8) AND L<MA20-(上-下)/8) OR BX;
高抛:=(跌 AND H>下 AND LLV(CCI,3)=LLV(CCI,8)) OR (跌 AND H>中下轨) OR (震荡 AND C<MA20 AND 角20<IF(C>1000,-8,-20) AND H>=MA20-(上-下)/8) OR (角20<IF(C>1000,0,-8) AND H>MA20+(上-下)/8) OR SX;
观望:=低吸=0 AND 高抛=0;
DRAWTEXT_FIX(ISLASTBAR,0.5,0.05,0,'<使用说明> -->'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.57,0.05,0,'红色上涨，蓝色下跌，黄色震荡'),colorcyan;
DRAWTEXT_FIX(ISLASTBAR,0.5,0.1,0,'<使用说明> -->'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.57,0.1,0,'当买点信号出现时，先用大一级别周期确认处于低吸区域，否则买点信号真实性偏弱）'),colorcyan;
DRAWTEXT_FIX(ISLASTBAR AND BX,0.5,0.2,0,'<买点信号介入价格> -->'),colorred;
DRAWNUMBER_FIX(ISLASTBAR AND BX,0.6,0.2,0,TOSTRING(IF(跌,下,中下轨),2)),colorcyan;
DRAWTEXT_FIX(ISLASTBAR AND BX,0.62,0.2,0,'下方或附近'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.5,0.15,0,"当前行情 -->"),colorred;
DRAWTEXT_FIX(ISLASTBAR AND 低吸,0.57,0.15,0,"当前行情处于低吸区"),colormagenta;
DRAWTEXT_FIX(ISLASTBAR AND 高抛,0.57,0.15,0,"当前行情处于高抛区"),colormagenta;
DRAWTEXT_FIX(ISLASTBAR AND 观望,0.57,0.15,0,"当前行情处于观望区，等待低吸或高抛"),colormagenta;

同花顺股庄资金未加密选股指标公式源码

源码正文：

///资金抄底
IF(PERIODNAME<>"日线")
//大单净量
r:=((ZDMR[-1]+BDMR[-1])-(ZDMC[-1]+BDMC[-1]))/SHGZG*100;
//相对强弱
LC := REF(CLOSE,1);//前一日收盘价;
rsi$1:=SMA(maX(CLOSE-LC,0),3,1)/SMA(Abs(CLOSE-LC),3,1)*100;
RSI$2:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
RSI$3:=SMA(MAX(CLOSE-LC,0),8,1)/SMA(ABS(CLOSE-LC),8,1)*100;
相对强弱:=0.5*RSI$1+0.31*RSI$2+0.19*RSI$3;
wave$1:=SMA(100*(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8)),3,1);
wave$2:=SMA(100*(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8)),5,1);
wave$3:=SMA(100*(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8)),8,1);
短线波段:=0.5*wave$1+0.31*wave$2+0.19*wave$3;
机会区:20,POINTDOT,colorred;
风险区:80,POINTDOT,colorgreen;
风险系数:0.5*相对强弱+0.5*短线波段,coloryellow;
//买入条件;
CD1:=IF(风险系数<20 AND CLOSE>OPEN AND r>0,1,0);//波段小于20,股价翻红;
CD2:=IF(风险系数<20 AND LOW>=REF(LOW,1) AND CLOSE>LOW AND r>0,1,0);//波段小于20,股价未翻红,但未创新低;
CD3:=IF(REF(风险系数,1)<20 AND 风险系数>REF(风险系数,1),1,0);//前一日波段小于20,今日转向;http://www.88gs.com/
SIGNALBUY=(CD1=1 OR CD2=1 OR CD3=1);
X=(SIGNALBUY AND COUNT(SIGNALBUY,3)=1);
DRAWICON(X,机会区,"buy");
///资金仓位
IF(PERIODNAME<>"日线")
m5=0;
m10=0;
m20=0;
m30=0;
m60=0;
a2=MA(C,1);
a5=MA(C,5);
a10=MA(C,10);
a20=MA(C,20);
a30=MA(C,30);
a60=MA(C,60);
IF(a5=NULL)m5=100;
IF(a2>=a5)
IF(a2<a60)
}
IF(a2<a30)
IF(a2<a60)
}
}
IF(a2<a20)
IF(a2<a60)
}
IF(a2<a30)
IF(a2<a60)
}
}
}
IF(a2<a10)
IF(a2<a60)
}
IF(a2<a30)
IF(a2<a60)
}
}
IF(a2<a20)
IF(a2<a60)
}
IF(a2<a30)
IF(a2<a60)
}
}
}
}
IF(a2<a5)
IF(a2<a60)
}
IF(a2<a30)
IF(a2<a60)
}
}
IF(a2<a20)
IF(a2<a60)
}
IF(a2<a30)
IF(a2<a60)
}
}
}
IF(a2<a10)
IF(a2<a60)
}
IF(a2<a30)
IF(a2<a60)
}
}
IF(a2<a20)
IF(a2<a60)
}
IF(a2<a30)
IF(a2<a60)
}
}
}
}
IF(a2>=a5 AND a2>=a10 AND a2>=a20 AND a2>=a30 AND a2<a60)m5=150;
IF(a2>=a5 AND a2>=a10 AND a2<a20 AND a2>=a30 AND a2<a60)m5=130;
IF(a2>=a5 AND a2>=a10 AND a2>=a20 AND a2<a30 AND a2<a60)m5=130;
IF(a2>=a5 AND a2<a10 AND a2<a30 AND a2<a60)m5=110;
IF(a2<a5 AND a2>=a10 AND a2>=a20 AND a2>=a30 AND a2<a60)m5=30;
IF(a2>=a5 AND a2>=a10 AND a2>=a20 AND a5>=a10 AND a2<a30 AND a2<a60)m5=130;
IF(a2>=a5 AND a2>=a10 AND a5>=a10 AND a2<a20 AND a2<a30 AND a2<a60)m5=120;
IF(a2>=a5 AND a2>=a10 AND a5<a10 AND a2<a20 AND a2<a30 AND a2<a60)m5=110;
IF(a2>=a5 AND a2>=a10 AND a2>=a20 AND a2>=a30 AND a2<a60 AND a5<a10 AND a10<a30)m5=130;
m=m5+m10+m20+m30+m60;
IF(m>=50)ELSE