编程思路破译:
龙赋值:收盘价的2日简单移动平均
天赋值:1日前的30日内收盘价的最高值的2日简单移动平均
海赋值:1日前的30日内收盘价的最低值的2日简单移动平均
输出潜龙出海:龙上穿海 AND 天/海>110/100
当满足条件潜龙出海时,在1位置书写文字,画黄色
输出亢龙有悔:2-(天上穿龙 AND 天/海>110/100)
当满足条件亢龙有悔时,在1.5位置书写文字,画蓝色
R赋值:RSI
MAR赋值:R的3日简单移动平均
F赋值:100*(收盘价-1日前的收盘价)/1日前的收盘价
HHH赋值:R的25日指数移动平均+6,画蓝色
输出JIN:当满足条件2日前的R>3日前的RANDREF(R,2)>1日前的RANDR>1日前的RANDMAR>1日前的MAR+1ANDREF(MAR,2)-1日前的MAR>-1ANDREF(R,1)<1日前的MARANDREF(R,2)-2日前的MAR>-3ANDREF(R,1)<38AN时,在R<HHHANDF<8和0.5位置之间画柱状线,宽度为1,1不为0则画空心柱.,画棕色
当满足条件JIN时,在1.5位置书写文字,画棕色
VOLUME赋值:成交量(手)/1000000,VOLSTICK
MAVOL1赋值:VOLUME的5日简单移动平均/1000000
MAVOL2赋值:VOLUME的35日简单移动平均/1000000
MAVOL3赋值:VOLUME的135日简单移动平均/1000000
输出地量:如果0.9上穿1/成交量(手)*1000>0.01AND"KDJ的J"<0,返回0.5,否则返回0,画黄色,线宽为2
当满足条件0.9上穿1/成交量(手)*1000>0.01AND"KDJ的J"<0时,在0.2位置书写文字,画棕色
天衣赋值:(收盘价-10日内最低价的最低值)/(25日内最高价的最高值-10日内最低价的最低值)*4的4日指数移动平均*25
无逢赋值:天衣的2日[1日权重]移动平均
输出无逢买点:天衣上穿无逢AND 无逢<15,画红色
当满足条件无逢买点时,在0.5位置书写文字,画红色
T赋值:如果(收盘价的有效数据周期数>7),返回(100)*((收盘价的7日简单移动平均)/(7日内收盘价的7日简单移动平均的最低值)-1),否则返回1
N赋值:如果(T>0.35),返回6,否则返回65
W赋值:((-((100)*(N日内最高价的最高值 - 收盘价))/(N日内最高价的最高值 - N日内最低价的最低值)))
RV赋值:(收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值)*100
RG赋值:(收盘价-5日内最低价的最低值)/(5日内最高价的最高值-5日内最低价的最低值)*100
J0赋值:(最高价+最低价)/2
QJ赋值:J0的3日指数移动平均
J1赋值:如果收盘价>QJ,返回成交量(手),否则返回0
J2赋值:如果收盘价<QJ,返回成交量(手),否则返回0
BB赋值:J1-J2的22日累和的3日简单移动平均
累加赋值:21*BB+20*1日前的BB+19*2日前的BB+18*3日前的BB+17*4日前的BB+16*5日前的BB+15*6日前的BB+14*7日前的BB+13*8日前的BB+12*9日前的BB+11*10日前的BB+10*11日前的BB+9*12日前的BB+8*13日前的BB+7*14日前的BB+6*15日前的BB+5*16日前的BB+4*17日前的BB+3*18日前的BB+2*19日前的BB+20日前的BB
WMA2赋值:累加/(21+1)/21*2
CC赋值:WMA2
VAR3赋值:(BB-CC)
VAR4赋值:RV的3日[1日权重]移动平均
VAR5赋值:VAR4的3日[1日权重]移动平均
KK赋值:RG的3日[1日权重]移动平均的2日指数移动平均
DD赋值:KK的3日[1日权重]移动平均
输出天张停:W上穿-2 AND VAR4上穿VAR5 AND KK上穿DD,画洋红色
当满足条件天张停时,在0.5位置书写文字,画洋红色
GJW1赋值:(最高价+最低价+收盘价)/3
GJW2赋值:(GJW1-GJW1的14日简单移动平均)/(0.015*GJW1的14日平均绝对偏差)
CCI低位穿赋值:GJW2上穿-100
RSI金赋值:"RSI的RSI1"(6,2,2)上穿20 OR "RSI的RSI1"上穿"RSI的RSI2"
KDJ金赋值:"KDJ的K"上穿"KDJ的D" AND "KDJ的J"<30
KDJ二金赋值:"KDJ的K"上穿"KDJ的D"AND"KDJ的D"<23的15日累和>=2 AND "KDJ的K"上穿"KDJ的D" AND "KDJ的J"<30
MACD金赋值:"平滑异同平均的DIF"上穿"平滑异同平均的DEA" AND "平滑异同平均的DEA" <0
MACD二金赋值:"平滑异同平均的DIF"上穿"平滑异同平均的DEA"AND"平滑异同平均的DEA"<0的15日累和>=2 AND "平滑异同平均的DIF"上穿"平滑异同平均的DEA" AND "平滑异同平均的DEA"<0
GJW3赋值:CCI低位穿+RSI金+KDJ金+KDJ二金+MACD金+MACD二金
GJW4赋值:如果GJW3=2,返回如果1日前的GJW3>=1,返回25,否则返回15,否则返回如果GJW3=1,返回如果1日前的GJW3=2,返回25,否则返回0,否则返回0
输出穿叉:如果GJW3>=3,返回30,否则返回GJW4/10,画黄色,线宽为2
量赋值:成交量(手),VOLSTICK
MA5赋值:成交量(手)的5日简单移动平均,线宽为2
MA35赋值:成交量(手)的35日简单移动平均,线宽为2
N1赋值:(收盘价-1日前的收盘价)/收盘价
输出缩量:如果MA35>1.8*MA5ANDV<成交量(手)的5日简单移动平均ANDN1>-0.03ANDN1<0.03ANDMA(成交量(手),35)<成交量(手)的135日简单移动平均,返回1,否则返回0
简赋值:收盘价的12日指数移动平均-收盘价的29日指数移动平均
单赋值:简的9日指数移动平均
实赋值:(简-单)*2
用赋值:如果实>1日前的实AND实<0,返回8,否则返回0
选赋值:(最低价+最高价+收盘价)/3的5日简单移动平均,线宽为0,COLOR4080FF
股赋值:4*(收盘价-6日内最低价的最低值)/(6日内最高价的最高值-6日内最低价的最低值)*100的5日[1日权重]移动平均-3*(收盘价-6日内最低价的最低值)/(6日内最高价的最高值-6日内最低价的最低值)*100的5日[1日权重]移动平均的3.2日[1日权重]移动平均
公赋值:1日前的收盘价
式赋值:收盘价-公和0的较大值的6日[1日权重]移动平均/收盘价-公的绝对值的6日[1日权重]移动平均*100
输出入:式上穿25
输出买:如果收盘价上穿选AND用ANDREF("KDJ的J",1)<0AND"KDJ的J">0,返回0.8,否则返回0
输出进:如果收盘价上穿选AND用ANDCROSS(股,8),返回0.6,否则返回0
从前20日到前0日持续(最高价-最低价)/1日前的收盘价<0.1 AND 成交量(手)>1日前的成交量(手)*2 AND 收盘价>1日前的收盘价*1.03AND "DMI的PDI">"DMI的MDI" AND "DMI的ADX"上穿"DMI的ADXR"AND"DMI的ADXR">"DMI的MDI" AND "DMI的PDI">"DMI的ADX" AND"KDJ的D">1日前的"KDJ的D"
((收盘价的2日指数移动平均-收盘价的10日指数移动平均)上穿(收盘价的2日指数移动平均-收盘价的10日指数移动平均)的2日指数移动平均ANDEMA((收盘价的2日指数移动平均-收盘价的10日指数移动平均),2)<0ANDCROSS(收盘价,收盘价的20日简单移动平均))的90日过滤
程序源码:
通达信龙出海指标龙:=MA(C,2);
天:=MA(REF(HHV(C,30),1),2);
海:=MA(REF(LLV(C,30),1),2);
潜龙出海:CROSS(龙,海) AND 天/海>110/100;
DRAWTEXT(潜龙出海,1,'龙出海'),COLORYELLOW;
亢龙有悔:2-(CROSS(天,龙) AND 天/海>110/100);
DRAWTEXT(亢龙有悔,1.5,'龙潜水'),COLORBLUE;
R:=RSI;
MAR:=MA(R,3);
F:=100*(C-REF(C,1))/REF(C,1);
HHH:=EMA(R,25)+6,COLORBLUE;
JIN:STICKLINE(REF(R,2)>REF(R,3) AND REF(R,2)>REF(R,1) AND R>REF(R,1)
AND MAR>REF(MAR,1)+1 AND REF(MAR,2)-REF(MAR,1)>-1
AND REF(R,1)<REF(MAR,1) AND REF(R,2)-REF(MAR,2)>-3
AND REF(R,1)<38 AND R<HHH AND F<8,0.5,1,1,0),COLORBROWN;
DRAWTEXT(JIN,1.5,'RSI买点'),COLORBROWN;
VOLUME:=VOL/1000000,VOLSTICK;
MAVOL1:=MA(VOLUME,5)/1000000;
MAVOL2:=MA(VOLUME,35)/1000000;
MAVOL3:=MA(VOLUME,135)/1000000;
地量:IF(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),0.5,0),COLORYELLOW,LINETHICK2;
DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),0.2,'地量'),COLORBROWN;
天衣:=EMA((CLOSE-LLV(LOW,10))/(HHV(HIGH,25)-LLV(LOW,10))*4,4)*25;
无逢:=SMA(天衣,2,1);
无逢买点:CROSS(天衣,无逢)AND 无逢<15,COLORRED;{15可以调整}
DRAWTEXT(无逢买点,0.5,'无缝买点'),COLORRED;
T:=IF((BARSCOUNT(C) > 7),(100)*((MA(C,7))/(LLV(MA(C,7),7)) - 1),1);
N:=IF((T > 0.35),6,65);
W:=((-((100)*(HHV(H,N) - C))/(HHV(HIGH,N) - LLV(L,N))));
RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
J0:=(HIGH+LOW)/2;
QJ:=EMA(J0,3);
J1:=IF(CLOSE>QJ,VOL,0);
J2:=IF(CLOSE<QJ,VOL,0);
BB:=MA(SUM(J1-J2,22),3);
累加:=21*BB+20*REF(BB,1)+19*REF(BB,2)+18*REF(BB,3)+17*REF(BB,4)
+16*REF(BB,5)+15*REF(BB,6)+14*REF(BB,7)+13*REF(BB,8)+12*REF
(BB,9)+11*REF(BB,10)+10*REF(BB,11)+9*REF(BB,12)+8*REF(BB,13)
+7*REF(BB,14)+6*REF(BB,15)+5*REF(BB,16)+4*REF(BB,17)+3*REF
(BB,18)+2*REF(BB,19)+REF(BB,20);
WMA2:=累加/(21+1)/21*2;
CC:=WMA2;
VAR3:=(BB-CC);VAR4:=SMA(RV,3,1);
VAR5:=SMA(VAR4,3,1);
KK:=EMA(SMA(RG,3,1),2);
DD:=SMA(KK,3,1);
天张停:CROSS(W,-2) AND CROSS(VAR4,VAR5) AND CROSS(KK,DD),COLORMAGENTA;
DRAWTEXT(天张停,0.5,'天张停'),COLORMAGENTA;
GJW1:=(HIGH+LOW+CLOSE)/3;
GJW2:=(GJW1-MA(GJW1,14))/(0.015*AVEDEV(GJW1,14));
CCI低位穿:=CROSS(GJW2,-100);
RSI金:=CROSS("RSI.RSI1"(6,2,2),20) OR CROSS("RSI.RSI1","RSI.RSI2");
KDJ金:=CROSS("KDJ.K","KDJ.D") AND "KDJ.J"<30;
KDJ二金:=SUM(CROSS("KDJ.K","KDJ.D")AND "KDJ.D"<23,15)>=2 AND CROSS("KDJ.K","KDJ.D") AND "KDJ.J"<30;
MACD金:=CROSS("MACD.DIF","MACD.DEA") AND "MACD.DEA" <0;
MACD二金:=SUM(CROSS("MACD.DIF","MACD.DEA") AND "MACD.DEA"<0,15)>=2 AND CROSS("MACD.DIF","MACD.DEA") AND "MACD.DEA"<0;
GJW3:=CCI低位穿+RSI金+KDJ金+KDJ二金+MACD金+MACD二金;
GJW4:=IF(GJW3=2,IF(REF(GJW3,1)>=1,25,15),IF(GJW3=1,IF(REF(GJW3,1)=2,25,0),0));
穿叉:IF(GJW3>=3,30,GJW4)/10,COLORYELLOW,LINETHICK2;
量:=VOL,VOLSTICK;
MA5:=MA(V,5),LINETHICK2;
MA35:=MA(V,35),LINETHICK2;
N1:=(C-REF(C,1))/C;
缩量:IF(MA35>1.8*MA5 AND V<MA(V,5) AND N1>-0.03 AND N1<0.03 AND MA(V,35)<MA(V,135) ,1,0);
简:=EMA(CLOSE,12)-EMA(CLOSE,29);
单:=EMA(简,9);
实:=(简-单)*2;
用:=IF(实>REF(实,1) AND 实<0,8,0);
选:=MA((LOW+HIGH+CLOSE)/3,5),LINETHICK0,COLOR4080FF;
股:=4*SMA((CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100,5,1),3.2,1);
公:=REF(CLOSE,1);
式:=SMA(MAX(CLOSE-公,0),6,1)/SMA(ABS(CLOSE-公),6,1)*100;
入:CROSS(式,25);
买:IF(CROSS(C,选) AND 用 AND REF("KDJ.J",1)<0 AND "KDJ.J">0,0.8,0);
进:IF(CROSS(C,选) AND 用 AND CROSS(股,8),0.6,0);
LAST((H-L)/REF(C,1)<0.1,20,0) AND VOL>REF(VOL,1)*2 AND C>REF(C,1)*1.03
AND "DMI.PDI">"DMI.MDI" AND CROSS("DMI.ADX","DMI.ADXR")
AND"DMI.ADXR">"DMI.MDI" AND "DMI.PDI">"DMI.ADX" AND"KDJ.D">REF("KDJ.D",1);
FILTER((CROSS((EMA(CLOSE,2)-EMA(CLOSE,10)),
EMA((EMA(CLOSE,2)-EMA(CLOSE,10)),2))
AND EMA((EMA(CLOSE,2)-EMA(CLOSE,10)),2)
<0 AND CROSS(C,MA(C,20))),90);
联系客服
