戴初升 发表于 2010-11-17 15:49

自己一直使用的两个自编通达信指标,现将源码公布,奉献给喜欢的朋友。

自己一直使用的两个自编通达信指标,现将源码公布,奉献给喜欢的朋友。
一、听雨操盘Ⅱ。在原版的基础上有所改进,主要特点:1、B买S卖。稳重可靠的短线指标,显示B可买入,显示S可卖出,有买一定对应有卖,应用于大盘更加理想。2、均线系统。采用6、18、30、60、120、250周期均线系统,短线中线均较为独特。3、短线买入。激进的短线买入信号,一般快速反弹概率较大,适合快进快出。操作上应设好止损位,一旦失败应及时离场。4、抄底买入。K线下方出现红色箭头为波段抄底买入信号,虽然成功率也高,但也应设好止损位。5、阶段卖出。K线上方出现绿色箭头时可及时卖出,该指标能让你卖在较高位置,但也容易被主力震荡洗出,请结合实际情况使用,长线看好的股票及时做好回补。6、极品底。K线上出现洋红色(粉红色)实体及“极品底”字样,预示着调整幅度已经很大,中长线抄底介入胜算很高。7、金手指。大幅下跌后的超跌买入信号。8、阻力位 、支撑位、RSI值标示。9、K线中暗藏趋势线,K线蓝色空心柱表示下跌趋势,白色空心柱表示上升趋势。指标均不含未来函数★★★★★★用好技术指标能帮你最大幅度盈利减少不必要的损失,但指标不是万能的,影响股价的事件很多,指标只能从技术面计算,是程序化的,据此操作,盈亏自担!
二、天地量。1、盘中全天成交量虚拟显示。2、60天以来天量指示。3、60天来地量指示。4、250以来天量指示。4、主力出货提示。
指标源码如下:
一、听雨操盘Ⅱ。
MA6:MA(C,6),COLOR0000FF;
MA18:MA(C,18),COLOR0096FF;
MA30:MA(C,30),COLOR00FF99;
MA60:MA(C,60),COLORFF00FF;
MA120:MA(C,120),COLORWHITE;
{MA250:MA(C,250),COLORCYAN;}
D1:=((MEMA(CLOSE,3) - MEMA(CLOSE,6)) * 5);
S:=MA(C,9);
Z:=((EMA(D1,7) + EMA(CLOSE,5))-S)*100;
P:=EMA(Z,2);
D2:=IF(Z>P,1,0);
STICKLINE(D2=0,OPEN,CLOSE,0.8,0),COLORBLUE;
STICKLINE(D2=1,OPEN,CLOSE,0.8,0),COLORWHITE;
A:=C-MA6;
A1:=CROSS(A,0);
A2:=CROSS(0,A);
A3:=0.68*MA(FORCAST(CLOSE,2),40);
A4:=IF(C
A5:=CLOSE-OPEN;
A6:=OPEN-CLOSE;
A7:=IF(CLOSE>OPEN,A5,A6);
A8:=IF(OPEN
DRAWICON(A1 AND REF(A1,1)=0 ,L*0.98,7);
DRAWICON(A2 AND REF(A2,1)=0 ,H*1.02,8);
LC:=REF(C,1);
LD:=IF(C
LE:=COUNT(LD=1,20);
LF:=COUNT(LD=1,6);
LG:=MA6/4.5;
RSI1:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100,NODRAW,COLORYELLOW;
EE:=(CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100, ;
AA:=((REF(EE,1)<-30) AND EE>=REF(EE,1)) OR (REF(CROSS(-30,EE),1) AND CROSS(EE,-30)) OR EE=-30;
MJ0:=IF(AA AND LE<1,1,0);
VAR1:=DMA(CLOSE,VOL/MA(VOL,4)/4);
VAR2:=DMA(CLOSE,VOL/MA(VOL,31)/31);
VAR3:=(CLOSE-VAR1)/VAR1*100<-10;
VAR4:=(VAR1-VAR2)/VAR2*100<-16;
VAR5:=VAR3 AND VAR4;
VAR6:=VAR5 AND (OPEN>CLOSE OR OPEN-0;
DRAWTEXT(MJ0=1 AND MACD>REF(MACD,1),L*0.95,'极品底'),COLORMAGENTA;
DRAWTEXT(A<-LG AND LF=0,L*0.96,'下跌过急'),COLORYELLOW;
STICKLINE(A4=1,A8,A8+A7/2,2.8,0),COLORMAGENTA;
DRAWICON(VAR6,L*0.96,11);
PT:=REF(H,1)-REF(L,1);
CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
AH:=CDP+PT;
AL:=CDP-PT;
NH:=CDP*2-REF(L,1);
NL:=CDP*2-REF(H,1);
强:=IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;
阻力位:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;
M:=IF(AL
支撑位:IF(NL
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
RSI:SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100,NODRAW,COLORYELLOW;
DRAWICON(CROSS(J,0) AND RSI<33,L*0.995,1);
DRAWICON(CROSS(102,J),H*1.005,2);
DRAWTEXT(CROSS(J,5)AND RSI<40,L*0.98,'短买');
DRAWICON(CROSS(90,RSI),H+0.2,2);
{听雨操盘指标详细说明:......
1、B买S卖。K线下方出现B为买入信号,K线上方出现S时卖出信号。盘中出现可能因最新价的变化而发生变化,一般以收盘后为准,盘中可根据具体情况参考。本指标为较稳重的短线指标,用于大盘更好。
2、均线系统。本均线采用6、18、30、60、120天均线。
3、买入信号。K线最低价下方出现红色向上箭头时可买入,此信号为超跌买入信号,一般买入后很快能获得反弹收益,但在大跌初期常有继续探底可能,故熊市中需设好止损位及时认错出局。
4、短买信号。K线最低价下方出现“短买”字样,说明短线超卖严重反弹在即,可以做短线买入快进快出。同样存在短暂止跌又继续下跌的风险,也应该设好止损位,以便及时认错出局。
5、金手指。K线最低价下方出现手指状图标为中长线抄底买入信号,一般在股价长期调整后期出现,买入后中长线持有成功概率高。
6、极品底。K线最低价下方出现:“极品底”字样及K线中有小于K线实体的粉红色带状时表示股价进入相当低的位置,一般是长期调整后出现,中长线买入成功率极高。
7、逃顶卖出。K线上方出现绿色箭头时可进行逃顶卖出,该信号可能会让你卖在最高,但也容易被主力洗盘洗出局。
8、趋势线。在K线中暗藏有趋势线,即当K线中间有白色空心为上升趋势,蓝色空心为下降趋势。
9、K线窗口上方紧接着均线数值后面标有阻力位、支撑位、RSI指标值的数据。
★★★★★★用好技术指标能帮你最大幅度盈利减少不必要的损失,但指标不是万能的,影响股价的事件很多,指标只能从技术面计算,是程序化的,据此操作,盈亏自担!}
天地量:
虚拟VOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚拟VOL,0,-1,-1),COLOR00C0C0;
VOLUME:VOL,VOLSTICK;
MA5:MA(VOL,5),COLORRED;
MA10:MA(VOL,10),COLORGREEN;
MA30:=MA(VOL,30),COLORWHITE;
量能饱和:(AMOUNT/CLOSE)/HHV((AMOUNT/CLOSE),26)*100,NODRAW,COLORLIBLUE;
十日换手:SUM(V/CAPITAL*100,10),COLORGRAY;
MS:=FROMOPEN;
MM:=IF(CURRBARSCOUNT=1 AND MS<200,1,0);
MAVOL3:=MA(VOLUME,60);
MAVOB:=HHV(VOL,60);
MAVLB:=LLV(VOL,60);
地量:VOL=MAVLB AND MM=0,COLORMAGENTA;
天量:VOL=MAVOB,COLORYELLOW;
年天量:=VOL=HHV(VOL,250);
STICKLINE(地量,0,VOL*0.5,1.8,0),COLORMAGENTA;
STICKLINE(天量,VOL,VOL*0.7,2.5,0),COLORRED;
STICKLINE(年天量,VOL,VOL*0.85,1.8,0),COLORYELLOW;
大阴:=O-OPEN*0.05>C;
长上引:=H-C>REF(C,1)*0.05;
巨量:=VOL>MAVOL3*2;
顶部:=H>HHV(H,18)*0.92;
DRAWICON(VOL*50<REF(VOL,1) AND MM=0,VOL*1.05,12);
DRAWICON(VOL>50*REF(VOL,1),MA30,11);
DRAWICON((巨量 AND 顶部 AND (大阴 OR 长上引)) OR (VOL=HHV(VOL,120) AND (O>C OR 长上引)),VOL*1.05,9);
{天地量用法说明:
★主要特色★:1、盘中虚拟全天成交量。成交量上方的虚线框为虚拟的当天成交量,交易时间越长虚拟精度越高。2、天地量:标示出60个交易日以来的成交天量和地量,其中成交量柱状图上方出现红色柱状实体为60个交易日以来的最大量,即天量;出现洋红色(粉红色)柱状实体为60歌交易日以来的最小成交量,即地量。在红色柱状实体上方再次出现黄色柱状实体为250个交易日以来的最大成交量。股市谚语曰:“地量地价,天量天价”,实用性很强。3、量突变。当成交量较前一交易日出现50倍以上大的巨大突变时成交量柱状图上方出现手指图标提示。常常有无量涨停或无量跌停出现,给予关注。4、主力出逃。当成交量上方出现钱袋子图标时,极可能是主力突然逃跑,此时一般应紧紧跟随主力撤离,待到企稳再行介入。但这种情形又常常是主力故意打压震仓,可密切注意其他指标及时跟进。}

逆进而行 发表于 2017-5-3 08:04

已经补全,见下面:



MA6:MA(C,6),COLOR0000FF;
MA18:MA(C,18),COLOR0096FF;
MA30:MA(C,30),COLOR00FF99;
MA60:MA(C,60),COLORFF00FF;
MA120:MA(C,120),COLORWHITE;
{MA250:MA(C,250),COLORCYAN;}

D1:=((MEMA(CLOSE,3) - MEMA(CLOSE,6)) * 5);
S:=MA(C,9);
Z:=((EMA(D1,7) + EMA(CLOSE,5))-S)*100;
P:=EMA(Z,2);
D2:=IF(Z>P,1,0);
STICKLINE(D2=0,OPEN,CLOSE,0.8,0),COLORBLUE;
STICKLINE(D2=1,OPEN,CLOSE,0.8,0),COLORWHITE;

A:=C-MA6;
A1:=CROSS(A,0);
A2:=CROSS(0,A);
A3:=0.68*MA(FORCAST(CLOSE,2),40);
A4:=IF(C<A3 OR L<A3,1,0);
A5:=CLOSE-OPEN;
A6:=OPEN-CLOSE;
A7:=IF(CLOSE>OPEN,A5,A6);
A8:=IF(OPEN<CLOSE,OPEN,CLOSE);
DRAWICON(A1 AND REF(A1,1)=0 ,L*0.98,7);
DRAWICON(A2 AND REF(A2,1)=0 ,H*1.02,8);
LC:=REF(C,1);
LD:=IF(C<LC*0.89,1,0);
LE:=COUNT(LD=1,20);
LF:=COUNT(LD=1,6);
LG:=MA6/4.5;
RSI1:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100,NODRAW,COLORYELLOW;
EE:=(CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100, ;
AA:=((REF(EE,1)<REF(EE,2) AND EE<-30) AND EE>=REF(EE,1)) OR (REF(CROSS(-30,EE),1) AND CROSS(EE,-30)) OR EE=-30;
MJ0:=IF(AA AND LE<1,1,0);
VAR1:=DMA(CLOSE,VOL/MA(VOL,4)/4);
VAR2:=DMA(CLOSE,VOL/MA(VOL,31)/31);
VAR3:=(CLOSE-VAR1)/VAR1*100<-10;
VAR4:=(VAR1-VAR2)/VAR2*100<-16;
VAR5:=VAR3 AND VAR4;
VAR6:=VAR5 AND (OPEN>CLOSE OR OPEN<CLOSE) AND (OPEN-REF(CLOSE,1))/REF(CLOSE,1)>-0;
DRAWTEXT(MJ0=1 AND MACD>REF(MACD,1),L*0.95,'极品底'),COLORMAGENTA;
DRAWTEXT(A<-LG AND LF=0,L*0.96,'下跌过急'),COLORYELLOW;
STICKLINE(A4=1,A8,A8+A7/2,2.8,0),COLORMAGENTA;
DRAWICON(VAR6,L*0.96,11);

PT:=REF(H,1)-REF(L,1);
CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
AH:=CDP+PT;
AL:=CDP-PT;
NH:=CDP*2-REF(L,1);
NL:=CDP*2-REF(H,1);
强:=IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;
阻力位:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;
M:=IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL);
支撑位:IF(NL<M,CDP-(CDP-M)*0.618,NL)NODRAW,COLORLIRED;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
RSI:SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100,NODRAW,COLORYELLOW;
DRAWICON(CROSS(J,0) AND RSI<33,L*0.995,1);
DRAWICON(CROSS(102,J),H*1.005,2);
DRAWTEXT(CROSS(J,5)AND RSI<40,L*0.98,'短买');
DRAWICON(CROSS(90,RSI),H+0.2,2);

jsnjluxun 发表于 2014-9-17 12:43

中枢高:(LOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CROSSDOT,COLORLIRED;

小散2016 发表于 2017-3-6 21:00

{长阴短柱}
CY:=C<REF(C,1)*0.945 OR C<O*0.945;
KZF:=MAX(REF(C,1),O)/C;
VZF:=V/REF(V,1);
长阴短柱:=CY AND KZF>VZF;
{长腿}
JJ:=AMOUNT/(V*100);{均价}
CT1:=(MIN(O,C)-L)>(H-MAX(C,O)) AND (MIN(O,C)-L)>ABS(O-C)*2 AND MIN(C,O)>L*1.05 ;
CT2:=JJ>L*1.05 AND (MIN(C,O)-L)>ABS(C-O)*2 AND MIN(C,O)>L*1.05;
长腿:=(CT1 OR CT2);
XG:REF(长阴短柱,1) AND 长腿;

李骏 发表于 2010-11-17 16:06

谢谢楼主分享

时空过客 发表于 2010-11-17 16:10

谢谢楼主分享……

老兵新传 发表于 2010-11-17 16:17

学习、、、、

退步原来是向前 发表于 2010-11-17 16:28

谢谢楼主分享……   好人品

枫叶夏天 发表于 2010-11-17 18:50

dddddddddddddd

兰玫瑰 发表于 2010-11-17 19:36

谢谢楼主分享…

玉魄 发表于 2010-11-17 19:49

谢谢楼主分享@@@@

铃儿响钉铛 发表于 2010-11-17 20:42

自己一直使用的两个自编通达信指标

丁大大 发表于 2010-11-17 20:50

谢谢楼主分享…

李彦博 发表于 2010-11-17 20:54

dddddddddddddddddddddddddddddddddddd

大吉利 发表于 2010-11-17 21:03


清仓:=1.66*MA(FORCAST(CLOSE,2),40),COLORRED;
出货:=1.36*MA(FORCAST(CLOSE,2),40),COLOR08FFFF;
高抛:=1.16*MA(FORCAST(CLOSE,2),40),COLORFF82FF;
低吸:=0.82*MA(FORCAST(CLOSE,2),40),COLORF7E300;
满仓:=0.72*MA(FORCAST(CLOSE,2),40),COLORGREEN;
强通1:=清仓>REF(清仓,1),;
强通2:=出货>REF(出货,1),;
强通3:=高抛>REF(高抛,1),;
强通4:=低吸>REF(低吸,1),;
强通5:=满仓>REF(满仓,1),;
上升通道:=强通1 AND 强通2 AND 强通3 AND 强通4 AND 强通5,;

MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10),;
MA20:=MA(CLOSE,20);
MA30:=MA(CLOSE,30);
MA60:=MA(CLOSE,60);
五强:=MA5>REF(MA5,1),;
十强:=MA10>REF(MA10,1),;
二十强:=MA20>REF(MA20,1),;
三十强:=MA30>REF(MA30,1),;
六十强:=MA60>REF(MA60,1),;
小均强:=五强 AND 十强,;
均强:=十强 AND 二十强 AND 三十强,;
大均强:=十强 AND 二十强 AND 三十强 AND 六十强,;


JJD:=(H+L+C)/3;

强势线1:=HHV(MA((((LOW + HIGH) + CLOSE) / 3),8),60),COLORRED,LINETHICK2;
强势线2:=HHV(MA((((LOW + HIGH) + CLOSE) / 3.18),8),20),COLORWHITE,LINETHICK2;
强势线3:=HHV(MA((((LOW + HIGH) + CLOSE) / 3.258),8),10),COLORYELLOW,LINETHICK2;
强势线4:=HHV(MA((((LOW + HIGH) + CLOSE) / 3.08),80),13),COLORLIMAGENTA,LINETHICK2;

开始走强1:=强势线1>REF(强势线1,1),;
开始走强2:=强势线2>REF(强势线2,1),;
开始走强3:=强势线3>REF(强势线3,1),;
开始走强4:=强势线4>REF(强势线3,1),;
双强1:=开始走强1 AND 开始走强2,;
双强2:=开始走强2 AND 开始走强3,;
双强3:=开始走强2 AND 开始走强3,;
双强4:=开始走强3 AND 开始走强4,;
三强:=开始走强1 AND 开始走强2 AND 开始走强3,;
四强:=开始走强1 AND 开始走强2 AND 开始走强3 AND 开始走强4,;
强势为王:=双强1 OR 双强2 OR 双强3 OR 双强4 OR 三强 OR 四强,;

VV:=(C+L+H)/3;
DSA:=SMA(XMA(VV,15),2,1)LINETHICK3;
顶部1:=DSA*1.0888,COLORMAGENTA,LINETHICK1;
顶部2:=DSA*1.158,COLORBROWN,LINETHICK1;
顶部3:=DSA*1.218,COLORRED,LINETHICK1;
底部1:=DSA*0.9518,COLORLICYAN,LINETHICK1;
底部2:=DSA*0.888,COLORLIMAGENTA,LINETHICK1;
底部3:=DSA*0.8,COLORGREEN,LINETHICK1;


MA1:=MA(CLOSE,5);
MA2:=MA(CLOSE,10);
MA3:=MA(CLOSE,20);
MA4:=MA(CLOSE,60);
五日走强:=MA1>REF(MA1,1),;
十日走强:=MA2>REF(MA2,1),;
二十日走强:=MA3>REF(MA3,1),;
六十日走强:=MA4>REF(MA4,1),;
低位主升:=五日走强 AND 十日走强 AND 六十日走强,;
主升浪:=五日走强 AND 十日走强 AND 二十日走强,;
大主升浪:=十日走强 AND 二十日走强 AND 六十日走强,;
大主升浪2:=五日走强 AND 十日走强 AND 二十日走强 AND 六十日走强,;
总主升:=主升浪 AND 大主升浪 AND 大主升浪2,;
总主升浪:=低位主升 OR 主升浪 OR 大主升浪 OR 大主升浪2 OR 总主升,;
强势主升低买:L<底部1 AND 总主升浪 AND 强势为王 AND C<DSA,COLORYELLOW,LINETHICK2;
猎股小王:L<底部1 AND C<DSA AND 强势为王,COLORMAGENTA,LINETHICK2,LINESTICK;
DRAWICON(猎股小王>0,1.1,1);
猎股大王出击:=强势主升低买 AND 猎股小王 AND H<DSA,COLORRED,;
;
A:=MA(C,30);
A1:=A*1.1;
A4:=A*0.9;
A2:=A1-(A1-A4)*0.191;
持仓:=IF(HIGH*1.01>A2 OR REF(HIGH,1)>REF(A2,1),A1,A4),LINETHICK3,COLORRED;
生命线:=IF(HIGH*1.01>A2 OR REF(HIGH,1)>REF(A2,1),A2,A4),LINETHICK3,COLORFFFFFF;
主升持仓:=持仓>生命线,;
主升1:=持仓>REF(持仓,1),;
主升2:=生命线>REF(生命线,1),;
主升:=主升1 AND 主升2,;
主升猎股王:=(猎股大王出击 AND 主升持仓 AND 主升) OR (猎股小王 AND 主升持仓 AND 主升),;
绝对的主升:(主升猎股王 AND 小均强) OR (猎股小王 AND 小均强),COLORYELLOW,LINETHICK4,STICK;


本帖隐藏的内容需要回复才可以浏览DRAWICON(绝对的主升>0,1.1,1);
DRAWICON(绝对的主升>0,1.1,1);
DRAWICON(绝对的主升>0,0.6,9);
DRAWICON(绝对的主升>0,0.3,9);

毛学军 发表于 2010-11-17 22:32

回复 1# 戴初升


    好指标。

毛学军 发表于 2010-11-17 22:36

回复 1# 戴初升


    指标不全:A4:=IF(C

ybo 发表于 2010-11-17 23:07

谢谢楼主分享
页: [1] 2 3 4 5 6 7 8 9 10
查看完整版本: 自己一直使用的两个自编通达信指标,现将源码公布,奉献给喜欢的朋友。