通达信颈线位自动画线主图指标 牛股妖股必经之路 源码

QA:=REF(H,10)=HHV(H,2*10+1);

QB:=BACKSET(QA,10+1);

QC:=FILTER(QB,10) AND H=HHV(H,10+1);

QD:=BARSLAST(QC);

QE:=IF(QC,CURRBARSCOUNT,0);

QF:=IF(QD,REF(QE,QD),QE);

QG:=CONST(QF);

QH:=REF(QF,QD+1);

QW:=CONST(QH);

颈线1:DRAWLINE(CURRBARSCOUNT=QW,H,ISLASTBAR,REF(H,QW-1),1),COLOR0099FF;

DRAWTEXT(ISLASTBAR,颈线1,'---颈线1'),COLOR0099FF;

颈线2:DRAWLINE(CURRBARSCOUNT=QG,H,ISLASTBAR,REF(H,QG-1),1),COLOR0099FF,DOTLINE;



上三一:(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))*2/3+MIN(OPEN,CLOSE),NODRAW,COLORMAGENTA;

中二一:(OPEN+CLOSE)/2,NODRAW,COLORGREEN;

STICKLINE((O+C)/2,(O+C)/2,(O+C)/2,3,0),COLORGREEN;

下三一:(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))/3+MIN(OPEN,CLOSE),NODRAW,COLORYELLOW;



M1:=5;

M2:=13;

M3:=24;

M4:=60;

M5:=120;

M6:=250;

M7:=500;

MA5:MA(CLOSE,M1);

MA13:MA(CLOSE,M2);

MA24:MA(CLOSE,M3);

MA60:MA(CLOSE,M4);

MA125:MA(CLOSE,M5);

MA250:MA(CLOSE,M6);

MA500:MA(CLOSE,M7);

LT:=LLVBARS(L,60);

LT1:=LLVBARS(L,60);

LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);

HT:=FINDHIGHBARS(H,LT+1,60,1);

DT:=FINDLOW(L,LT1+1,60,1);

DD:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORMAGENTA ,LINETHICK1,DOTLINE;

TT:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1);

STICKLINE((C-REF(C,1))/REF(C,1)>0.095,C,O,1,0),COLORMAGENTA;



AA:=CONST(REF(HHVBARS(V,100),1)),NODRAW;

FF:IF(CURRBARSCOUNT
CC:IF(CURRBARSCOUNT
EE:=H>(FF-0.02) AND H
DRAWTEXT(EE AND CURRBARSCOUNT
AA1:=(MIN(L,C)FF-0.02);

BB1:=(MIN(L,C)CC-0.02);

DRAWTEXT((AA1 OR BB1) AND CURRBARSCOUNT


LHJBK:=HORCALC('板块指数',105,1,2),NODRAW;

DRAWTEXT_FIX(1,0.78,0,0,STRCAT('板块排名:',CON2STR(LHJBK,0))),COLORLIMAGENTA;

LHJAE:=HORCALC(HYBLOCK,105,1,0),NODRAW;

DRAWTEXT_FIX(1,0.88,0,0,STRCAT('龙头排名:',CON2STR(LHJAE, 0))),COLORRED;





DRAWTEXT_FIX(C>0,0,0,0,STRCAT('行业板块: ',HYBLOCK));

DRAWTEXT_FIX(C>0,0.1,0,0,STRCAT('地域板块: ',DYBLOCK));

DRAWTEXT_FIX(C>0,0,0.05,0,STRCAT('风格板块: ',FGBLOCK));

DRAWTEXT_FIX(C>0,0,0.1,0,STRCAT('概念板块: ',GNBLOCK));





DRAWTEXT_FIX(1,0.50,0.0,0,STRCAT(STRCAT('自由流通值：',CON2STR((FINANCE(46)*C/100000000),2)),'亿')),COLOR0000FF;

AAA7:=STRCAT('换手率:',CON2STR(DYNAINFO(37)*100,2)); DRAWTEXT_FIX(1,0.60,0,0,AAA7),COLORRED;