快速编辑公式源码的小窍门模块叠加法

> > > 快速编辑公式源码的小窍门模块叠加法快速编辑公式源码的小窍门模块叠加法 2012年11月17日九毛八公式指标www.9m8.cn

编辑一个靓丽的看似很难，但只要掌握一部分技巧，便会化难为简，前期向大家介绍的模块叠加方法就是其中的一例。这就需要平时多多积攒一些好的资料，到时就会有用处。
现在就把平时积攒的8个模块奉献给感兴趣的学友们，希望能从中受益！！！
奉献给大家的模块是：1主图均线模块， 2主图宝塔线模块， 3KDJ彩带模块， 4CCI彩带模块，5主图底部显示KDJ+MACD 的月、周、日彩条模块， 6显示威廉顶底模块， 7数显KDJ+MACD+CCI模块， 8主图标识文字模块。可以分别用其中的几种叠加成自己实用的指标公式来。
其中应注意的事：1因受软件不能超过50条的限制，有时可以适当的组合。2其中有些模块中有共同的KDJ、MACD、CCI等指标重复，在组合时必须只能编辑一次。3，用5.83版的软件可以不受50条限制，效果较好。

源码如下:
{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
BB:=日K
DD:=周K
EE:=月K
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));

{7数显KDJ+MACD+CCI模块}
{数显KDJ、MACD、CCI模块}
日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);
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;
CCI84:=(TYP-MA(TYP，84))/(0.015*AVEDEV(TYP，84));
CCI21:=(TYP-MA(TYP，21))/(0.015*AVEDEV(TYP，21));
CCI9:=(TYP-MA(TYP，9))/(0.015*AVEDEV(TYP，9));
{www.9m8.cn 九毛八公式指标网_指标公式}
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;

我组合的几个主图指标：

相关推荐