H01:=MAX(DYNAINFO(3),DYNAINFO(5));
L01:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H01-L01;
阻力:L01+P1*7/8,COLORGREEN,LINETHICK2;
支撐:L01+P1*0.5/8,COLORRED,LINETHICK2;
中:(支撐+阻力)/2,COLOR00FFFF,LINETHICK2;
DRAWTEXT(ISLASTBAR,阻力,'頂'),COLORGREEN;
DRAWTEXT(ISLASTBAR,支撐,'底'),COLORRED;
DRAWTEXT(ISLASTBAR,(支撐+阻力)/2,'中'),COLORWHITE;
現(xiàn)價:CLOSE,COLORWHITE,LINETHICK2;
底買:STICKLINE(C<支撐,支撐,C,5,0),COLORRED;
MR:=C<支撐 AND CROSS(C,REF(C,2));
DRAWTEXT(CROSS(現(xiàn)價,支撐),中,'買'),COLORRED;
STICKLINE(CROSS(現(xiàn)價,支撐),C,中,2,0),COLORRED;
STICKLINE(MR=1,支撐,中,2,0),COLORRED;
DRAWICON(MR=1 OR CROSS(現(xiàn)價,支撐),中,1);
STICKLINE(CROSS(支撐,現(xiàn)價),支撐,(支撐-中)/5+支撐,2,0),COLORYELLOW;
DRAWTEXT(CROSS(支撐,現(xiàn)價),(支撐-中)/5+支撐,'底'),COLORYELLOW;
MC:=C>阻力 AND CROSS(REF(C,2),C);
DRAWTEXT(CROSS(阻力,現(xiàn)價),中,'賣'),COLORGREEN;
STICKLINE(CROSS(阻力,現(xiàn)價),C,中,2,0),COLORGREEN;
STICKLINE(MC=1,阻力,中,2,0),COLORGREEN;
DRAWICON(MC=1 OR CROSS(阻力,現(xiàn)價),中,2);
STICKLINE(CROSS(現(xiàn)價,阻力),阻力,阻力-(支撐-中)/5,2,0),COLORMAGENTA;
DRAWTEXT(CROSS(現(xiàn)價,阻力),阻力-(支撐-中)/5,'頂'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,阻力,'頂'),COLORGREEN;
DRAWTEXT(ISLASTBAR,支撐,'底'),COLORRED;
DRAWTEXT(ISLASTBAR,(支撐+阻力)/2,'中'),COLORWHITE;
AMOUNT/V/100,COLORYELLOW;
成交額:=V*C/100,NODRAW;{萬元}
A2:=SUM((IF(((成交額/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交額,0)),0);
A3:=SUM((IF(((成交額/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交額,0)),0);
A6:=(A2+A3);
A7:=IF((ISLASTBAR),((100*A2)/A6),0);
A8:=IF((ISLASTBAR),((100*A3)/A6),0);
DD1:=1;
AAA1:=STRCAT(STRCAT('機構(gòu)買 = ',CON2STR((100*A2)/A6,0)),'%');
AAA2:=STRCAT(STRCAT('機構(gòu)賣 = ',CON2STR((100*A3)/A6,0)),'%');
AAA3:=STRCAT(STRCAT('機構(gòu)總買 = ',CON2STR((100*(A2-A3))/A6,0)),'%');
DRAWTEXT_FIX(DD1=1,0,0.83,0,AAA1),COLOR00FFFF;
DRAWTEXT_FIX(DD1=1,0,0.89,0,AAA2),COLOR00FF00;
DRAWTEXT_FIX(DD1=1,0,0.99,0,AAA3),COLOR0000FF;
聯(lián)系客服