自用的一個分時圖,可以用在分時主圖上,我個人覺得不錯,有圖有真相,希望對大家有幫助。
成交額:=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('機(jī)構(gòu)買 = ',CON2STR((100*A2)/A6,0)),'%'); AAA2:=STRCAT(STRCAT('機(jī)構(gòu)賣 = ',CON2STR((100*A3)/A6,0)),'%'); AAA3:=STRCAT(STRCAT('機(jī)構(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;
H1:=MAX(DYNAINFO(3),DYNAINFO(5)); L1:=MIN(DYNAINFO(3),DYNAINFO(6)); P1:=H1-L1; 阻力:L1+P1*7/8,COLORGREEN; 支撐:L1+P1*0.5/8,COLORRED; 中:(支撐+阻力)/2,COLORWHITE,POINTDOT; 現(xiàn)價:CLOSE,COLORWHITE,LINETHICK2;
底買:STICKLINE(C<支撐,支撐,C,5,0),COLORRED;
MR:=C<支撐 AND CROSS(C,REF(C,2)); DRAWTEXT(CROSS(現(xiàn)價,支撐),支撐,'★買'),COLORRED; DRAWTEXT(CROSS(現(xiàn)價,阻力),阻力-(支撐-中)/5,'★賣'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,阻力,'頂'),COLORGREEN; DRAWTEXT(ISLASTBAR,支撐,'底'),COLORRED; DRAWTEXT(ISLASTBAR,(支撐+阻力)/2,'中'),COLORWHITE;
X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2; X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公積用資本公積金代替}; X3:=FINANCE(23)/FINANCE(10)*3.3; X4:=FINANCE(19)/FINANCE(15)*0.6;{缺長期負(fù)債或負(fù)債總額} X5:=FINANCE(20)/FINANCE(15)*0.999; Z值:=X1+X2+X3+X4+X5; 預(yù)警:=IF(Z值<1.2,'重警',IF(Z值>=1.2 AND Z值<2.6,'輕警','無警')); 財務(wù):=STRCAT('財務(wù): ',STRCAT(預(yù)警,STRCAT(' -Z值: ',CON2STR(Z值,3)))); 資產(chǎn):=STRCAT(' 優(yōu)質(zhì)率: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));{理論上越大越好但不同行業(yè)有不同標(biāo)準(zhǔn)}; 負(fù)債比:=STRCAT(' 負(fù)債比: ',CON2STR(FINANCE(25)/FINANCE(15),3));{缺長期負(fù)債或負(fù)債總額,理論上越大越好但不同行業(yè)有不同標(biāo)準(zhǔn)}; 財務(wù)系數(shù):=STRCAT('風(fēng)險: ',STRCAT(STRCAT(財務(wù),資產(chǎn)),負(fù)債比)); {} DRAWTEXT_FIX(ISLASTBAR,0.2,0.96,0,財務(wù)),COLORFFFFFF; DRAWTEXT_FIX(1,0.2,0.8,0,'行業(yè):')COLORCYAN; DRAWTEXT_FIX(1,0.26,0.8,0,HYBLOCK),COLORWHITE; DRAWTEXT_FIX(1,0.42,0.8,0,'地區(qū):')COLORCYAN; DRAWTEXT_FIX(1,0.48,0.8,0,DYBLOCK),COLORWHITE;
{開盤三線} {新版分時主圖}
T31:=BARSLAST(TIME2=093100); T40:=BARSLAST(TIME2=094000); T41:=BARSLAST(TIME2=094100); T50:=BARSLAST(TIME2=095000); T51:=BARSLAST(TIME2=095100); T60:=BARSLAST(TIME2=100000); C31:=REF(C,T40); O31:=REF(C,T31); C40:=REF(C,T50); O40:=REF(C,T41); C50:=REF(C,T60); O50:=REF(C,T51); A1:=C31>O31 AND C40>O40 AND C50>O50 AND O40>=C31 AND O50>=C40; A20:=C31<O31 AND C40<O40 AND C50<O50 AND O40<=C31 AND O50<=C40; A30:=C31>O31 AND C40>O40 AND C50<O50 AND C50<C40 AND O50/C50<C40/O40 AND O50/C50<C31/O31; A4:=C31>O31 AND C40<O40 AND C50<O50 AND C40<C31 AND C50<C40 AND C31/O31<O40/C40 AND C31/O31<O50/C50; A5:=C31<O31 AND C40<O40 AND C50>O50 AND C40<C31 AND O50>=C40; A60:=C31<O31 AND C40>O40 AND C50>O50 AND C40>C31 AND C50>C40 AND O31/C31<C40/O40 AND O31/C31<C50/O50; A70:=C31>O31 AND C40<O40 AND C50>O50 AND C31/O31>O40/C40 AND C50/O50>O40/C40; A80:=C31<O31 AND C40>O40 AND C50<O50 AND C40/O40<O31/C31 AND C40/O40<O50/C50; A9:=MAX(C31,O31)>=MAX(C40,O40) AND MAX(C31,O31)>=MAX(C50,O50); A10:=MIN(C31,O31)<=MIN(C40,O40) AND MIN(C31,O31)<=MIN(C50,O50); B1:='【三陽開泰】飚漲走勢可能漲停,量大出貨否則守倉,大陽盯量'; B2:='【三只烏鴉】重挫走勢可能跌停,只要反彈立即出貨,大陰隨逃'; B3:='【二陽一小陰】震蕩后勢看好,逢高減逢低吸,中陽陰須小心'; B4:='【一上二下二只烏鴉】拉高出貨后市看壞,逢高減磅后市下跌,中陰陽線小'; B5:='【二下一上二陰一陽】急跌控底后市不明,逢高減磅觀望為主,下影陰陽大小'; B6:='【一下二上一陰二陽】震蕩控底后市趨好,觀望為主謹(jǐn)慎吸納,下影陽陰大小'; B7:='【一上一下二陽夾一陰】震蕩走市后市看好,持股待漲逢低吸納,中陽陰須小心再上'; B8:='【一下一上二陰夾一陽】跌幅較大尾市殺跌,只要反彈立即出貨,中陰陽須小心再下'; B9:='【三不創(chuàng)新高】可小陰陽,三次不過短時頂部,阻力離場觀望,上影陰陽小K線'; B10:='【三不創(chuàng)新低】可小陰陽,三次不破短時底部,走勢不強(qiáng)逢低少吸,下影陰陽小K線'; DRAWTEXT_FIX( A1,0.005,0.005,0,B1),COLORRED; DRAWTEXT_FIX( A20,0.005,0.005,0,B2),COLORGREEN; DRAWTEXT_FIX( A30,0.005,0.005,0,B3),COLORMAGENTA; DRAWTEXT_FIX( A4,0.005,0.005,0,B4),COLORCYAN; DRAWTEXT_FIX( A5,0.005,0.005,0,B5),COLOR00FFFF; DRAWTEXT_FIX( A60,0.005,0.005,0,B6),COLORWHITE; DRAWTEXT_FIX( A70,0.005,0.005,0,B7),COLORYELLOW; DRAWTEXT_FIX( A80,0.005,0.005,0,B8),COLORLIGREEN; DRAWTEXT_FIX( A9,0.005,0.05,0,B9),COLORWHITE; DRAWTEXT_FIX( A10,0.005,0.1,0,B10),COLORLIMAGENTA;
|