| 分享一个同花顺的量能指标, 自用。 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;  | 
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
				       * alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
				       * fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
					   * exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
					   * tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
					  *  tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
					   * hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
				    以上的各种软件都可以在本网股票软件栏目找到! 
 * 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
					   * 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
					  
					  * 关于股票公式源码编辑
					本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
 * 如果您发现软件内容或者链接错误,请点击报告错误谢谢! 
                     * 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!
				
 
 



