通达信30顶主图源码

[复制链接]
查看72 | 回复0 | 2021-8-20 04:35:49 | 显示全部楼层 |阅读模式

以下是通达信30顶主图源码(无源码的请下载附件导入)

N:=8;

MA1:MA(C,3);

 
MA2:MA(C,10),COLORFF8000;

 
MA3:MA(C,30);

 
MA4:MA(C,60),COLORFFBBCC;

 
TY:=C;

 
A1:=REF(TY,N)=HHV(TY,2*N+1); 

 
B1:=FILTER(A1,N); 

 
C1:=BACKSET(B1,N+1); 

 
HD:=FILTER(C1,N);

 
A2:=REF(TY,N)=LLV(TY,2*N+1); 

 
B2:=FILTER(A2,N); 

 
C2:=BACKSET(B2,N+1); 

 
LD:=FILTER(C2,N);

 
A:=REF(C,BARSLAST(HD)); 

 
B:=REF(L,BARSLAST(LD));

 
T1:=BARSLAST(HD)

 
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);

 
顶:IF(T1,A,A),COLORYELLOW,POINTDOT,LINETHICK1;

 
底:IF(T2,B,B),COLORGREEN,POINTDOT;

 

 
上升:IF(MA3>REF(MA3,1),MA3,DRAWNULL),COLORRED,LINETHICK2;

 
下降:IF(MA3

 
平:IF(MA(C,30)=REF(MA(C,30),1),MA(C,30),DRAWNULL),COLOR00FFFF,LINETHICK2;

 
BB:=(LMA(C,30)) AND (VO;

 
DRAWICON(BB,L*0.98,1);

 
STICKLINE(BB,O,C,1.5,0),COLORYELLOW;

 
换手:=VOL*100/CAPITAL;

 
STICKLINE(换手>15 AND C>O AND COUNT((CROSS(MA(VOL,3),MA(VOL,34))),3),
OPEN,CLOSE,1.5,0),COLORFF6600;{放量蓝色K线信号}

 

 
YCX:=MA3>=REF(MA3,1);

 
H1:=MAX(MAX(MA1,MA2),MA3);

 
L1:=MIN(MIN(MA1,MA2),MA3);{一阳穿3线}

 
一阳穿线:= H1REF(MA2,1); {穿C线洋红色K线}

 
STICKLINE(一阳穿线,O,C,1.5,1),COLORLIGREEN;{洋红色K线}

 

 
ZX:=(MA1+MA3)/2;

 
QSXS:=MA1>=MA3 AND MA3>REF(MA3,1);

 
GD:=ZX>=REF(ZX,1) AND REF(ZX,1)

 
YB:=C>REF((O-C)/2+C,2);

 
买:=CROSS(C,ZX) AND (GD OR YB) AND QSXS;

 
DRAWTEXT(买 AND BB,L*0.99, '买'),COLORLIBLUE;

 
DRAWTEXT(买 AND 一阳穿线,L*0.99, '阳'),COLOR5290FF;

 

 
ZH1:=MAX(MAX(MA1,MA2),MA2);

 
ZH2:=MIN(MIN(MA1,MA2),MA2);

 
ZH3:=(FILTER((ZH1-ZH2)/ZH2<0.0005 AND C>O AND MA1>REF(MA1,1)
AND (LZH1),1));

 
DRAWTEXT(买 AND ZH3,L*0.99, '合'),COLORYELLOW;

643411307.jpg

643411307.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则