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

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 牛股的发祥地 主图公式源码 无未来


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2024-3-8 18:48:37
牛股的发祥地 主图公式源码 无未来介绍

牛股的发祥地 主图公式源码 无未来

只要大家细心观察都能发现所有的牛股都是在突破所有均线后才能持续无压力的上涨,后果就是天空才是它的尽头。这就是传说中的“四线粘合,一线金叉”战法,下面就试与大家浅淡一下此战法的实例。






主图源码:
P:=(2,4,3);
N:=POW(2,P);
FF:=CONST(REF(C,1));
AA:=IF((FF < 100),FF,(FF / 100));
A:=INTPART(((N * (LOG(AA) / LOG(2))) + 1));
Y1:=(A/N);
Y2:=((A+1 ) / N);
Y3:=((A+2 ) / N);
Z1:=((A-1) / N);{第一个支撑}
Z2:=((A-2) / N);
Z3:=((A-3) / N);
ZC1:=IF((FF > 100),(POW(2,Z1) * 100),POW(2,Z1));
ZC2:=IF((FF > 100),(POW(2,Z2) * 100),POW(2,Z2));
ZC3:=IF((FF > 100),(POW(2,Z3) * 100),POW(2,Z3));
YL1:=IF((FF > 100),(POW(2,Y1) * 100),POW(2,Y1));
YL2:=IF((FF > 100),(POW(2,Y2) * 100),POW(2,Y2));
YL3:=IF((FF > 100),(POW(2,Y3) * 100),POW(2,Y3));
支撑一:IF(CURRBARSCOUNT<=50,ZC1,DRAWNULL),COLOR00F24F;
支撑二:IF(CURRBARSCOUNT<=50,ZC2,DRAWNULL),COLORWHITE,POINTDOT;
{支撑三:IF(CURRBARSCOUNT<=50,ZC3,DRAWNULL),COLORWHITE,POINTDOT;}
压力一:IF(CURRBARSCOUNT<=50,YL1,DRAWNULL),COLOR05DDFC;
压力二:IF(CURRBARSCOUNT<=50,YL2,DRAWNULL),COLORWHITE,POINTDOT;
{压力三:IF(CURRBARSCOUNT<=50,YL3,DRAWNULL),COLORWHITE,POINTDOT;}
均价线:=AMOUNT/V/100;
C2:=REF(C,1);
涨停:=IF(REF(C,1)*1.1-C<0.01 ,1,0);
STICKLINE(涨停,OPEN,CLOSE,4,0),COLORRED;
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(涨停,H,L,0,0),COLORYELLOW;
支撑线:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
LC:=REF(CLOSE,1);
操作线:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100;
趋势线:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
震仓线:=45;
震仓线2:=50;
逃命线:=80;
抄底线:=20;
绝底线:=5;
PP2:=操作线<震仓线2 AND REF(操作线,1)>震仓线2 ;
PP:=操作线<震仓线 AND REF(操作线,1)>震仓线 ;
PP3:=操作线<抄底线 AND REF(操作线,1)>抄底线;
HH:=COUNT(涨停,13)>=1;
STICKLINE(PP2 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
STICKLINE(PP AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
STICKLINE(PP3 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
A8:=SMA(L,4,3) ;
STICKLINE(A8 AND REF(PP,1) AND HH ,A8*0.9999,A8*0.9979,5,0);
DRAWICON(A8 AND REF(PP,1) AND HH,L*0.98,1);
STICKLINE(A8 AND REF(PP3,1) AND HH ,A8*0.9999,A8*0.9979,5,0);
DRAWICON(A8 AND REF(PP3,1) AND HH,L*0.98,1);
HD:=COUNT(涨停,21)>=1;
A1:=SMA(H,4,3);
STICKLINE(A1 AND HD ,A1,A1*1.001,0.3,0);
ZT:=C/REF(C,1)>1.097;
DRAWTEXT(ZT,L*0.98,'涨停'),COLORGRAY;
VARZT:=BARSLAST(C/REF(C,1)>1.097);
STICKLINE(VARZT=2,L*0.97,L*0.98,3.5,0),COLOR0000FF;
DRAWTEXT(VARZT=2,L*0.95,'3'),COLORYELLOW;
STICKLINE(VARZT=4,H*1.03,H*1.02,3.5,0),COLOR9966FF;
DRAWTEXT(VARZT=4,H*1.06,'5'),COLORYELLOW;
STICKLINE(VARZT=7,L*0.97,L*0.98,3.5,0),COLOR00FFFF;
DRAWTEXT(VARZT=7,L*0.95,'8'),COLORYELLOW;
STICKLINE(VARZT=12,H*1.03,H*1.02,3.5,0),COLORFF33FF;
DRAWTEXT(VARZT=12,H*1.06,'13'),COLORYELLOW;
乘:=EMA(HHV(HIGH,1),8);
胜:=EMA(CLOSE,8);
追:=((胜<REF(胜,1)) AND (CLOSE<胜));
击:=IF(((乘<REF(乘,1)) OR 追),1,0);
出击:=((((COUNT((击=1),4)=3) AND (击=0)) AND (((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) > 0.085)) * 89);
DRAWICON((出击 >=89),L*0.97,1);
DRAWTEXT((出击 >=89),L*0.97,'出击'),COLORYELLOW;
STICKLINE((出击 >=89),H,L,4,0),LINETHICK1,COLORRED;
STICKLINE((出击 >=89),H,L,0.2,0),COLORYELLOW;
STICKLINE((出击 >=89),O,C,2,0),LINETHICK1,COLORYELLOW;
DRAWICON((出击 >=89),(H+L)/2,7);


 



一线金叉副图源码:
{一线金叉}
EMA30:EMA(C,30),COLORWHITE,LINETHICK2;
EMA60:EMA(C,60),COLORFF00FF;
EMA90:EMA(C,90),COLORYELLOW;
EMA120:EMA(C,120),COLORFFCC66;
EMA250:EMA(C,250),COLORBLUE;
SS:=CROSS(EMA30,EMA60) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA30,EMA120) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA60,EMA90) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA30,EMA90) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 {AND CROSS(EMA30,EMA120)};
DRAWICON(SS,L-0.04,1);
DD:=CROSS(EMA60,EMA90) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA60,EMA250) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA90,EMA120) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(EMA60,EMA120) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 AND CROSS(EMA30,EMA250);
{DD:=CROSS(EMA30,EMA250);}
DRAWICON(DD,L-0.04,3);
A:=BARSCOUNT(C);
AH:=HHV(H,200);
AL:=LLV(L,200);
A0:=(AH-AL)/40;
B1:=L-A0;
STICKLINE((A+0)/34=FLOOR((A+0)/34),B1,B1-1.5*A0,3,0),COLORF00FF0;
DRAWTEXT((A+0)/34=FLOOR((A+0)/34),B1-1*A0,'时间窗'),COLORWHITE;



gd21478

回复

举报

QQ|

GMT+8, 2024-10-11 10:23

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