以下是通达信经典高量柱战法源码和截图
通达信经典高量柱战法源码:
★狂:STRLEFT('奔★',10),colormagenta;
收:=MA(CLOSE,1);
UPPER:(1+N2/100)*MA(CLOSE,N1),colorligray;
LOWER:(1-N3/100)*MA(CLOSE,N1),colorcyan;
ENE:(UPPER+LOWER)/2,colorligreen;
超买:=(1+N4/100)*MA(CLOSE,N1),colorwhite;
超卖:=(1-N5/100)*MA(CLOSE,N1),coloryellow;
流入:IF(CLOSE UPPERANDCLOSE UPPER,UPPER,DRAWNULL),colorlimagenta,LINETHICK2;
资金流出:IF(CLOSE LOWERANDCLOSE UPPER,LOWER,DRAWNULL),colorgreen,LINETHICK2;
A:=CROSS(LOWER,L);
B:=CROSS(L,LOWER);
买:IF(B,L,DRAWNULL),colorred;
DRAWICON(买,L*0.986,'buy');
买准备:IF(A,收,DRAWNULL),coloryellow;
DRAWICON(买准备,L*0.986,'buy1');
BL:=1;
MAXADD1:=PEAKBARS(1,BL,1);
MAXADD2:=PEAKBARS(1,BL,2);
MAXADD3:=PEAKBARS(1,BL,3);
MAXADD4:=PEAKBARS(1,BL,4);
MINADD1:=TROUGHBARS(2,BL,1);
MINADD2:=TROUGHBARS(2,BL,2);
MINADD3:=TROUGHBARS(2,BL,3);
MINADD4:=TROUGHBARS(2,BL,4);
MAX1:=PEAK(1,BL,1),COLORBROWN,POINTDOT;
MIN1:=TROUGH(2,BL,1),COLORBROWN,POINTDOT;
MAX2:=IF(MAXADD2 MINADD1,PEAK(1,BL,2),IF(MAXADD3 MINADD1,PEAK(1,BL,3),PEAK(1,BL,4))),COLORGRAY,POINTDOT;
MIN2:=IF(MINADD2 MAXADD1,TROUGH(2,BL,2),IF(MINADD3 MAXADD1,TROUGH(2,BL,3),TROUGH(2,BL,4))),COLORGRAY,POINTDOT;
MAXADD22:=IF(MAXADD2 MINADD1,MAXADD2,IF(MAXADD3 MINADD1,MAXADD3,MAXADD4));
MINADD22:=IF(MINADD2 MAXADD1,MINADD2,IF(MINADD3 MAXADD1,MINADD3,MINADD4));
HIGHZIG:=ZIG(1,BL);
LOWZIG:=ZIG(2,BL);
Z123Q4:IF(MAXADD1 MINADD1,MAX1*MIN1/MIN2,-MIN1*MAX1/MAX2),COLORYELLOW,CROSSDOT;
T12M:IF(MINADD1 MAXADD1,MAXADD22-MINADD1,MINADD22-MAXADD1),COLORGRAY;
T23M:IF(MINADD1 MAXADD1,MINADD1-MAXADD1,MAXADD1-MINADD1),COLORCYAN;
T34M:IF(MINADD1 MAXADD1,MAXADD1,MINADD1),COLORMAGENTA,LINETHICK2;
降T34M:IF(MINADD1 MAXADD1,MINADD1,MAXADD1),COLORGREEN,LINETHICK2;
DRAWTEXT(MIN1=LOWZIG,-LOW,'★'),COLORYELLOW;
DRAWTEXT(MAX1=HIGHZIG,HIGH,'★'),COLORYELLOW;
ZZDZ:=IF(MIN1=LOWZIG,-LOW,IF(MAX1=HIGHZIG,HIGH,IF(ISLASTBAR,C,0)));
PLOYLINE(MIN1=LOWZIGORMAX1=HIGHZIGORISLASTBAR,ZZDZ),LINETHICK2,COLORRED;
VAR1:=1;
VAR2:=BARSCOUNT(CLOSE)*VAR1;
VAR3:=IF(VAR2 5,5,VAR2)*VAR1;
VAR4:=IF(VAR2 10,10,VAR2)*VAR1;
VAR5:=IF(VAR2 20,20,VAR2)*VAR1;
VAR6:=IF(VAR2 120,120,VAR2)*VAR1;
VAR7:=SUM(AMOUNT,VAR3)*VAR1;
VAR8:=SUM(AMOUNT,VAR4)*VAR1;
VAR9:=SUM(AMOUNT,VAR5)*VAR1;
VARA:=SUM(AMOUNT,VAR6)*VAR1;
VARB:=100*VAR9/VARA*VAR1;
VARC:=100*VAR8/VARA*VAR1;
VARD:=100*VAR7/VARA*VAR1;
VARE:=SUM(VARB,2)/2*VAR1;
VARF:=SUM(VARC,2)/2*VAR1;
VAR10:=SUM(VARD,10)/10*VAR1;
VAR11:=SUM(VARE,2)/2*VAR1;
VAR12:=SUM(VARF,2)/2*VAR1;
VAR13:=SUM(VAR10,2)/2*VAR1;
资金:STICKLINE(VARE VARFANDVARF VAR10ANDVARE VAR10ANDVARE REF(VARE,1)ANDVARF REF(VARF,1)ANDVAR10 REF(VAR10,1),VARB,VARC,5,0)*VAR1,,COLORRED;
资金:STICKLINE(VARE VARFANDVARF VAR10ANDVARE VAR10ANDVARE REF(VARE,1)ANDVARF REF(VARF,1)ANDVAR10 REF(VAR10,1),VARC,VARD,5,0)*VAR1,,COLORYELLOW;
资金:STICKLINE(VARE VARFANDVARF VAR10ANDVARE VAR10ANDVARE REF(VARE,1)ANDVARF REF(VARF,1)ANDVAR10 REF(VAR10,1),VARD,0,5,0)*VAR1,,COLORBLUE;
资金离场:IF(VARE VARFANDVARF VAR10ANDVARE VAR10ANDVARE REF(VARE,1)ANDVARF REF(VARF,1)ANDVAR10 REF(VAR10,1),0,VARB)*VAR1,,STICK;
通达信经典高量柱战法截图