股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 低位龙头启动之强庄选股指标公式


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 7 天前

A1111:=FINANCE(42);
A211:=DATETODAY(CONST(DATE));
A311:=A211-A1111;
XDATE:=DAYTODATE(A311)+19000000;
上市日期:=STRCAT('上市日期:',CON2STR(XDATE,0));
SSTS1:=STRCAT('上市',CON2STR(FINANCE(42),0));
SSTS2:=STRCAT(SSTS1,'天');
SSTS3:=STRCAT('累计交易:',CON2STR(TOTALBARSCOUNT,0));
SSTS4:=STRCAT(SSTS3,'周期');
W11:=EMA(C,1);
涨停:=W11/REF(W11,1)>=1.095;
ZTCS:=COUNT(涨停,BARSSINCE(涨停)+1);
NTZZT1:=STRCAT(' 距今',CON2STR(CONST(BARSLAST(涨停)),0));
NTZZT2:=STRCAT(NTZZT1,'天有涨停');
GZT1:=STRCAT(' 共涨停',CON2STR(ZTCS,0));GZT2:=STRCAT(GZT1,'次');
ZTTJ1:=STRCAT(SSTS2,GZT2);
ZTTJ2:=STRCAT(ZTTJ1,NTZZT2);
龙虎榜潜力:=STRCAT('【涨停统计】',ZTTJ2);
AC:=IF(CODELIKE('688'),0,1);
换手:=vol/CAPITAL*100;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
ddx:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=CURRBARSCOUNT=1 AND C<REF(C,1);
DY2:=REF(V2,1)-DY;
TT:=(V2*1.01-REF(V2,1));
TT2:=(REF(V2*1.01,1)-REF(V2,2));
YY:=TT>3*Abs(TT2);
TT1:=EMA(V2,15);
A111:=COST(85);
A222:=COST(15);
A333:=A111-A222;
A444:=(A111+A222)/2;
筹码:=A333/A444*100<30,LINETHICK0;
BU1:=HHV(HIGH,250);
BU2:=LLV(LOW,250);
BU3:=BU1-BU2;
BU4:=(A444-BU2);
比例:=A444<(BU3*04+BU2),LINETHICK0;
吸筹结束:=筹码 AND 比例;
BU5:=C/REF(C,1)>1.04; {AND V/REF(V,1)>2;{ AND H=C;}
主力持仓%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3);
主力持仓:=主力持仓%>=75 {AND 主力持仓%<=91} AND C>0 AND CLOSE>OPEN;
强庄:FILTER(主力持仓 AND 吸筹结束 AND BU4 AND WINNER(C)>=0.90 AND BU5 AND C/REF(C,1)>1.092 AND C=H AND C<40 AND AC AND 换手<20 ,10);





回复

举报

QQ|

GMT+8, 2024-11-27 23:30

快速回复 返回顶部 返回列表