以下是通达信天量洗缩量突“黄石小勇子版”主图 幅图 选股 源码
通达信天量洗缩量突“黄石小勇子版”主图 幅图 选股 源码
{主图 带价格标注}
T:=HHVBARS(VOL,200);
TJ:=REF(COUNT(H>REF(MAX(C,O),T),T)<2,1) AND VOL<REF(VOL,T)AND T>20;
XG:=COUNT(CROSS(C,REF(MAX(C,O),T)),T)=1 AND CROSS(C,REF(MAX(C,O),T)) AND TJ;
STICKLINE(T>=0,REF(MAX(C,O),T),REF(MAX(C,O),T),4,0),COLOR0066CC;
DRAWTEXT(T=0,H*1.02,VARCAT(VARCAT('天量价：',VAR2STR(REF(MAX(C,O),T),2)),'元'))COLORYELLOW;
STICKLINE(XG,H,L,0,0),COLORFF00FF;
STICKLINE(XG,C,O,3,0),COLOR990099;
STICKLINE(XG,C,O,2,0),COLORBB00BB;
STICKLINE(XG,C,O,1,0),COLORDD00DD;
STICKLINE(XG,C,O,0.3,0),COLORFF00FF;
DRAWICON(XG,L*0.93,38);
{主图 价格显示在窗口}
T:=HHVBARS(VOL,200);
TJ:=REF(COUNT(H>REF(MAX(C,O),T),T)<2,1) AND VOL<REF(VOL,T)AND T>20;
XG:=COUNT(CROSS(C,REF(MAX(C,O),T)),T)=1 AND CROSS(C,REF(MAX(C,O),T)) AND TJ;
天量价:REF(MAX(C,O),T),NODRAW,COLORYELLOW;
STICKLINE(T>=0,REF(MAX(C,O),T),REF(MAX(C,O),T),4,0),COLOR0066CC;
STICKLINE(XG,H,L,0,0),COLORFF00FF;
STICKLINE(XG,C,O,3,0),COLOR990099;
STICKLINE(XG,C,O,2,0),COLORBB00BB;
STICKLINE(XG,C,O,1,0),COLORDD00DD;
STICKLINE(XG,C,O,0.3,0),COLORFF00FF;
DRAWICON(XG,L*0.93,38);
{幅图}
T:=HHVBARS(VOL,200);
TJ:=REF(COUNT(H>REF(MAX(C,O),T),T)<2,1) AND VOL<REF(VOL,T)AND T>20;
XG:=COUNT(CROSS(C,REF(MAX(C,O),T)),T)=1 AND CROSS(C,REF(MAX(C,O),T)) AND TJ;
STICKLINE(XG,0,8,1.7,0),COLORLIMAGENTA;
{选股}
T:=HHVBARS(VOL,200);
TJ:=REF(COUNT(H>REF(MAX(C,O),T),T)<2,1) AND VOL<REF(VOL,T)AND T>20;
XG:COUNT(CROSS(C,REF(MAX(C,O),T)),T)=1 AND CROSS(C,REF(MAX(C,O),T)) AND TJ;
