編程思路破譯

輸出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èi)最低價的最低值)/(N日內(nèi)最高價的最高值-N日內(nèi)最低價的最低值)*100

K賦值:RSV的M1日指數(shù)移動平均

D賦值:K的M2日[1日權(quán)重]移動平均

ZK賦值:"隨機指標(biāo)KD的K[取周線數(shù)據(jù)]"(9,3,3)

ZD賦值:"隨機指標(biāo)KD的D[取周線數(shù)據(jù)]"(9,3,3)

YK賦值:"隨機指標(biāo)KD的K[取月線數(shù)據(jù)]"(9,3,3)

YD賦值:"隨機指標(biāo)KD的D[取月線數(shù)據(jù)]"(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日內(nèi)最低價的最低值)/(36日內(nèi)最高價的最高值-36日內(nèi)最低價的最低值)*100

輸出K36:CRSV的5日指數(shù)移動平均,COLOR985898,線寬為0

輸出D36:K36的5日[1日權(quán)重]移動平均,COLOR988800,線寬為0

80,POINTDOT,PRECIS0,LAYER1,COLOR585858

20,POINTDOT,PRECIS0,LAYER1,COLOR887858

當(dāng)滿足條件收盤價>0時,在70和70位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,畫黑色

當(dāng)滿足條件收盤價>0時,在50和50位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR000000

當(dāng)滿足條件收盤價>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藍(lán)色}

風(fēng)險提示

該公式包含未來函數(shù):#MONTH
該公式包含未來函數(shù):#WEEK