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

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 通达信新六脉神剑主图贴图源码


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

以下是通达信新六脉神剑主图贴图源码

{ 新六脉神剑主图 }

低1:=REF(LLV(L,150),3);
标底:=REFDATE(低1,DATE)*0.9;

突破:=REF(EMA(C,14),1),DOTLINE;
A1X:=(EMA(C,10)-突破)/突破*100;
多方:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),DRAWNULL),DOTLINE,COLORRED,LINETHICK1;
空方:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL),DOTLINE,COLORGREEN,LINETHICK1;

{ ·········································}
DRAWRECTREL(0,0,999,990,RGB(18,18,18));
DRAWRECTREL(0,0,999,100,RGB(90,0,0));

DRAWBAND(空方,RGB(8,118,8),突破,RGB(0,0,255));
DRAWBAND(突破,RGB(118,8,8),多方,RGB(0,0,255));

五五线:EMA(C,55),COLORGRAY;
STICKLINE(C>0,五五线,标底,0.1,0),COLORGRAY;

DRAWKLINE(H,O,L,C);

丹田能量:EMA(C,55)COLORMAGENTA,CIRCLEDOT,NODRAW;
少商剑:EMA(C,13),COLORRED,LINETHICK2;
商阳剑:EMA(EMA(C,13),2);
中冲剑:EMA(EMA(EMA(C,13),2),2);
关冲剑:EMA(EMA(EMA(EMA(C,13),2),2),2);
少冲剑:EMA(EMA(EMA(EMA(EMA(C,13),2),2),2),2);
少泽剑:EMA(EMA(EMA(EMA(EMA(EMA(C,13),2),2),2),2),2);
IF(少商剑<REF(少商剑,1),少商剑,DRAWNULL),COLORYELLOW,LINETHICK2;
IF(商阳剑<REF(商阳剑,1),商阳剑,DRAWNULL),COLORYELLOW;
IF(中冲剑<REF(中冲剑,1),中冲剑,DRAWNULL),COLORYELLOW;
IF(关冲剑<REF(关冲剑,1),关冲剑,DRAWNULL),COLORYELLOW;
IF(少冲剑<REF(少冲剑,1),少冲剑,DRAWNULL),COLORYELLOW;
IF(少泽剑<REF(少泽剑,1),少泽剑,DRAWNULL),COLORYELLOW;

TJ1:=少商剑>=REF(少商剑,1);
TJ2:=商阳剑>=REF(商阳剑,1);
TJ3:=中冲剑>=REF(中冲剑,1);
TJ4:=关冲剑>=REF(关冲剑,1);
TJ5:=少冲剑>=REF(少冲剑,1);
TJ6:=少泽剑>=REF(少泽剑,1);

ZTJ:=(TJ1 AND TJ2 AND TJ3 AND TJ4 AND TJ5 AND TJ6)=1
AND REF((TJ1 AND TJ2 AND TJ3 AND TJ4 AND TJ5 AND TJ6),1)=0;
DRAWICON(ZTJ,少泽剑*0.96,9);

STICKLINE(C>0,标底,标底*0.95,2,-1),COLORGREEN;
STICKLINE(TJ6,标底,标底*0.95,2,0),COLORLIRED;

STICKLINE(C>0,标底*0.92,标底*0.87,2,-1),COLORGREEN;
STICKLINE(TJ5,标底*0.92,标底*0.87,2,0),COLORLIRED;

STICKLINE(C>0,标底*0.84,标底*0.79,2,-1),COLORGREEN;
STICKLINE(TJ4,标底*0.84,标底*0.79,2,0),COLORLIRED;

STICKLINE(C>0,标底*0.76,标底*0.71,2,-1),COLORGREEN;
STICKLINE(TJ3,标底*0.76,标底*0.71,2,0),COLORLIRED;

STICKLINE(C>0,标底*0.68,标底*0.63,2,-1),COLORGREEN;
STICKLINE(TJ2,标底*0.68,标底*0.63,2,0),COLORLIRED;

STICKLINE(C>0,标底*0.6,标底*0.55,2,-1),COLORGREEN;
STICKLINE(TJ1,标底*0.6,标底*0.55,2,0),COLORLIRED;

DRAWTEXT_FIX(1,0.01,0.01,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.15,0.01,0,DYBLOCK),COLORWHITE;




回复

举报

QQ|

GMT+8, 2024-11-18 13:43

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