中軸（昨日收盤價）下的股票最好別動，三線后定乾坤 分時副圖指標(biāo)，盤中可看到主力散戶持倉比例非常實用 主圖 STICKLINE(TIME2=94100 AND REF(C,BARSLAST(TIME2=94100))>=REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORRED; STICKLINE(TIME2=94100 AND REF(C,BARSLAST(TIME2=94100))<REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORGREEN; STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))>=REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORRED; STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))<REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORGREEN; STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))>=REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORRED; STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))<REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORGREEN; SJ1:=TIME2=93100;T1:=BARSLAST(SJ1);SJ2:=TIME2=94100; SJ4:=TIME2=95100;T2:=BARSLAST(SJ2);T4:=BARSLAST(SJ4); H1:=IF(TIME2=94100,REF(C,T2),DRAWNULL)=C; H2:=IF(TIME2=95100,REF(C,T4),DRAWNULL)=C; CS2:=CONST(REF(C,T2)); CS4:=CONST(REF(C,T4)); GL2:=FILTERX(H1,T2); GL4:=FILTERX(H2,T4); L1:=IF(TIME2=93100,REF(C,T1),DRAWNULL)=C; CS1:=CONST(REF(C,T1)); GL1:=FILTERX(L1,T1); DA:=CONST(IF(REF(GL2,BARSLAST(GL2)),REF(BARSLAST(GL1),BARSLAST(GL2)),DRAWNULL)); DA1:=CONST(IF(REF(GL4,BARSLAST(GL4)),REF(BARSLAST(GL2),BARSLAST(GL4)),DRAWNULL)); A:=IF(BARSLAST(GL1)>=0 AND BARSLAST(GL1)<=DA,((CS2-CS1)/DA)*BARSLAST(GL1)+CS1,DRAWNULL); B:=IF(BARSLAST(GL2)>=0 AND BARSLAST(GL2)<=DA1,((CS4-CS2)/DA1)*BARSLAST(GL2)+CS2,DRAWNULL); IF(A>=REF(A,2),A,DRAWNULL)COLORLIMAGENTA,LINETHICK3; IF(A<REF(A,2),A,DRAWNULL)COLORGREEN,LINETHICK5; IF(B>=REF(B,2),B,DRAWNULL)COLORLIMAGENTA,LINETHICK3; IF(B<REF(B,2),B,DRAWNULL)COLORGREEN,LINETHICK3; XSJ1:=TIME2=95100; XT1:=BARSLAST(XSJ1); XSJ2:=TIME2=100100; XT2:=BARSLAST(XSJ2); XCS2:=CONST(REF(C,XT2)); XL1:=IF(TIME2=95100,REF(C,XT1),DRAWNULL)=C; XH1:=IF(TIME2=100100,REF(C,XT2),DRAWNULL)=C; XCS1:=CONST(REF(C,XT1)); XGL1:=FILTERX(XL1,XT1); XGL2:=FILTERX(XH1,XT2); XDA:=CONST(IF(REF(XGL2,BARSLAST(XGL2)),REF(BARSLAST(XGL1),BARSLAST(XGL2)),DRAWNULL)); XA:=IF(BARSLAST(XGL1)>=0 AND BARSLAST(XGL1)<=XDA,((XCS2-XCS1)/XDA)*BARSLAST(XGL1)+XCS1,DRAWNULL); IF(XA>=REF(XA,1),XA,DRAWNULL)COLORLIMAGENTA,LINETHICK3; IF(XA<REF(XA,1),XA,DRAWNULL)COLORGREEN,LINETHICK3; 時間:=TIME2=100100; N:=BARSLAST(時間); C1:CONST(IF(N,MAX(REF(HHV(H,0),N+1),DYNAINFO(4)),HHV(H,0))),DOTLINE,COLORRED; C2:CONST(IF(N,MIN(REF(LLV(L,0),N+1),DYNAINFO(4)),LLV(L,0))),DOTLINE,COLORGREEN; C3:(C1+C2)/2,DOTLINE,COLORYELLOW; VV:=HHV(V,0); ZF:=(C1/C2-1)*100; DRAWTEXT(CURRBARSCOUNT=2,C1,VARCAT(VARCAT(VARCAT(VARCAT('上限:',VAR2STR(C1,2)),'元,'),VARCAT('振幅:',VAR2STR(ZF,2))),'%')),COLORRED; DRAWTEXT(CURRBARSCOUNT=2,C3,VARCAT(VARCAT('中限:',VAR2STR(C3,2)),'元')),COLORYELLOW; DRAWTEXT(CURRBARSCOUNT=2,C2,VARCAT(VARCAT('下限:',VAR2STR(C2,2)),'元')),COLORGREEN; DRAWTEXT(C1/C2<=1.03 AND CROSS(C,C1) AND V>=VV,C1*1.005,'★買入')COLORRED; DRAWTEXT(C1/C2<=1.03 AND CROSS(C2,C) AND V>=VV,C2*0.998,'★賣出')COLORGREEN; STICKLINE(C1/C2<1.03 AND CROSS(C,C1) AND V>=VV,DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,0),COLORRED; AAA:=MAX(DYNAINFO(3),DYNAINFO(5)); BBB:=MIN(DYNAINFO(3),DYNAINFO(6)); CCC:=AAA-BBB; 中軌:=(AAA+BBB)/1,POINTDOT; 阻力:BBB+CCC*7/8,COLORBLUE,POINTDOT; 支撐:BBB+CCC*1/8,COLORMAGENTA,POINTDOT; 支撐1:BBB+CCC*0.5/8,POINTDOT; 上頂:BBB+CCC*2/3,POINTDOT; 下底:BBB+CCC/3,COLORBLUE,POINTDOT; STICKLINE(C>阻力,阻力,C,2,0),COLORGREEN; STICKLINE(C<支撐,支撐,C,2,0),COLORLIMAGENTA; DRAWTEXT(LONGCROSS(支撐1,C,2),下底,'B'),COLORYELLOW;{B} DRAWTEXT(LONGCROSS(C,阻力,2),上頂,'S'),COLORRED;{S}; 副圖 A1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0); 成交額:=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); A4:=SUM((IF(((成交額/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交額,0)),0); A5:=SUM((IF(((成交額/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交額,0)),0); A6:=((A2+A3)+A4)+A5; A7:=IF((ISLASTBAR),((100*A2)/A6),0); A8:=IF((ISLASTBAR),((100*A3)/A6),0); A9:=IF((ISLASTBAR),((100*A4)/A6),0); A10:=IF((ISLASTBAR),((100*A5)/A6),0); 機買:(A2),LINETHICK4,COLORRED; 機賣:(A3),LINETHICK4,COLORCYAN; 操盤:機買-機賣,NODRAW; 散買:(A4),COLOR5555FF; 散賣:(A5),COLOR55FF55; 散戶進出:=散買-散賣,NODRAW; 抄底:IF(CROSS(A2,A3),10,0),LINETHICK3,COLORMAGENTA; 閃電買入:DRAWTEXT(CROSS(操盤,抄底 AND A3),操盤*0.68,'買'),LINETHICK3,COLORYELLOW; 強勢:((100*A2)/A6>50); STICKLINE(強勢,機買*1.02,機買*1.1,1,0),COLORYELLOW; 拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18; STICKLINE(拉升,機買*1.1,機買*1.2,1,0),COLORRED; DRAWTEXT(ISLASTBAR=1,機買*0.95,''),LINETHICK2,COLORRED; DRAWTEXT(ISLASTBAR=1,機賣*0.95,''),LINETHICK2,COLORFFFF55; Q:=BETWEEN(C/(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))),1.05,0.95); Q2:=IF(Q=0,MA(C,BARSCOUNT(C)),(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C)))); DRAWICON(CROSS((C/Q2),1.03),機買,5); DD1:=1; AAA1:=STRCAT(STRCAT('機構(gòu)買入',CON2STR((100*A2)/A6,0)),'%'); AAA2:=STRCAT(STRCAT('機構(gòu)賣出',CON2STR((100*A3)/A6,0)),'%'); AAA0:=STRCAT(STRCAT('機構(gòu)總買入',CON2STR((100*(A2-A3))/A6,0)),'%'); AAA3:=STRCAT(STRCAT('散戶買入',CON2STR((100*A4)/A6,0)),'%'); AAA4:=STRCAT(STRCAT('散戶賣出',CON2STR((100*A5)/A6,0)),'%'); AAA5:=STRCAT(STRCAT('散戶總買入',CON2STR((100*(A4-A5))/A6,0)),'%'); DRAWTEXT_FIX(DD1=1,0.01,0.05,0,AAA1),COLORRED; DRAWTEXT_FIX(DD1=1,0.01,0.25,0,AAA2),COLORCYAN; DRAWTEXT_FIX(DD1=1,0.01,0.40,0,AAA3),COLORLIRED; DRAWTEXT_FIX(DD1=1,0.01,0.55,0,AAA4),COLORGREEN; DRAWTEXT_FIX(DD1=1,0.01,0.70,0,AAA0),LINETHICK5,COLORMAGENTA; DRAWTEXT_FIX(DD1=1,0.01,0.85,0,AAA5),LINETHICK5,COLORGREEN; 主力凈買額:=(操盤+散戶進出)/成交額,NODRAW; AAA6:=STRCAT(STRCAT('主力凈買額',CON2STR(主力凈買額,0)),'%'); DRAWTEXT_FIX(DD1=1,0.53,0.30,0,AAA6),COLORWHITE; HJ_1:=REF(CLOSE,1); 。。。。。。源碼結(jié)束明天再見。。。。。。。。。。。。。。。。。。 |
|
|
