|
自用的一個分時圖，可以用在分時主圖上，我個人覺得不錯，有圖有真相，希望對大家有幫助。
成交額:=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;
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;{缺長期負債或負債總額}
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è)有不同標準};
負債比:=STRCAT(' 負債比: ',CON2STR(FINANCE(25)/FINANCE(15),3));{缺長期負債或負債總額，理論上越大越好但不同行業(yè)有不同標準};
財務(wù)系數(shù):=STRCAT('風險: ',STRCAT(STRCAT(財務(wù),資產(chǎn)),負債比));
{}
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:='【一下二上一陰二陽】震蕩控底后市趨好，觀望為主謹慎吸納，下影陽陰大小';
B7:='【一上一下二陽夾一陰】震蕩走市后市看好，持股待漲逢低吸納，中陽陰須小心再上';
B8:='【一下一上二陰夾一陽】跌幅較大尾市殺跌，只要反彈立即出貨，中陰陽須小心再下';
B9:='【三不創(chuàng)新高】可小陰陽，三次不過短時頂部，阻力離場觀望，上影陰陽小K線';
B10:='【三不創(chuà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;
|
