TD序列 TD组合 主图源码

用法注释:
TD序列说明：
—————————————————————————————；
TD序列是美国人汤姆·狄马克创造的一个技术分析指标；其原理是研究市场情绪的一个指标；用我们中国人的话说就是：在市场恐惧中买入，在市场贪婪时卖出；
—————————————————————————————；
属于左侧交易指标；
—————————————————————————————；
TD序列共分为三个部分：结构、交叉、计数。而基于TD序列的策略还分为：入场、出场、停损三部分内容。
本指标由于研究深度不够，初步做出结构和计数两部分；以及对应的入场，出场，停损几部分内容的少部分；
—————————————————————————————；
具体如下：
—————————————————————————————；
1.九转结构；原始的九转序列；在TD中仅仅完成了入场的准备工作；
2.九转后的计数；采用原始思想完成计数；
备注：计数由于编程原因，仅仅完成了中断第一个限制，即计数过程中，不能发生反向序列的产生；否者计数作废；
3.计数完成后，才开始真正的入场操作；
—————————————————————————————；
原始入场分为三种：
—————————————————————————————；
A:计数完成的收盘价进场；可以获得最低价入场，但是风险最高；
B:计数完成后，转势入场(第一次：收盘价高于4天前的收盘价)；
C:计数完成后，转势入场(第一次：收盘价高于2天前的最高价)；.
—————————————————————————————；
经过测试，本指标采用第三种模式入场；
体现在指标中为图标：B；
—————————————————————————————；
4.止损：
买入后，如果股价继续下跌，原始给出止损策略，提供两种方式，本指标采取第二种防止止损；
即：
—————————————————————————————；
A：取整体区间内极端低价当天的真实区间；
B：计算极端低价与收盘价的距离；
C：最低价向下衡量该距离设定的止损点；
体现在本指标中：用绿色横线表示，并且标明价格；
—————————————————————————————；
5.止盈：
根据慢买快卖的原则；
本指标采用2中方法止盈：
—————————————————————————————；
1.出9；并且未创新高，且9收阴，卖出；
2.出9；但是创新高，且收阳；等待出13，或者跌破止盈价格；
3.止盈价格的计算（同止损的相反数）：
—————————————————————————————；
在本指标中表现为：
—————————————————————————————；
A：满足1，S；
B：满足2,13出S；
C：红色止盈线；
—————————————————————————————；
根据狄马科原话：TD序列更适合日线操作；
—————————————————————————————；
2016-8-5更新：
一：增加TD组合（原著组合）
（一）：不同
1.TD序列：需要TD结构完成后（即九转结束后），开始计数1；
2.TD组合：需要TD结构完成后（即九转结束后），开始从第一根K线开始计数；
（二）：优点
1.TD组合比TD序列严格；
2.TD组合比TD序列灵敏；
实际情况是按照原著严格编制选股很少；
（三）：计数标准
1、K线X的收盘价，要求小于K线X-2的最低价；
2、K线X的最低价，要求小于K线X-1的最低价；
3、K线X的收盘价，要求小于K线X-1的收盘价；
4、K线X的收盘价，要求小于前一个计数K线的收盘价。
注：前一个计数K线，指符合计数条件的K线，而不是当前K线的前一根K线。
—————————————————————————————；
进过测试；用1和2效果较好；如果加上3，选股极少；
因此本指标的TD组合用1和2作为计数标准；
二：指标信号：
1.计数出13，出现红钻（成功率：83.38%数量：355）；
2.买入信号：出现黄钻（成功率：88.64%数量：352）；
3.卖出信号：绿钻；根据快卖原则，出现13就出；
备注：采用标准1计数，成功率在78%；选股数量在998）；
测试成功率剔除ST，停牌，剔除次新股等；
—————————————————————————————；
三：原始改进：
1.原始买入：出现买入出B（成功率：64.63数量：1968）；
2.组合买入：叠加18（成功率：71.33数量：583）;
3.修正止盈止损提示显示错误；
—————————————————————————————；


HJ_1:=IF(CLOSE>OPEN,HIGH-CLOSE,HIGH-OPEN);
HJ_2:=IF(CLOSE>OPEN,OPEN-LOW,CLOSE-LOW);
HJ_3:=MA(HJ_1,60)*1.5;
HJ_4:=MA(HJ_2,60)*1.5;
HJ_5:=IF((CLOSE-REF(CLOSE,1))*100/REF(CLOSE,1)>=10-0.01*100/REF(CLOSE,1),1,0);
HJ_6:=IF((REF(CLOSE,1)-CLOSE)*100/REF(CLOSE,1)>=10-0.01*100/REF(CLOSE,1),1,0);
STICKLINE(HJ_5,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(HJ_6,OPEN,CLOSE,2,0),COLORBLUE;
HJ_7:=CLOSE>REF(CLOSE,4);
HJ_8:=BARSLASTCOUNT(HJ_7);
HJ_9:=HJ_8=9;
HJ_10:=ISLASTBAR AND BETWEEN(HJ_8,1,8);
HJ_11:=(BACKSET(HJ_9>0,9) OR BACKSET(HJ_10>0,HJ_8))*HJ_8;
DRAWNUMBER(HJ_11>0,HIGH+HJ_3*2,HJ_11),COLORMAGENTA;
DRAWNUMBER(HJ_8=9 AND HIGH>REF(HIGH,2),HIGH+HJ_3*2,9),COLORGREEN;
DRAWNUMBER(HJ_8=18,HIGH+HJ_3*2,18),COLORYELLOW;
HJ_12:=CLOSE<REF(CLOSE,4);
HJ_13:=BARSLASTCOUNT(HJ_12);
HJ_14:=HJ_13=9;
HJ_15:=ISLASTBAR AND BETWEEN(HJ_13,1,8);
HJ_16:=(BACKSET(HJ_14>0,9) OR BACKSET(HJ_15>0,HJ_13))*HJ_13;
DRAWNUMBER(HJ_16>0,LOW-HJ_4*2,HJ_16),COLORMAGENTA;
DRAWNUMBER(HJ_13=9 AND LOW<REF(LOW,2),LOW-HJ_4*2,9),COLORGREEN;
DRAWNUMBER(HJ_13=18,LOW-HJ_4*2,18),COLORYELLOW;
HJ_17:=BARSLAST(HJ_8=9);
HJ_18:=COUNT(HJ_12,HJ_17)<=0;
HJ_19:=COUNT(HJ_7,HJ_17)=0;
HJ_20:=COUNT(CLOSE>REF(HIGH,2) AND HJ_18,HJ_17);
DRAWNUMBER(HJ_20=3 AND REF(HJ_20,1)=2,HIGH+HJ_3*2,12),COLOR0080FF;
HJ_21:=IF(HJ_20=4 AND REF(HJ_20,1)=3 AND HIGH>REF(CLOSE,HJ_17+1),2,IF(HJ_20=4 AND REF(HJ_20,1)=3,1,0));
DRAWNUMBER(HJ_21=2,HIGH+HJ_3*2,13),COLORGREEN;
DRAWNUMBER(HJ_21=1,HIGH+HJ_3*2,0),COLORGREEN;
HJ_22:=BARSLAST(HJ_13=9);
HJ_23:=COUNT(HJ_7,HJ_22)<=0;
HJ_24:=COUNT(HJ_12,HJ_22)<=0;
HJ_25:=COUNT(CLOSE<REF(LOW,2) AND HJ_23,HJ_22);
DRAWNUMBER(HJ_25=3 AND REF(HJ_25,1)=2,LOW-HJ_4*2,12),COLOR0080FF;
HJ_26:=IF(HJ_25=4 AND REF(HJ_25,1)=3 AND LOW<REF(CLOSE,HJ_22+1),2,IF(HJ_25=4 AND REF(HJ_25,1)=3,1,0));
DRAWNUMBER(HJ_26=2,LOW-HJ_4*2,13),COLORRED;
DRAWNUMBER(HJ_26=1,LOW-HJ_4*2,0),COLORRED;
HJ_27:=BARSLAST(HJ_26=2);
HJ_28:=COUNT(CLOSE>REF(CLOSE,4),HJ_27);
HJ_29:=REF(HJ_28,1)=0 AND HJ_28=1;
HJ_30:=COUNT(CLOSE>REF(HIGH,2),HJ_27);
HJ_31:=REF(HJ_30,1)=0 AND HJ_30=1 AND BARSCOUNT(CLOSE)>9 AND HJ_27<HJ_22;
HJ_32:=BARSLAST(HJ_31);
HJ_33:=IF(HJ_31,HJ_22+9,DRAWNULL);
HJ_34:=LLVBARS(LOW,HJ_33);
HJ_35:=REF(LOW,HJ_34)-(MAX(REF(HIGH,HJ_34),REF(HIGH,HJ_34+1))-REF(LOW,HJ_34));
HJ_36:=REF(LOW,HJ_34)-(REF(CLOSE,HJ_34)-REF(LOW,HJ_34));
STICKLINE(HJ_31,LOW,HJ_36,0.5,(-1)),COLORGREEN;
STICKLINE(HJ_32>0 AND HJ_32<20,REF(HJ_36,HJ_32),REF(HJ_36,HJ_32),1,0),COLORGREEN;
DRAWNUMBER(HJ_31,HJ_36,HJ_36),COLORGREEN;
HJ_37:=COUNT(HJ_13=18,3)>0;
HJ_38:=IF(HJ_8=9 AND (HIGH<REF(HHV(HIGH,12),1) OR CLOSE<OPEN),1,0);
HJ_39:=IF(HJ_21=2 OR HJ_21=1 AND (HIGH<REF(HHV(HIGH,HJ_22+13),1) OR CLOSE<OPEN),1,0);
DRAWICON(HJ_39=1,HIGH+HJ_3*4,8);
DRAWICON(HJ_38=1,HIGH+HJ_3*4,8);
DRAWICON(HJ_8=18,HIGH+HJ_3*4,8);
DRAWICON(HJ_31,LOW-HJ_4*2,7);
HJ_40:=0;
HJ_41:=IF(HJ_40=0,LOW,CLOSE);
HJ_42:=IF(HJ_8=9 AND HIGH=HHV(HIGH,9) AND CLOSE>OPEN,1,0);
HJ_43:=BARSLAST(HJ_42=1);
HJ_44:=REF(HJ_41,HJ_43)-(REF(HIGH,HJ_43)-REF(CLOSE,HJ_43));
STICKLINE(HJ_42=1,HJ_41,HJ_41-(HIGH-CLOSE),0.5,(-1)),COLORRED;
STICKLINE(HJ_43>0 AND HJ_43<20,REF(HJ_44,HJ_43),REF(HJ_44,HJ_43),1,0),COLORRED;
DRAWNUMBER(HJ_42=1,HJ_44,HJ_44),COLORRED;
HJ_45:=IF(HJ_40=1,CLOSE<REF(LOW,2) AND LOW<REF(LOW,1) AND CLOSE<REF(CLOSE,1),CLOSE<REF(LOW,2) AND LOW<REF(LOW,1));
HJ_46:=IF(HJ_13=9,BARSLAST(HJ_13=1),DRAWNULL);
HJ_47:=COUNT(HJ_45,HJ_46+5);
HJ_48:=IF(HJ_13=9,HJ_47,DRAWNULL);
HJ_49:=COUNT(HJ_45 AND HJ_23,HJ_22);
HJ_50:=REF(HJ_48,HJ_22)+HJ_49;
HJ_51:=REF(HJ_50,1)=12 AND HJ_50=13;
HJ_52:=BARSLAST(HJ_51);
HJ_53:=COUNT(CLOSE>REF(HIGH,2) AND HJ_52<HJ_22 AND HJ_22<HJ_22+9,HJ_52);
HJ_54:=REF(HJ_53,1)=0 AND HJ_53=1 AND BARSCOUNT(CLOSE)>9;
DRAWICON(HJ_51,LOW-HJ_4*4,25);
DRAWICON(HJ_54,LOW-HJ_4*4,26);
HJ_55:=CLOSE>REF(HIGH,2) AND HIGH>REF(HIGH,1);
HJ_56:=IF(HJ_8=9,BARSLAST(HJ_8=1),DRAWNULL);
HJ_57:=COUNT(HJ_55,HJ_56+5);
HJ_58:=IF(HJ_8=9,HJ_57,DRAWNULL);
HJ_59:=COUNT(HJ_55 AND HJ_18,HJ_17);
HJ_60:=REF(HJ_58,HJ_17)+HJ_59;
HJ_61:=REF(HJ_60,1)=12 AND HJ_60=13;
HJ_62:=BARSLAST(HJ_61);
DRAWICON(HJ_61,HIGH+HJ_3*6,27);
HJ_63:=BARSLAST(HJ_39=1);
HJ_64:=IF(HJ_39=1,REF(HIGH,HHVBARS(HIGH,HJ_17)),DRAWNULL);
STICKLINE(HJ_39=1,HIGH,HJ_64,0.5,(-1)),COLORLIGRAY;
STICKLINE(HJ_63>0 AND HJ_63<30,REF(HJ_64,HJ_63),REF(HJ_64,HJ_63),1,(-1)),COLORLIGRAY;
HJ_65:=BARSLAST(HJ_38=1);
HJ_66:=IF(HJ_38=1,REF(HIGH,HHVBARS(HIGH,13)),DRAWNULL);
STICKLINE(HJ_38=1,HIGH,HJ_66,0.5,(-1)),COLORGREEN;
STICKLINE(HJ_65>0 AND HJ_65<30,REF(HJ_66,HJ_65),REF(HJ_66,HJ_65),1,(-1)),COLORGREEN;
HJ_67:=BARSLAST(HJ_8=18);
HJ_68:=IF(HJ_8=18,REF(HIGH,HHVBARS(HIGH,21)),DRAWNULL);
STICKLINE(HJ_8=18,HIGH,HJ_68,0.5,(-1)),COLORYELLOW;
STICKLINE(HJ_67>0 AND HJ_67<30,REF(HJ_68,HJ_67),REF(HJ_68,HJ_67),1,(-1)),COLORYELLOW;
HJ_69:=IF(HJ_61,REF(HIGH,HHVBARS(HIGH,13)),DRAWNULL);
STICKLINE(HJ_61,HIGH,HJ_69,0.5,(-1)),COLORWHITE;
STICKLINE(HJ_62>0 AND HJ_62<30,REF(HJ_69,HJ_62),REF(HJ_69,HJ_62),1,(-1)),COLORWHITE;