阴沟黑洞 有通达信源码，求改为大智慧指标

Question

参数设置：M1(5,500,5),M2(5,500,10),M3(5,500,20),M4(5,500,60),
DRAWBAND(MA(VOL,M1),RGB(155,50,50),MA(VOL,M2),RGB(83,123,68));
DRAWBAND(MA(VOL,M1),RGB(155,50,50),MA(VOL,M3),RGB(83,123,68));
VVOL:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLOR00C0C0;
VOLUME:VOL,VOLSTICK;
VOL1:MA(VOLUME,M1),COLORFFFFFF;
VOL2:MA(VOLUME,M2);
VOL3:MA(VOLUME,M3),COLORYELLOW;
VOL4:MA(VOLUME,M4),COLORGREEN,LINETHICK2;

DRAWICON(CROSS(VOL1,VOL2),VOL1,1);{5日上穿10日做记号};DRAWICON(CROSS(VOL2,VOL1),VOL1,2);{5日下穿10日做记号};

Answer 1

{阴沟黑洞-loy518改大智慧版}

INPUT:M1(5,5,500),M2(10,5,500),M3(20,5,500),M4(60,5,500);

FILLRGN(MA(VOL,M1),MA(VOL,M2),MA(VOL,M1)>MA(VOL,M2),RGB(155,50,50),MA(VOL,M1)<MA(VOL,M2),RGB(83,123,68));

FILLRGN(MA(VOL,M1),MA(VOL,M3),MA(VOL,M1)>MA(VOL,M3),RGB(155,50,50),MA(VOL,M1)<MA(VOL,M3),RGB(83,123,68));

FROMOPEN:=if(CURRENTTIME>93000 and CURRENTTIME<150000,

if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,

if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600)/60,120)),240);

VVOL:IF(BARSTATUS=2 AND DATATYPE=8,VOL*240/FROMOPEN,VOL),LINETHICK0;

STICKLINE(BARSTATUS=2 AND DATATYPE=8,VVOL,0,-1,-1),COLOR00C0C0;

VOLUME:VOL,VOLSTICK;

VOL1:MA(VOLUME,M1),COLORFFFFFF;

VOL2:MA(VOLUME,M2);

VOL3:MA(VOLUME,M3),COLORYELLOW;

VOL4:MA(VOLUME,M4),COLORGREEN,LINETHICK2;

 

DRAWICON(CROSS(VOL1,VOL2),VOL1,7),ALIGN1,LAYER0;{5日上穿10日做记号};

DRAWICON(CROSS(VOL2,VOL1),VOL1,8),ALIGN1,LAYER0;{5日下穿10日做记号};

Answer 2

DRAWBAND画出带状线,,把这个替换一下

追问

那请帮忙改一下，我想要的效果是改好后能在大智慧中用的，谢谢。