【圖】請幫忙把macd和筆中樞指標(biāo)改成富途牛?？捎玫模ㄈ裟延锌芍苯邮褂靡部桑?/span>

纏道禪 2022-08-01 發(fā)布于上海

展開全文

編號:9980941 懸賞30金鉆

請幫忙把macd和筆中樞指標(biāo)改成富途牛?？捎玫模ㄈ裟延锌芍苯邮褂靡部桑?/h2>

任務(wù)已圓滿完成

已托管

共需1 稿

每稿 30 金鉆

每人投稿不限次數(shù)

已采納1 稿

拒絕1 稿

還需要0 稿

我來承接

投訴舉報(bào)

聯(lián)系Ta

任務(wù)大廳

任務(wù)需求:

macd指標(biāo)改寫
需求：1，此代碼改為富途牛牛可用；
      2，添加一段代碼將現(xiàn)在一根紅柱比前面一根紅柱子低時，用顏色區(qū)分開，綠柱子也是同樣；
      3，  可以顯示面積背離和柱子背離提示，最好還能提示黃白線背離；
      4，把macd柱子面積顯示數(shù)字出來。
（代碼一）
DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA  : EMA(DIFF,9);
MACD : 2*(DIFF-DEA), COLORSTICK;
HRULER:=CONST( IF(ISLASTBAR,HHV(MAX(ABS(DIFF),ABS(DEA)),90),0)),NODRAW;
{以下計(jì)算紅綠柱的面積，當(dāng)綠柱時，紅柱面積為0，反之同理}
綠柱面積:=IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0);
紅柱面積:=IF(MACD>0,SUM(MACD,BARSLAST(MACD<0)),0);
本次最低綠柱:=IF(MACD<0,LLV(MACD,BARSLAST(MACD>0)),0);
本次最高紅柱:=IF(MACD>0,HHV(MACD,BARSLAST(MACD<0)),0);
{以下計(jì)算紅柱期間的最高價（當(dāng)綠柱時，本次最高價無效，是隨機(jī)值）
計(jì)算綠柱期間的最低價（當(dāng)紅柱時，本次最低價無效，是隨機(jī)值
}
本次最低價:=LLV(L,BARSLAST(MACD>0)),NODRAW;
本次最高價:=HHV(H,BARSLAST(MACD<0));
{綠柱時，統(tǒng)計(jì)綠柱的累計(jì)數(shù)量,紅柱時，為0}
X1:=IF (MACD<0,BARSLAST(CROSS(DIFF,DEA)),0),NODRAW;
{綠柱時，表示前一波綠柱的累計(jì)面積；
首根紅柱時，表示最近的綠柱面積；
其他紅柱時，為0
前次最低價，同理；
}
前次綠柱面積:=REF(綠柱面積,X1+1),NODRAW;
前次最低價:=REF(本次最低價,X1+1),NODRAW;
前次最低綠柱:=REF(本次最低綠柱,X1+1);
Y1:=IF((綠柱面積<0 AND ABS(綠柱面積)<ABS(前次綠柱面積)
AND 本次最低價<前次最低價 ),1,0),NODRAW;
Y11:=IF((綠柱面積<0 AND ABS(本次最低綠柱)<ABS(前次最低綠柱)
AND 本次最低價<前次最低價 ),1,0),NODRAW;
{下面語句在公式中沒有用到}
RS1:=MACD<0 AND REF(MACD,1)<0 AND 本次最低價<前次最低價
AND ABS(綠柱面積)<ABS(前次綠柱面積) AND ABS(MACD)<ABS(REF(MACD,1));
{UP3為1，表示綠柱，且連續(xù)第三根縮短}
UP3:=RS1 AND UPNDAY(MACD,3);
STEP1:=IF(UP3,(MACD-REF(MACD,1))*0.45+(MACD-REF(MACD,2))*0.17+(MACD-REF(MACD,3))*0.07,0);
N1:=IF(UP3,ABS(MACD)/ABS(STEP1),0),NODRAW;
補(bǔ)充綠柱面積:=IF(UP3,IF(N1>1,(N1-1)*MACD/2,0),0);
Y1補(bǔ):=IF((綠柱面積<0 AND ABS(綠柱面積+補(bǔ)充綠柱面積)<ABS(前次綠柱面積)
AND 本次最低價<前次最低價 ),1,0);
底積將背:= IF( UP3,Y1補(bǔ),0),NODRAW;
底柱將背:= IF(UP3,Y11,0),NODRAW;
底積背離:= IF (CROSS(DIFF,DEA),REF(Y1,1),0),NODRAW;
底柱背離:= IF(CROSS(DIFF,DEA),REF(Y11,1),0),NODRAW;
底背離:底積背離 AND 底柱背離,NODRAW;
底背程度:=IF(底積將背 OR 底積背離,ABS(前次綠柱面積)/ABS(綠柱面積+補(bǔ)充綠柱面積)*前次最低價/本次最低價,0),NODRAW;
底柱程度:=IF(底柱將背 OR 底柱背離,ABS(前次最低綠柱)/ABS(本次最低綠柱)*前次最低價/本次最低價,0),NODRAW;
PT:=MIN(DIFF,DEA)-HRULER/20;
PT1:=MAX(DIFF,DEA)+HRULER/20;
{
DRAWTEXT(底積將背,0.3,'底積將背'),COLOR00FFFF;
}
DRAWBAND(DIFF,RGB(200,50,55),DEA,RGB(50,100,10));
STICKLINE(底積將背,PT,PT-MIN(底背程度,5)*HRULER/(4*5),2,0),COLORD33AE9;
DRAWICON(底積將背,PT-MIN(底背程度,5)*HRULER/(4*5)-HRULER/20,38),COLORYELLOW;
STICKLINE(底柱將背,PT1,PT1+MIN(底柱程度,5)*HRULER/(4*5),2,0),COLORD33AE9;
DRAWICON(底柱將背,PT1+MIN(底柱程度,5)*HRULER/(4*5)+HRULER/10,1),COLORYELLOW;
DRAWTEXT(底柱背離,PT1+HRULER/8,' 柱背'),COLOR00FFFF;
STICKLINE(底柱背離,PT1,PT1+MIN(底柱程度,5)*HRULER/(4*5),3,0),COLOR0000FF;
DRAWICON(底柱背離,PT1+MIN(底柱程度,5)*HRULER/(4*5)+HRULER/10,34),COLORYELLOW;
DRAWTEXT(底積背離,PT-HRULER/8,' 積背'),COLOR00FFFF;
STICKLINE(底積背離,PT,PT-MIN(底背程度,5)*HRULER/(4*5),3,0),COLOR0000FF;
DRAWICON(底積背離,PT-MIN(底背程度,5)*HRULER/(4*5)-HRULER/20,23),COLORYELLOW;
D_SCORE:=IF(底積背離 AND 底柱背離,100,
IF(底積背離 OR 底柱背離,80,
IF(底積將背 AND 底柱將背,90,
IF(底積將背 OR 底柱將背,70,
0))));
DT_SOCRE:=IF(D_SCORE>0,D_SCORE,
IF(REF(D_SCORE,1)>0,REF(D_SCORE,1)*0.8,
IF(REF(D_SCORE,2)>0,REF(D_SCORE,2)*0.6,
IF(REF(D_SCORE,3)>0,REF(D_SCORE,3)*0.4,
IF(REF(D_SCORE,4)>0,REF(D_SCORE,4)*0.2,0) ) )  )),NODRAW;
X2:=IF (MACD>0,BARSLAST(CROSS(DEA,DIFF)),0);
前次紅柱面積:=REF(紅柱面積,X2+1);
前次最高價:=REF(本次最高價,X2+1);
前次最高紅柱:=REF(本次最高紅柱,X2+1);
Y2:=IF((紅柱面積>0 AND 紅柱面積<前次紅柱面積 AND 本次最高價>前次最高價 ),1,0);
Y22:=IF((紅柱面積>0 AND ABS(本次最高紅柱)<ABS(前次最高紅柱)
AND 本次最高價>前次最高價 ),1,0),NODRAW;
RS2:= MACD>0 AND REF(MACD,1)>0 AND C>前次最高價 AND ABS(紅柱面積)<ABS(前次紅柱面積) AND ABS(MACD)<ABS(REF(MACD,1));
{DOWN3為1，表示紅柱，且連續(xù)第三根縮短}
DOWN3:=RS2 AND DOWNNDAY(MACD,3);
STEP2:=IF(DOWN3,(MACD-REF(MACD,1))*0.45+(MACD-REF(MACD,2))*0.17+(MACD-REF(MACD,3))*0.07,0);
N2:=IF(DOWN3,ABS(MACD)/ABS(STEP2),0),NODRAW;
補(bǔ)充紅柱面積:=IF(DOWN3,IF(N2>1,(N2-1)*MACD/2,0),0);
Y2補(bǔ):=IF((紅柱面積>0 AND ABS(紅柱面積+補(bǔ)充紅柱面積)<ABS(前次紅柱面積)
AND 本次最高價>前次最高價 ),1,0);
頂積將背:= IF( DOWN3,Y2補(bǔ),0),NODRAW;
頂柱將背:= IF(DOWN3,Y22,0),NODRAW;
頂積背離:= IF (CROSS(DEA,DIFF),REF(Y2,1),0),NODRAW;
頂柱背離:= IF(CROSS(DEA,DIFF),REF(Y22,1),0),NODRAW;
頂背離: 頂積背離 AND 頂柱背離,NODRAW;
頂背程度:=IF(頂積將背 OR 頂積背離,ABS(前次紅柱面積)/ABS(紅柱面積+補(bǔ)充紅柱面積)*本次最高價/前次最高價,0),NODRAW;
頂柱程度:=IF(頂柱將背 OR 頂柱背離,ABS(前次最高紅柱)/ABS(本次最高紅柱)*本次最高價/前次最高價,0),NODRAW;
{
DRAWICON(頂積背離,0,19),COLOR00FF00;
STICKLINE(頂積背離,0,-0.3,2,0),COLOR00FF00;
DRAWTEXT(頂積背離,-0.3,'頂積背離'),COLORFF0000;
}
STICKLINE(頂積將背,PT,PT-MIN(頂背程度,5)*HRULER/(4*5),2,0),COLORFFFF00;
DRAWICON(頂積將背,PT-MIN(頂背程度,5)*HRULER/(4*5)-HRULER/20,39),COLORYELLOW;
STICKLINE(頂柱將背,PT1,PT1+MIN(頂柱程度,5)*HRULER/(4*5),2,0),COLORFFFF00;
DRAWICON(頂柱將背,PT1+MIN(頂柱程度,5)*HRULER/(4*5)+HRULER/10,2),COLORYELLOW;
DRAWTEXT(頂柱背離,PT1+HRULER/8,' 柱背'),COLOR00FFFF;
STICKLINE(頂柱背離,PT1,PT1+MIN(頂柱程度,5)*HRULER/(4*5),3,0),COLOR00FF00;
DRAWICON(頂柱背離,PT1+MIN(頂柱程度,5)*HRULER/(4*5)+HRULER/10,35),COLORYELLOW;
DRAWTEXT(頂積背離,PT-HRULER/8,' 積背'),COLOR00FFFF;
STICKLINE(頂積背離,PT,PT-MIN(頂背程度,5)*HRULER/(4*5),3,0),COLOR00FF00;
DRAWICON(頂積背離,PT-MIN(頂背程度,5)*HRULER/(4*5)-HRULER/20,45),COLORYELLOW;

NOTEXTSDIFF:DIFF,COLORWHITE;
NOTEXTSDEA:DEA,COLORYELLOW;

NOTEXTMACDDRAW:MACD, COLORSTICK;

（代碼二）

DIF:EMA(CLOSE,6)-EMA(CLOSE,13);
DEA:EMA(DIF,5);
MACD:(DIF-DEA)*2,COLORSTICK;
JC:=DEA-DIF;
AA:=BARSLAST(JC<0);
BB:=BARSLAST(JC>0);
T:IFELSE(AA>BB,AA,BB),NODRAW;
綠柱面積:10*IFELSE(MACD<0,SUM(MACD,BARSLAST(JC<0)),0),NODRAW;
紅柱面積:10*IFELSE(MACD>0,SUM(MACD,BARSLAST(JC>0)),0),NODRAW;
U:IFELSE(AA>BB,ABS(綠柱面積)/AA,紅柱面積/BB),NODRAW;
A1:=IFELSE(MACD<0,LLV(綠柱面積,BARSLAST(JC<0)),0);
A2:=IFELSE(MACD>0,HHV(紅柱面積,BARSLAST(JC>0)),0);
DRAWNUMBER(CROSS(DEA,DIF),0+1.2/10,REF(A2,1),2,COLORRED);
DRAWNUMBER(CROSS(DIF,DEA),0-1.2/10,REF(A1,1),2,COLORGREEN);

]需求二：畫筆，(代碼已經(jīng)是富途可用的代碼，但是覺得畫得不是很準(zhǔn)確，代碼本身是老筆的定義，最好能改為新筆的定義，另外就是顯示每一筆之間的K線根數(shù)，當(dāng)然您有更好的代碼也可以哈）

代碼

老筆:=0;
G:=MA(C,5);D:=MA(C,10);
HH:=REF(H,5)=HHV(H,11);
LL:=REF(L,5)=LLV(L,11);
FG01:=BACKSET(HH,6)>BACKSET(HH,5) ;

FD01:=BACKSET(LL,6)>BACKSET(LL,5) ;
FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>D,FG01,IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0));

FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>G,FD01,IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0));
FG0:=FG02 AND H=HHV(H,BARSLAST(FD02));
FD0:=FD02 AND L=LLV(L,BARSLAST(FG02));
GP:IF(FG0,H,DRAWNULL),POINTDOT,COLORCYAN;

DP:IF(FD0,L,DRAWNULL),POINTDOT,COLORCYAN;
GQ:=L>REF(H,1) AND DAY!=REF(DAY,1);
DQ:=H<REF(L,1) AND DAY!=REF(DAY,1);
GQL:=REF(L,BARSLAST(GQ));
DQH:=REF(H,BARSLAST(DQ));

FGH:=REF(H,BARSLAST(FG0));
FGL:=REF(L,BARSLAST(FG0));
FGH1:=REF(H,BARSLAST(FG0)+1);
FGL1:=REF(L,BARSLAST(FG0)+1);
FGH2:=REF(H,BARSLAST(FG0)+2);
FGL2:=REF(L,BARSLAST(FG0)+2);
FDH:=REF(H,BARSLAST(FD0));
FDL:=REF(L,BARSLAST(FD0));
FDH1:=REF(H,BARSLAST(FD0)+1);
FDL1:=REF(L,BARSLAST(FD0)+1);
FDH2:=REF(H,BARSLAST(FD0)+2);
FDL2:=REF(L,BARSLAST(FD0)+2);
FGZH:=IF(FGL<=FGL1,FGH2,FGH1);
FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1));
FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));
FDZL:=IF(FDH>=FDH1,FDL2,FDL1);

FG1:=FGH>FDZH AND FG0;
FD1:=FDL<FGZL AND FD0;
FG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL;
FD:=FD1 AND FDL<FGL AND FDH<FGH AND FDH1<FGH;
BH0:=(H<=REF(H,1) AND L>=REF(L,1)) OR (H>=REF(H,1) AND L<=REF(L,1));
BHG:=IF(BARSLAST(FD0)>0,COUNT(BH0,BARSLAST(FD0)),0);
BHD:=IF(BARSLAST(FG0)>0,COUNT(BH0,BARSLAST(FG0)),0);
BGQ:=IF(BARSLAST(FD0)>0,COUNT(GQ,BARSLAST(FD0)),0);
BDQ:=IF(BARSLAST(FG0)>0,COUNT(DQ,BARSLAST(FG0)),0);

BK0:=IF(BHG>0,BHG+2+老筆,IF(BHD,BHD+2+老筆,3));
BK:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0));
G1X:=(FG AND BARSLAST(FD)>BK);
D1X:=(FD AND BARSLAST(FG)>BK);
G1:=(FG0 AND REF(H,BARSLAST(FG0))>=REF(H,BARSLAST(G1X)) AND BARSLAST(D1X)>BARSLAST(G1X))OR (FG1 AND COUNT(GQ,BARSLAST(FD1))>0 AND REF(H,BARSLAST(FG1))>REF(H,BARSLAST(G1X)));
D1:=(FD0 AND REF(L,BARSLAST(FD0))<=REF(L,BARSLAST(D1X)) AND BARSLAST(G1X)>BARSLAST(D1X))OR (FD1 AND COUNT(DQ,BARSLAST(FG1))>0 AND REF(L,BARSLAST(FD1))<REF(H,BARSLAST(D1X)));
G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1)));
D1L:=IF(BARSLAST(G1)>BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1)));
G2:=G1 AND H=HHV(G1H,BARSLAST(D1)+1) AND H>REF(H,1) AND BARSLAST(D1)>BARSLAST(G1);
D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) AND L<REF(L,1) AND BARSLAST(G1)>BARSLAST(D1);
G21:=FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2);
G22:=FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2);

G3:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));
D3:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));

GPB:IF(G1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;
DPB:IF(D1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;

{畫線}
NN:=G3;UU:=D3;
L1:DRAWLINE(UU,L,NN, H,0),COLORLIGREEN;L2:DRAWLINE(NN,H,UU, L,0),COLORLIGREEN;

任務(wù)需求補(bǔ)充補(bǔ)充于2022-3-25 15:18

對了馬兄，您那個展示給我用標(biāo)普期貨2206的十分鐘圖發(fā)我哈

任務(wù)需求補(bǔ)充補(bǔ)充于2022-3-25 14:56

您展示的時候最好用標(biāo)普2206期貨合約展示一下給我看，我才能對比比較清楚哈，麻煩你了哈

任務(wù)需求補(bǔ)充補(bǔ)充于2022-3-25 14:51

我沒有理想幣回復(fù)不了你，只能在補(bǔ)充說明上跟你說

任務(wù)需求補(bǔ)充補(bǔ)充于2022-3-25 14:50

另外，馬兄，還有筆與筆之間的K線根數(shù)要顯示啊

任務(wù)需求補(bǔ)充補(bǔ)充于2022-3-25 14:49

基本這樣，但還有這一點(diǎn)沒實(shí)現(xiàn)（添加一段代碼將現(xiàn)在一根紅柱比前面一根紅柱子低時，用顏色區(qū)分開，綠柱子也是同樣），另外能將macd面積計(jì)算出來的數(shù)字，不要那么多小數(shù)點(diǎn)嗎，相應(yīng)那個計(jì)算出來的面積的數(shù)字，跟圖

任務(wù)需求補(bǔ)充補(bǔ)充于2022-3-25 12:12

對了，還有筆與筆之間，還要顯示幅度的百分比和絕對點(diǎn)數(shù)

任務(wù)需求補(bǔ)充補(bǔ)充于2022-3-25 11:45

macd不是富途可用的代碼哈，筆代碼是

本站是提供個人知識管理的網(wǎng)絡(luò)存儲空間，所有內(nèi)容均由用戶發(fā)布，不代表本站觀點(diǎn)。請注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購買等信息，謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請點(diǎn)擊一鍵舉報(bào)。

轉(zhuǎn)藏 分享

QQ空間 QQ好友新浪微博微信

獻(xiàn)花（0） +1

來自：纏道禪 > 《通達(dá)信》

舉報(bào)/認(rèn)領(lǐng)