紫黄同现必涨公式、源码副图指标公式[通达信公式]

相关标签:

原理解析：
赋值:(收盘价*3+最高价+最低价+开盘价)/6 赋值: JJ的13日指数移动平均 - JJ的21日指数移动平均 赋值: SK的3日指数移动平均 赋值: SK的10日指数移动平均 A1赋值:收盘价的7日指数移动平均-收盘价的21日指数移动平均 B1赋值:(0.668*1日前的A1+0.333*A1)的1日指数移动平均 B1,COLORSTICK X1赋值:成交量(手)/成交量(手)的13日累和 X2赋值:以X1为权重收盘价的动态移动平均 X3赋值:(收盘价-X2)/X2*40 L2赋值:成交额(元)/(100*成交量(手))的13日简单移动平均 CYS13赋值: (收盘价-L2)/L2*100 输出天堂:如果A1>=B1,返回A1,否则返回B1,线宽为2,画洋红色 输出地狱:如果B1-A1,返回B1,否则返回A1,画绿色,线宽为2 输出上帝:当满足条件CYS13>5时,在0和-地狱位置之间画柱状线,宽度为2,0不为0则画空心柱.,画黄色 输出得道成仙:当满足条件X3>0AND天堂>0时,在天堂+0.1和天堂位置之间画柱状线,宽度为1,0不为0则画空心柱.,画洋红色 收盘价>收盘价的30日简单移动平均,COLORFF80FF,线宽为2 DIFF赋值:收盘价的12日指数移动平均 - 收盘价的26日指数移动平均 DEA赋值:DIFF的9日指数移动平均 RSV赋值:(收盘价-9日内最低价的最低值)/(9日内最高价的最高值-9日内最低价的最低值)*100 K赋值:RSV的3日[1日权重]移动平均 D赋值:K的3日[1日权重]移动平均 J1赋值:DIFF J2赋值:DEA J3赋值:K J4赋值:D VL赋值:1日前的最低价 VH赋值:1日前的最高价 VAR1赋值:最高价-VH的绝对值的13日[1日权重]移动平均/最高价-VH和0的较大值的13日[1日权重]移动平均*100 VAR2赋值:最低价-VL的绝对值的13日[1日权重]移动平均/最低价-VL和0的较大值的13日[1日权重]移动平均*100 VAR3赋值:1日前的收盘价 VAR4赋值:VAR2的13日简单移动平均 VAR5赋值:34日内最低价的最低值 VAR6赋值:收盘价-VAR3和0的较大值的6日[1日权重]移动平均/收盘价-VAR3的绝对值的6日[1日权重]移动平均*100 VAR7赋值:93上穿VAR6 VAR8赋值:如果最低价<=VAR5,返回VAR4,否则返回0的3日指数移动平均 VAR9赋值:最高价>0日内最低价的最低值*7 VAR10赋值:((((收盘价-54日内最低价的最低值)/(54日内最高价的最高值-54日内最低价的最低值))*100)的7日[1日权重]移动平均的5日[1日权重]移动平均) VAR11赋值:((((收盘价-54日内最低价的最低值)/(54日内最高价的最高值-54日内最低价的最低值)*100)的7日[1日权重]移动平均) * 16.18) - (VAR10 * 10.9) 输出得道:J1上穿J2ANDVOL>1日前的成交量(手)的5日累和的3日过滤,画黄色,线宽为2 WR10赋值:-100*(10日内最高价的最高值-收盘价)/(10日内最高价的最高值-10日内最低价的最低值),画白色,线宽为1 WR45赋值:-100*(45日内最高价的最高值-收盘价)/(45日内最高价的最高值-45日内最低价的最低值),COLORFFB900,线宽为1 WR99赋值:-100*(99日内最高价的最高值-收盘价)/(99日内最高价的最高值-99日内最低价的最低值),画红色,线宽为1 天赋值: 0, 线宽为2 COLOR446600 地1赋值:-95, 线宽为2 COLOR446600 输出选股2:如果天堂上穿0,返回1,否则返回0 当满足条件(天堂上穿0)时,在0.8位置画1号图标 当满足条件(天堂上穿0)时,在-0.5位置画25号图标 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色 当满足条件收阳线时,在横轴1纵轴1位置书写文字,画红色

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

源码：

JJ :=(C*3+H+L+O)/6;SK := EMA(JJ,13) - EMA(JJ,21);SD := EMA(SK,3);SP := EMA(SK,10);A1:=EMA(C,7)-EMA(C,21);B1:=EMA((0.668*REF(A1,1)+0.333*A1),1);B1,COLORSTICK;X1:=V/SUM(V,13);X2:=DMA(C,X1);X3:=(C-X2)/X2*40;L2:=MA(AMOUNT/(100*V),13);CYS13:= (C-L2)/L2*100;天堂:IF(A1>=B1,A1,B1),LINETHICK2,COLORMAGENTA;地狱:IF(B1-A1,B1,A1),COLORGREEN,LINETHICK2;上帝:STICKLINE(CYS13>5,0,-地狱,2,0 ),COLORYELLOW;得道成仙:STICKLINE(X3>0 AND 天堂>0,天堂+0.1,天堂,1,0),COLORMAGENTA;C>MA(C,30),COLORFF80FF,LINETHICK2;DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);DEA:=EMA(DIFF,9);RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J1:=DIFF;J2:=DEA;J3:=K;J4:=D;VL:=REF(LOW,1); VH:=REF(H,1);VAR1:=SMA(ABS(H-VH),13,1)/SMA(MAX(H-VH,0),13,1)*100;VAR2:=SMA(ABS(L-VL),13,1)/SMA(MAX(L-VL,0),13,1)*100;VAR3:=REF(CLOSE,1);VAR4:=MA(VAR2,13);VAR5:=LLV(L,34);VAR6:=SMA(MAX(CLOSE-VAR3,0),6,1)/SMA(ABS(CLOSE-VAR3),6,1)*100;VAR7:=CROSS(93,VAR6);VAR8:=EMA(IF(L<=VAR5,VAR4,0),3);VAR9:=H>LLV(L,0)*7;VAR10:=(SMA(SMA((((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54))) * 100),7,1),5,1));VAR11:=((SMA(((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54)) * 100),7,1)) * 16.18) - (VAR10 * 10.9);得道:FILTER(CROSS(J1,J2) AND VOL>REF(SUM(VOL,5),1),3),COLORYELLOW,LINETHICK2;WR10:=-100*(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10)),COLORWHITE,LINETHICK1;WR45:=-100*(HHV(HIGH,45)-CLOSE)/(HHV(HIGH,45)-LLV(LOW,45)),COLORFFB900,LINETHICK1;WR99:=-100*(HHV(HIGH,99)-CLOSE)/(HHV(HIGH,99)-LLV (LOW,99)),COLORRED,LINETHICK1;天:= 0, LINETHICK2 COLOR446600;地1:=-95, LINETHICK2 COLOR446600;选股2:IF(CROSS(天堂,0),1,0);DRAWICON((CROSS(天堂,0) ),0.8,1);DRAWICON((CROSS(天堂,0) ),-0.5,25);
DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

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