BBD动能操盘AL:=(O+L+H+C)/4; AO:=SMA(AL,5,1)-SMA(AL,13,1); BBD:(AO-SMA(AO,3,1))*100,COLORFFCCFF; {动能线定义} 动能线:AO*10,COLORRED; 动能辅线:EMA(动能线,3); {动能彩带} DRAWBAND(动能线,RGB(255,55,55),动能辅线,RGB(55,175,0));{BBD支撑线定义} BBD支撑线:=SMA(BBD,5,2),COLOR0033FF,LINETHICK2; RSV1:=BBD; RSV2:=BBD支撑线; STICKLINE(BBD>=REF(BBD,1) AND BBD>0,0,BBD,0.1,0),COLORMAGENTA; STICKLINE(BBD>=REF(BBD,1) AND BBD<0,0,BBD,0,0),COLORYELLOW; STICKLINE(BBD<REF(BBD,1) AND BBD<0,0,BBD,0.1,0),COLORBLUE; STICKLINE(BBD<REF(BBD,1) AND BBD>0,0,BBD,0,0),COLORWHITE; {BBD支撑线金叉死叉顶底背离} BBD金叉:IF(CROSS(RSV1,RSV2),RSV2,DRAWNULL),CIRCLEDOT,COLORFF33FF; BBD死叉:IF(CROSS(RSV2,RSV1),RSV2,DRAWNULL),CIRCLEDOT,COLORFFFF00; SV1:=BARSLAST(REF(CROSS(RSV1,RSV2),1)); SV1A:=REF(CLOSE,SV1+1)>CLOSE AND RSV1>REF(RSV1,SV1+1) AND CROSS(RSV1,RSV2); B底背:IF(SV1A,RSV2,DRAWNULL),COLOR3366FF; DRAWTEXT(SV1A,RSV2,'─B底背'),COLOR0033FF; SV2:=BARSLAST(REF(CROSS(RSV2,RSV1),1)); SV2A:=REF(CLOSE,SV2+1)<CLOSE AND REF(RSV1,SV2+1)>RSV1 AND CROSS(RSV2,RSV1); B顶背:IF(SV2A,RSV2,DRAWNULL),COLORFFFF00; DRAWTEXT(SV2A,RSV2,'─B顶背'),COLORFFFF00; {动能线金叉死叉顶底背离} RSV3:=动能线; RSV4:=动能辅线; 动能金叉:IF(CROSS(RSV3,RSV4),RSV3,DRAWNULL),CIRCLEDOT,COLOR0000FF; 动能死叉:IF(CROSS(RSV4,RSV3),RSV3,DRAWNULL),CIRCLEDOT,COLOR00FF00; SV3:=BARSLAST(REF(CROSS(RSV3,RSV4),1)); SV3A:=REF(CLOSE,SV3+1)>CLOSE AND RSV3>REF(RSV3,SV3+1) AND CROSS(RSV3,RSV4); 动底背:IF(SV3A,RSV3,DRAWNULL),COLOR0000FF; DRAWTEXT(SV3A,RSV3,'─动底背'),COLOR0000FF; SV4:=BARSLAST(REF(CROSS(RSV4,RSV3),1)); SV4A:=REF(CLOSE,SV4+1)<CLOSE AND REF(RSV3,SV4+1)>RSV3 AND CROSS(RSV4,RSV3); 动顶背:IF(SV4A,RSV3,DRAWNULL),COLOR00FF00; DRAWTEXT(SV4A,RSV3,'─动顶背'),COLOR00FF00;顶:HHV(BBD,13),COLORMAGENTA,DOTLINE;底:LLV(BBD,13),COLORLICYAN,DOTLINE;IF(BBD>REF(BBD,1)*1.008,BBD ,DRAWNULL),COLORRED,LINETHICK3;IF(BBD<REF(BBD,1),BBD ,DRAWNULL),COLORGREEN,LINETHICK2; |
