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

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[同花顺] 同花顺量变副图指标 源码


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2024-3-29 11:55:16
同花顺量变副图指标 源码介绍

同花顺量变副图指标 源码

指标带提示,不过最好还是多留意当时黄色曲线走势,走平上翘为佳。





天:400,POINTDOT,colorblue,LINETHICK4;
海:100,POINTDOT,colorred,LINETHICK4;
TH:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,0),N);
TL:=SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),N);
TQ:=SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),N);
VAR0:100*(TH*2+TQ)/(TL*2+TQ),COLOR0000FF,LINETHICK2;
VAR1:MA(VAR0,M),COLOR00FFFF,LINETHICK2;
W:=CROSS(VAR0,VAR1);
WL1:=VAR1<100;
WL2:=VAR1<150 AND VAR1>REF(VAR1,1);
WLT1:=W AND WL1;
WLT2:=W AND WL2;
TJ1:=FILTER(WLT1,5);
TJ2:=FILTER(WLT2,8);
STICKLINE(TJ1,0,80,4,0),COLOR000099;
STICKLINE(TJ1,0,80,2,0),COLOR0000BB;
STICKLINE(TJ1,0,80,1,0),COLOR0000DD;
STICKLINE(TJ1,0,80,0.3,0),COLOR0000FF;
DRAWTEXT(TJ1,83,'全仓'),COLOR00FFFF;
STICKLINE(TJ2,0,50,4,0),COLOR990099;
STICKLINE(TJ2,0,50,2,0),COLORBB00BB;
STICKLINE(TJ2,0,50,1,0),COLORDD00DD;
STICKLINE(TJ2,0,50,0.3,0),COLORFF00FF;
DRAWTEXT(TJ2,53,'追买'),COLOR00FFFF;
SAL1:CROSS(VAR1,VAR0) AND VAR1>250;
SAL2:VAR0>400;
SAL:FILTER(SAL1 OR SAL2,5);
DRAWICON(SAL,VAR0,15);
E1:=BARSCOUNT(C);
AH:=HHV(H,250);
AL:=LLV(L,250);
B0:=(AH-AL)/40;
KB1:=H+B0;
KB2:=L-B0;
STICKLINE((E1+0)/34=FLOOR((E1+0)/34),天,天-20,1,0),coloryellow,LINETHICK3;
DRAWTEXT((E1+0)/34=FLOOR((E1+0)/34),天,'时'),COLORFFFFFF;
AA:=REF(C,1)/REF(O,1)<0.96;
BB:=C/O>1.03;
CC:=C>REF(O,1);
TJ13:=AA AND BB AND CC;
X1:=REF(C,1)/HHV(H,20)<0.82;
DN:=O>C;
X2:=COUNT(DN,7)>=5;
X3:=C=HHV(C,3);
XG1:=TJ13 AND X1 AND X2;
XG2:=X1 AND X2 AND X3;
XG:=XG1 OR XG2;
STICKLINE(XG ,0,20,3,0),COLOR00FFFF;
DRAWTEXT(XG,50,'反转'),COLOR00FFFF;
X11:=REF(C,1)/HHV(H,20)<0.82;
X22:=(MIN(C,O)-L)/(H-L)>0.67;
X33:=(HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)<0.33;
X44:=ABS(C-O)/C<0.01;
DOWN:=O>C;
X55:=COUNT(DOWN,7)>=5;
XG11:=X11 AND X22 AND X33 AND X44 AND X55;
STICKLINE(XG11 ,0,30,4,0),COLOR0000FF;
DRAWTEXT(XG11,30,'螺旋'),COLOR0000FF;
VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0),LINETHICK2,COLOR00FF00;
MAOBV:=MA(OBV,30),COLOR0000FF,LINETHICK1;
MAOBV1:=MA(OBV,13),COLORFF00FF,LINETHICK1;
MAOBV2:=MA(OBV,5),COLORFFFFFF,LINETHICK1;
TJ18:=CROSS(OBV,MAOBV2) AND MAOBV2>REF(MAOBV2,1) AND OBV/MAOBV<1.021;
TJ11:=FILTER(TJ18,5);
TJ28:=FILTER(CROSS(MAOBV2,MAOBV1),5);
TJ38:=COUNT(CROSS(OBV,MAOBV2) OR CROSS(OBV,MAOBV1)
OR CROSS(OBV,MAOBV),5)>2 AND MAOBV>REF(MAOBV,1);
TJ33:=FILTER(TJ38,5);
QC:=FILTER(COUNT(TJ11 OR TJ33 OR TJ28,3)>=2,3);
DRAWTEXT(QC,33,'OBV'),COLORFF00FF;
STICKLINE(QC,0,30,3,0),COLOR0000FF;






gd48084

回复

举报

QQ|

GMT+8, 2024-11-19 02:18

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