1、组合买卖,修改黑马线
组合买卖,原黑马线又时候太高,其他信号就显示不好,所以修改了一下黑马线
VAR3:=LLV(HIGH,240);
VAR4:=100*(CLOSE-VAR3)/VAR3;
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VARA:=BARSCOUNT(CLOSE);
VARB:=VAR8<20 AND VAR9<23 AND VARA>35;
VARC:=VARB AND COUNT(VARB,1)=1;
VARD:=EMA(CLOSE,21)-EMA(CLOSE,8);
VARE:=EMA(VARD,5);
VARF:=TROUGHBARS(3,6,1)<4 AND CROSS(VARD,VARE);
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR12:=ZIG(3,6)=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
VAR1A:=EMA(VAR19,100);
VAR1B:=2*(VAR19-VAR1A);
VAR1C:=POW(VAR1B,3)*0.1+POW(VAR1B,1);
VAR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
VAR1E:=EMA(VAR1D*0.97,3);
VAR1F:=(HIGH+LOW+CLOSE)/3;
VAR20:=(VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14));
VAR21:=CROSS(VAR1E,LOW);
选股买点: VAR10,COLORYELLOW;
www58188com:=VAR10, , COLORYELLOW;
组合买: (VAR11+VAR13+VAR15+VAR17), , COLORRED;
组合卖: (VAR12+VAR14+VAR16+VAR18), , COLORGREEN;
黑马线: IF(VAR1B>0.1,IF(VAR1C<5,VAR1C,5),0)*1, , COLOR6699CC;
黑马信号介入点: 选股买点 AND VARF AND VARC AND VAR21 AND VAR4<0 AND VAR5<2 AND VAR6=0, , COLORFFFF99;
DRAWTEXT(VAR13,0.6,'●'), ,COLORRED;
DRAWICON(组合买,组合买,1);
DRAWICON(组合卖,组合卖,9);
DRAWTEXT(黑马信号介入点>0,4.5,'●我的黑马介入点'), , COLORRED;
DRAWICON(选股买点>0,4.2,1);
DRAWTEXT(选股买点 AND VARF AND VARC,2.8,' 30%下单莫错过!'), , COLORMAGENTA;
DRAWTEXT(VAR18,3,'空仓'), , COLORGREEN;
DRAWTEXT(VAR20<-110 AND 选股买点>0,2,'选股买点'), ,COLORYELLOW;
DRAWTEXT(VAR17,1.3,'发现黑马'), , COLORFF6600;
DRAWTEXT(选股买点 AND VAR20<-100 AND VARF AND VARC>0,4.1,'★组合5分钟线选股思路获利5%以上'), , COLORRED;
2、港资+融资指标
自用的港资+融资的指标
~需要更新专业财务数据!~
{港资占流通比}
持股量(万):GPJYVALUE(6,1,1)/10000,NODRAW,COLORCYAN;
占总股比(%):(GPJYVALUE(6,1,1)/FINANCE(1))*100,NODRAW;
占流通比(%):(GPJYVALUE(6,1,1)/FINANCE(7))*100,LINETHICK2,COLORRED;
增减万股(万):(GPJYVALUE(6,1,1)-REF(GPJYVALUE(6,1,1),1))/10000,NODRAW,COLORGREEN;
持股金额(亿):(GPJYVALUE(6,1,1)*CLOSE)/100000000,NODRAW,COLORMAGENTA;
净买入(亿):(GPJYVALUE(6,1,1)*CLOSE-REF(GPJYVALUE(6,1,1),1)*CLOSE)/100000000,NODRAW,COLORWHITE;
{港资日买入}
BSZJ:=(GPJYVALUE(6,1,1)*CLOSE-REF(GPJYVALUE(6,1,1),1)*CLOSE)/100000000;
STICKLINE(BSZJ>=0,BSZJ,0,2.5,0),COLORRED;
STICKLINE(BSZJ<0,BSZJ,0,2.5,0),COLORGREEN;
{分析家公式网}
持股量(万):GPJYVALUE(6,1,1)/10000,NODRAW,COLORCYAN;
增减万股(万):(GPJYVALUE(6,1,1)-REF(GPJYVALUE(6,1,1),1))/10000,NODRAW;
净买入(亿):(GPJYVALUE(6,1,1)*CLOSE-REF(GPJYVALUE(6,1,1),1)*CLOSE)/100000000,NODRAW;
三日买入(亿):(GPJYONE(7,1,0,0)+GPJYONE(7,1,0,1)+GPJYONE(7,1,0,2))/10000,NODRAW,COLORYELLOW;
{融资买入}
BSZJ:=(GPJYVALUE(3,1,1)-REF(GPJYVALUE(3,1,1),1))/10000;
STICKLINE(BSZJ>=0,BSZJ,0,2.5,0),COLORRED;
STICKLINE(BSZJ<0,BSZJ,0,2.5,0),COLORGREEN;
融资余额(亿):GPJYVALUE(3,1,1)/10000,NODRAW,COLORRED;
净买卖额(万):(GPJYVALUE(3,1,1)-REF(GPJYVALUE(3,1,1),1)),NODRAW,COLORCYAN;
{融资占比曲线 顶尖财经网}
融资余额(亿):GPJYVALUE(3,1,1)/10000,LINETHICK2,COLORRED;
融券余量(万):GPJYVALUE(3,2,1)/10000,NODRAW,COLORMAGENTA;
融券余额(万):(GPJYVALUE(3,2,1)*CLOSE)/10000,NODRAW,COLORLIMAGENTA;
占流通比(%):((GPJYVALUE(3,1,1)*10000)/FINANCE(40))*100,NODRAW,COLORGREEN;
净买卖额(万):(GPJYVALUE(3,1,1)-REF(GPJYVALUE(3,1,1),1)),NODRAW,COLORCYAN;
3、多指标叠加,同图显示
快速编辑指标公式的小窍门-模块叠加法( 顶尖财经 股票学院: )
编辑一个靓丽的指标公式看似很难,但只要掌握一部分技巧,便会化难为简,前期向大家介绍的模块叠加方法就是其中的一例。这就需要平时多多积攒一些好的资料,到时就会有用处。
现在就把平时积攒的8个模块奉献给感兴趣的学友们,希望能从中受益!!!
奉献给大家的模块是:
1主图均线模块;
2主图宝塔线模块;
3KDJ彩带模块;
4CCI彩带模块 ;
5主图底部显示KDJ+MACD 的月、周、日彩条模块;
6显示威廉顶底模块;
7数显KDJ+MACD+CCI模块;
8主图标识文字模块。可以分别用其中的几种叠加成自己实用的指标公式来。
源码如下:
{1主图均线模块}
MA5:MA(CLOSE,5),COLOR0000FF,LINETHICK3;
MA10:MA(CLOSE,10),COLORFF00FF,LINETHICK1;
MA30:MA(CLOSE,30),COLORFFFF00,LINETHICK1;
MA60:MA(CLOSE,60),COLOR00FFFF,LINETHICK1;
DRAWKLINE(H,O,L,C);
{2主图宝塔线模块}
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),2.0,0),COLORRED;
VARD:=CLOSE
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),2.0,1),COLORCYAN;{ 收阴}
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3.6,0),COLORFF00FF;{ 买入}
DRAWICON(VAR19,LOW*0.97,1);
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3.6,0),COLOR00FFFF;{ 卖出 }
DRAWICON(VAR1A,HIGH*1.02,2);
{3KDJ彩带模块}
零轴:=DYNAINFO(3)*1.05,COLOR0000FF;
STICKLINE(1,90/200+零轴,90/200+零轴,2,0),COLOR00BBBB;
STICKLINE(1,10/200+零轴,10/200+零轴,2,0),COLORBBBBBB;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100+50/200;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
KK:=零轴+K/200;
DDK:=零轴+D/200;
JJ:=零轴+J/200;
EEK:=50/200+零轴;
DRAWBAND(KK,RGB(255,170,0),EEK,RGB(0,80,80));
DRAWBAND(JJ,RGB(240,0,240),KK,RGB(120,120,120));
IF(JJ>=REF(JJ,1),JJ,DRAWNULL),COLOR00FF00;
DRAWKLINE(H,O,L,C);
{4CCI彩带模块}
零轴2:=DYNAINFO(3)*0.6,COLOR0000FF;
VARDS:50/200+零轴2,COLOR00DD00;
VARDX:-50/200+零轴2,COLORDDDD00;
RTYP:=(HIGH+LOW+CLOSE)/3;
CCI14:=(RTYP-MA(RTYP,14))/(0.015*AVEDEV(RTYP,14))/2;
CCI84:=(RTYP-MA(RTYP,84))/(0.015*AVEDEV(RTYP,94))/2;
CCIA84:零轴2+CCI84 /200,COLOR00FFFF;
CCIB14:零轴2+CCI14 /200,COLORFFFFFF;
{5主图底部显示KDJ+MACD 的月、周、日彩条模块}
TT:=IF(ISLASTBAR,240/FROMOPEN,1);
NN:=120;
HH:=HHV(V*TT,NN);
LL:=LLV(V,NN);
最高:=CONST(HH);
最低:=CONST(LL);
最高2:=CONST(HHV(H,NN));
最低2:=CONST(LLV(L,NN));
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW;
RCC1:=最高2*0.9-(最高2-最低2)*PP;
最低3:=MIN(RCC1,最低2);
AAD:=最低3;
日K:="KD.K"(9,3,3);
日D:="KD.D"(9,3,3);
月K:="KDJ.K#MONTH"(9,3,3);
月D:="KDJ.D#MONTH"(9,3,3);
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
{MACD}
月DIF:="MACD.DIF#MONTH"(12,26,9);
月DEA:="MACD.DEA#MONTH"(12,26,9);
周DIF:="MACD.DIF#WEEK"(12,26,9);
周DEA:="MACD.DEA#WEEK"(12,26,9);
日DIF:="MACD.DIF"(12,26,9);
日DEA:="MACD.DEA"(12,26,9);
AA:=日K>=日D;
BB:=日K<日D;
DD:=周K>=周D;
EE:=月K>=月D;
MAA:=日DIF>=日DEA;
MBB:=周DIF>=周DEA;
MDD:=月DIF>=月DEA;
STICKLINE(1,AAD-0.000*AAD,AAD-0.024*AAD,4,1),COLOR464646;
STICKLINE(1,AAD-0.030*AAD,AAD-0.054*AAD,4,1),COLOR464646;
STICKLINE(1,AAD-0.060*AAD,AAD-0.084*AAD,4,1),COLOR464646;
STICKLINE(1,AAD-0.090*AAD,AAD-0.114*AAD,4,1),COLOR464646;
STICKLINE(1,AAD-0.120*AAD,AAD-0.144*AAD,4,1),COLOR464646;
STICKLINE(1,AAD-0.150*AAD,AAD-0.174*AAD,4,1),COLOR464646;
STICKLINE(AA,AAD-0.000*AAD,AAD-0.024*AAD,4,0),COLORRED;
STICKLINE(DD,AAD-0.030*AAD,AAD-0.054*AAD,4,0),COLOR00FFFF;
STICKLINE(EE,AAD-0.060*AAD,AAD-0.084*AAD,4,0),COLORFFFF00;
STICKLINE(MAA,AAD-0.090*AAD,AAD-0.114*AAD,4,0),COLORFF00FF;
STICKLINE(MBB,AAD-0.120*AAD,AAD-0.144*AAD,4,0),COLOR00BB00;
STICKLINE(MDD,AAD-0.150*AAD,AAD-0.174*AAD,4,0),COLORBBBB00;
{6显示威廉顶底模块}
威廉波段:=100-(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))*100;
威廉风险:=IF(威廉波段>95,(100/100+零轴)-(100/100+零轴)*0.009,100/100+零轴),COLOR00FFFF,LINETHICK0;
DRAWBAND(100/100+零轴,RGB(255,255,0),威廉风险,RGB(0,0,0));
WLDB:=IF(威廉波段<5,(0/100+零轴)+(0/100+零轴)*0.009,0/100+零轴),COLORFFFF00,LINETHICK1;
DRAWBAND(WLDB,RGB(255,0,0),0/100+零轴,RGB(0,0,0));
DRAWRECTREL(0,580,100,960,RGB(150,0,0));
DRAWRECTREL(100,580,200,960,RGB(0,150,150));
DRAWRECTREL(200,725,300,960,RGB(150,0,150));
DRAWTEXT_FIX(ISLASTBAR,0.04,0.60,0,'KDJ '),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.65,0,'月K= '),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.65,0, 月K),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.7,0,'月D='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.7,0,月D),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.75,0,'周K='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.75,0,周K),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.8,0,'周D='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.8,0,周D),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.85,0,'日K='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.85,0,日K),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.9,0,'日D='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.9,0,日D),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.13,0.60,0,'MACD '),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.11,0.65,0,'月DIF= '),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.155,0.65,0, 月DIF),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.11,0.7,0,'月DEA='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.155,0.7,0,月DEA),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.11,0.75,0,'周DIF='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.155,0.75,0,周DIF),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.11,0.8,0,'周DEA='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.155,0.8,0,周DEA),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.11,0.85,0,'日DIF='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.155,0.85,0,日DIF),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.11,0.9,0,'日DEA='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.155,0.9,0,日DEA),COLORFFFFFF;
{CCI84、21、9}
TYP:=(HIGH+LOW+CLOSE)/3;
WWW58188COM:=(HIGH+LOW+CLOSE)/3;
CCI21:=(TYP-MA(TYP,21))/(0.015*AVEDEV(TYP,21));
CCI9:=(TYP-MA(TYP,9))/(0.015*AVEDEV(TYP,9));
DRAWTEXT_FIX(ISLASTBAR,0.235,0.75,0,'CCI'),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.206,0.80,0,'CC9='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.250,0.80,0,CCI9),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.206,0.85,0,'CCI21='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.250,0.85,0,CCI21),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.206,0.90,0,'CCI84='),COLORFFFFFF;
DRAWNUMBER_FIX(ISLASTBAR,0.250,0.90,0,CCI84),COLORFFFFFF;
{8主图标识文字模块}
DRAWTEXT_FIX(1,0.05,0.04,0,'【彩色三角型标识】★★红色三角形---威廉底部★★黄色三角形--威廉顶部★★ '),COLORFFFF00;
DRAWTEXT_FIX(ISLASTBAR,0.4,0.70,0,'★【红色-日KDJ金叉】【黄色-周KDJ金叉】【青色-月KDJ金叉】★'),COLORFF00FF;
DRAWTEXT_FIX(ISLASTBAR,0.4,0.73,0,'★【粉色-日MACD金叉】【绿色-周MACD金叉】【深灰-月MACD金叉】★'),COLOR00FFFF;
[股票知识]通达信源码:组合买卖,港资+融资指标,多指标叠加
特别声明:文章内容仅供参考,不造成任何投资建议。投资者据此操作,风险自担。