超短线统计买卖点胜算程序样例

1075

收藏 2017-10-04

{iMin: input value};
LEFT:= 0;
{
功能：x分钟K线开盘30分钟出现全天谷底值次数百分比【概率】
}
DRAWTEXT_FIX(1>0, 0.00, 0.00, LEFT,'开盘买底风险(%):'), COLORYELLOW;
BRSK30:=  IF(100-TDXDLL1(9 ,C,O,L)<0,0,100-TDXDLL1(9 ,C,O,L));
DRAWTEXT_FIX(1>0, 0.10, 0.00, LEFT,VARCAT('开盘30分买',VAR2STR(CONST(BRSK30),2))),COLORCYAN;

BRSK60:=  IF(BRSK30 -TDXDLL1(10,C,O,L)<0,0,BRSK30 -TDXDLL1(10,C,O,L));
DRAWTEXT_FIX(1>0, 0.20, 0.00, LEFT,VARCAT('开盘60分买',VAR2STR(CONST(BRSK60),2))),COLORCYAN;

BRSK90:=  IF(BRSK60 -TDXDLL1(11,C,O,L)<0,0,BRSK60 -TDXDLL1(11,C,O,L));
DRAWTEXT_FIX(1>0, 0.30, 0.00, LEFT,VARCAT('开盘90分买',VAR2STR(CONST(BRSK90),2))),COLORCYAN;

BRSK120:= IF(BRSK90 -TDXDLL1(12,C,O,L)<0,0,BRSK90 -TDXDLL1(12,C,O,L));
DRAWTEXT_FIX(1>0, 0.40, 0.00, LEFT,VARCAT('开盘120分买',VAR2STR(CONST(BRSK120),2))),COLORCYAN;

BRSK150:= IF(BRSK120-TDXDLL1(13,C,O,L)<0,0,BRSK120-TDXDLL1(13,C,O,L));
DRAWTEXT_FIX(1>0, 0.50, 0.00, LEFT,VARCAT('开盘150分买',VAR2STR(CONST(BRSK150),2))),COLORCYAN;

BRSK180:= IF(BRSK150-TDXDLL1(14,C,O,L)<0,0,BRSK150-TDXDLL1(14,C,O,L));
DRAWTEXT_FIX(1>0, 0.60, 0.00, LEFT,VARCAT('开盘180分买',VAR2STR(CONST(BRSK180),2))),COLORCYAN;

BRSK210:= IF(BRSK180-TDXDLL1(15,C,O,L)<0,0,BRSK180-TDXDLL1(15,C,O,L));
DRAWTEXT_FIX(1>0, 0.70, 0.00, LEFT,VARCAT('开盘210分买',VAR2STR(CONST(BRSK210),2))),COLORCYAN;

BRSK240:= IF(BRSK210-TDXDLL1(16,C,O,L)<0,0,BRSK210-TDXDLL1(16,C,O,L));
DRAWTEXT_FIX(1>0, 0.80, 0.00, LEFT,VARCAT('开盘240分买',VAR2STR(CONST(BRSK240),2))),COLORCYAN;

DAYK:= TDXDLL1(1,C,O,H);
DRAWTEXT_FIX(1>0, 0.90, 0.10, LEFT,VARCAT('日K线数',VAR2STR(CONST(DAYK),2))),COLORYELLOW;

{======================};

DRAWTEXT_FIX(1>0, 0.00, 0.05, LEFT,'开盘卖峰风险(%):'), COLORCYAN;
SRSK30:=  IF(100-TDXDLL1(17,C,O,H)<0,0,100-TDXDLL1(17,C,O,H));
DRAWTEXT_FIX(1>0, 0.10, 0.05, LEFT,VARCAT('开盘30分卖',VAR2STR(CONST(SRSK30),2))),COLORYELLOW;

SRSK60:=  IF(SRSK30 -TDXDLL1(18,C,O,H)<0,0,SRSK30 -TDXDLL1(18,C,O,H));
DRAWTEXT_FIX(1>0, 0.20, 0.05, LEFT,VARCAT('开盘60分卖',VAR2STR(CONST(SRSK60),2))),COLORYELLOW;

SRSK90:=  IF(SRSK60 -TDXDLL1(19,C,O,H)<0,0,SRSK60 -TDXDLL1(19,C,O,H));
DRAWTEXT_FIX(1>0, 0.30, 0.05, LEFT,VARCAT('开盘90分卖',VAR2STR(CONST(SRSK90),2))),COLORYELLOW;

SRSK120:= IF(SRSK90 -TDXDLL1(20,C,O,H)<0,0,SRSK90 -TDXDLL1(20,C,O,H));
DRAWTEXT_FIX(1>0, 0.40, 0.05, LEFT,VARCAT('开盘120分卖',VAR2STR(CONST(SRSK120),2))),COLORYELLOW;

SRSK150:= IF(SRSK120-TDXDLL1(21,C,O,H)<0,0,SRSK120-TDXDLL1(21,C,O,H));
DRAWTEXT_FIX(1>0, 0.50, 0.05, LEFT,VARCAT('开盘150分卖',VAR2STR(CONST(SRSK150),2))),COLORYELLOW;

SRSK180:= IF(SRSK150-TDXDLL1(22,C,O,H)<0,0,SRSK150-TDXDLL1(22,C,O,H));
DRAWTEXT_FIX(1>0, 0.60, 0.05, LEFT,VARCAT('开盘180分卖',VAR2STR(CONST(SRSK180),2))),COLORYELLOW;

SRSK210:= IF(SRSK180-TDXDLL1(23,C,O,H)<0,0,SRSK180-TDXDLL1(23,C,O,H));
DRAWTEXT_FIX(1>0, 0.70, 0.05, LEFT,VARCAT('开盘210分卖',VAR2STR(CONST(SRSK210),2))),COLORYELLOW;

SRSK240:= IF(SRSK210-TDXDLL1(24,C,O,H)<0,0,SRSK210-TDXDLL1(24,C,O,H));
DRAWTEXT_FIX(1>0, 0.80, 0.05, LEFT,VARCAT('开盘240分卖',VAR2STR(CONST(SRSK240),2))),COLORYELLOW;

DELSE:= TDXDLL1(43,C,O,H);
DRAWTEXT_FIX(1>0, 0.90, 0.15, LEFT,VARCAT('零头K线',VAR2STR(CONST(DELSE),0))),COLORCYAN;

{********************************************};

DRAWTEXT_FIX(1>0, 0.00, 0.10, LEFT,'开收盘30分钟买底概率(%):'), COLORLIRED;
TO30C30:= IF(TDXDLL1(9 ,C,O,L) + TDXDLL1(16,C,O,L)>100,100,TDXDLL1(9 ,C,O,L) + TDXDLL1(16,C,O,L));
DRAWTEXT_FIX(1>0, 0.135, 0.10, LEFT,VARCAT(' ',VAR2STR(CONST(TO30C30),2))),COLORCYAN;

PO90:= IF(TDXDLL1(17,C,O,H) + TDXDLL1(18,C,O,H)+ TDXDLL1(19,C,O,H)>100,100,TDXDLL1(17,C,O,H) + TDXDLL1(18,C,O,H)+ TDXDLL1(19,C,O,H));
DRAWTEXT_FIX(1>0, 0.00, 0.15, LEFT,'开盘后90分钟卖峰概率(%):'), COLORMAGENTA;
DRAWTEXT_FIX(1>0, 0.135, 0.15, LEFT,VARCAT(' ',VAR2STR(CONST(PO90),2))),COLORYELLOW;

{%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%};
DRAWTEXT_FIX(1>0, 0.00, 0.25, LEFT,'T1开盘卖峰风险(%):'), COLORYELLOW;
BUYR30:= 100-TDXDLL1(25,IMIN,L,H);
DRAWTEXT_FIX(1>0, 0.10, 0.25, LEFT,VARCAT('开盘30分卖',VAR2STR(CONST(BUYR30),2))),COLORCYAN;

BUYR60:= IF((BUYR30-  TDXDLL1(26,IMIN,L,H))<0,0,BUYR30-  TDXDLL1(26,IMIN,L,H));
DRAWTEXT_FIX(1>0, 0.20, 0.25, LEFT,VARCAT('开盘60分卖',VAR2STR(CONST(BUYR60),2))),COLORCYAN;

BUYR90:= IF((BUYR60-  TDXDLL1(27,IMIN,L,H))<0,0,(BUYR60- TDXDLL1(27,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.30, 0.25, LEFT,VARCAT('开盘90分卖',VAR2STR(CONST(BUYR90),2))),COLORCYAN;

BUYR120:= IF((BUYR90- TDXDLL1(28,IMIN,L,H))<0,0,(BUYR90- TDXDLL1(28,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.40, 0.25, LEFT,VARCAT('开盘120分卖',VAR2STR(CONST(BUYR120),2))),COLORCYAN;

BUYR150:= IF((BUYR120-TDXDLL1(29,IMIN,L,H))<0,0,(BUYR120-TDXDLL1(29,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.50, 0.25, LEFT,VARCAT('开盘150分卖',VAR2STR(CONST(BUYR150),2))),COLORCYAN;

BUYR180:= IF((BUYR150-TDXDLL1(30,IMIN,L,H))<0,0,(BUYR150-TDXDLL1(30,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.60, 0.25, LEFT,VARCAT('开盘180分卖',VAR2STR(CONST(BUYR180),2))),COLORCYAN;

BUYR210:= IF((BUYR180-TDXDLL1(31,IMIN,L,H))<0,0,(BUYR180-TDXDLL1(31,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.70, 0.25, LEFT,VARCAT('开盘210分卖',VAR2STR(CONST(BUYR210),2))),COLORCYAN;

BUYR240:= IF((BUYR210-TDXDLL1(32,IMIN,L,H))<0,0,(BUYR210-TDXDLL1(32,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.80, 0.25, LEFT,VARCAT('开盘240分卖',VAR2STR(CONST(BUYR240),2))),COLORCYAN;

{&&&&&&&&&&&&&&&&&&&&&&&&&};

DRAWTEXT_FIX(1>0, 0.00, 0.20, LEFT,'T1开盘买底风险(%):'), COLORCYAN;
SELLR30:= 100-TDXDLL1(33,IMIN,L,H);
DRAWTEXT_FIX(1>0, 0.10, 0.20, LEFT,VARCAT('开盘30分买',VAR2STR(CONST(SELLR30),2))),COLORYELLOW;

SELLR60:= IF((SELLR30-  TDXDLL1(34,IMIN,L,H))<0,0,(SELLR30- TDXDLL1(34,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.20, 0.20, LEFT,VARCAT('开盘60分买',VAR2STR(CONST(SELLR60),2))),COLORYELLOW;

SELLR90:= IF((SELLR60-  TDXDLL1(35,IMIN,L,H))<0,0,(SELLR60- TDXDLL1(35,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.30, 0.20, LEFT,VARCAT('开盘90分买',VAR2STR(CONST(SELLR90),2))),COLORYELLOW;

SELLR120:= IF((SELLR90- TDXDLL1(36,IMIN,L,H))<0,0,(SELLR90- TDXDLL1(36,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.40, 0.20, LEFT,VARCAT('开盘120分买',VAR2STR(CONST(SELLR120),2))),COLORYELLOW;

SELLR150:= IF((SELLR120-TDXDLL1(37,IMIN,L,H))<0,0,(SELLR120-TDXDLL1(37,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.50, 0.20, LEFT,VARCAT('开盘150分买',VAR2STR(CONST(SELLR150),2))),COLORYELLOW;

SELLR180:= IF((SELLR150-TDXDLL1(38,IMIN,L,H))<0,0,(SELLR150-TDXDLL1(38,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.60, 0.20, LEFT,VARCAT('开盘180分买',VAR2STR(CONST(SELLR180),2))),COLORYELLOW;

SELLR210:= IF((SELLR180-TDXDLL1(39,IMIN,L,H))<0,0,(SELLR180-TDXDLL1(39,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.70, 0.20, LEFT,VARCAT('开盘210分买',VAR2STR(CONST(SELLR210),2))),COLORYELLOW;

SELLR240:= IF((SELLR210-TDXDLL1(40,IMIN,L,H))<0,0,(SELLR210-TDXDLL1(40,IMIN,L,H)));
DRAWTEXT_FIX(1>0, 0.80, 0.20, LEFT,VARCAT('开盘240分买',VAR2STR(CONST(SELLR240),2))),COLORYELLOW;

{********************************************};

DRAWTEXT_FIX(1>0,  0.00, 0.30, LEFT,'T1开收盘30分买底概率(%):'), COLORLIRED;
T1O30C30:= IF(TDXDLL1(33 ,IMIN,L,H) + TDXDLL1(40,IMIN,L,H)>100,100,TDXDLL1(33 ,IMIN,L,H) + TDXDLL1(40,IMIN,L,H));
DRAWTEXT_FIX(1>0, 0.135, 0.30, LEFT,VARCAT(' ',VAR2STR(CONST(T1O30C30),2))),COLORCYAN;

T1PO90:= IF(TDXDLL1(25,IMIN,L,H) + TDXDLL1(26,IMIN,L,H)+ TDXDLL1(27,IMIN,L,H)>100,100,TDXDLL1(25,IMIN,L,H) + TDXDLL1(26,IMIN,O,H)+ TDXDLL1(27,IMIN,L,H));
DRAWTEXT_FIX(1>0,  0.00, 0.35, LEFT,'T1开盘后90分卖峰概率(%):'), COLORMAGENTA;
DRAWTEXT_FIX(1>0, 0.135, 0.35, LEFT,VARCAT(' ',VAR2STR(CONST(T1PO90),2))),COLORYELLOW;

{#########################};
{T1>IMIN};
HL10CNT:= TDXDLL1(41,IMIN,L,H);
DRAWTEXT_FIX(1>0, 0.90, 0.25, LEFT,VARCAT('T1次数=',VAR2STR(CONST(HL10CNT),0))), COLORYELLOW;

{
主图指标.买卖风险.A.2.171004.2
};

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群