（★申请加精★）BBD 活跃度交易护驾-短线三合一,股海明灯，量学官网，量学知识股票论坛。

玫瑰海 发表于 2010-4-6 09:18

（★申请加精★）BBD 活跃度交易护驾-短线三合一

本帖最后由股懂股动于 2010-4-6 16:25 编辑

短线三合一
本人发现三个指标组合使用效果不错，欢迎老师同学们多多指点！
一个模式、简单重复、机械操作
使用方法：第一步：用BBD指标选出BBD翻红（包括BBD由负转正、由下降转上升）的股票；
      第二步：用活跃度指标中的MAO线多头向上筛选；
      第三步：用交易护驾指标中----多头>空头，引力上升，近台比翻红三个条件中满足其中任意两个为条件进一步筛选；
      届时选出的股票再根据当时热点、成交量、K线形态等等再N选一！
源码如下：
{BBD}
(注：本人加了一个斜率指标)
ZZ:=(HHV(H,3)+LLV(L,3))/2;A:=IF(C>ZZ,VOL,0);B:=IF(C<ZZ,VOL,0);总0:=(A-B);
BBD:EMA(总0,3)/SUM(VOL,5)*100,LINETHICK;
STICKLINE(BBD>=0 AND BBD>REF(BBD,1),0,BBD,3,0),COLOR000088;
STICKLINE(BBD>=0 AND BBD>REF(BBD,1),0,BBD,1.5,0),COLOR0000AA;
STICKLINE(BBD>=0 AND BBD>REF(BBD,1),0,BBD,1,0),COLOR0000CC;
STICKLINE(BBD>=0 AND BBD>REF(BBD,1),0,BBD,0.5,0),COLOR0000FF;
STICKLINE(BBD>=0 AND BBD<REF(BBD,1),0,BBD,3,0),COLOR880088;
STICKLINE(BBD>=0 AND BBD<REF(BBD,1),0,BBD,1.5,0),COLORAA00AA;
STICKLINE(BBD>=0 AND BBD<REF(BBD,1),0,BBD,1,0),COLORDD00DD;
STICKLINE(BBD>=0 AND BBD<REF(BBD,1),0,BBD,0.5,0),COLORFF00FF;
STICKLINE(BBD<0,0,BBD,3,0),COLOR008800;
STICKLINE(BBD<0,0,BBD,1.5,0),COLOR00AA00;
STICKLINE(BBD<0,0,BBD,1,0),COLOR00DD00;
STICKLINE(BBD<0,0,BBD,0.5,0),COLOR00FF00;
XH1:=REF(BBD,1)<REF(BBD,2) AND REF(BBD,1)<-10 AND BBD>REF(BBD,1) AND BBD>0;
XH2:=REF(BBD,1)>=REF(BBD,2) AND REF(BBD,1)>8 AND BBD<REF(BBD,1) AND BBD<0;
DRAWICON(XH1,0-2,1);DRAWICON(XH2,0+2,2);

①周:=REF(EMA(C,5),1);
②周:=REF(EMA(C,10),1);
③周:=REF(EMA(C,15),1);
④周:=REF(EMA(C,20),1);
⑤周:=REF(EMA(C,25),1);
⑥周:=REF(EMA(C,30),1);
①X:=EMA(C,5)-①周;
②X:=EMA(C,10)-②周;
③X:=EMA(C,15)-③周;
④X:=EMA(C,20)-④周;
⑤X:=EMA(C,25)-⑤周;
⑥X:=EMA(C,30)-⑥周;
DT2:=①X>=0 AND ②X>=0 AND ③X>=0 AND ④X>=0 AND ⑤X>=0 AND ⑥X>=0;
KT2:=①X<0 AND ②X<0 AND ③X<0 AND ④X<0 AND ⑤X<0 AND ⑥X<0;
GT2:=NOT(DT2) AND NOT(KT2);
AA:=DT2 AND( REF(①X,1)<0 OR REF(②X,1)<0 OR REF(③X,1)<0 OR REF(④X,1)<0 OR REF(⑤X,1)<0 ORREF(⑥X,1)<0);
BB:=GT2 AND (REF(①X,1)<0 AND REF(②X,1)<0 AND REF(③X,1)<0 AND REF(④X,1)<0 AND REF(⑤X,1)<0 AND REF(⑥X,1)<0);
XG1:=AA OR BB;
XG2:=BBD>0 AND BBD>REF(BBD,1) AND REF(BBD,1)<0;
STICKLINE(XG1 AND XG2,0,BBD/2,3,0),COLOR008888;
STICKLINE(XG1 AND XG2,0,BBD/2,1.5,0),COLOR00AAAA;
STICKLINE(XG1 AND XG2,0,BBD/2,1,0),COLOR00CCCC;
STICKLINE(XG1 AND XG2,0,BBD/2,0.5,0),COLOR00FFFF;
------------------------------------------------------------------------------------------------------------
{交易护驾}

Z_1:=C-REF(C,1);
空:=EMA(EMA(Z_1,6),6)/EMA(EMA(ABS(Z_1),6),6)*20,LINETHICK0,COLOR00FF00;
多:=(空*2-FORCAST(空,9)),LINETHICK0,COLORFF59FF;
{警报}
J1:=IF(多<=空,多,DRAWNULL);
J2:=IF(多<=空,多,REF(J1,1));
J3:=IF(多<=空,多,REF(J2,1));
J4:=IF(多<=空,多,REF(J3,1));
J5:=IF(多<=空,多,REF(J4,1));
J6:=IF(多<=空,多,REF(J5,1));
J7:=IF(多<=空,多,REF(J6,1));
J8:=IF(多<=空,多,REF(J7,1));
J9:=IF(多<=空,多,REF(J8,1));
J10:=IF(多<=空,多,REF(J9,1));
J11:=IF(多<=空,多,REF(J10,1));
J12:=IF(多<=空,多,REF(J11,1));
J13:=IF(多<=空,多,REF(J12,1));
J14:=IF(多<=空,多,REF(J13,1));
J15:=IF(多<=空,多,REF(J14,1));
JJ_1:=IF(多<=空,多,REF(J15,1));
JJ1:=IF(多>空,空,DRAWNULL);
JJ2:=IF(多>空,空,REF(JJ1,1));
JJ3:=IF(多>空,空,REF(JJ2,1));
JJ4:=IF(多>空,空,REF(JJ3,1));
JJ5:=IF(多>空,空,REF(JJ4,1));
JJ6:=IF(多>空,空,REF(JJ5,1));
JJ7:=IF(多>空,空,REF(JJ6,1));
JJ8:=IF(多>空,空,REF(JJ7,1));
JJ9:=IF(多>空,空,REF(JJ8,1));
JJ10:=IF(多>空,空,REF(JJ9,1));
JJ11:=IF(多>空,空,REF(JJ10,1));
JJ12:=IF(多>空,空,REF(JJ11,1));
JJ13:=IF(多>空,空,REF(JJ12,1));
JJ14:=IF(多>空,空,REF(JJ13,1));
JJ15:=IF(多>空,空,REF(JJ14,1));
JJ_2:=IF(多>空,空,REF(JJ15,1));
K1:=IF(多>空,1,IF(多<空,-1,0));
KJ1:=IF(K1!=0,K1,DRAWNULL);
KJ2:=IF(K1!=0,K1,REF(KJ1,1));
KJ3:=IF(K1!=0,K1,REF(KJ2,1));
KJ4:=IF(K1!=0,K1,REF(KJ3,1));
KJ5:=IF(K1!=0,K1,REF(KJ4,1));
KJ6:=IF(K1!=0,K1,REF(KJ5,1));
KJ7:=IF(K1!=0,K1,REF(KJ6,1));
KJ8:=IF(K1!=0,K1,REF(KJ7,1));
KJ9:=IF(K1!=0,K1,REF(KJ8,1));
KJ10:=IF(K1!=0,K1,REF(KJ9,1));
KJ11:=IF(K1!=0,K1,REF(KJ10,1));
KJ12:=IF(K1!=0,K1,REF(KJ11,1));
KJ13:=IF(K1!=0,K1,REF(KJ12,1));
KJ14:=IF(K1!=0,K1,REF(KJ13,1));
KJ15:=IF(K1!=0,K1,REF(KJ14,1));
K2:=IF(K1!=0,K1,REF(KJ15,1));
警报:IF(K2>0,JJ_1,JJ_2),COLOR00B4FF;
{-----------------【图解模板】---------------------}
DRAWBAND(空,RGB(0,158,0),多,RGB(180,0,0));
RSV:=(C-LLV(L,3))/(HHV(H,3)-LLV(L,3))*100;
K:=SMA(RSV,2,1);       D:=SMA(K,2,1);       J:=3*K-2*D;
引力:SMA(J,2,1)-SMA(J,3,1),NODRAW;
STICKLINE(引力>0,0,引力,2,0),COLORLIRED;
STICKLINE(引力<0,0,引力,2,0),COLORLIBLUE;
{画各线}
空头:空,COLOR00FF00;
多头:多,COLORFF59FF;
{近台比}
JT_B1:=(O+L+H+C*3)/6;
WMA:=(5*JT_B1+4*REF(JT_B1,1)+3*REF(JT_B1,2)+2*REF(JT_B1,3)+1*REF(JT_B1,4))/(5+4+3+2+1);
JT_B2:=REVERSE(JT_B1)+2*WMA;
JT_B3:=3*JT_B2-2*SMA(JT_B2,2,1);
JTB4:=IF(BARSLAST(C>JT_B3),JT_B3,DRAWNULL);
JT_B4:=IF(BARSLAST(C>JT_B3),JT_B3,REF(JTB4,1));
JTB5:=IF(BARSLAST(C<=JT_B3),JT_B3,DRAWNULL);
JT_B5:=IF(BARSLAST(C<=JT_B3),JT_B3,REF(JTB5,1));
JT_B6:=IF(C<=JT_B3,JT_B4,JT_B5);
近台比: (C-JT_B6)/JT_B6*100,COLORLIMAGENTA,NODRAW;
STICKLINE(近台比>0 AND 近台比>REF(近台比,1),-16,-18,2,0),COLORRED;
STICKLINE(NOT(近台比>0 AND 近台比>REF(近台比,1)),-16,-18,2,0),COLORGREEN;
-------------------------------------------------------------------------------------------------------------
{活跃度}
SC:100*(CLOSE-MA(CLOSE,26)),COLORGRAY,LINETHICK3;
MAO:EMA(SC,9),COLORRED,LINETHICK3;
上:IF(MAO>REF(MAO,1),MAO,DRAWNULL),COLORRED;
下:IF(MAO<REF(MAO,1),MAO,DRAWNULL),COLORLIGREEN,LINETHICK3;
LC:=REF(CLOSE,1);
RSI5:=SMA(MAX(CLOSE-LC,0),3,1)/SMA(ABS(CLOSE-LC),3,1)*100;
WR10:=100*(HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5));
活跃度:RSI5-WR10,LINETHICK0,COLORYELLOW;
STICKLINE(活跃度>0,0,活跃度,3,0),COLOR000088;
STICKLINE(活跃度>0,0,活跃度,1.5,0),COLOR0000AA;
STICKLINE(活跃度>0,0,活跃度,1,0),COLOR0000CC;
STICKLINE(活跃度>0,0,活跃度,0.5,0),COLOR0000FF;
STICKLINE(活跃度<0,0,活跃度,3,0),COLOR008800;
STICKLINE(活跃度<0,0,活跃度,1.5,0),COLOR00AA00;
STICKLINE(活跃度<0,0,活跃度,1,0),COLOR00DD00;
STICKLINE(活跃度<0,0,活跃度,0.5,0),COLOR00FF00;
STICKLINE(活跃度>68 AND 活跃度<78,0,活跃度,3,0),COLOR888800;
STICKLINE(活跃度>68 AND 活跃度<78,0,活跃度,1.5,0),COLORAAAA00;
STICKLINE(活跃度>68 AND 活跃度<78,0,活跃度,1,0),COLORCCCC00;
STICKLINE(活跃度>68 AND 活跃度<78,0,活跃度,0.5,0),COLORFFFF00;
STICKLINE(活跃度>78,0,活跃度,3,0),COLOR008888;
STICKLINE(活跃度>78,0,活跃度,1.5,0),COLOR00AAAA;
STICKLINE(活跃度>78,0,活跃度,1,0),COLOR00DDDD;
STICKLINE(活跃度>78,0,活跃度,0.5,0),COLOR00FFFF;

SAT:=(AMOUNT/CLOSE)/(HHV(AMOUNT,20)/HHV(CLOSE,20));
饱和度:IF(SAT>1,1,SAT)*100,NODRAW,COLORYELLOW;
高:=80,COLORRED;
STICKLINE(高,80,80,3,0),COLORLIMAGENTA;
低:=-100,COLORGREEN;
STICKLINE(低,-100,-100,3,0),COLORGREEN;
DRAWBAND(SC,RGB(155,0,0),MAO,RGB(0,100,0));
DRAWICON(CROSS(SC,MAO),MAO*0.945,13);
DRAWICON(饱和度=100,82,12);

lzh6868689 发表于 2015-1-14 13:00

{交易护驾}Z_1:=C-REF(C,1); 空:=EMA(EMA(Z_1,6),6)/EMA(EMA(ABS(Z_1),6),6)*20,LINETHICK0,COLOR00FF00; 多:=(空*2-FORCAST(空,9)),LINETHICK0,COLORFF59FF;{警报} J1:=IF(多<=空,多,DRAWNULL); J2:=IF(多<=空,多,REF(J1,1)); J3:=IF(多<=空,多,REF(J2,1)); J4:=IF(多<=空,多,REF(J3,1)); J5:=IF(多<=空,多,REF(J4,1)); J6:=IF(多<=空,多,REF(J5,1)); J7:=IF(多<=空,多,REF(J6,1)); J8:=IF(多<=空,多,REF(J7,1)); J9:=IF(多<=空,多,REF(J8,1)); J10:=IF(多<=空,多,REF(J9,1)); J11:=IF(多<=空,多,REF(J10,1)); J12:=IF(多<=空,多,REF(J11,1)); J13:=IF(多<=空,多,REF(J12,1)); J14:=IF(多<=空,多,REF(J13,1)); J15:=IF(多<=空,多,REF(J14,1)); JJ_1:=IF(多<=空,多,REF(J15,1)); JJ1:=IF(多>空,空,DRAWNULL); JJ2:=IF(多>空,空,REF(JJ1,1)); JJ3:=IF(多>空,空,REF(JJ2,1)); JJ4:=IF(多>空,空,REF(JJ3,1)); JJ5:=IF(多>空,空,REF(JJ4,1)); JJ6:=IF(多>空,空,REF(JJ5,1)); JJ7:=IF(多>空,空,REF(JJ6,1)); JJ8:=IF(多>空,空,REF(JJ7,1)); JJ9:=IF(多>空,空,REF(JJ8,1)); JJ10:=IF(多>空,空,REF(JJ9,1)); JJ11:=IF(多>空,空,REF(JJ10,1)); JJ12:=IF(多>空,空,REF(JJ11,1)); JJ13:=IF(多>空,空,REF(JJ12,1)); JJ14:=IF(多>空,空,REF(JJ13,1)); JJ15:=IF(多>空,空,REF(JJ14,1)); JJ_2:=IF(多>空,空,REF(JJ15,1)); K1:=IF(多>空,1,IF(多<空,-1,0)); KJ1:=IF(K1!=0,K1,DRAWNULL); KJ2:=IF(K1!=0,K1,REF(KJ1,1)); KJ3:=IF(K1!=0,K1,REF(KJ2,1)); KJ4:=IF(K1!=0,K1,REF(KJ3,1)); KJ5:=IF(K1!=0,K1,REF(KJ4,1)); KJ6:=IF(K1!=0,K1,REF(KJ5,1)); KJ7:=IF(K1!=0,K1,REF(KJ6,1)); KJ8:=IF(K1!=0,K1,REF(KJ7,1)); KJ9:=IF(K1!=0,K1,REF(KJ8,1)); KJ10:=IF(K1!=0,K1,REF(KJ9,1)); KJ11:=IF(K1!=0,K1,REF(KJ10,1)); KJ12:=IF(K1!=0,K1,REF(KJ11,1)); KJ13:=IF(K1!=0,K1,REF(KJ12,1)); KJ14:=IF(K1!=0,K1,REF(KJ13,1)); KJ15:=IF(K1!=0,K1,REF(KJ14,1)); K2:=IF(K1!=0,K1,REF(KJ15,1)); 警报:IF(K2>0,JJ_1,JJ_2),COLOR00B4FF; {-----------------【图解模板】---------------------} DRAWBAND(空,RGB(0,158,0),多,RGB(180,0,0)); RSV:=(C-LLV(L,3))/(HHV(H,3)-LLV(L,3))*100; K:=SMA(RSV,2,1); D:=SMA(K,2,1); J:=3*K-2*D; 引力:SMA(J,2,1)-SMA(J,3,1),NODRAW; STICKLINE(引力>0,0,引力,2,0),COLORLIRED; STICKLINE(引力<0,0,引力,2,0),COLORLIBLUE; {画各线} 空头:空,COLOR00FF00; 多头:多,COLORFF59FF; {近台比} JT_B1:=(O+L+H+C*3)/6; WMA:=(5*JT_B1+4*REF(JT_B1,1)+3*REF(JT_B1,2)+2*REF(JT_B1,3)+1*REF(JT_B1,4))/(5+4+3+2+1); JT_B2:=REVERSE(JT_B1)+2*WMA; JT_B3:=3*JT_B2-2*SMA(JT_B2,2,1); JTB4:=IF(BARSLAST(C>JT_B3),JT_B3,DRAWNULL); JT_B4:=IF(BARSLAST(C>JT_B3),JT_B3,REF(JTB4,1)); JTB5:=IF(BARSLAST(C<=JT_B3),JT_B3,DRAWNULL); JT_B5:=IF(BARSLAST(C<=JT_B3),JT_B3,REF(JTB5,1)); JT_B6:=IF(C<=JT_B3,JT_B4,JT_B5); 近台比: (C-JT_B6)/JT_B6*100,COLORLIMAGENTA,NODRAW; STICKLINE(近台比>0 AND 近台比>REF(近台比,1),-16,-18,2,0),COLORRED; STICKLINE(NOT(近台比>0 AND 近台比>REF(近台比,1)),-16,-18,2,0),COLORGREEN; ------------------------------------------------------------------------------------------------------------- {活跃度} SC:100*(CLOSE-MA(CLOSE,26)),COLORGRAY,LINETHICK3; MAO:EMA(SC,9),COLORRED,LINETHICK3; 上:IF(MAO>REF(MAO,1),MAO,DRAWNULL),COLORRED; 下:IF(MAO<REF(MAO,1),MAO,DRAWNULL),COLORLIGREEN,LINETHICK3; LC:=REF(CLOSE,1); RSI5:=SMA(MAX(CLOSE-LC,0),3,1)/SMA(ABS(CLOSE-LC),3,1)*100;WR10:=100*(HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5));活跃度:RSI5-WR10,LINETHICK0,COLORYELLOW;STICKLINE(活跃度>0,0,活跃度,3,0),COLOR000088;STICKLINE(活跃度>0,0,活跃度,1.5,0),COLOR0000AA;STICKLINE(活跃度>0,0,活跃度,1,0),COLOR0000CC;STICKLINE(活跃度>0,0,活跃度,0.5,0),COLOR0000FF; STICKLINE(活跃度<0,0,活跃度,3,0),COLOR008800; STICKLINE(活跃度<0,0,活跃度,1.5,0),COLOR00AA00; STICKLINE(活跃度<0,0,活跃度,1,0),COLOR00DD00; STICKLINE(活跃度<0,0,活跃度,0.5,0),COLOR00FF00; STICKLINE(活跃度>68 AND 活跃度<78,0,活跃度,3,0),COLOR888800; STICKLINE(活跃度>68 AND 活跃度<78,0,活跃度,1.5,0),COLORAAAA00; STICKLINE(活跃度>68 AND 活跃度<78,0,活跃度,1,0),COLORCCCC00; STICKLINE(活跃度>68 AND 活跃度<78,0,活跃度,0.5,0),COLORFFFF00; STICKLINE(活跃度>78,0,活跃度,3,0),COLOR008888; STICKLINE(活跃度>78,0,活跃度,1.5,0),COLOR00AAAA; STICKLINE(活跃度>78,0,活跃度,1,0),COLOR00DDDD; STICKLINE(活跃度>78,0,活跃度,0.5,0),COLOR00FFFF;SAT:=(AMOUNT/CLOSE)/(HHV(AMOUNT,20)/HHV(CLOSE,20)); 饱和度:IF(SAT>1,1,SAT)*100,NODRAW,COLORYELLOW; 高:=80,COLORRED; STICKLINE(高,80,80,3,0),COLORLIMAGENTA; 低:=-100,COLORGREEN; STICKLINE(低,-100,-100,3,0),COLORGREEN; DRAWBAND(SC,RGB(155,0,0),MAO,RGB(0,100,0)); DRAWICON(CROSS(SC,MAO),MAO*0.945,13); DRAWICON(饱和度=100,82,12);

tyy 发表于 2015-7-27 23:28

当前公式 : 交易护驾 (指标画线公式)
错误句 :
WMA:=(5*JT_B1+4*REF(JT_B1,1)+3*REF(JT_B1,2)+2*REF(JT_B1,3)+1*REF(JT_B1,4))/(5+4+3+2+1)
详细信息 : 变量 WMA 与函数名重复!
错误起始位置 : 2165 ; 长度: 3

-----------------------------------------------------------------------------
请问老师这个如何解决啊？

tyy 发表于 2015-7-27 23:04

当前公式 : 交易护驾 (指标画线公式)
错误句 :
WMA:=(5*JT_B1+4*REF(JT_B1,1)+3*REF(JT_B1,2)+2*REF(JT_B1,3)+1*REF(JT_B1,4))/(5+4+3+2+1)
详细信息 : 变量 WMA 与函数名重复!
错误起始位置 : 2149 ; 长度: 3

憨憨的 发表于 2010-4-6 09:37

dddddddddddddddddddddd

老龄伯爵 发表于 2010-4-6 09:40

谢谢分享，学习了.

股迷开心果 发表于 2010-4-6 09:43

:victory::victory:

腾云发表于 2010-4-6 10:32

:P 做的好,怎样在普通软件中设置?谢谢指教

股市游子 发表于 2010-4-6 10:40

dddddddddddddd

馨鑫荷 发表于 2010-4-6 10:44

学习了，谢谢了！

北漂一族 发表于 2010-4-6 10:46

回复 1# 玫瑰海

学习中

钟南星 发表于 2010-4-6 10:50

学习一下，谢谢分享！

西方亮 发表于 2010-4-6 11:00

回复 1# 玫瑰海
学习学习，谢谢分享。

不卖土豆 发表于 2010-4-6 11:11

谢谢分享！

合作发表于 2010-4-6 11:13

向高手学习，向高手看齐

合作发表于 2010-4-6 11:27

向高手学习，向高手看齐

放纵的自由 发表于 2010-4-6 11:53

K看看了，还没深入研究

莫老爷 发表于 2010-4-6 12:30

看看了，还没深入研究

页: [1] 2 3 4 5 6 7 8 9 10

股海明灯官网's Archiver

（★申请加精★）BBD 活跃度 交易护驾-短线三合一

（★申请加精★）BBD 活跃度交易护驾-短线三合一