{日引用}

MA3:MA(C,3);

MA5:MA(C,5);

MA7:MA(C,7);

MA10:MA(C,10);

MA21:MA(C,21);

{BBIYY}

DKX:(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4;

{LJFSYY}

H1:REF(H,1);

L1:REF(L,1);

{大盘分时主图}

SJ:=IF(HOUR<12,(HOUR-9.5)*60+MINUTE,(HOUR-11)*60+MINUTE);

F:=DYNAINFO(3)*(1+(C/REF(C,MIN(SJ,5))-1)*1.5);

STICKLINE(F<DYNAINFO(3),DYNAINFO(3),F,0,0),COLORGREEN;

STICKLINE(F>DYNAINFO(3),DYNAINFO(3),F,0,0),COLORRED;

SUM(C*VOL,SJ)/SUM(VOL,SJ),COLORMAGENTA;

DRAWTEXT_FIX(C>0,0.004,0.11,0,DYBLOCK),COLORYELLOW,LINETHICK2;

DRAWTEXT_FIX(C>0,0.06,0.11,0,HYBLOCK),COLORRED,LINETHICK2;

DRAWTEXT_FIX(C>0,0.12,0.11,0,EXTERNSTR(0,1)),COLORWHITE,LINETHICK2;

现价: IF (DYNAINFO(4)=0,C,DYNAINFO(7)),COLORWHITE,POINTDOT;

量价:=(VOL/CLOSE)/3;

A52:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);

A53:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0);

A56:=A52+A53;DD1:=1;比:=A52/A53;

AAA1:=STRCAT(STRCAT('买= ',CON2STR((100*A52)/A56,0)),'%');

AAA2:=STRCAT(STRCAT('卖= ',CON2STR((100*A53)/A56,0)),'%');

AAA3:=STRCAT(STRCAT('差= ',CON2STR((100*(A52-A53))/A56,0)),'%');

DRAWTEXT_FIX(DD1=1,0,0.07,0,AAA1),COLORRED;

DRAWTEXT_FIX(DD1=1,0,0.15,0,AAA2),COLORGREEN;

DRAWTEXT_FIX(DD1=1,0,0.23,0,AAA3),COLOR00FFFF;

XG:HHV(H,480),DOTLINE,COLORCYAN;

STICKLINE(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.995,C,1,0),COLORMAGENTA;

DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.995,'突'),COLORYELLOW;

RQ:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1;

JY:=BARSLAST((RQ-REF(RQ,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1;

MA01:=REF(C,JY);

MA02:=REF(MA01,JY);

MA03:=REF(MA02,JY);

MA04:=REF(MA03,JY);

MA05:=REF(MA04,JY);

MA6:=REF(MA05,JY);

MA7:=REF(MA6,JY);

MA8:=REF(MA7,JY);

MA9:=REF(MA8,JY);

H1:=MAX(DYNAINFO(3),DYNAINFO(5));

L1:=MIN(DYNAINFO(3),DYNAINFO(6));

P1:=H1-L1;

阻力:L1+P1*8/9,COLORLIRED,DOTLINE;

支撑:L1+P1*0.5/9,COLORGREEN,DOTLINE;

XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));

主力:=EXPMA(CLOSE/XX,20);

大户:=EXPMA(CLOSE/XX,60);

散户:=EXPMA(CLOSE/XX,120);

底:=1;1.022,NODRAW;高:=1.033;

DRAWTEXT(CROSS(主力,1.02),C*0.999,' 拉'),COLORMAGENTA;

DRAWICON(CROSS(主力,1.04),C,26);

DRAWTEXT(CROSS(主力,1.04),C*0.999,' 冲'),COLORRED;

A01:=(VOL/CLOSE)/3;

A02:=SUM((IF(((A01>40) AND (CLOSE>(REF(CLOSE,1)))),A01,0)),0);

A3:=SUM((IF(((A01>40) AND (CLOSE<(REF(CLOSE,1)))),A01,0)),0);

A4:=SUM((IF(((A01<40) AND (CLOSE>(REF(CLOSE,1)))),A01,0)),0);

A5:=SUM((IF(((A01<40) AND (CLOSE<(REF(CLOSE,1)))),A01,0)),0);

A6:=((A02+A3)+A4)+A5;

A7:=IF((BARSTATUS=2),((100*A02)/A6),0);

A8:=((IF((BARSTATUS=2),((100*A3)/A6),0)));

A9:=((IF((BARSTATUS=2),((100*A4)/A6),0)));

A10:=((IF((BARSTATUS=2),((100*A5)/A6),0)));

DRAWICON(LONGCROSS(支撑,C,2),C-0.01,7);

STICKLINE(LONGCROSS(支撑,C,2),C,阻力,0,-1),COLORCYAN;

DRAWICON(LONGCROSS(C,阻力,2),C+0.01,8);

STICKLINE(LONGCROSS(C,阻力,2),C,支撑,0,-1),COLORRED;

三日:=日引用.MA3#DAY,COLORMAGENTA;

五日:=日引用.MA5#DAY,COLORGREEN;

七日:=日引用.MA7#DAY;

十日:=日引用.MA10#DAY;

二一日:=日引用.MA21#DAY;

DRAWTEXT_FIX(ISLASTBAR,1,1-0.6,1,STRCAT('M3 :  ',CON2STR(三日,2))),COLORMAGENTA;

DRAWTEXT_FIX(ISLASTBAR,1,1-0.4,1,STRCAT('M5 :  ',CON2STR(五日,2))),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,1,1-0.2,1,STRCAT('M10 :  ',CON2STR(十日,2))),COLORWHITE;

DRAWTEXT_FIX(ISLASTBAR,1,1-0.0,1,STRCAT('M21 :  ',CON2STR(二一日,2))),COLORWHITE;

ZG:=LJFSYY.H1#DAY;

ZD:=LJFSYY.L1#DAY;

DRAWTEXT_FIX(1,1,1-0.8,1,STRCAT('昨低 :  ',CON2STR(ZD,2))),COLORWHITE;

DRAWTEXT_FIX(1,1,1-1.0,1,STRCAT('昨高 :  ',CON2STR(ZG,2))),COLORWHITE;

DK:=BBIYY.DKX#DAY;

DRAWTEXT_FIX(1,0,0.68,0,STRCAT('BBI :  ',CON2STR(DK,2))),COLORCYAN;

DRAWTEXT_FIX(1,0,0.84,0,STRCAT('MA7 :  ',CON2STR(七日,2))),COLORMAGENTA;

DRAWTEXT_FIX(1,0,1,0,STRCAT('净流入: ',CON2STR(ZJBY.净流入#DAY,2))),COLORWHITE;

DRAWTEXT_FIX(1,0.15,1,0,STRCAT('超大单(万): ',CON2STR(ZJBY.超大单#DAY,2))),COLORGREEN;

DRAWTEXT_FIX(1,0.35,1,0,STRCAT('大单(万): ',CON2STR(ZJBY.大单#DAY,2))),COLORMAGENTA;

DRAWTEXT_FIX(1,0.5,1,0,STRCAT('中单(万): ',CON2STR(ZJBY.中单#DAY,2))),COLORGREEN;

DRAWTEXT_FIX(1,0.65,1,0,STRCAT('小单(万): ',CON2STR(ZJBY.小单#DAY,2))),COLORLIGRAY;