量学主副图画线指标源码（TDX）

量学主图指标源码：

{涨跌停虚拟}

{

ZTDT:=IF(NAMELIKE('ST') OR NAMELIKE('*ST') OR NAMELIKE('S'),0.05,0.1);

XLZ:=IF(CURRBARSCOUNT=1 AND C>=REF(C,1),ZTPRICE(REF(CLOSE,1),ZTDT),DRAWNULL);

XLD:=IF(CURRBARSCOUNT=1 AND C<REF(C,1),DTPRICE(REF(CLOSE,1),ZTDT),DRAWNULL);

STICKLINE(CURRBARSCOUNT=1 && (SETCODE=0
SETCODE=1),XLZ,REF(C,1),-1,-1),COLORMAGENTA;

STICKLINE(CURRBARSCOUNT=1 && (SETCODE=0
SETCODE=1),XLD,REF(C,1),-1,-1),COLORLIGRAY;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

}

{涨跌停标识}

涨跌:=REF(C,1);

涨停:=IF((C-涨跌)*100/涨跌>=(10-0.01*100/涨跌),1,0);

STICKLINE(涨停,OPEN,CLOSE,2,0),COLORRED;

跌停:=IF((涨跌-C)*100/涨跌>=(10-0.01*100/涨跌),1,0);

STICKLINE(跌停,OPEN,CLOSE,2,0),COLOR808000;

{21位画线}

FLAG:=ABS(C-O)/IF((H-L) = 0,100,H-L);

ZHANGF:=ABS(C-O)/O;

WEI21:IF(CODELIKE('9999'),(H-L)*0.5+L,IF(C>O,(C-O)*0.5+O,(O-C)*0.5+C)),NODRAW;

STICKLINE(ZHANGF>=0.03 && FLAG >= 0.03,WEI21,WEI21,-1,0),COLORMAGENTA;

DRAWTEXT_FIX(ISLASTBAR,0,1,0,HYBLOCK),COLORLIBLUE;

DRAWTEXT_FIX(ISLASTBAR,0.05,1,0,DYBLOCK),COLORBLUE;

DRAWTEXT_FIX(ISLASTBAR,0.1,1,0,GNBLOCK),COLORMAGENTA;

明日涨停:ZTPRICE(C,0.1),NODRAW;

实三一:O+(C-O)*2/3,NODRAW;

实三二:O+(C-O)/3,NODRAW;

虚三一:H-(H-L)/3,NODRAW;

虚二一:H-(H-L)*0.5,NODRAW,COLORBLUE;

虚三二:H-(H-L)*2/3,NODRAW;

TK:=C>O AND O>=REF(MAX(C,O),1)+0.01 OR O>=REF(C,1)+0.01 ;

STICKLINE(TK, O,(C-O)*0.01+O,3,0),COLORBLUE;

ZF:=H>=INTPART(REF(C,1)*1.1*100+0.5)/100 AND H>C;

DT:=L<=INTPART(REF(C,1)*0.9*100+0.5)/100 AND L<C;

上影线幅度:=((H-REF(C,1))/REF(C,1)-(MAX(O,C)-REF(C,1))/REF(C,1))*100;

下影线幅度:=((REF(C,1)-L)/REF(C,1)-(REF(C,1)-MIN(O,C))/REF(C,1))*100;

上影线长:=H-MAX(O,C);

下影线长:=MIN(O,C)-L;

长度比较:=上影线长/下影线长;{上下影线长度比}

STICKLINE((MIN(O,C)=L OR 长度比较>1) AND ZF,H-上影线长*1,H,0.01,0),COLORRED;

STICKLINE((MAX(O,C)=H OR 长度比较<1) AND DT,L+下影线长*1,L,0.01,0),COLORGREEN;

{高量柱;}

GLT:=CONST(HHVBARS(V,高量天数));

高量顶:=IF(CURRBARSCOUNT<=GLT+1,CONST(REF(MAX(C,O),GLT)),DRAWNULL);

高量底:=IF(CURRBARSCOUNT<=GLT+1,CONST(IF((REF(MAX(C,O),GLT)-REF(MIN(C,O),GLT))/REF(O,GLT)<=0.033,REF(L,GLT),REF(MIN(C,O),GLT))),DRAWNULL);

STICKLINE(高量底,高量底,高量底,5,0),COLORLIBLUE;

STICKLINE(高量顶,高量顶,高量顶,5,0),COLORRED;

DRAWTEXT(ISLASTBAR,高量顶,STRCAT(' ','A ')),COLORRED;

DRAWTEXT(ISLASTBAR,高量底,STRCAT(' ','B ')),COLORLIBLUE;

量学副图源码：

量:VOL,VOLSTICK;

{MAVOL1:MA(VOLUME,M1);

MAVOL2:MA(VOLUME,M2);}

{DRAWICON(CC,H,1);

DRAWICON(DD,H,5);};

换手:V/CAPITAL*100,COLORRED,NODRAW;

几倍:(V-REF(V,1))/REF(V,1),COLOR33CCFF,NODRAW;

平量:IF(V>=REF(V,1)*0.97 AND V<=REF(V,1)*1.03,1,0),COLORGRAY,NODRAW;

低量10:IF(V<REF(LLV(V,10),1),1,0),COLORRED,NODRAW;

低量50:IF(V<REF(LLV(V,50),1),1,0),COLORBLUE,NODRAW;

低量100:IF(V<REF(LLV(V,100),1),1,0),COLORFF00FF,NODRAW;

倍量:=V>=REF(V,1)*2;

STICKLINE(倍量 ,V,0,0.01,0),COLOR33CCFF ;

STICKLINE(平量,V ,0,0.01,0),COLORGRAY ;

STICKLINE(低量10,V,0,0.01,0),COLORRED ;

STICKLINE(低量50,V,0,0.01,0),COLORBLUE ;

STICKLINE(低量100,V,0,0.01,0),COLORFF00FF ;

FF1:=V=LLV(V,100) AND BARSCOUNT(V)>10;

FF2:=V<REF(V,1)/2 AND NOT(FF1);

GG:=IF(C>O,O,C);

GG1:=IF(C>O,C,O);

FF3:=V<REF(V,1)/1.5 AND NOT(FF2) AND NOT(FF1);

DRAWTEXT(FF3,V*0.95,'3'),DRAWABOVE,COLORLIBLUE;

DRAWTEXT(FF2,V*0.95,'2'),DRAWABOVE,COLORLIBLUE;

DRAWTEXT(FF1,V*0.95,'1'),DRAWABOVE,COLORLIBLUE;

DRAWTEXT(FF3,V*0.95,'3'),DRAWABOVE,COLORLIBLUE;

DRAWTEXT(FF2,V*0.95,'2'),DRAWABOVE,COLORLIBLUE;

DRAWTEXT(FF1,V*0.95,'1'),DRAWABOVE,COLORLIBLUE;

AA:=V*0.67;

BB:=V*0.5;

CC:=C<O;

DD:=C>REF(C,1) AND CC;

DRAWTEXT(DD,V*0.95,'！'),DRAWABOVE,COLORLIBLUE;

TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));

MTIME:=MOD(FROMOPEN,TOTAL);

CTIME:=IF(MTIME<0.5,TOTAL,MTIME);

VVOL:IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VOL*(TOTAL+3)/(CTIME+3),DRAWNULL),NODRAW;

STICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VVOL,0,1.8,-1),COLORGRAY;

{百日内500里}

PT100:=CONST(HHVBARS(V,100));

PT0:=CONST(HHVBARS(V,0));

PT:=IF(高量开关=1 AND PT100>=PT0,PT100,DRAWNULL);

TS:IF(CURRBARSCOUNT<=PT+1,CONST(IF(PT=0,V,REF(V,PT))),DRAWNULL),COLORBLUE,DOTLINE;

IF(CURRBARSCOUNT=PT+1,TS,DRAWNULL),CIRCLEDOT,COLORBLUE,LINETHICK1;

DRAWTEXT(ISLASTBAR,TS*0.975,' 500里'),COLORBLUE;

{30日低量}

CONST(LLV(V,30)),COLORRED,DOTLINE;