当前位置：分析家公式网 → 股票公式 → 同花顺公式 → 一键转帖：量能指标（同花顺公式 副图 源码 测试图）
软件名称：[B]量能指标（同花顺公式 副图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：7.00 KB
官方主页：Home Page
更新时间：2023-06-22 00:03:13
软件简介:
分享一个同花顺的量能指标，
自用。
U:80;
MID:50;
D:20;
m:-10;
n:=-27;
LC := REF(CLOSE,1);
var1:WINNER(C)*100;
STICKLINE( 1.000,0,var1, 8,0),colormagenta;
VARA:=COST(75);
VARB:=COST(25);
VARC:=VARA-VARB;
VARD:=(VARA-VARB)/2;
VARE:=VARC/VARD*100<10;
STICKLINE(var1>REF(var1,1) AND var1>90,102,104,8,0);
STICKLINE(var1<REF(var1,1) AND var1>90,102,104,8,0),colorgreen;
STICKLINE(var1>REF(var1,1)AND var1<90 AND var1>20,var1+2,var1+4,8,0),coloryellow;
STICKLINE(var1<REF(var1,1)AND var1<90 AND var1>20,var1+2,var1+4,8,0),colorgreen;
STICKLINE(var1>REF(var1,1) AND var1<=20,-2,-4,8,0),coloryellow;
STICKLINE(var1<REF(var1,1) AND var1<=20,-2,-4,8,0),colorgreen;
DRAWTEXT(CROSS(var1,50),var1,'★');
DRAWTEXT(CROSS(80,var1)AND (REF(C,1)-C)/REF(C,1)*100>4,var1,'▽');
DRAWTEXT(CROSS(50,var1),var1,'▼');
成本空间:=VARC;
成本均价:=(COST(85)-COST(15));
//1
DRAWTEXT(CROSS(var1,20),-10,'x'); //第一天上穿20
//2
DRAWTEXT(CROSS(REF(var1,1),20) AND VAR1>20 ,-10,'*');//第二天维持20
//3
DRAWTEXT(CROSS(REF(var1,2),20) AND REF(var1,1)>20 AND var1>20 ,-10,'in');//第三天维持20，高于昨日收盘价买
DRAWTEXT(CROSS(REF(var1,2),20) AND REF(var1,1)>20 AND var1<20 ,-10,'s');//没维持撤离
//4
DRAWTEXT(CROSS(REF(var1,3),20) AND REF(var1,2)>20 AND REF(var1,1)>20 AND var1>20,-10,'kep');//第四天维持，则持有
DRAWTEXT(CROSS(REF(var1,3),20) AND REF(var1,2)>20 AND REF(var1,1)>20 AND var1<20 ,-10,'out');//第四天没有维持则无效退场
//5
DRAWTEXT(CROSS(REF(var1,4),20) AND REF(var1,3)>20 AND REF(var1,2)>20 AND REF(var1,1)>20 AND var1>50 AND C>REF(C,1),-10,'K');//第五日上50，留
DRAWTEXT(CROSS(REF(var1,4),20) AND REF(var1,3)>20 AND REF(var1,2)>20 AND REF(var1,1)>20 AND var1<50 AND C<REF(C,1),-10,'P');//第五日没50，且比昨日低，停
//end
DRAWTEXT( var1<20 AND REF(var1,1)>20 AND REF(var1,2)>20 AND REF(var1,3)>20 AND REF(var1,4)>20 ,-10,'end');//周期结束，次日重新看走势
DRAWTEXT( var1<50 AND REF(var1,1)>80 ,10,'pau');//状况不对低于上一个同期条件价位，先撤离，次日稳住追进
WJ:=REF(C,BARSLAST(CROSS(var1,50)));
WD:=REF(C,BARSLAST(CROSS(50,var1)));
BD:=REF(C,BARSLAST(CROSS(80,var1)));
//WJ
DRAWTEXT(WJ>REF(WJ,1),var1-10,'高');
DRAWTEXT(WJ<REF(WJ,1),var1+10,'低');
//WD
DRAWTEXT(WD>REF(WD,1),var1-10,'高');
DRAWTEXT(WD<REF(WD,1),var1+10,'低');
DRAWTEXT(WD<REF(WD,1),10,'pau');
//BD
DRAWTEXT(BD>REF(BD,1),var1-10,'高');
DRAWTEXT(BD<REF(BD,1),var1+10,'低');
DRAWTEXT(BD<REF(BD,1),10,'pau');
TYP := (IF(ISNULL(HIGH),CLOSE,HIGH) + IF(ISNULL(LOW),CLOSE,LOW) + CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
CCI84:=(TYP-MA(TYP,84))/(0.015*AVEDEV(TYP,84));
STICKLINE(CCI>REF(CCI,1) AND CCI>100,m,m+4,8,1),colorred;
STICKLINE(CCI<=REF(CCI,1) AND CCI>100,m,m+4,8,0),colorred;
STICKLINE(CCI>REF(CCI,1) AND CCI<-100,m,m-4,8,1),colorgreen;
STICKLINE(CCI<=REF(CCI,1) AND CCI<-100,m,m-4,8,0),colorgreen;
DRAWTEXT(CROSS(CCI84,100),n,'△'),coloryellow;
DRAWTEXT(CROSS(100,CCI84),n,'▽'),coloryellow;
DRAWTEXT(CROSS(CCI84,-100),n,'△'),colorgreen;
DRAWTEXT(CROSS(-100,CCI84),n,'▽'),colorgreen;
[url=http://www.70822.com/soft/sort013/sort036/down-160368.html]量能指标（同花顺公式 副图 源码 测试图）[/url]