絕版MACD源碼

① 跪求通達信冠軍MACD和冠軍背離線附圖指標源碼，那位大神給下！

{供參考}
{冠軍MACD+頂底背離畫線}
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD2:=2*(DIFF-DEA);
DU0:=CROSS(DIFF,0);
UD0:=CROSS(0,DIFF);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3));
JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0;
JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0;
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
STICKLINE(MACD2>=0,0,MACD2,1,1),COLOR0000FF;
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,1,0),COLORGREEN;
STICKLINE(MACD2<0,0,MACD2,2,0),COLORFFFF00;
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,1,1),COLORFFFF00;
STICKLINE(CLOSE>0,0,0,1,0),COLOR808080;
DEFUT:=BARSLAST(CROSS(MACD2,0));
DEFDT:=BARSLAST(CROSS(0,MACD2));
DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1));
DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1));
DEFU2L:=REF(DEFUL,DEFUT+1);
DEFD2L:=REF(DEFDL,DEFDT+1);
DRAWICON(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),MACD2+0.38,9);
DRAWICON(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),MACD2-0.13,11);
DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2+0.50,5);
DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2-0.14,6);
VAR111:=JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1);
VAR112:=HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3);
價因子:=IF(CLOSE/OPEN>1.06,2.5,0),COLORLIBLUE;
STICKLINE(價因子,0,1,1,1),COLORYELLOW;
量變線:=VOL/MA(VOL,5)COLORWHITE,LINETHICK2;
量因子:=IF(VOL/MA(VOL,5)>2,2.5,0);
STICKLINE(量因子,0,1,1,1),COLORYELLOW;
DRAWICON(CLOSE/OPEN>1.06,1,24);
DRAWICON(VOL/MA(VOL,5)>2,0.8,25);
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背離:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背離,0,0.03,6,0),COLOR00FF00;
底背:DRAWLINE(A1=0,DEA,底背離,DEA,0),COLORRED,LINETHICK4;
DRAWTEXT(底背離,0.12,' 底背離'),COLORFF00FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
頂背離:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
頂背:DRAWLINE(A2=0,DEA,頂背離,DEA,0),COLORGREEN,LINETHICK4;
DRAWICON(CROSS(DIFF,DEA),DEA,1);
DRAWICON(CROSS(DEA,DIFF),DEA,2);

② 求MACD空中加油指標源碼（通達信）

通達信的
MA4:MA(C,4);
MA10:MA(C,10);
MA20:MA(C,20);
MA62:MA(C,62);
A10:=ATAN((MA(C,10)/REF(MA(C,10),1)-1)*100)*3.1416*MA(C,10);
小金角:=REF(CROSS(MA(C,10),MA(C,20)),1) AND A10>10.0;
DRAWTEXT(小金角,L-0.20,'小金角');
B20:=ATAN((MA(C,20)/REF(MA(C,20),1)-1)*100)*3.1416*MA(C,20);
大金角:=REF(CROSS(MA(C,20),MA(C,62)),1) AND B20>10;
DRAWTEXT(大金角,L-0.20,'大金角');
XJB1:=BARSLAST(小金角);
XJB2:=XJB1 AND CROSS(MA(C,10),C) AND C<MA(C,10);
XJB3:=RANGE(C,MA(C,20),MA(C,10));
小金邊:=XJB2 AND XJB3;
DRAWTEXT(小金邊,L-0.20,'小金邊');
DJB1:=BARSLAST(大金角);
DJB2:=DJB1 AND CROSS(MA(C,20),C) AND C<MA(C,20);
DJB3:=RANGE(C,MA(C,62),MA(C,20));
大金邊:=DJB2 AND DJB3;
DRAWTEXT(大金邊,L-0.20,'大金邊');
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
V1:=DIFF>0 AND V>MA(V,5);
V2:=DEA<0 AND DEA>-0.07;
MACD騎牆:=V1 AND V2;
DRAWTEXT(MACD騎牆,L-0.20,'MACD騎牆');
KZJY:=DIFF>0 AND DEA>0;
空中加油:=KZJY AND ABS(DIFF-DEA)/C<0.0045 AND CROSS(DIFF,DEA);
DRAWTEXT(空中加油,L-0.20,'空中加油');
HZZZ:=ABS(MA(C,4)-MA(C,20))+ABS(MA(C,20)-MA(C,62))/C;
海豚張嘴:=HZZZ<0.23 AND CROSS(MA(C,20),MA(C,62)) AND MA(C,20)>REF(MA(C,20),1) AND V>MA(V,5);
DRAWTEXT(海豚張嘴,L-0.20,'海豚張嘴');
恭喜發財！

③ 絕佳（MACD將死不死）選股公式，通達信已測試

對自己使用的MACD指數進行優化後，寫出MACD指數即將出現買入信號的預警公式，分享給有興趣的人。在指數發出預警信號後，有必要篩選出強勢板塊中的強勢個股。操作前應結合其他因素綜合判斷負金叉的信號。很多人得到選股指數後，不假思索地選擇股票，結果抱怨沒賺錢，寫指標的人作弊或說指標不準確;大家都知道，你什麼都不知道。盲目操作就是賭博。不要迷信成功率指標!!95%成功率的目標，如果你買了那5%，你還是賠錢。你連續輸了15次錢。你還相信那95%，因此，在預警信號出現後，一定要進行篩選。只是開玩笑，煮飯洗飯，吃魚去魚鱗。 需要注意的是，自由軟體在計算MACD指數時只選取0.01作為參數值，所以在選取了一些股票後，附件的圖中並沒有提示，用你的眼睛來判斷是可以的。
拓展資料
1.通達信軟體是多功能的證券信息平台，與其他行情軟體相比，有簡潔的界面和行情更新速度較快等優點。通達信允許用戶自由劃分屏幕，並規定每一塊對應哪個內容。至於快捷鍵，也是通達信的特色之一。通達信還有一個有用的功能，就是"在線人氣"，可以了解哪些是當前關注，哪些是持續關注，又有哪些是當前冷門，可以更直接了解各個股票的關注度。
2.圳市財富趨勢科技有限責任公司是一家資深的證券業高科技企業，致力於證券分析系統和計算機通訊系統的研究開發，自1995年成立以來，經過蓬勃發展，已經成為該行業的典範。其開發的行情源被同行業多企業採用，是市場上非常主流的擁有自主開發證券類軟體能力的企業。深圳市財富趨勢科技有限責任公司在證券行業的著名品牌是"通達信"。{將死不死} 源碼 DIF:EMA(CLOSE，12)-EMA(CLOSE，26); DEA:EMA(DIF，9); MACD:(DIF-DEA)*2；NH:=REF(DIF，3)>=REF(DIF，2) AND REF(DIF，2)>=REF(DIF，1) AND DIF>REF(DIF，1)*1.1;NH1:=ABS((REF(DIF，1)-REF(DEA，1))/REF(DIF，1))<=0.2; DT:=REF(DIF，2)>REF(DEA，2) AND REF(DIF，1)>=REF(DEA，1) AND DIF>DEA; NLZ:=MACD>REF(MACD，1) AND DIF>0; 3.NLZ1:=MACD>REF(MACD，1) AND DIF<0; 將死不死1:=(NH1 AND NH AND DT AND NLZ); 將死不死0:=(NH1 AND NH AND DT AND NLZ1); 將死不死:將死不死1 OR 將死不死0; {MACD副圖} DIF:EMA(CLOSE，12)EMA(CLOSE，26)，COLORRED，LINETHICK2;DEA:EMA(DIF，9)，COLORBLUE，LINETHICK2; MACD:(DIFDEA)*2，COLORSTICK，COLORMAGENTA;STICKLINE(((MACD0))，0，MACD，0.05，0)，COLORLIBLUE，LINETHICK2;STICKLINE(((MACD>REF(MACD，1))AND(MACD<0))，0，MACD，0.05，0)，COLORFF00FF，LINETHICK2;DRAWICON(CROSS(DIF，DEA)，DIF+0.025，1);DRAWICON(CROSS(DEA，DIF)，DIF+0.025，2);NH:=REF(DIF，3)>=REF(DIF，2) AND REF(DIF，2)>=REF(DIF，1) ANDDIF>REF(DIF，1)*1.1;NH1:=ABS((REF(DIF，1)-REF(DEA，1))/REF(DIF，1))<=0.2; DT:=REF(DIF，2)>REF(DEA，2) AND REF(DIF，1)>=REF(DEA，1) A

④ 從同花順上復制一個「頂級macd"公式到通達信上無法通過，請高手幫忙，跪謝

沒那麼神 給你這個公式的原理：
這不是什麼「頂級」的macd！

1.它只是將原參數12 26 9 替換成8 21 5 這么做只有一個原因 就是為了迎合Fibo數列 通常作者只有初學水平

2.zig函數 它會自動修正以前的數值 使到公式看起來非常厲害 其實是作弊 這個函數通常被認為用於新手看走勢圖形才有用 比如波浪 但那對波浪劃分不會准確的 老手是看都不看 用這類函數判斷波浪 稱為」擬合「 簡而言之 會誤導人 所以基本上沒什麼用 對於軟體商才有用（^_^!!!）

3.那一句通不過的 其中 partline在通達信中用if改寫即可 問題在於F1> REF(F1,1)這部分 這就用到第2點所述內容 它會作弊 比如近幾日的F1值一直是一個方向 過幾天（或者n天後）走勢劇變 它會自動修正之前「近幾天"的數值 使到變成另個方向（或延續從前的方向）總之就是欺騙你 讓人發出贊嘆 哇，好准！？？

4.後面的基本看不下去了 除了這個函數需改寫外 後面還有一些函數是通達信不兼容的 後半部分大體上就是加一些背離的判斷 你自己基本功扎實的話 背離是不需要靠公式來判斷的 一目瞭然 （。。。看到好多的F1 為什麼不直接用zig寫呢 你應該懂的）

⑤ 求macd指標diff等於dea的條件選股源碼

DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA : EMA(DIFF,9);
SELECT:DIFF =DEA

⑥ 求老師幫忙編寫一個MACD0日線上出現第一根紅柱時的選股指標源碼(謝謝)

可以編寫macd日線上出現第一根紅柱時的選股指標公式源碼，效果如下圖。

⑦ macd指標裡面macd是哪條線

MACD是DIF和DEA兩者差值的兩倍，在圖上的表示是那個彩色柱子。
沒見那個只要金叉以後都是紅色的，死叉以後都是綠色的嘛。

⑧ 幫忙編輯下炒股用的MACD源碼

以下MACD源碼。
DIF:EMA(CLOSE,9)-EMA(CLOSE,18);
DEA:EMA(DIF,7),LINETHICK1;
MACD:=2*(DIF-DEA);
STICKLINE(MACD>=0,MACD,0,0,0),COLORF00FF0;
STICKLINE(MACD<0,MACD,0,0,0),COLORF00FF0;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,0,0 ),COLORFFFF00;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,0,0 ),COLORFFFF00;
IF(DIF<0,DIF,0),colorred,LINETHICK1;
IF(DIF<0,0,DIF),colorred,LINETHICK1;
IF(DIF<DEA,DIF,DEA),COLOR00FF00,LINETHICK1;
IF(DIF>DEA,DEA,DEA),colorwhite,LINETHICK1;
金叉:=CROSS(DIF,DEA) AND DIF<0.3;
STICKLINE(金叉,0,-0.38,3,0),COLOR0000FF;
MACD1:2*(DIF-DEA),LINETHICK0;

你試試看行不行。

⑨ 朋友你的MACD和KDJ 合為一個指標正是我需要的可以提供源碼嗎 謝謝

這個就可用了，簡單就好，不要搞得太復雜。需要設置可變參數,可修改KDJ的9-3-3為M,N1,N2.MACD的參數也同樣可改。

{KDJ_MACD}

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

K:SMA(RSV,3,1),NODRAW;

D:SMA(K,3,1),NODRAW;

J:3*K-2*D,NODRAW;

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

DEA:EMA(DIF,9),COLORYELLOW;

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

DRAWBAND(K/25,RGB(255,0,0),K/25,RGB(0,0,0));

DRAWBAND(D/25,RGB(0,255,0),D/25,RGB(0,0,0));

DRAWBAND(J/25,RGB(0,0,255),J/25,RGB(0,0,0));