回零既买副图指标公式源码[通达信公式]

相关标签:

原理解析：
100,POINTDOT 0 50 输出获利:以收盘价计算的获利盘比例*100,COLOR808000,线宽为1 買二赋值:收盘价/以收盘价计算的获利盘比例 输出回零既買:如果買二>940,返回-10,否则返回0 当满足条件回零既買<=0AND回零既買<1日前的-4.5时,在-10和0位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFF3333 底部赋值: 如果1/以收盘价计算的获利盘比例>100ANDABS((获利盘为50%的成本分布-收盘价)/收盘价*100)>(100-((收盘价-收盘价的10日简单移动平均)/收盘价的10日简单移动平均*100+(收盘价-收盘价的20日简单移动平均)/收盘价的20日简单移动平均*100+(收盘价-收盘价的30日简单移动平均的绝对值,返回/收盘价的30日简单移动平均*100)/3)),否则返回100, COLORSTICK,画红色 输出 大底:如果1日前的底部>0AND底部=0,返回100,否则返回0,STICK, ,画红色,线宽为3 当满足条件大底时,在50.2位置书写文字,画白色,线宽为2 当满足条件如果85上穿3*(收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值)*100的5日[1日权重]移动平均-2*(收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值)*100的5日[1日权重]移动平均的3日[1日权重]移动平均,返回100,否则返回0时,在96位置书写文字, 画白色 输出买入:如果1/以收盘价计算的获利盘比例>100ANDABS((获利盘为50%的成本分布-收盘价)/收盘价*100)>50ANDIF(1/以收盘价计算的获利盘比例<1日前的1/以收盘价计算的获利盘比例ANDREF(1/以收盘价计算的获利盘比例,1)>2日前的1/以收盘价计算的获利盘比例,120,0),返回100,否则返回0,STICK,画红色 当满足条件买入>0时,在90位置书写文字, , COLORCCCCFF ,线宽为8 输出买入A:如果1/以收盘价计算的获利盘比例>100ANDABS((获利盘为50%的成本分布-收盘价)/收盘价*100)>30ANDIF(1/以收盘价计算的获利盘比例<1日前的1/以收盘价计算的获利盘比例ANDREF(1/以收盘价计算的获利盘比例,1)>2日前的1/以收盘价计算的获利盘比例,120,0),返回30,否则返回0,STICK,画红色,线宽为2 当满足条件买入A>0时,在25位置书写文字, , 画黄色,线宽为3 输出W:(收盘价的1日指数移动平均+收盘价的3日指数移动平均+收盘价的5日指数移动平均+收盘价的10日指数移动平均+收盘价的13日指数移动平均+收盘价的20日指数移动平均+收盘价的30日指数移动平均+收盘价的34日指数移动平均+收盘价的55日指数移动平均+收盘价的60日指数移动平均+收盘价的90日指数移动平均+收盘价的120日指数移动平均+收盘价的250日指数移动平均)/13,画黄色 线宽为0 VAR1赋值:2日前的W 输出短线: W-VAR1和0的较大值的7日[1日权重]移动平均/W-VAR1的绝对值的7日[1日权重]移动平均*100, 画青色 输出车弩机: 如果短线<12,返回30,否则返回0 VAR2赋值:1日前的W VAR3赋值:W-VAR2和0的较大值的7日[1日权重]移动平均/W-VAR2的绝对值的7日[1日权重]移动平均*100 输出弯弓: 如果VAR3<12,返回30,否则返回0 输出逢高派发区: 当满足条件短线>85时,在短线+10和短线-10位置之间画柱状线,宽度为1.5,0不为0则画空心柱., 画红色 VAR1J赋值:收盘价/((收盘价+最低价+最高价)/3的3日指数移动平均的26日指数移动平均*0.9)<0.95 输出放箭:如果VAR1J,返回15,否则返回0,STICK,线宽为3,画红色 当满足条件VAR1J时,在8位置书写文字,COLORF0F000 VARE1赋值:(大盘的收盘价-1日前的大盘的收盘价)/1日前的大盘的收盘价 VARE2赋值:(收盘价-1日前的收盘价)/1日前的收盘价 VARE3赋值:如果VARE1>0.010,返回0.900,否则返回1 AND 如果VARE1>(-0.025),返回1,否则返回1.200 VARE4赋值:VARE3*(VARE2-VARE1)*100 VARE5赋值:VARE4的10日累和 VARE6赋值:VARE5的40日[1日权重]移动平均 VARE7赋值:如果CLOSEANDMA(成交量(手),5)/240ANDCLOSE>1日前的收盘价*1.0ANDCLOSE,返回88,否则返回0 VARE8赋值:如果收盘价/1日前的收盘价>1.050ANDVOL/当前流通股本(手)*100<10ANDCLOSE<17ANDHIGH/收盘价<1.010ANDVARE7>0,返回91,否则返回0 输出追击:如果VARE8>90,返回30,否则返回0,STICK,线宽为3,画蓝色 当满足条件VARE8>90时,在30位置书写文字,画黄色 如果VAR1>5,返回如果VAR1<100,返回VAR1,否则返回VAR2-10,否则返回0, COLORSTICK 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色 当满足条件收阳线时,在横轴1纵轴1位置书写文字,画红色

 来源:程序化99（ WWW.CXH99.COM ）

源码：

100,POINTDOT;0;50;
获利:WINNER(C)*100,COLOR808000,LINETHICK1;
買二:=C/WINNER(C);
回零既買:IF(買二>940,-10,0);
STICKLINE(回零既買<=0 AND 回零既買< REF(-4.5,1),-10,0,6,0),COLORFF3333;
底部:= IF(1/WINNER(CLOSE)>100 AND ABS((COST(50)-CLOSE)/CLOSE*100)>(100-ABS(((CLOSE-MA(CLOSE,10))/MA(CLOSE,10)*100+(CLOSE-MA(CLOSE,20))/MA(CLOSE,20)*100+(CLOSE-MA(CLOSE,30))/MA(CLOSE,30)*100)/3)),100,0), COLORSTICK,COLORRED; {IF(VAR1>5,IF(VAR1<100,VAR1,VAR2-10),0), COLORSTICK;}
大底:IF(REF(底部,1)>0 AND 底部=0,100,0),STICK, ,COLORRED,LINETHICK3;
DRAWTEXT(大底,50.2,'大底'),COLORWHITE,LINETHICK2;
DRAWTEXT( IF(CROSS(85, 3*SMA((CLOSE- LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE- LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)),100,0),96,'逃'), COLORWHITE;
买入:IF(1/WINNER(CLOSE)>100 AND ABS((COST(50)-CLOSE)/CLOSE*100)>50 AND IF(1/WINNER(CLOSE)<REF(1/WINNER(CLOSE),1) AND REF(1/WINNER(CLOSE),1)>REF(1/WINNER(CLOSE),2),120,0),100,0),STICK,COLORRED;
DRAWTEXT(买入>0,90,'买50'), , COLORCCCCFF ,LINETHICK8;
买入A:IF(1/WINNER(CLOSE)>100 AND ABS((COST(50)-CLOSE)/CLOSE*100)>30 AND IF(1/WINNER(CLOSE)<REF(1/WINNER(CLOSE),1) AND REF(1/WINNER(CLOSE),1)>REF(1/WINNER(CLOSE),2),120,0),30,0),STICK,COLORRED,LINETHICK2;
DRAWTEXT(买入A>0,25,'买30'), , COLORYELLOW,LINETHICK3;
W:(EMA(CLOSE,1)+EMA(CLOSE,3)+EMA(CLOSE,5)+EMA(CLOSE,10)+EMA(CLOSE,13)+EMA(CLOSE,20)+EMA(CLOSE,30)+EMA(CLOSE,34)+EMA(CLOSE,55)+EMA(CLOSE,60)+EMA(CLOSE,90)+EMA(CLOSE,120)+EMA(CLOSE,250))/13,COLORYELLOW LINETHICK0;
VAR1:=REF({CLOSE}W,2);
短线: SMA(MAX(W{CLOSE}-VAR1,0),7,1)/SMA(ABS(W{CLOSE}-VAR1),7,1)*100, COLORCYAN;
车弩机: IF(短线<12,30,0);
VAR2:=REF({CLOSE}W,1);
VAR3:=SMA(MAX(W{CLOSE}-VAR2,0),7,1)/SMA(ABS(W{CLOSE}-VAR2),7,1)*100;
弯弓: IF(VAR3<12,30,0);
逢高派发区: STICKLINE(短线>85,短线+10,短线-10,1.5,0), COLORRED;
VAR1J:=CLOSE/(EMA(EMA((C+L+H)/3,3),26)*0.9)<0.95 ;
放箭:IF(VAR1J,15,0),STICK,LINETHICK3,COLORRED;
DRAWTEXT(VAR1J ,8,'箭'),COLORF0F000;
VARE1:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1);
VARE2:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1);
VARE3:=IF(VARE1>0.010, 0.900, 1) AND IF(VARE1>(-0.025), 1, 1.200);
VARE4:=VARE3*(VARE2-VARE1)*100;
VARE5:=SUM(VARE4, 10);
VARE6:=SMA(VARE5, 40, 1);
VARE7:=IF(CLOSE AND MA(VOL, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,88,0);{VAR38>VAR39;}
VARE8:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND VOL/CAPITAL*100<10 AND CLOSE<17 AND HIGH/CLOSE<1.010 AND VARE7>0, 91, 0);
追击:IF(VARE8>90,30,0),STICK,LINETHICK3,COLORBLUE;
DRAWTEXT(VARE8>90,30,'追击'),COLORYELLOW;
IF(VAR1>5,IF(VAR1<100,VAR1,VAR2-10),0), COLORSTICK;DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】