通达信60分钟、日周超级共振副图指标源码_指标之家—公式指标程序代码分享—公式指标网

ihzx 发表于 2021-8-28 00:20:25

通达信60分钟、日周超级共振副图指标源码

以下是通达信60分钟、日周超级共振副图指标源码（无源码的请下载附件导入）
<div class="con" id="rjsmad1"></div>
能量线,RSI3.KDJ,W&R,CCI,五个指标共振线.[红].[绿].变化是买卖信号.颜色及标记是配合信号,重点关注60分MACD和周K拐头,周K金叉 
65,COLORBLACK; 
DIF60:=EMA(CLOSE,12/2)-EMA(CLOSE,26/2); 
DEA60:=EMA(DIF60,9/2); 
STICKLINE(DIF60>=DEA60,54,58,3,0),COLORRED; 
STICKLINE(DIF60<DEA60,54,58,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,56,'★60分钟MACD★'),COLORWHITE;
RSV60:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36)); 
K60:=SMA(RSV60,3,1); 
D60:=SMA(K60,3,1); 
STICKLINE(K60>= D60,60,64,3,0),COLOR00FFFF; 
STICKLINE(K60 < D60,60,64,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,62,'★60分钟KDJ★ '),COLORWHITE;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); 
DEA:=EMA(DIF,9); 
STICKLINE(DIF>=DEA,48,52,3,0),COLOR00BBBB; 
STICKLINE(DIF<DEA,48,52,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,50,'★MACD日线★'),COLOR00FFFF; 
周MD:=MACD.DIF#WEEK; 
周MA:=MACD.DEA#WEEK; 
STICKLINE(周MD>=周MA,42,46,3,0),COLOR00BBBB; 
STICKLINE(周MD<周MA,42,46,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,44,'★MACD周线★'),COLOR00FFFF; 
月MD:=MACD.DIF#MONTH; 
月MA:=MACD.DEA#MONTH; 
STICKLINE(月MD>=月MA,36,40,3,0),COLOR00BBBB; 
STICKLINE(月MD<月MA,36,40,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,38,'★月MACD★'),COLORWHITE;
RSV:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12)); 
K:=SMA(RSV,3,1); 
D:=SMA(K,3,1); 
J:=3*K-2*D; 
STICKLINE(K>=D,30,34,3,0),COLORFF00FF; 
STICKLINE(K<D,30,34,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,32,'★KDJ日线★'),COLORFFFFFF;
 
周K:=MA("KDJ.K#WEEK"(9,3,3) ,5);
周D:=MA("KDJ.D#WEEK"(9,3,3) ,5);
周J:=MA("KDJ.J#WEEK"(9,3,3) ,5); 
STICKLINE(周K>=周D,24,28,3,0),COLORRED; 
STICKLINE(周K<周D,24,28,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,26,'★KDJ周线★'),COLORWHITE; 
月K:="KDJ.K#MONTH" ; 
月D:="KDJ.D#MONTH" ; 
STICKLINE(月K>=月D,18,22,3,0),COLORFF00FF; 
STICKLINE(月K<月D,18,22,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,20,'★KDJ月线★'),COLORWHITE;
{RSI日} 
日RSI1:="RSI.RSI1#DAY"(9); 
日RSI2:="RSI.RSI2#DAY"(9); 
STICKLINE(日RSI1>=日RSI2,12,16,3,0),COLOR990066; 
STICKLINE(日RSI1<日RSI2,12,16,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,14,'★日R金叉★'),COLORFFFFFF; 
{RSI周} 
周RSI1:="RSI.RSI1#WEEK"(9); 
周RSI2:="RSI.RSI2#WEEK"(9); 
STICKLINE(周RSI1>=周RSI2,6,10,3,0),COLOR990066; 
STICKLINE(周RSI1<周RSI2,6,10,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,8,'★周R金叉★'),COLORFFFFFF; 
{RSI月} 
月RSI1:="RSI.RSI1#MONTH"(9); 
月RSI2:="RSI.RSI1#MONTH"(9); 
STICKLINE(月RSI1>=月RSI2,0,4,3,0),COLOR990066; 
STICKLINE(月RSI1<月RSI2,0,4,3,1),COLOR696969; 
DRAWTEXT(CURRBARSCOUNT=98,2,'★月R金叉★'),COLORFFFFFF;
STICKLINE(周K>=REF(周K,1),-6,-2,3,0),COLORRED; 
STICKLINE (周K<REF(周K,1),-6,-2,3,0),COLOR333333; 
DRAWTEXT(CURRBARSCOUNT=98,-4,'★周K拐头★'),COLOR00FFFF;
 
STICKLINE(周J>=REF(周J,1),-12,-8,3,0),COLORRED;
STICKLINE(周J<REF(周J,1),-12,-8,3,0),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=98,-10,'★周J拐头★'),COLORFFFFFF;
 
VOLUME:=VOL,VOLSTICK;
MAVOL1:=MA(VOLUME,5);
MAVOL2:=MA(VOLUME,10);
STICKLINE(MAVOL1>=MAVOL2,-18,-14,3,0),COLORBLUE;
STICKLINE (MAVOL1<MAVOL2,-18,-14,3,1),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=98,-16,'★成交量★'),COLORFFFFFF;
PJJ:=DMA((HIGH+LOW+CLOSE*2)/4,0.9); 
JJ:=REF(EMA(PJJ,3),1); 
QJJ:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 
XVL:=IF(CLOSE>OPEN,QJJ*(HIGH-LOW),IF(CLOSE<OPEN,QJJ*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF 
(CLOSE>OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-QJJ*(HIGH-LOW),0-VOL/2)); 
HSL:=(XVL/20)/1.15; 
攻击流量:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22)); 
GJJ:=EMA(攻击流量,8); 
LLJX:=EMA(攻击流量,3); 
资金流量:=LLJX,LINETHICK0,COLOR0000FF;
A10:=资金流量>0;
STICKLINE(资金流量>=0,-24,-20,3,0),COLORYELLOW;
STICKLINE (资金流量<0,-24,-20,3,1),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=98,-22,'★资金流量★'),COLORFFFFFF;
DRAWICON(周K>=REF(周K,1) AND DIF60>=DEA60,-30,25);
 
{1指.能量线} 
能量线:=EMA(100*(C-LLV(L,34))/(HHV(H,34)-LLV(L,34)),3),LINETHICK0; 
{2指.RSI} 
RSI:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100,LINETHICK0; 
{3指.KDJ} 
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,LINETHICK0; 
K1:=SMA(RSV1,3,1); 
D1:=SMA(K1,3,1); 
J1:=3*K1-2*D1,LINETHICK0; 
{4指.W&R} 
威廉WR:=(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))*100,LINETHICK0; 
{5指.CCI} 
TYP := (HIGH + LOW + CLOSE)/3; 
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),LINETHICK0;
五指A:WMA((能量线+RSI+J-威廉WR+CCI)/5,5); 
五指B:WMA((能量线+RSI+J-威廉WR+CCI)/5,13);
WMA((能量线+RSI+J-威廉WR+CCI)/5,5),COLOR00FF00,LINETHICK3; 
IF(五指A>REF(五指A,1),五指A,DRAWNULL),COLOR0000FF,LINETHICK3;
 
DRAWTEXT_FIX(1,0.02,0,0,'能量线,RSI3.KDJ,W&R,CCI,五个指标共振线.[红].[绿].变化是买卖信号.颜色及标记是配合信号,重点关注60分MACD和周K拐头,周K金叉'),COLORRED,LINETHICK3;
 
KC:=FORCAST(((2*C+H+L)/4*0.618+C*0.382),3); 
AAX:=(KC-MA(KC,9))/MA(KC,9)*100; 
VAR0:=MIN(EXIST(KC,55),9); 
AAX1:=EMA(AAX,VAR0)*VAR0; 
AAX2:=MA(AAX1,3); 
AAX3:=MA(AAX1,5); 
卖:=AAX3>3  AND AAX1<REF(AAX1,1) AND CROSS(AAX2,AAX1); 
VBA:=FILTER(卖,5); 
DRAWTEXT(VBA,五指A*1.08,'★卖出'),COLORGREEN; 
DRAWICON(FILTER(VBA=1,3),40,2),COLORFFFF00; 
STICKLINE(FILTER(VBA=1,5),36,0,1.25,0),COLORBLUE; 
STICKLINE(FILTER(VBA=1,5),35,0,0.35,1),COLORBLUE,COLORGREEN; 
VB2:=EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6)*100; 
VB3:=IF(LLV(VB2,3)=LLV(VB2,11) AND COUNT(VB2<0,2) AND CROSS(VB2,MA(VB2,2)),1,0); 
VB4:=FILTER(VB3=1,5); 
DRAWTEXT(VB4,五指A*1,'★买入'),COLORD9D919;
DRAWICON(FILTER(VB4=1,3),40,1),COLORFFFF00; 
STICKLINE(FILTER(VB4=1,5),36,0,1.25,0),COLORRED; 
STICKLINE(FILTER(VB4=1,5),35,0,0.35,1),COLORRED,COLORYELLOW;
 
震幅0:=(H-L)/REF(C,1)*100; 
震幅:震幅0,NODRAW,COLORRED;
超级大盘股:FINANCE(7)>=8000000000,COLORRED,NODRAW; 
大盘股:FINANCE(7)<8000000000 AND FINANCE(7)>=800000000,COLORYELLOW,NODRAW; 
中盘股:FINANCE(7)<800000000 AND FINANCE(7)>=400000000,COLORGREEN,NODRAW; 
小盘股:FINANCE(7)<400000000,COLORWHITE,NODRAW; 
盘小绩优:FINANCE(7)<1000000000 AND DYNAINFO(39)>0 AND DYNAINFO(39)<=28,COLOR9933FF,NODRAW; 
换手率:V/CAPITAL*100 NODRAW;

页: [1]

指标之家—公式指标程序代码分享—公式指标网's Archiver

通达信60分钟、日周超级共振副图指标源码