多指标叠加，同图显示， 快速编辑指标公式的小窍门-模块叠加法 编辑一个靓丽的指标公式看似很难，但只要掌握一部分技巧，便会化难为简，前期向大家介绍的模块叠加方法就是其中的一例。这就需要平时多多积攒一些好的资料，到时就会有用处。 现在就把平时积攒的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<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2); 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 |
