MA30:=EMA(CLOSE,30); 强弱:EMA(CLOSE,900); STICKLINE((MA30>强弱),MA30,强弱,0.5,0),COLOR0000FF; STICKLINE((MA30<强弱),MA30,强弱,0.5,0),COLOR00FF00; H1:=MAX(DYNAINFO(3),DYNAINFO(5)); L1:=MIN(DYNAINFO(3),DYNAINFO(6)); P1:=H1-L1; 阻力:L1+P1*7/8,COLOR00DD00; 支撑:L1+P1*0.5/8,COLOR00DD00; 现价:CLOSE,COLORWHITE,LINETHICK1,NODRAW; STICKLINE(CROSS(支撑,现价),支撑,阻力,1,0),COLORYELLOW; 涨幅:=(DYNAINFO(7)-DYNAINFO(3))/DYNAINFO(3)*100; 即时涨幅:=(C-DYNAINFO(3))/DYNAINFO(3)*100; {MA3:="MA.MA3#DAY"(5,10,20);} DRAWTEXT(LONGCROSS(支撑,C,2) AND 涨幅>-9.5,支撑*1.001,'买★'),COLORYELLOW;{吸} DRAWTEXT(LONGCROSS(支撑,C,2),C,'买★'),COLOR00FFFF; DRAWTEXT(LONGCROSS(C,强弱,2) AND 强弱>REF(强弱,1) AND 涨幅>0 AND 即时涨幅<0.5,强弱*0.998,'★卖★'),COLORRED; DRAWTEXT(LONGCROSS(C,阻力,2),C,'★卖★'),COLORRED;{抛}; {冲涨停} X:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE)); 主力:=EXPMA(CLOSE/X,20); 大户:=EXPMA(CLOSE/X,60); 散户:=EXPMA(CLOSE/X,120); 底:=1;1.02,NODRAW;高:=1.03; DRAWTEXT(CROSS(主力,1.02),C*0.999,'-拉升'),COLORCYAN; DRAWICON(CROSS(主力,1.04),C,24); DRAWTEXT(CROSS(主力,1.04),C*0.999,'-冲涨停'),COLORLIMAGENTA; A11:=(VOL/CLOSE)/3; A22:=SUM((IF(((A11>40) AND (CLOSE>(REF(CLOSE,1)))),A11,0)),0); A33:=SUM((IF(((A11>40) AND (CLOSE<(REF(CLOSE,1)))),A11,0)),0); A44:=SUM((IF(((A11<40) AND (CLOSE>(REF(CLOSE,1)))),A11,0)),0); A55:=SUM((IF(((A11<40) AND (CLOSE<(REF(CLOSE,1)))),A11,0)),0); A66:=((A22+A33)+A44)+A55; A77:=IF((BARSTATUS=2),((100*A22)/A66),0); A8:=((IF((BARSTATUS=2),((100*A33)/A66),0))); A9:=((IF((BARSTATUS=2),((100*A44)/A66),0))); A10:=((IF((BARSTATUS=2),((100*A55)/A66),0))); 机构买盘:=(A22),LINETHICK2; 机构卖盘:=(A33),LINETHICK2; 散户买盘:=(A44); 散户卖盘:=(A55); DRAWTEXT_FIX(1,0.000,1-0.05,0,STRCAT(STRCAT('【机构买盘】',CON2STR(机构买盘,2)),'万')),COLORRED; DRAWTEXT_FIX(1,0.250,1-0.05,0,STRCAT(STRCAT('【机构卖盘】',CON2STR(机构卖盘,2)),'万')),COLOR00FF00; DRAWTEXT_FIX(1,0.500,1-0.05,0,STRCAT(STRCAT('【散户买盘】',CON2STR(散户买盘,2)),'万')),COLORRED; DRAWTEXT_FIX(1,0.745,1-0.05,0,STRCAT(STRCAT('【散户卖盘】',CON2STR(散户卖盘,2)),'万')),COLOR00FF00; 突破:=REF(EMA(C,20),1); A1X:=(EMA(C,10)-突破)/突破*100; 多方:IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),DRAWNULL),COLORMAGENTA; 空方:IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL),COLORBLUE; STICKLINE(A1X>=0,多方,突破,2,0),COLORYELLOW,NODRAW; STICKLINE(A1X<0,空方,突破,2,0),COLORBLUE,NODRAW; CG:MA(C,21),COLOR00FF00,LINETHICK2; FL:HHV(CG,3),COLORFF0000,LINETHICK2; FS:CG-(FL-CG),COLORRED,LINETHICK2; {紫底} 低A:=REF(LLV(L,150),3); 近期底:=REFDATE(低A,DATE); 最底:=REFDATE(近期底,DATE); 入:=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)); DRAWICON(入,L,41);{阶段底部提示} HHA:=CONST(HHV(C,0)); LLA:=CONST(LLV(C,0)); HL:=HHA-LLA; 顶C:=HHA,COLOR545454,LINETHICK1,DOTLINE,NODRAW; DRAWICON(C=HHA,C*1.001,35); 底C:=LLA,COLOR545454,LINETHICK1,DOTLINE,NODRAW; DRAWICON(C=LLA,C*1.001,34); |
|