編程思路破譯

周K賦值:"平滑異同平均的DIF[取周線數(shù)據(jù)]"(12,26,9),NODRAW
周D賦值:"平滑異同平均的DEA[取周線數(shù)據(jù)]"(12,26,9),NODRAW
畫帶狀線
輸出DIF:收盤價的12日指數(shù)移動平均-收盤價的26日指數(shù)移動平均
輸出DEA:DIF的9日指數(shù)移動平均,畫白色
輸出平滑異同平均:(DIF-DEA)*2,COLORSTICK
金叉CORO賦值:DIF上穿DEA
當(dāng)滿足條件金叉CORO時,在DIF位置畫1號圖標(biāo)
VA1賦值:上次MACD<0距今天數(shù)+1日內(nèi)MACD距今天數(shù)
VA2賦值:若0上穿MACD則將最近1日前的VA1+2周期置為1上穿0.5
QG賦值:當(dāng)滿足條件VA2時,在MACD位置畫直線起點(diǎn)，當(dāng)滿足條件1日前的VA2時,在1日前的MACD位置畫直線終點(diǎn),1表示是否延長.
輸出W3:當(dāng)滿足條件MACD>QG時,在MACD和QG位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫黃色
入1賦值:如果DIF>1日前的DIF,返回DIF,否則返回?zé)o效數(shù),畫紅色,線寬為2

入2賦值:如果DIF<1日前的DIF,返回DIF,否則返回?zé)o效數(shù),畫綠色,線寬為2

當(dāng)滿足條件1日前的MACD>0ANDMACD<0時,在MACD-0.01位置書寫文字COLORCDCDB4

當(dāng)滿足條件2日前的MACD>0ANDREF(MACD,1)<0ANDMACD<0時,在MACD-0.01位置書寫文字COLORCDCDB4

當(dāng)滿足條件3日前的MACD>0ANDREF(MACD,2)<0ANDREF(MACD,1)<0ANDMACD<0時,在MACD-0.01位置書寫文字COLORCDCDB4

當(dāng)滿足條件4日前的MACD>0ANDREF(MACD,3)<0ANDREF(MACD,2)<0ANDREF(MACD,1)<0ANDMACD<0時,在MACD-0.01位置書寫文字COLORCDCDB4

當(dāng)滿足條件5日前的MACD>0ANDREF(MACD,4)<0ANDREF(MACD,3)<0ANDREF(MACD,2)<0ANDREF(MACD,1)<0ANDMACD<0時,在MACD-0.01位置書寫文字COLORCDCDB4

當(dāng)滿足條件6日前的MACD>0ANDREF(MACD,5)<0ANDREF(MACD,4)<0ANDREF(MACD,3)

<0ANDREF(MACD,2)<0ANDREF(MACD,1)<0ANDMACD<0時,在MACD-0.01位置書寫文字COLORCDCDB4

當(dāng)滿足條件1日前的MACD<0ANDMACD>0時,在MACD-0.01位置書寫文字畫紅色

當(dāng)滿足條件2日前的MACD<0ANDREF(MACD,1)>0ANDMACD>0時,在MACD-0.01位置書寫文字畫紅色

當(dāng)滿足條件3日前的MACD<0ANDREF(MACD,2)>0ANDREF(MACD,1)>0ANDMACD>0時,在MACD-0.01位置書寫文字畫紅色

當(dāng)滿足條件4日前的MACD<0ANDREF(MACD,3)>0ANDREF(MACD,2)>0ANDREF(MACD,1)>0ANDMACD>0時,在MACD-0.01位置書寫文字畫紅色

當(dāng)滿足條件5日前的MACD<0ANDREF(MACD,4)>0ANDREF(MACD,3)>0ANDREF(MACD,2)>0ANDREF(MACD,1)>0ANDMACD>0時,在MACD-0.01位置書寫文字畫紅色

當(dāng)滿足條件6日前的

MACD<0ANDREF(MACD,5)>0ANDREF(MACD,4)>0ANDREF(MACD,3)>0ANDREF(MACD,2)>0ANDREF(MACD,1)>0ANDMACD>0時,在MACD-0.01位置書寫文字畫紅色

MA5賦值:收盤價的5日簡單移動平均

MA10賦值:收盤價的10日簡單移動平均

MA21賦值:收盤價的21日簡單移動平均

MA60賦值:收盤價的60日簡單移動平均

B3賦值:收盤價的5日簡單移動平均和收盤價的10日簡單移動平均和收盤價的20日簡單移動平均的較大值的較大值

B31賦值:收盤價的5日簡單移動平均和收盤價的10日簡單移動平均和收盤價的20日簡單移動平均的較小值的較小值

A3賦值:收盤價>B3 AND 最低價<B31 AND 收盤價>1日前的收盤價 AND 收陽線

強(qiáng)勢賦值: 收盤價/1日前的收盤價>1.07

漲幅賦值:如果收盤價>1.07*1日前的收盤價,返回1,否則返回0

均價賦值:(最高價+最低價+開盤價+收盤價)/4

分水嶺賦值:3*均價-2*均價的2日[1日權(quán)重]移動平均的12日簡單移動平均

P賦值:1

A01賦值:(收盤價-3日內(nèi)最低價的最低值)/(3日內(nèi)最高價的最高值-3日內(nèi)最低價的最低值)

A11賦值:A01的2日[1日權(quán)重]移動平均

A21賦值:A11的2日[1日權(quán)重]移動平均

A31賦值:3*A11-2*A21

A41賦值:2*A31-0.5

乾坤線賦值:收盤價*(1-(A41-A21)/15)

A賦值:(最低價+最高價)/2

VARR2賦值:(最高價+最低價+開盤價+2*收盤價)/5

CHH低吸線賦值:VARR2的21日線性回歸斜率*20+VARR2的55日指數(shù)移動平均

BB賦值:1日內(nèi)最高價的最低值

逃頂線賦值:BB的15日線性回歸預(yù)測值的15日線性回歸預(yù)測值

做多趨勢賦值:如果均價>分水嶺,返回均價,否則返回分水嶺

支撐賦值:做多趨勢的相反數(shù)+2*分水嶺

FF賦值:收盤價的3日指數(shù)移動平均

VAR1賦值:(9日內(nèi)最高價的最高值-收盤價)/(9日內(nèi)最高價的最高值-9日內(nèi)最低價的最低值)*100-70

VAR2賦值:VAR1的9日[1日權(quán)重]移動平均+100

VAR3賦值:(收盤價-9日內(nèi)最低價的最低值)/(9日內(nèi)最高價的最高值-9日內(nèi)最低價的最低值)*100

VAR4賦值:VAR3的3日[1日權(quán)重]移動平均

VAR5賦值:VAR4的3日[1日權(quán)重]移動平均+100

VAR6賦值:VAR5-VAR2

動能賦值:如果VAR6>45,返回VAR6-45,否則返回0

MA15賦值:收盤價的21日指數(shù)移動平均

建倉1賦值:((FF上穿MA15 AND 收盤價上穿分水嶺 AND 收盤價上穿逃頂線 ANDCROSS(收盤價,乾坤線) AND 開盤價>支撐) OR (FF上穿MA15 AND 漲幅) OR(FF上穿MA15 AND (最高價上穿乾坤線 OR 最高價上穿逃頂線 OR 最高價上穿分水嶺 AND 漲幅))) AND 強(qiáng)勢,畫黃色

輸出主力建倉:如果建倉1>0,返回建倉1,否則返回0,畫黃色,NODRAW

當(dāng)滿足條件建倉1>0時,在0和建倉1*0.375位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黃色

當(dāng)滿足條件建倉1>0時,在建倉1*0.375位置書寫文字,畫黃色

AA賦值:如果模糊匹配品種名稱,返回0,否則返回1 AND 如果模糊匹配品種名稱,返回0,否則返回1

GH1賦值:((3.48*收盤價+最高價+最低價)/4-收盤價的20日指數(shù)移動平均)/收盤價的20日指數(shù)移動平均的絕對值

GH2賦值:以GH1為權(quán)重((2.11*收盤價+最低價+最高價)/4)的動態(tài)移動平均

GHH賦值:GH2的200日指數(shù)移動平均*1.118

GH3賦值:(收盤價的3日簡單移動平均)

GH4賦值:(收盤價的5日簡單移動平均)

GH5賦值:(收盤價的8日簡單移動平均)

GH6賦值:(收盤價的13日簡單移動平均)

GH7賦值:(((((收盤價的3日簡單移動平均) > (1日前的收盤價的3日簡單移動平均)) AND ((收盤價的5日簡單移動平均) > (1日前的收盤價的5日簡單移動平均))) AND (收盤價 > (收盤價的3日簡單移動平均))) AND ((收盤價的3日簡單移動平均) > (收盤價的5日簡單移動平均)))

GH8賦值:(((((GH3/(1日前的GH3))-1)*100的反正切) * 180) / (3.1416))

GH9賦值:(((((GH4/(1日前的GH4))-1)*100的反正切) * 180) / (3.1416))

GH10賦值:(((((GH5/(1日前的GH5))-1)*100的反正切) * 180) / (3.1416))

GH11賦值:(((((GH6/(1日前的GH6))-1)*100的反正切) * 180) / (3.1416))

GH12賦值:如果GH7ANDGH8>45ANDGH9>45ANDGH10>60ANDGH11>45ANDMA(收盤價,250)>1日前的收盤價的250日簡單移動平均,返回1,否則返回0

輸出乘勝追擊:GH12 AND GH12的2日累和=1 AND 收盤價/GHH>1.03 AND 收盤價/GHH<1.2,NODRAW

當(dāng)滿足條件乘勝追擊時,在0和乘勝追擊*0.125位置之間畫柱狀線,寬度為3,0不為0則畫空心柱., 畫綠色

當(dāng)滿足條件乘勝追擊時,在乘勝追擊*0.25和乘勝追擊*0.125位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色

當(dāng)滿足條件乘勝追擊時,在乘勝追擊*0.25和乘勝追擊*0.375位置之間畫柱狀線,寬度為1,0不為0則畫空心柱., 畫洋紅色

程序源碼

周K:="macd.DIF#WEEK"(12,26,9),NODRAW;

周D:="MacD.DEA#WEEK"(12,26,9),NODRAW;

DRAWBAND(周K,RGB(150,0,150),周D,RGB(0,100,200));

DIF:EMA(CLOSE,12)-EMA(CLOSE,26);

DEA:EMA(DIF,9),COLORWHITE;

MACD:(DIF-DEA)*2,COLORSTICK;

金叉CORO:=crOSS(DIF,DEA);

DRAWICON(金叉CORO,DIF,1);

VA1:=HHVBARS(MACD,BArslAST(MACD<0)+1);

VA2:=CROSS(BACKSET(CROSS(0,MACD),REF(VA1,1)+2),0.5);

QG:=DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1);

W3:STICKLINE(MACD>QG,MACD,QG,1,0),COLORYELLOW;

入1:=IF(DIF>REF(DIF,1),DIF,DRAWNULL),COLORRED,LINETHICK2;

入2:=IF(DIF<REF(DIF,1),DIF,DRAWNULL),COLORGREEN,LINETHICK2;

DRAWTEXT(REF(MACD,1)>0 AND MACD<0,MACD-0.01,'1')COLORCDCDB4;

DRAWTEXT(REF(MACD,2)>0 AND REF(MACD,1)<0 AND MACD<0,MACD-0.01,'2')COLORCDCDB4;

DRAWTEXT(REF(MACD,3)>0 AND REF(MACD,2)<0 AND REF(MACD,1)<0 AND MACD<0,MACD-0.01,'3')COLORCDCDB4;

DRAWTEXT(REF(MACD,4)>0 AND REF(MACD,3)<0 AND REF(MACD,2)<0 AND REF(MACD,1)<0 AND MACD<0,MACD-0.01,'4')COLORCDCDB4;

DRAWTEXT(REF(MACD,5)>0 AND REF(MACD,4)<0 AND REF(MACD,3)<0 AND REF(MACD,2)<0 AND REF(MACD,1)<0 AND MACD<0,MACD-0.01,'5')COLORCDCDB4;

DRAWTEXT(REF(MACD,6)>0 AND REF(MACD,5)<0 AND REF(MACD,4)<0 AND REF(MACD,3)<0 AND REF(MACD,2)<0 AND REF(MACD,1)<0 AND MACD<0,MACD-0.01,'6')COLORCDCDB4;

DRAWTEXT(REF(MACD,1)<0 AND MACD>0,MACD-0.01,'1')COLORRED;

DRAWTEXT(REF(MACD,2)<0 AND REF(MACD,1)>0 AND MACD>0,MACD-0.01,'2')COLORRED;

DRAWTEXT(REF(MACD,3)<0 AND REF(MACD,2)>0 AND REF(MACD,1)>0 AND MACD>0,MACD-0.01,'3')COLORRED;

DRAWTEXT(REF(MACD,4)<0 AND REF(MACD,3)>0 AND REF(MACD,2)>0 AND REF(MACD,1)>0 AND MACD>0,MACD-0.01,'4')COLORRED;

DRAWTEXT(REF(MACD,5)<0 AND REF(MACD,4)>0 AND REF(MACD,3)>0 AND REF(MACD,2)>0 AND REF(MACD,1)>0 AND MACD>0,MACD-0.01,'5')COLORRED;

DRAWTEXT(REF(MACD,6)<0 AND REF(MACD,5)>0 AND REF(MACD,4)>0 AND REF(MACD,3)>0 AND REF(MACD,2)>0 AND REF(MACD,1)>0 AND MACD>0,MACD-0.01,'6')COLORRED;

MA5:=MA(C,5);

MA10:=MA(C,10);

MA21:=MA(C,21);

MA60:=MA(C,60);

B3:=MAX(MA(C,5),MAX(MA(C,10), MA(C,20)));

B31:=MIN(MA(C,5),MIN(MA(C,10), MA(C,20)));

A3:=C>B3 AND L<B31 AND C>REF(C,1) AND C>O;

強(qiáng)勢:= C/REF(C,1)>1.07;

漲幅:=IF(C>1.07*REF(C,1),1,0);

均價:=(HIGH+LOW+OPEN+CLOSE)/4;

分水嶺:=MA(3*均價-2*SMA(均價,2,1),12);

P:=1;

A01:=(C-LLV(LOW,3))/(HHV(HIGH,3)-LLV(LOW,3));

A11:=SMA(A01,2,1);

A21:=SMA(A11,2,1);

A31:=3*A11-2*A21 ;

A41:=2*A31-0.5;

乾坤線:=C*(1-(A41-A21)/15);

A:=(L+H)/2;

VARR2:=(H+L+O+2*C)/5;

CHH低吸線:=EMA(SLOPE(VARR2,21)*20+VARR2,55);

BB:=LLV(H,1);

逃頂線:=FORCAST(FORCAST(BB,15),15);

做多趨勢:=IF(均價>分水嶺,均價,分水嶺);

支撐:=REVERSE(做多趨勢)+2*分水嶺;

FF:=EMA(CLOSE,3);

VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;

VAR2:=SMA(VAR1,9,1)+100;

VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

VAR4:=SMA(VAR3,3,1);

VAR5:=SMA(VAR4,3,1)+100;

VAR6:=VAR5-VAR2;

動能:=IF(VAR6>45,VAR6-45,0);

MA15:=EMA(CLOSE,21);

建倉1:=((CROSS(FF,MA15) AND CROSS(C,分水嶺) AND CROSS(C,逃頂線) AND

CROSS(C,乾坤線) AND O>支撐) OR (CROSS(FF,MA15) AND 漲幅) OR

(CROSS(FF,MA15) AND (CROSS(H,乾坤線) OR CROSS(H,逃頂線) OR CROSS(H,分水嶺) AND 漲幅))) AND 強(qiáng)勢

,COLORYELLOW;

主力建倉:IF(建倉1>0,建倉1,0),COLORYELLOW,NODRAW;

STICKLINE(建倉1>0,0,建倉1*0.375,3,0),COLORYELLOW;

DRAWTEXT(建倉1>0,建倉1*0.375,'主力建倉'),COLORYELLOW;

AA:=IF(NAMELIKE('ST'),0,1) AND IF(NAMELIKE('*ST'),0,1);

GH1:=Abs(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,20))/EMA(CLOSE,20));

GH2:=DMA(((2.11*CLOSE+LOW+HIGH)/4),GH1);

GHH:=EMA(GH2,200)*1.118;

GH3:=(MA(C,3));

GH4:=(MA(C,5));

GH5:=(MA(C,8));

GH6:=(MA(C,13));

GH7:=(((((MA(C,3)) > (REF(MA(C,3),1))) AND ((MA(C,5)) > (REF(MA(C,5),1)))) AND (C > (MA(C,3)))) AND ((MA(C,3)) > (MA(C,5))));

GH8:=(((ATAN(((GH3 / (REF(GH3,1))) - 1) * 100)) * 180) / (3.1416));

GH9:=(((ATAN(((GH4 / (REF(GH4,1))) - 1) * 100)) * 180) / (3.1416));

GH10:=(((ATAN(((GH5 / (REF(GH5,1))) - 1) * 100)) * 180) / (3.1416));

GH11:=(((ATAN(((GH6 / (REF(GH6,1))) - 1) * 100)) * 180) / (3.1416));

GH12:=IF(GH7 AND GH8>45 AND GH9>45 AND GH10>60 AND GH11>45 AND MA(C,250)>REF(MA(C,250),1),1,0);

乘勝追擊:GH12 AND SUM(GH12,2)=1 AND C/GHH>1.03 AND C/GHH<1.2,NODRAW;

STICKLINE(乘勝追擊,0,乘勝追擊*0.125,3,0), COLORGREEN;

STICKLINE(乘勝追擊,乘勝追擊*0.25,乘勝追擊*0.125,2,0),COLORYELLOW;

STICKLINE(乘勝追擊,乘勝追擊*0.25,乘勝追擊*0.375,1,0), COLORMAGENTA;

注：

       館內(nèi)各種公式為學(xué)習(xí)編程而保存，實(shí)戰(zhàn)使用前一定要看其中是否有未來函數(shù)并自己親自測試成功率，決不能依據(jù)公式名稱的描述和形容去投資，據(jù)此入市造成投資損失由投資者自己承擔(dān)。

       發(fā)文不易，如獲益，歡迎贊賞，贊賞必復(fù)！