分享

大智慧自调KD指标公式程序源码编程思路破译和风险提示

 追梦文库 2023-01-16 发布于天津

编程思路破译

输出INPUT:N(9,1,100),M1(3,2,50),M2(3,2,50),T(0,0,2)

输出REFLINE:0,20,50,80,100

RSV赋值:(收盘价-N日内最低价的最低值)/(N日内最高价的最高值-N日内最低价的最低值)*100

K赋值:RSV的M1日指数移动平均

D赋值:K的M2日[1日权重]移动平均

ZK赋值:"随机指标KD的K[取周线数据]"(9,3,3)

ZD赋值:"随机指标KD的D[取周线数据]"(9,3,3)

YK赋值:"随机指标KD的K[取月线数据]"(9,3,3)

YD赋值:"随机指标KD的D[取月线数据]"(9,3,3)

输出日K:如果T=0,返回K,否则返回-8,PRECIS2,LAYER0,画红色

输出日D:如果T=0,返回D,否则返回-8,PRECIS2,LAYER0,COLORA8A818

输出KSL:K-1日前的K,PRECIS2,COLOR986898,线宽为0

输出DSL:D-1日前的D,PRECIS2,COLOR6888B8,线宽为0

输出日K角度:K-1日前的K的反正切*180/3.1416,PRECIS0,COLOR888888,线宽为0

输出周K:如果T=1,返回ZK,否则返回-8,PRECIS2,LAYER0,COLOR189898

输出周D:如果T=1,返回ZD,否则返回-8,PRECIS2,LAYER0,COLOR188818

输出月K:如果T=2,返回YK,否则返回-8,PRECIS2,LAYER0,COLOR983898

输出月D:如果T=2,返回YD,否则返回-8,PRECIS2,LAYER0,COLOR688868

CRSV赋值:(收盘价-36日内最低价的最低值)/(36日内最高价的最高值-36日内最低价的最低值)*100

输出K36:CRSV的5日指数移动平均,COLOR985898,线宽为0

输出D36:K36的5日[1日权重]移动平均,COLOR988800,线宽为0

80,POINTDOT,PRECIS0,LAYER1,COLOR585858

20,POINTDOT,PRECIS0,LAYER1,COLOR887858

当满足条件收盘价>0时,在70和70位置之间画柱状线,宽度为10,0不为0则画空心柱.,画黑色

当满足条件收盘价>0时,在50和50位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR000000

当满足条件收盘价>0时,在30和30位置之间画柱状线,宽度为10,0不为0则画空心柱.,画黑色

PARTLINE(K36,K36>D36,自定色,K36<=D36,自定色),LAYER1,画黑色

PARTLINE(D36,K36>D36,自定色,K36<=D36,自定色),LAYER1,画黑色

FILLRGN(K36,D36,K36>D36,自定色,K36<=D36,自定色),LAYER1,画黑色

FILLRGN(70,100,K>D,自定色,K<D,自定色),画黑色

 FILLRGN(30,70,ZK>ZD,自定色,ZK<ZD,自定色),画黑色

 FILLRGN(0,30,YK>YD,自定色,YK<YD,自定色),画黑色

程序源码

INPUT:N(9,1,100),M1(3,2,50),M2(3,2,50),T(0,0,2);

REFLINE:0,20,50,80,100;

RSV:=(C-LLV(L,N))/(HHV(H,N)-LLV(L,N))*100;

K:=EMA(RSV,M1); D:=SMA(K,M2,1);

ZK:="KD.K#WEEK"(9,3,3); ZD:="KD.D#WEEK"(9,3,3);

YK:="KD.K#MONTH"(9,3,3); YD:="KD.D#MONTH"(9,3,3);

日K:IF(T=0,K,-8),PRECIS2,LAYER0,COLORRED;

日D:IF(T=0,D,-8),PRECIS2,LAYER0,COLORA8A818;

KSL:K-REF(K,1),PRECIS2,COLOR986898,LINETHICK0;

DSL:D-REF(D,1),PRECIS2,COLOR6888B8,LINETHICK0;

日K角度:ATAN(K-REF(K,1))*180/3.1416,PRECIS0,COLOR888888,LINETHICK0;

周K:IF(T=1,ZK,-8),PRECIS2,LAYER0,COLOR189898;

周D:IF(T=1,ZD,-8),PRECIS2,LAYER0,COLOR188818;

月K:IF(T=2,YK,-8),PRECIS2,LAYER0,COLOR983898;

月D:IF(T=2,YD,-8),PRECIS2,LAYER0,COLOR688868;

CRSV:=(C-LLV(L,36))/(HHV(H,36)-LLV(L,36))*100;

K36:EMA(CRSV,5),COLOR985898,LINETHICK0;

D36:SMA(K36,5,1),COLOR988800,LINETHICK0;

80,POINTDOT,PRECIS0,LAYER1,COLOR585858;

20,POINTDOT,PRECIS0,LAYER1,COLOR887858;

STICKLINE(C>0,70,70,10,0),COLORBLACK;

STICKLINE(C>0,50,50,3,0),COLOR000000;

STICKLINE(C>0,30,30,10,0),COLORBLACK;

PARTLINE(K36,K36>D36,RGB(68,28,68),K36<=D36,RGB(8,58,88)),LAYER1,COLORBLACK;

PARTLINE(D36,K36>D36,RGB(68,28,68),K36<=D36,RGB(8,58,88)),LAYER1,COLORBLACK;

FILLRGN(K36,D36,K36>D36,RGB(58,20,58),K36<=D36,RGB(8,50,78)),LAYER1,COLORBLACK;

{背景}

FILLRGN(70,100,K>D,RGB(50,0,0),K<D,RGB(8,38,38)),COLORBLACK; {日K>日D红色、日K<日D青色}

FILLRGN(30,70,ZK>ZD,RGB(42,42,0),ZK<ZD,RGB(8,38,8)),COLORBLACK; {周K>周D黄色、周K<周D绿色}

FILLRGN(0,30,YK>YD,RGB(33,18,33),YK<YD,RGB(28,38,28)),COLORBLACK; {月K>月D紫色、月K<月D蓝色}

风险提示

该公式包含未来函数:#MONTH
该公式包含未来函数:#WEEK

    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约