构成线的公式源码

Ⅰ 求通达信画线公式

这个画线公式需要源码，以下是通达信画线指标：
参数设置

AA:=REF(H,N)=HHV(H,2*N+1);{N日前的最高价}
QY:=BACKSET(AA,N+1);{周期记录}
CC:=FILTER(QY,N) AND H=HHV(H,N+1);{周期过滤 最高价最高值}
DDD:=BARSLAST(CC),NODRAW;{CC条件成立的天数}
GDTS:=IF(CC,CURRBARSCOUNT,0),NODRAW;{CC成立 返回交易日的周}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS),NODRAW;{DDD成立,返回DDD日前的GDTS,否则返回GDTS}
GDCS1:=CONST(DINGBUTS),NODRAW;{取DINGBUTS值}
GDCS13:=CONST(REF(HIGH,GDCS1-1));
DINGBUTS1:=REF(DINGBUTS,DDD+1),NODRAW;
GDCS2:=CONST(DINGBUTS1);
GDCS23:=CONST(REF(HIGH,DINGBUTS1-1));
XG1:=BACKSET(ISLASTBAR,GDCS1);{ ISLASTBAR 判断是否为最后一个周期}
XG2:=BACKSET(ISLASTBAR,DINGBUTS1);
STICKLINE(XG2,GDCS23,GDCS23,0.5,1),COLORWHITE,LINETHICK3;{白线}
STICKLINE(XG1,GDCS13,GDCS13,0.5,1),COLORYELLOW,LINETHICK3;{黄线}
{谷线}
AA1:=REF(L,N1)=LLV(L,2*N1+1);
QY1:=BACKSET(AA1,N1+1);
CC1:=FILTER(QY1,N1) AND L=LLV(L,N1+1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=CONST(DDTS1);
DDCS13:=CONST(REF(L,DDCS1-1));
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=CONST(DDTS2);
DDCS23:=CONST(REF(L,DDTS2-1));
XD1:=BACKSET(ISLASTBAR,DDCS1);
XD2:=BACKSET(ISLASTBAR,DDTS2);
STICKLINE(XD2,DDCS23,DDCS23,0.5,1),COLORMAGENTA,LINETHICK3;
STICKLINE(XD1,DDCS13,DDCS13,0.5,1),COLORCYAN,LINETHICK3;
{压力支撑}
M:=INTPART(3*N2/5);{压力线取}
AAA:=REF(H,M)=HHV(H,2*M+1);
QYY:=BACKSET(AAA,M+1);
CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);
DDDD:=BARSLAST(CCC),NODRAW;
GDTSS:=IF(CCC,CURRBARSCOUNT,0),NODRAW;
DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS),NODRAW;
GDCS11:=CONST(DINGBUTSS),NODRAW;
DINGBUTS11:REF(DINGBUTSS,DDDD+1),NODRAW;
GDCS22:=CONST(DINGBUTS11);
高点压力M:DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORBB8000,LINETHICK2;
W:=INTPART(3*N3/5);
AA11:=REF(L,W)=LLV(L,2*W+1);
QY11:=BACKSET(AA11,W+1);
CC11:=FILTER(QY11,W) AND L=LLV(L,W+1);
DD11:=BARSLAST(CC11);
DDTSS:=IF(CC11,CURRBARSCOUNT,0);
DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);
DDCS11:=CONST(DDTS11);
DDTS22:=REF(DDTS11,DD11+1);
DDCS22:=CONST(DDTS22);
低点支撑M:DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1),COLORMAGENTA,LINETHICK2;
{
ZGSTAR:=(高点压力M+低点支撑M)/2;
ZGEND:=CONST((高点压力M+低点支撑M)/2);
STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);
中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORFF55BB,LINETHICK2;
}
{DRAWKLINE(H,O,L,C);}
{主图中的倍量K线如何变黄色}
V2V:=V/REF(V,1)>=1.9 AND C>REF(C,1);
STICKLINE(V2V,O,C,-1,0),COLORYELLOW;
{涨停}
ZT:=C/REF(C,1)>1.097;
STICKLINE(ZT,O,C,-1,0),COLORMAGENTA;
ZZ:=(O+H+L)/3;
黄金买点:EMA(ZZ,7),COLORGREEN,LINETHICK1;
TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);
TT1:=REF(EMA(TT2,3),1);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
BB1:=L<AA1*0.9;

EE1:=VOL<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
F:=100*(C-REF(C,1))/REF(C,1);
P1:=IF(C<REF(O,1) AND F<0,1,0);
P2:=IF(C<REF(O,2) AND F<0,1,0);
TT3:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1 ;
TT4:=P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0 ;
Z1:=MA(C,13);
ZX:=REF(Z1,13/2+1);
DRAWICON(CROSS(ZX,C),H*1.01,2);
DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW,'买'),COLORRED;
DRAWTEXT(CROSS(88,RSI),HIGH * 1.02,'短顶'),COLOR00FFFF;
STICKLINE(TT3,OPEN,CLOSE,3,0),COLORFF00FF;
A1:=EMA(C,14)COLORWHITE,LINETHICK1;
A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW;
出击:IF(A1X>=0,REF(EMA(C,14),BARSLAST(CROSS(A1X,0))+1),DRAWNULL)COLORRED,LINETHICK1;
休假:IF(A1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORGREEN,LINETHICK1;
STICKLINE(CROSS(A1X,0),C,O,2,0)COLORYELLOW;
STICKLINE(CROSS(0,A1X),C,O,2,0)COLORGREEN;
STICKLINE(CROSS(A1X,0)OR CROSS(0,A1X),REF(EMA(C,14),1),REF(EMA(C,14),1)*0.998,2,0)COLORWHITE;
STICKLINE(ISLASTBAR,REF(EMA(C,14),1),REF(EMA(C,14),1)*0.998,5,0)COLORWHITE;

Ⅱ obv画线指标公式

公式源码：MOBV：=OBV-MA（OBV，30）；
STICKLINE（MOBV>；0，0，MOBV，1，0），COLORRED；
STICKLINE（MOBV<；0，0，MOBV，1，0），COLORCYAN；
OBV高：=REF（OBV，BARSLAST（FILTER（BACKSET（FILTER（REF（OBV，5）=HHV（OBV，2*5+1），5），5+1），5））；
C高：REF（C，BARSLAST（FILTER（BACKSET（FILTER（REF（C，5）=HHV（C，2*5+1），5），5+1），5)）），NODRAW；
量入为主：CROSS（OBV，OBV高）ANDH
STICKLINE（量入为主，0，MOBV，1，0），COLORYELLOW。
需要注意的是，以上介绍的公式含有未来的，注意信号的出现，量入为主，量在价先。以上就是能量obv画线指标公式相关内容。
拓展资料：
OBV 的英文全称是：On Balance Volume，是由美国的投资分析家Joe Granville所创。该指标通过统计成交量变动的趋势来推测股价趋势。OBV以“N”字型为波动单位，并且由许许多多“N”型波构成了OBV的曲线图，对一浪高于一浪的“N”型波，称其为“上升潮”（UP TIDE），至于上升潮中的下跌回落则称为“跌潮”（DOWN FIELD）。
能量潮是将成交量数量化，制成趋势线，配合股价趋势线，从价格的变动及成交量的增减关系，推测市场气氛。其主要理论基础是市场价格的变化必须有成交量的配合，股价的波动与成交量的扩大或萎缩有密切的关连。通常股价上升所需的成交量总是较大；下跌时，则成交量可能放大，也可能较小。价格升降而成交量不相应升降，则市场价格的变动难以为继。
OBV指标，又称为能量潮，具有非常高的借鉴意义，据了解，能量潮OBV指标是通过累计每日的需求量和供给量并予以数字化，制成趋势线，然后配合证券价格趋势图，从价格变动与成交量增减的关系上，来推测市场气氛的一种技术指标。
如果OBV指标波动情况为N字形，持续上攻的时候，投资人应该继续持股。如果OBV指标呈小N上攻，并且在某段时间内迅速的上涨，一般都意味着行情会出现反转。OBV线长时间内横向运动，但是某天却快速上涨，并且突破MAOBV线，这种情况一般就代表着大行情的到来。OBV运动背离移动平均线，通常情况下代表着后期行情会有反转的情况，这时候投资人一定要小心。

公式源码：MOBV：=OBV-MA（OBV，30）；
STICKLINE（MOBV>；0，0，MOBV，1，0），COLORRED；
STICKLINE（MOBV<；0，0，MOBV，1，0），COLORCYAN；
OBV高：=REF（OBV，BARSLAST（FILTER（BACKSET（FILTER（REF（OBV，5）=HHV（OBV，2*5+1），5），5+1），5））；
C高：REF（C，BARSLAST（FILTER（BACKSET（FILTER（REF（C，5）=HHV（C，2*5+1），5），5+1），5)）），NODRAW；
量入为主：CROSS（OBV，OBV高）ANDH
STICKLINE（量入为主，0，MOBV，1，0），COLORYELLOW。
需要注意的是，以上介绍的公式含有未来的，注意信号的出现，量入为主，量在价先。以上就是能量obv画线指标公式相关内容。
拓展资料：
OBV 的英文全称是：On Balance Volume，是由美国的投资分析家Joe Granville所创。该指标通过统计成交量变动的趋势来推测股价趋势。OBV以“N”字型为波动单位，并且由许许多多“N”型波构成了OBV的曲线图，对一浪高于一浪的“N”型波，称其为“上升潮”（UP TIDE），至于上升潮中的下跌回落则称为“跌潮”（DOWN FIELD）。
能量潮是将成交量数量化，制成趋势线，配合股价趋势线，从价格的变动及成交量的增减关系，推测市场气氛。其主要理论基础是市场价格的变化必须有成交量的配合，股价的波动与成交量的扩大或萎缩有密切的关连。通常股价上升所需的成交量总是较大；下跌时，则成交量可能放大，也可能较小。价格升降而成交量不相应升降，则市场价格的变动难以为继。
OBV指标，又称为能量潮，具有非常高的借鉴意义，据了解，能量潮OBV指标是通过累计每日的需求量和供给量并予以数字化，制成趋势线，然后配合证券价格趋势图，从价格变动与成交量增减的关系上，来推测市场气氛的一种技术指标。
如果OBV指标波动情况为N字形，持续上攻的时候，投资人应该继续持股。如果OBV指标呈小N上攻，并且在某段时间内迅速的上涨，一般都意味着行情会出现反转。OBV线长时间内横向运动，但是某天却快速上涨，并且突破MAOBV线，这种情况一般就代表着大行情的到来。OBV运动背离移动平均线，通常情况下代表着后期行情会有反转的情况，这时候投资人一定要小心。

Ⅲ 多条均线粘合的公式怎么写，请写出源码来。谢谢......................

给你一个例子,通达信三线粘合指标公式,图片演示看源码下面网址里.

M1:MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1)),COLORGREEN;
M2:MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1),COLORGREEN,LINETHICK1;
M3:IF(MA(CLOSE,17)<M2,M2,MA(CLOSE,17)),COLORGREEN,LINETHICK1;
支撑线:M3-(EMA(C,3)-M3),COLORFF8080,LINETHICK1;
支强:IF(支撑线>REF(支撑线,1),支撑线,DRAWNULL),COLORGREEN,LINETHICK2;
J1:=BACKSET(M1>REF(M1,1),2);
IF(J1,M3,DRAWNULL),COLORMAGENTA,LINETHICK2;

Ⅳ 殷宝华均线公式源码

一号线:EMA(CLOSE,144),POINTDOT,LINETHICK2,COLOR0000FF;
二号线:EMA(C,25),COLORWHITE,LINETHICK2;
三号线:EMA(C,318),COLOR0000FF,LINETHICK2;
四黑马线:EMA(C,453),CIRCLEDOT,LINETHICK1,COLOR428899;
五号线:EMA(C,550),COLORFFCC66;
六号线:EMA(C,610),LINETHICK2,COLORYELLOW;
七号线:EMA(C,730),COLORBLUE;
八号线:EMA(C,99),POINTDOT,LINETHICK2,COLORWHITE;
(大盘:=EMA(INDEXC,500)/EMA(C,500);
大盘线:=INDEXC/大盘,LINETHICK1,COLORBLUE;
工作线:EMA(C,14),COLOR00FFFF,LINETHICK1;)
八线代码 :
DIFF:=( EMA(CLOSE,7) - EMA(CLOSE,19)),COLORWHITE;
DEA:=EMA(DIFF,9),COLORF00FF0 ;
MACD:=0.90*(DIFF-DEA), COLORSTICK;
TJ:=(DIFF>=DEA);
TJ1:=(DIFF>=0);
{STICKLINE(TJ,H,L,0,0),COLORYELLOW;}
STICKLINE(TJ,O,C,3,1),COLORYELLOW;
STICKLINE(TJ1 AND TJ,H,L,0,0),COLORF00FF0;
STICKLINE(TJ1 AND TJ,O,C,3,1),COLORF00FF0;
STICKLINE(DIFF<DEA,H,L,0,0),COLORF0F000;
STICKLINE(DIFF<DEA,O,C,3,0),COLORF0F000;
VAR1:=(CLOSE*2+HIGH+LOW)/4;
SK:= EMA(VAR1,13)-EMA(VAR1,73);
SD:= EMA(SK,2);
{DRAWTEXT((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 ) OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)) ,L*0.99,'短线'),COLORRED;}
{STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 ) OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),H,L,0,0),COLORRED;}
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 ) OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),O,C,3,0),LINETHICK3,COLORRED;
SS:=CROSS(二号线,八号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98
OR CROSS(二号线,三号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98
OR CROSS(二号线,一号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98{AND CROSS(二号线,三号线)};
DRAWICON(SS,L-0.04,1);
DD:=CROSS(八号线,一号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98
OR CROSS(八号线,四黑马线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98
OR CROSS(八号线,三号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98
OR CROSS(八号线,三号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98 AND CROSS(二号线,四黑马线);
{DD:=CROSS(二号线,四黑马线);};
使用方法:
⑴ 测算反弹的理论高度。
方法是用最高点减去最低点再除以2，然后再加上最低点，即为最后的反弹理论高度。
其计算公式可表述为：X（理论涨幅）= D（最低点或最低价）+[H（最高点或最高价）—D（最低点或最低价）]÷2。
实例：2004年大盘反弹高度1776点的计算：
X（大盘反弹高度）= 1307点+[ 2245点（最高点）—1307（最低点）]÷2=1776点。
通过计算，2004年的理论反弹高度应为1176点。而2004年4月6日的最高日收盘点位实际为1777点，仅与计算结果差一个点，其精确程度，显而易见。
⑵ 下跌低点的测算。
“这是低位买入股票的一种好方法。据此来买股票，一般可买到安全的最低价区。”
其计算方法是用前期明显高点减前期明显反弹低点二次，负数为多少，就是它的理论跌幅的最低点或最低价。
用公式表示为：X（买入价）= H（前期高点）—低点—低点
以上内容仅供参考,风险自负

Ⅳ 求K线图 和 VOL图的公式源码

主图：
STICKLINE(C>=O,H,L,0,1), COLORred;
STICKLINE(C>=O,C,O,6,1), COLORred;
STICKLINE(C< O,H,L,0,0), ColorFFFF00;
STICKLINE(C< O,C,O,6,0),ColorFFFF00;

VOL图
VOL,VOLSTICK;
MA1:MA(VOL,5),colorwhite;
MA2:MA(VOL,10),coloryellow;
MA3:MA(VOL,20),colorff00ff;

K线图（Candlestick Charts）又称蜡烛图、日本线、阴阳线、棒线、红黑线等，常用说法是“K线”。它是以每个分析周期的开盘价、最高价、最低价和收盘价绘制而成。

Ⅵ 通达信选股公式源码

你好，通达信选股公式源码如下。
次日涨停
W1:=C=HHV（C，20）；
W2:=BARSLAST（W1）；
W3:=IF（W2>0，REF（C，W2），REF（C，W2））；
W4:=交叉（C，REF（W3，1））；
W4和计数（W4，5）=1；
黄转紫选股
差异：=EMA（DCLOSE，12）-EMA（DCLOSE，26）；
DEA:=EMA（差异，9）；
MACD:=（DIFF-DEA）*2；
紫柱:MACD<0和MACD>REF（MACD，1）和REF（MACD，1）低位金叉选股
差异：=EMA（DCLOSE，12）-EMA（DCLOSE，26）；
DEA:=EMA（差异，9）；
MACD:=（DIFF-DEA）*2；
低位金叉:交叉（差异，DEA）和差异<-0.1；
二次金叉选股
差异：=EMA（DCLOSE，12）-EMA（DCLOSE，26）；
DEA:=EMA（差异，9）；
MACD:=（DIFF-DEA）*2；
JCCOUNT:=计数（交叉（差异，数据包络分析），BARSLAST（数据包络分析>=0））；
二次金叉:交叉（差异，DEA）和DEA<0，计数（JCCOUNT=2，21）=1；
绝地反弹
（1）
VAR1:=参考值（低，1）；
VAR2:=SMA（ABS（低VAR1），13，1）/SMA（最大值（低VAR1，0），13，1）*100；
VAR3:=EMA（如果（关闭*1.2，VAR2*13，VAR2/13），13）；
VAR4:=LLV（低，34）；
VAR5:=HHV（VAR3，34）；
VAR6:=如果（LLV（低，55），1，0）；
VAR7:=EMA（如果（低）<=VAR4，（VAR3+VAR5*2）/2，0），3）/618*VAR6；
XL1:=MA（低，2）*0.96；
XL2:=MA（低，26）*0.85；
XL3:=REF（XL1，1）启动:=如果（XL3，0，VAR7*3），则为红色；
XG：启动>25;
（2）
倒退（（参考（关闭，1）<参考（打开，1）和
关闭>打开和ABS（关闭参考（关闭，1））/关闭<0.002），2）；
A2:=过滤器（A1<=V3，10）；
ND资本<300000000
REF（V，1）=LLV（V，4）和V>=REF（V，1）
HHV（V，3）=参考（V，1）和HHV（V，5）=参考（V，1）和HHV（V，21）=参考（V，1）
和V>=REF（V，1）
01>0，T02>0；
1.三线粘合
M:=1；
M5:=MA（闭合，5）；
M10:=MA（闭合，10）；
M20:=MA（闭合，20）；
K1:=最大值（最大值（M5，M10），最大值（M10，M20））；
K2:=MIN（MIN（M5，M10），MIN（M10，M20））；
A:=最大（M5，最大（M10，M20））/MIN（M5，最小（M10，M20））<1+0.03*M；
A1:=（K1/K2-1）<0.005；
A2:=（K1/K2-1）<0.005；
A3:=V>REF（V，1）*1.5和V>MA（V，5）；
XG:A和A1，A2和A3，C>O和V>REF（V，1），资本<=300000000；
2.三条线粘合
N1:=5；N2:=10；N3:=20；M:=1；
MA1:=MA（C，N1）；MA2:=MA（C，N2）；MA3:=MA（C，N3）；
A3:=V>REF（V，1）*1.5和V>MA（V，5）；
最大值（MA1，最大值（MA2，MA3））/MIN（MA1，最小值（MA2，MA3））<1+0.01*M
C>O和V>REF（V，1）和财务（7）<=300000000
A3及资本<=300000000；
3.均线粘合
M:=1；
M5:=MA（闭合，5）；
M10:=MA（闭合，10）；
M20:=MA（闭合，20）；
K1:=最大值（最大值（M5，M10），最大值（M10，M20））；
K2:=MIN（MIN（M5，M10），MIN（M10，M20））；
A:=最大（M5，最大（M10，M20））/MIN（M5，最小（M10，M20））<1+0.01*M；
A1:=（K1/K2-1）<0.005；
A2:=（K1/K2-1）<0.005；
A3:=V>REF（V，1）*1.5和V>MA（V，5）；
XG:A和A1以及A2和A3；
3.金叉选股指标
快线:=均线(均线)(均线(收盘，2，2，2)，；
慢线:=EMA（参考(快线，1)，2);
A3:=V>REF（V，1）*1.5和V>MA（V，5）；
交叉(快线，慢线) 和C>O和
五> =MA（V，21）和V>REF（V，1），资本<=300000000；

Ⅶ 主图均线MARPS(20200520)+通达信公式源码

MA5:MA(CLOSE,5);

MA10:MA(CLOSE,10);

MA50:MA(CLOSE,50);

MA250:MA(CLOSE,250);

{划记号}

GGXG:=HHV(C,1)=HHV(C,0);

DRAWICON(BARSSINCEN(GGXG,20)=0,LOW*0.95,41);

{偏移值}

偏10%:(C-MA(C,10))/MA(C,10)*100,NODRAW,COLORWHITE;

偏20%:(C-MA(C,20))/MA(C,20)*100,NODRAW,COLORWHITE;

偏50%:(C-MA(C,50))/MA(C,50)*100,NODRAW,COLORWHITE;

{一年新高}

一年新高价:HHV(H,250),NODRAW,COLORWHITE;

STICKLINE(ISLASTBAR,一年新高价,一年新高价,10,1),COLORRED;

距离:(一年新高价-CLOSE)/CLOSE*100,NODRAW;

{中期调整}

X:=CONST(HHV(HIGH,120));

X2:=HHVBARS(H,120)+1;

X3:=CONST(LLV(LOW,X2));

X4:=X3/X;X5:=X4*100-100;DRAWNUMBER(L=X3,X3,X5);

中期调整:X5,NODRAW;IF(X5<=-30,X5,DRAWNULL),NODRAW,COLORRED;

{AMA20}

N:=20;

DIR:=ABS(CLOSE-REF(CLOSE,N));

VIR:=SUM(ABS(CLOSE-REF(CLOSE,1)),N);

ER:=DIR/VIR;

CS:=ER*(2/3-2/31)+2/31;

CQ:=CS*CS;

AMA1:DMA(CLOSE,CQ),COLORGREEN,LINETHICK2;

AMA2:IF(AMA1>REF(AMA1,1),AMA1,DRAWNULL),COLORRED,LINETHICK2;

{AMA乖离位}

AMA值:=DMA(CLOSE,CQ);

乖离位1:AMA值*1.08,NODRAW,COLORFFFF00;

STICKLINE(ISLASTBAR,乖离位1,乖离位1,10,1),COLORFFFF00;

{月线反转}

Z:=EXTDATA_USER(3,0);{50天的}

RPS50:=Z/10;

D:=IF(RPS50<=85,0,1);{RPS50大于85}

A:=C/MA(C,250)>1;{站上年线}

NH:=IF(H<HHV(H,50),0,1);

B:=COUNT(NH,30);{一月内曾创50日新高}

NN:=IF(C>MA(C,250),1,0);

AA:=COUNT(NN,30);

AB:=HIGH/HHV(HIGH,120)>0.9;{最高价距离120日内的最高价不到10%}

DRAWICON(BARSSINCEN((A AND B AND D AND  AA>2  AND AA<30 AND AB),30)=0,LOW,34);

{小黄人}

K120:=EXTDATA_USER(1,0);{120天的RPS}

RPSK120:=K120/10;

K01:=IF(RPSK120<=90,0,1);{RPS120大于90};

K250:=EXTDATA_USER(2,0);{250天的RPS}

RPSK250:=K250/10;

K02:=IF(RPSK250<=90,0,1);{RPS250大于90};

K50:=EXTDATA_USER(3,0);{50天的RPS}

RPSK50:=K50/10;

K03:=IF(RPSK50<=90,0,1);{RPS50大于90};

DRAWICON(BARSSINCEN((K01 AND K02 AND K03),20)=0,LOW*0.95,15);

{涨停跌停标示}

{涨停红色}

ZDF:=(C-REF(C,1))/REF(C,1)*100;

STICKLINE(ZDF>9.5,C,O,3.1,0),COLORYELLOW;

STICKLINE(ZDF>9.5,C,O,2.1,0),COLORYELLOW;

STICKLINE(ZDF>9.5,C,O,1.2,0),COLORYELLOW;

STICKLINE(ZDF>9.5,C,O,0.2,0),COLORYELLOW;

STICKLINE(ZDF>9.5,H,L,0,0),COLORYELLOW;

{跌停绿色}

STICKLINE(ZDF<-9.5,O,C,3.1,0),COLORGREEN;

STICKLINE(ZDF<-9.5,O,C,2.1,0),COLORGREEN;

STICKLINE(ZDF<-9.5,O,C,1.2,0),COLORGREEN;

STICKLINE(ZDF<-9.5,O,C,0.2,0),COLORGREEN;

STICKLINE(ZDF<-9.5,H,L,0,0),COLORGREEN;

{基本面信息}

DRAWTEXT_FIX(ISLASTBAR ,0.20,0.01,1,DYBLOCK),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR ,0.30,0.01,1,HYBLOCK),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR ,0.50,0.10,1,GNBLOCK),COLORWHITE;

{口袋支点个股}

GGM1:=MA(C,10);GGM2:=MA(C,50);GGM3:=MA(C,120);GGM4:=REF(GGM3,1);GGM5:=MA(C,20);

GGM6:=REF(GGM5,1);GGM7:=(H+L)/2;GGM8:=MA(C,200);GGM9:=REF(GGM2,1);GGL250:=LLV(LOW,250);

GGH120:=HHV(HIGH,120);GGX11:=IF(C<REF(C,1),V,0);GGX12:=(L-MA(C,10))/MA(C,10)*100;

GGX13:=(L-MA(C,50))/MA(C,50)*100;GGX14:=H>REF(H,1);GGX15:=C>=REF(O,1);

GGX16:=(C-MA(C,50))/MA(C,50);GGX17:=(C-MA(C,20))/MA(C,20)*100;

GGX18:=(C-MA(C,50))/MA(C,50)*100;

GGY:=EXTDATA_USER(3,0)/10;{50天的}GGY1:=EXTDATA_USER(1,0)/10;{120天的}

GGY2:=EXTDATA_USER(2,0)/10;{250天的}GGY3:=EXTDATA_USER(6,0)/10;{20天的}

{标准口袋支点个股}

DRAWICON((C-REF(C,1))/REF(C,1)>=0.02 AND VOL>=REF(HHV(GGX11,10),1) AND

(GGX12<=1.5 OR GGX13<=1.5) AND C>=O

AND GGM5>=GGM6 AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2

AND (GGX17<=50 AND GGX18<=50)

AND H>=(GGH120*0.85) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR

(GGY3>=85 AND C>REF(C,1)*1.07)),L*1.01,9);

DRAWICON((C-REF(C,1))/REF(C,1)>=0.095  AND (GGX12<=1.5 OR GGX13<=1.5) AND GGX16<=0.6

AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND GGX17<=45 AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND

C>=GGL250*1.18 AND  H>=(GGH120*0.85) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR GGY3>=85)

,L*1.01,9);

BBKD:=((C-REF(C,1))/REF(C,1)>=0.095 OR (VOL>=REF(HHV(GGX11,10),1) AND C>REF(C,1)*1.07))

AND (GGX12<=1.5 OR GGX13<=1.5) AND GGX16<=0.6

AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND GGX17<=45 AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND

C>=GGL250*1.18 AND  H>=(GGH120*0.92) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR GGY3>=85);

BBKD1:=(C-REF(C,1))/REF(C,1)>=0.02 AND VOL>=REF(HHV(GGX11,10),1) AND

(GGX12<=1.5 OR GGX13<=1.5) AND C>=O

AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2

AND (GGX17<=25 AND GGX18<=25)

AND HHV(C,1)=HHV(C,120) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR

(GGY3>=85 AND C>REF(C,1)*1.07));

{延伸口袋支点个股}

DRAWICON((C-REF(C,1))/REF(C,1)>=0.02 AND GGX12>1.5 AND VOL>=REF(HHV(GGX11,10),1)

AND C>=O AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2 AND GGX17<=100

AND C>=(GGH120*0.85) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR (GGY3>=85

AND C>=REF(C,1)*1.07)),H*1.05,37);

DRAWICON((C-REF(C,1))/REF(C,1)>=0.095 AND GGX12>1.5 AND GGX16<=0.6 AND GGX17<=100

AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2

AND C>=(GGH120*0.85) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR GGY3>=85)

,H*1.05,37);

YYKD:=(C-REF(C,1))/REF(C,1)>=0.02 AND GGX12>1.5 AND VOL>=REF(HHV(GGX11,10),1)

AND C>=O AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2

AND (GGX17<=30 AND GGX18<=30)

AND HHV(C,1)=HHV(C,120) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR (GGY3>=85

AND C>=REF(C,1)*1.07));

YYKD1:=(C-REF(C,1))/REF(C,1)>=0.095 AND GGX12>1.5 AND GGX16<=0.6 AND GGX17<=100

AND  GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2

AND (GGX17<=30 AND GGX18<=30)

AND C>=(GGH120*0.92) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR GGY3>=85);

DRAWICON(BARSSINCEN(YYKD OR YYKD1 OR BBKD OR BBKD1,20)=0,H*1.05,36);

Ⅷ 请高手帮忙修改下K线公式源码（兼容博易大师软件）在线等！拜托了

首先你提供的代码不是通达信的啊。

再有在博易大师可以绘制k线。

例如下面图中把绘制好的k线放在幅图中显示。