当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：精准底，副图+选股（通达信指标 副图 源码 测试图）
软件名称：[B]精准底，副图+选股（通达信指标 副图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：2.00 KB
官方主页：Home Page
更新时间：2023-06-14 00:15:30
软件简介:
精准底，副图+选股
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),13,1)/SMA(MAX(LOW-VAR2,0),13,1)*100;
VAR4:=EMA(IF(CLOSE*1.2,VAR3*13,VAR3/13),13);
VAR5:=LLV(LOW,34);
VAR6:=HHV(VAR4,34);
VAR7:=IF(LLV(LOW,56),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
AA:=VAR8>REF(VAR8,1);
DR:=100;
ZRQ:=3;
DJ:=REF(LLV(L,100),3);
ZD:=REFDATE(DJ,DATE);
XG:=L=ZD;
XGA:=AA AND XG,COLORRED,LINETHICK2;
XG1:=XGA>REF(XGA,1);
精准底:=XG1>REF(XG1,1);
DRAWTEXT(FILTER(精准底=1,5),36,'-----精准底'),COLORRED;
STICKLINE(IF(精准底,-120,0),+45,0,4,0),COLORYELLOW;
STICKLINE(IF(精准底,-120,0),+45,0,3,0),COLORYELLOW;
STICKLINE(IF(精准底,-120,0),+45,0,2,0),COLORYELLOW;
STICKLINE(IF(精准底,-120,0),+45,0,1.4,0),COLORRED;
STICKLINE(IF(精准底,-120,0),+45,0,0.9,0),COLORRED;
STICKLINE(IF(精准底,-120,0),+45,0,0.3,0),COLORLIMAGENTA;
STICKLINE(IF(精准底,-120,0),+33,0,7,0),COLOR770077;
STICKLINE(IF(精准底,-120,0),+33,0,6,0),COLOR990099;
STICKLINE(IF(精准底,-120,0),+33,0,5,0),COLORBB00BB;
STICKLINE(IF(精准底,-120,0),+33,0,4,0),COLORDD00DD;
STICKLINE(IF(精准底,-120,0),+33,0,3,0),COLORFF00FF;
STICKLINE(IF(精准底,-120,0),+33,0,2,0),COLORDD00DD;
STICKLINE(IF(精准底,-120,0),+22,0,7,0),COLOR003300;
STICKLINE(IF(精准底,-120,0),+22,0,6,0),COLOR005500;
STICKLINE(IF(精准底,-120,0),+22,0,5,0),COLOR007700;
STICKLINE(IF(精准底,-120,0),+22,0,3.5,0),COLOR009900;
STICKLINE(IF(精准底,-120,0),+22,0,2,0),COLOR00CC00;
STICKLINE(IF(精准底,-120,0),+11,0,7,0),COLOR666666;
STICKLINE(IF(精准底,-120,0),+11,0,6,0),COLOR777777;
STICKLINE(IF(精准底,-120,0),+11,0,5,0),COLOR888888;
STICKLINE(IF(精准底,-120,0),+11,0,4,0),COLOR999999;
STICKLINE(IF(精准底,-120,0),+11,0,3,0),COLORDDDDDD;
STICKLINE(IF(精准底,-120,0),+11,0,2,0),COLORFFFFFF;
STICKLINE(IF(精准底,-120,0),-3,0,7,0),COLOR000044;
STICKLINE(IF(精准底,-120,0),-3,0,6,0),COLOR000033;
STICKLINE(IF(精准底,-120,0),-3,0,5,0),COLOR000055;
STICKLINE(IF(精准底,-120,0),-3,0,4,0),COLOR000077;
STICKLINE(IF(精准底,-120,0),-3,0,3,0),COLOR000099;
STICKLINE(IF(精准底,-120,0),-3,0,2,0),COLORLIMAGENTA;
发现未来函数REFDATE!
以为您进行一些优化。可以尝试以下代码：
XA:=(REF(C,1)/REF(C,3)>=1.2) AND (O/REF(C,1)<=1.01) AND (L<REF(C,1)) AND (C/REF(C,1)>1.05);
REF_XA:=REF(XA,1);
START:=XA AND NOT REF_XA;
START;
这个优化后的代码在可读性和可维护性上更好，同时使用了括号来明确运算顺序，增加了代码的可读性。由于COUNT函数在回测中需要大量计算，在实际使用时可能会使程序运行速度变慢。因此，我们用REF函数直接找到之前是否出现过信号，从而判断是否为首次启动。
精准底选股的公式源码是：
VAR3:=SMA(ABS(LOW-VAR2),13,1)/SMA(MAX(LOW-VAR2,0),13,1)*100;
VAR4:=EMA(IF(CLOSE*1.2,VAR3*13,VAR3/13),13);
VAR5:=LLV(LOW,34);
VAR6:=HHV(VAR4,34);
VAR7:=IF(LLV(LOW,56),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
AA:=VAR8>REF(VAR8,1);
DJ:=REF(LLV(L,100),3);
ZD:=REFDATE(DJ,DATE);
XG:=L=ZD;
XGA:=AA AND XG,COLORRED,LINETHICK2;
XG1:=XGA>REF(XGA,1);
精准底:=XG1>REF(XG1,1);
[url=http://www.70822.com/soft/sort013/sort05/down-167988.html]精准底，副图+选股（通达信指标 副图 源码 测试图）[/url]