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; 现价:CLOSE,COLORWHITE,LINETHICK2; 底买:STICKLINE(C<支撑,支撑,C,5,0),COLORRED; MR:=C<支撑 AND CROSS(C,REF(C,2)); DRAWTEXT(CROSS(现价,支撑),中,'买'),COLORRED; STICKLINE(CROSS(现价,支撑),C,中,2,0),COLORRED; STICKLINE(MR=1,支撑,中,2,0),COLORRED; DRAWICON(MR=1 OR CROSS(现价,支撑),中,1); STICKLINE(CROSS(支撑,现价),支撑,(支撑-中)/5+支撑,2,0),COLORYELLOW; DRAWTEXT(CROSS(支撑,现价),(支撑-中)/5+支撑,'底'),COLORYELLOW; MC:=C>阻力 AND CROSS(REF(C,2),C); DRAWTEXT(CROSS(阻力,现价),中,'卖'),COLORGREEN; STICKLINE(CROSS(阻力,现价),C,中,2,0),COLORGREEN; STICKLINE(MC=1,阻力,中,2,0),COLORGREEN; DRAWICON(MC=1 OR CROSS(阻力,现价),中,2); STICKLINE(CROSS(现价,阻力),阻力,阻力-(支撑-中)/5,2,0),COLORMAGENTA; DRAWTEXT(CROSS(现价,阻力),阻力-(支撑-中)/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('机构买 = ',CON2STR((100*A2)/A6,0)),'%'); AAA2:=STRCAT(STRCAT('机构卖 = ',CON2STR((100*A3)/A6,0)),'%'); AAA3:=STRCAT(STRCAT('机构总买 = ',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; |
|