以下是通达信上压力下支撑,周波段操作,用了五年了,奉献给大家(无源码的请下载附件导入)
MA5:MA(C,5);
{M13:MA(CLOSE,13),COLORFF00FF,LINETHICK2;
IF(M13<REF(M13,1),M13,DRAWNULL),COLORGREEN,LINETHICK1;}
MA20:MA(C,20),COLORYELLOW;
BBI:"BBI".BBI,COLORLIRED,LINETHICK1;
IF(BBI<REF(BBI,1),BBI,DRAWNULL),COLORCYAN,LINETHICK1;
MA60:MA(C,60),COLORRED;
C2:=REF(C,1);
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(涨停,H,L,0,0),COLORRED;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(跌停,H,L,0,1),COLORGREEN;
TY:=C;
HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=REF(C,BARSLAST(HD));
B:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波浪顶:IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK4;
STICKLINE(T1,A,A,9,0),COLORFF00FF;
波浪底:IF(T2,B,B),COLORRED,POINTDOT,LINETHICK4;
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
623333867.jpg
|