同图显示大盘K线[其他软件公式]

相关标签:

{个股+大盘K线}

原理解析：
C1赋值:大盘的收盘价的125日指数移动平均/收盘价的125日指数移动平均 D1赋值:大盘的开盘价/C1 D2赋值:大盘的最高价/C1 D3赋值:大盘的最低价/C1 D4赋值:大盘的收盘价/C1 输出上证K线:当满足条件D4>=1日前的D4时,在D3和D2位置之间画柱状线,宽度为0,0不为0则画空心柱.,画红色 当满足条件D4>=1日前的D4时,在D4和D1位置之间画柱状线,宽度为5,0不为0则画空心柱.,画红色 当满足条件D4<1日前的D4时,在D3和D2位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLORFFCC66 当满足条件D4<1日前的D4时,在D4和D1位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLORFFCC66 输出主攻线: 收盘价的4日简单移动平均,画白色,线宽为2 输出助攻线:主攻线的8日简单移动平均,COLORFF00FF,线宽为2 输出强弱势分界:主攻线的33日指数移动平均,COLORFFCC66,线宽为2 Y赋值:(最高价+最低价)/2 AO赋值:Y的5日简单移动平均-Y的21日简单移动平均 DU0赋值:AO上穿0 UD0赋值:0上穿AO TDU0赋值:上次DU0距今天数 TUD0赋值:上次UD0距今天数 DU3赋值:1日前的DU0 UD3赋值:1日前的UD0 TDU3赋值:上次DU3距今天数 TUD3赋值:上次UD3距今天数 输出劫:如果TDU3<TUD3,返回TDU3日前的2日内最高价的最高值,否则返回TUD3日前的2日内最低价的最低值,COLOR00FF00 R1赋值:Y的8日[1日权重]移动平均 R2赋值:5日前的R1 KU1赋值:如果最高价=3日内最高价的最高值,返回1,否则返回0 KD1赋值:如果最低价=3日内最低价的最低值,返回1,否则返回0 UL赋值:如果2日前的KU1=1ANDREF(KU1,1)=0ANDKU1=0,返回2日前的最高价,否则返回2+上次2日前的KU1=1ANDREF(KU1,1)=0ANDKU1=0距今天数日前的最高价 DL赋值:如果2日前的KD1=1ANDREF(KD1,1)=0ANDKD1=0,返回2日前的最低价,否则返回2+上次2日前的KD1=1ANDREF(KD1,1)=0ANDKD1=0距今天数日前的最低价 输出上:如果最高价>=R2,返回UL,否则返回上次最高价>R2距今天数日前的UL,COLOR0066FF,POINTDOT 输出下:如果最低价<=R2,返回DL,否则返回上次最低价<=R2距今天数日前的DL,COLORAAAE5D,POINTDOT 当满足条件上次上-1日前的上的绝对值距今天数<上次收盘价>上ANDREF(收盘价,1)<1日前的上距今天数时,在上和上位置之间画柱状线,宽度为4,1不为0则画空心柱.,COLOR0066FF,线宽为2,POINTDOT 当满足条件上次下-1日前的下的绝对值距今天数<上次收盘价<下ANDREF(收盘价,1)>1日前的下距今天数时,在下和下位置之间画柱状线,宽度为4,1不为0则画空心柱.,COLORAAAE5D,线宽为2,POINTDOT VA赋值:收盘价的4日指数移动平均上穿收盘价的17日指数移动平均 VB赋值:收盘价的6日指数移动平均>收盘价的13日指数移动平均 当满足条件VAANDVB时,在收盘价的13日指数移动平均位置书写文字,COLORFF00FF A赋值:收盘价的有效数据周期数 AH赋值:200日内最高价的最高值 AL赋值:200日内最低价的最低值 B0赋值:(AH-AL)/40 B1赋值:最高价+B0 B2赋值:最低价-B0 当满足条件(A+0)/34=(A+0)/34的向下舍入时,在B2和B2-2*B0位置之间画柱状线,宽度为4,0不为0则画空心柱.,画黄色 当满足条件(A+0)/34=(A+0)/34的向下舍入时,在B2-2.2*B0位置书写文字,COLORFFFFFF V1赋值:1日前的收盘价 V2赋值:收盘价-V1和0的较大值的6日[1日权重]移动平均/收盘价-V1的绝对值的6日[1日权重]移动平均*100 当满足条件如果81上穿V2,返回1,否则返回0时,在最高价*1.03位置书写文字,COLOR00FF00

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

源码：

C1:=EMA(INDEXC,125)/EMA(C,125);
D1:=INDEXO/C1; D2:=INDEXH/C1;
D3:=INDEXL/C1; D4:=INDEXC/C1;
上证K线:STICKLINE(D4>=REF(D4,1),D3,D2,0,0),COLORRED;
STICKLINE(D4>=REF(D4,1),D4,D1,5,0),COLORRED;
STICKLINE(D4< REF(D4,1),D3,D2,0,0),COLORFFCC66;
STICKLINE(D4< REF(D4,1),D4,D1,5,0),COLORFFCC66;
主攻线: MA(CLOSE,4),COLORWHITE,LINETHICK2;
助攻线:MA(主攻线,8),COLORFF00FF,LINETHICK2;
强弱势分界:EMA(主攻线,33),COLORFFCC66,LINETHICK2;
Y:=(HIGH+LOW)/2;
AO:=MA(Y,5)-MA(Y,21);
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
劫:IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3)),COLOR00FF00;
R1:=SMA(Y,8,1);
R2:=REF(R1,5);
KU1:=IF(HIGH=HHV(HIGH,3),1,0);
KD1:=IF(LOW=LLV(LOW,3),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1
AND REF(KU1,1)=0 AND KU1=0)));
DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1
AND REF(KD1,1)=0 AND KD1=0)));
上:IF(HIGH>=R2,UL,REF(UL,BARSLAST(HIGH>R2))),COLOR0066FF,POINTDOT;
下:IF(LOW<=R2,DL,REF(DL,BARSLAST(LOW<=R2))),COLORAAAE5D,POINTDOT;
STICKLINE(BARSLAST(ABS(上-REF(上,1)))<BARSLAST(CLOSE>上 AND REF(CLOSE,1)<REF(上,1)),上,
上,4,1),COLOR0066FF,LINETHICK2,POINTDOT;
STICKLINE(BARSLAST(ABS(下-REF(下,1)))<BARSLAST(CLOSE<下 AND REF(CLOSE,1)>REF(下,1)),下,
下,4,1),COLORAAAE5D,LINETHICK2,POINTDOT;
VA:=CROSS(EMA(CLOSE,4),EMA(CLOSE,17));
VB:=EMA(CLOSE,6)>EMA(CLOSE,13);
DRAWTEXT(VA ANDVB,EMA(CLOSE,13),'▲'),COLORFF00FF;
A:=BARSCOUNT(CLOSE);
AH:=HHV(HIGH,200);
AL:=LLV(LOW,200);
B0:=(AH-AL)/40;
B1:=HIGH+B0;
B2:=LOW-B0;
STICKLINE((A+0)/34=FLOOR((A+0)/34),B2,B2-2*B0,4,0),COLORYELLOW;
DRAWTEXT((A+0)/34=FLOOR((A+0)/34),B2-2.2*B0,'时间窗'),COLORFFFFFF;
V1:=REF(CLOSE,1);
V2:=SMA(MAX(CLOSE-V1,0),6,1)/SMA(ABS(CLOSE-V1),6,1)*100;
DRAWTEXT(IF(CROSS(81,V2),1,0),HIGH*1.03,'●'),COLOR00FF00;

{同图显示大盘K线};<!--++ plugin_code qcomic begin--><!--++ plugin_code qcomic end-->

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