還請老師把量能柱改成空心的 [文華財經]
- 咨詢內容：
DIFF : EMA(CLOSE,26) - EMA(CLOSE,100);DEA : EMA(DIFF,9);MACD : 2*(DIFF-DEA), COLORSTICK;JC := DEA-DIFF;綠柱面積:=IF(MACD<0,SUM(MACD,BARSLAST(JC<0)),0);紅柱面積:=IF(MACD>0,SUM(MACD,BARSLAST(JC>0)),0);本次最低價:=LLV(L,BARSLAST(JC<0));本次最高價:=HHV(H,BARSLAST(JC>0));X1:=IF (MACD<0,BARSLAST(CROSS(DIFF,DEA)),0);前次綠柱面積:=REF(綠柱面積,X1+1);前次最低價:=REF(本次最低價,X1+1);Y1:=IF((綠柱面積<0 AND ABS(綠柱面積)<ABS(前次綠柱面積)AND 本次最低價<前次最低價 ),1,0);RS1:= MACD<0 AND REF(MACD,1)<0 AND C<前次最低價AND ABS(綠柱面積)<ABS(前次綠柱面積) AND ABS(MACD)<ABS(REF(MACD,1));底背馳:= IF (CROSS(DIFF,DEA),REF(Y1,1),0);DRAWTEXT(底背馳,0.3,'積底背'),COLOR00FFFF;STICKLINE(底背馳,0,0.3,4,0),COLOR0000FF;DRAWICON(底背馳,0,23),COLORYELLOW;//DRAWBAND(DIFF,RGB(200,50,55),DEA,RGB(50,100,10));FILLRGN(DIFF>DEA,DIFF,DEA,RGB(200,50,55));FILLRGN(DIFF<DEA,DIFF,DEA,RGB(50,100,10));遵:IF(DIFF>=DEA,DIFF,NULL),COLORRED; 守:IF(DEA>=DIFF,DEA,NULL),COLORFF9900;紀:IF(DIFF>=DEA,DEA,NULL),COLOR00FFFF;律:IF(DEA>=DIFF,DIFF,NULL),COLOR00FF00;
X2:=IF (MACD>0,BARSLAST(CROSS(DEA,DIFF)),0);前次紅柱面積:=REF(紅柱面積,X2+1);前次最高價:=REF(本次最高價,X2+1);Y2:=IF((紅柱面積>0 AND 紅柱面積<前次紅柱面積 AND 本次最高價>前次最高價 ),1,0);RS2:= MACD>0 AND REF(MACD,1)>0 AND C>前次最高價 AND ABS(紅柱面積)<ABS(前次紅柱面積) AND ABS(MACD)<ABS(REF(MACD,1));頂背馳:= IF (CROSS(DEA,DIFF),REF(Y2,1),0);DRAWICON(頂背馳,0,19),COLORGREEN;STICKLINE(頂背馳,0,-0.3,4,0),COLORGREEN;DRAWTEXT(頂背馳,-0.3,'積頂背'),COLORGREEN;
八十日漂紅: COUNT(MACD>0,80),NODRAW;連紅: BARSLASTCOUNT(MACD>0),NODRAW;連增:BARSLASTCOUNT(MACD>REF(MACD,1)),COLORRED,NODRAW;連減:BARSLASTCOUNT(MACD<REF(MACD,1)),COLORGREEN,NODRAW;0,COLORGREEN; - 文華技術人員：
參考：
DIFF : EMA(CLOSE,26) - EMA(CLOSE,100);DEA : EMA(DIFF,9);MACD : 2*(DIFF-DEA), COLORSTICK;JC := DEA-DIFF;綠柱面積:=IF(MACD<0,SUM(MACD,BARSLAST(JC<0)),0);紅柱面積:=IF(MACD>0,SUM(MACD,BARSLAST(JC>0)),0);本次最低價:=LLV(L,BARSLAST(JC<0));本次最高價:=HHV(H,BARSLAST(JC>0));X1:=IF (MACD<0,BARSLAST(CROSS(DIFF,DEA)),0);前次綠柱面積:=REF(綠柱面積,X1+1);前次最低價:=REF(本次最低價,X1+1);Y1:=IF((綠柱面積<0 AND ABS(綠柱面積)<ABS(前次綠柱面積)AND 本次最低價<前次最低價 ),1,0);RS1:= MACD<0 AND REF(MACD,1)<0 AND C<前次最低價AND ABS(綠柱面積)<ABS(前次綠柱面積) AND ABS(MACD)<ABS(REF(MACD,1));底背馳:= IF (CROSS(DIFF,DEA),REF(Y1,1),0);DRAWTEXT(底背馳,0.3,'積底背'),COLOR00FFFF;STICKLINE1(底背馳,0,0.3,4,1),COLOR0000FF;DRAWICON(底背馳,0,23),COLORYELLOW;//DRAWBAND(DIFF,RGB(200,50,55),DEA,RGB(50,100,10));FILLRGN(DIFF>DEA,DIFF,DEA,RGB(200,50,55));FILLRGN(DIFF<DEA,DIFF,DEA,RGB(50,100,10));遵:IF(DIFF>=DEA,DIFF,NULL),COLORRED; 守:IF(DEA>=DIFF,DEA,NULL),COLORFF9900;紀:IF(DIFF>=DEA,DEA,NULL),COLOR00FFFF;律:IF(DEA>=DIFF,DIFF,NULL),COLOR00FF00;
X2:=IF (MACD>0,BARSLAST(CROSS(DEA,DIFF)),0);前次紅柱面積:=REF(紅柱面積,X2+1);前次最高價:=REF(本次最高價,X2+1);Y2:=IF((紅柱面積>0 AND 紅柱面積<前次紅柱面積 AND 本次最高價>前次最高價 ),1,0);RS2:= MACD>0 AND REF(MACD,1)>0 AND C>前次最高價 AND ABS(紅柱面積)<ABS(前次紅柱面積) AND ABS(MACD)<ABS(REF(MACD,1));頂背馳:= IF (CROSS(DEA,DIFF),REF(Y2,1),0);DRAWICON(頂背馳,0,19),COLORGREEN;STICKLINE1(頂背馳,0,-0.3,4,1),COLORGREEN;DRAWTEXT(頂背馳,-0.3,'積頂背'),COLORGREEN;
八十日漂紅: COUNT(MACD>0,80),NODRAW;連紅: BARSLASTCOUNT(MACD>0),NODRAW;連增:BARSLASTCOUNT(MACD>REF(MACD,1)),COLORRED,NODRAW;連減:BARSLASTCOUNT(MACD<REF(MACD,1)),COLORGREEN,NODRAW;0,COLORGREEN; - 文華客服：
不是信號的，是那些紅綠柱加粗
- 網友回復：
參考：
DIFF : EMA(CLOSE,26) - EMA(CLOSE,100);DEA : EMA(DIFF,9);MACD : 2*(DIFF-DEA);STICKLINE(2*(DIFF-DEA)>0,0,MACD,COLORRED,1);STICKLINE(2*(DIFF-DEA)<0,0,MACD,COLORCYAN,1);JC := DEA-DIFF;綠柱面積:=IF(MACD<0,SUM(MACD,BARSLAST(JC<0)),0);紅柱面積:=IF(MACD>0,SUM(MACD,BARSLAST(JC>0)),0);本次最低價:=LLV(L,BARSLAST(JC<0));本次最高價:=HHV(H,BARSLAST(JC>0));X1:=IF (MACD<0,BARSLAST(CROSS(DIFF,DEA)),0);前次綠柱面積:=REF(綠柱面積,X1+1);前次最低價:=REF(本次最低價,X1+1);Y1:=IF((綠柱面積<0 AND ABS(綠柱面積)<ABS(前次綠柱面積)AND 本次最低價<前次最低價 ),1,0);RS1:= MACD<0 AND REF(MACD,1)<0 AND C<前次最低價AND ABS(綠柱面積)<ABS(前次綠柱面積) AND ABS(MACD)<ABS(REF(MACD,1));底背馳:= IF (CROSS(DIFF,DEA),REF(Y1,1),0);DRAWTEXT(底背馳,0.3,'積底背'),COLOR00FFFF;STICKLINE(底背馳,0,0.3,4,0),COLOR0000FF;DRAWICON(底背馳,0,23),COLORYELLOW;//DRAWBAND(DIFF,RGB(200,50,55),DEA,RGB(50,100,10));FILLRGN(DIFF>DEA,DIFF,DEA,RGB(200,50,55));FILLRGN(DIFF<DEA,DIFF,DEA,RGB(50,100,10));遵:IF(DIFF>=DEA,DIFF,NULL),COLORRED; 守:IF(DEA>=DIFF,DEA,NULL),COLORFF9900;紀:IF(DIFF>=DEA,DEA,NULL),COLOR00FFFF;律:IF(DEA>=DIFF,DIFF,NULL),COLOR00FF00;
X2:=IF (MACD>0,BARSLAST(CROSS(DEA,DIFF)),0);前次紅柱面積:=REF(紅柱面積,X2+1);前次最高價:=REF(本次最高價,X2+1);Y2:=IF((紅柱面積>0 AND 紅柱面積<前次紅柱面積 AND 本次最高價>前次最高價 ),1,0);RS2:= MACD>0 AND REF(MACD,1)>0 AND C>前次最高價 AND ABS(紅柱面積)<ABS(前次紅柱面積) AND ABS(MACD)<ABS(REF(MACD,1));頂背馳:= IF (CROSS(DEA,DIFF),REF(Y2,1),0);DRAWICON(頂背馳,0,19),COLORGREEN;STICKLINE(頂背馳,0,-0.3,4,0),COLORGREEN;DRAWTEXT(頂背馳,-0.3,'積頂背'),COLORGREEN;
八十日漂紅: COUNT(MACD>0,80),NODRAW;連紅: BARSLASTCOUNT(MACD>0),NODRAW;連增:BARSLASTCOUNT(MACD>REF(MACD,1)),COLORRED,NODRAW;連減:BARSLASTCOUNT(MACD<REF(MACD,1)),COLORGREEN,NODRAW;0,COLORGREEN; - 網友回復： 很好，要是把那條MACD線做成隨柱狀同色就跟好了
有思路，想編寫各種指標公式，程序化交易模型，選股公式，預警公式的朋友
可聯系技術人員 QQ: 511411198 進行 有償 編寫！（不貴！點擊查看價格！）
相關文章
-
沒有相關內容
會員登錄/注冊