分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
切线“黄金分割” 均价线-(计算的模式 源码)
  • 软件大小:10.0 KB
  • 推荐星级:
  • 更新时间:2010-05-26 03:19:50
  • 软件类别: 国产软件 / 飞狐公式
  • 软件语言:简体中文
  • 授权方式: 共享软件
  • 联系方式:暂无联系方式
  • 官方主页: Home Page
  • 点击大图:  【一键转帖到论坛】
  • 插件情况:
  • 运行环境:Win2000/WinXP/Win2003/WinVista
  • 相关Tags:指标公式 股票软件,公式源码
  • (2)50%
    (2)50%

软件介绍

此指标是以切线(黄金分割)均价线(MA EMA) 均价线角度 来统
计计算的模式。切线是以某以区间的高低点价位与均价线的比较及
结合量价进行研判进行买卖

INPUT:高(0,0,255),XS(0,0,1),调(0,0,2),F(0,0,255),F1(0,0,255),F2(0,0,255),角(0,0,1),角2(0,0,1);
TJA:=CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1);
STICKLINE(TJA,LOW,HIGH,0,0),ColorE9;
STICKLINE(TJA,O,CLOSE,8,0),Color80;
STICKLINE(TJA,O,CLOSE,6,0),ColorA5;
STICKLINE(TJA,O,CLOSE,4,0),ColorC0;
STICKLINE(TJA,O,CLOSE,2,0),ColorE6;
STICKLINE(NOT(TJA),HIGH,LOW,0,0),Colorff00;
STICKLINE(NOT(TJA),CLOSE,OPEN,8,0),Color5000;
STICKLINE(NOT(TJA),CLOSE,OPEN,6,0),Color6600;
STICKLINE(NOT(TJA),CLOSE,OPEN,4,0),Color8000;
STICKLINE(NOT(TJA),CLOSE,OPEN,2,0),ColorA000;
QC:=REF(C,1);QO:=REF(O,1);QH:=REF(H,1);QL:=REF(L,1);
FUZ:=L+((H-L)/2);FUS:=O+((C-O)/2); FUSY:=C+((O-C)/2);SSFU:=(FUZ+IF(C>O,FUS,FUSY))/2;
FUZ1:=L+((H-L)*0.333);FUS1:=O+((C-O)*0.333);FUS1Y:=C+((O-C)*0.333);SSFU1:=(FUZ1+IF(C>O,FUS1,FUS1Y))/2;
FUZ2:=L+((H-L)*0.667);FUS2:=O+((C-O)*0.677);FUS2Y:=C+((O-C)*0.667);SSFU2:=(FUZ2+IF(C>O,FUS2,FUS2Y))/2;
B1:=Ql+((Qh-Ql)/2);B2:=QO+((QC-QO)/2);B3:=QC+((QO-QC)/2);
DB1:=QL+((QH-QL)*0.333);DB2:=QO+((QC-QO)*0.333);DB3:=QC+((QO-QC)*0.333);
EB1:=QL+((QH-QL)*0.667);EB2:=QO+((QC-QO)*0.667);EB3:=QC+((QO-QC)*0.667);
SYB1:=QH-((QH-QC)/2);SYB2:=QH-((QH-QO)/2);
SYB3:=IF(QC>QO,SYB1,SYB2);
XYB1:=QL+((QC-QL)/2);XYB2:=QL+((QO-QL)/2);
XYB3:=IF(QC<QO,XYB1,XYB2);
QFU:=(B1+IF(QC>QO,B2,B3))/2;
QDFU:=(DB1+IF(QC>QO,DB2,DB3))/2;
QEFU:=(EB1+IF(QC>QO,EB2,EB3))/2;
STICKLINE(C=C,SSFU2,SSFU2,4,0),COLOR00FF00,LINETHICK1;
STICKLINE(C=C,SSFU1,SSFU1,4,0),COLOR00FF00,LINETHICK1;
STICKLINE(C=C,SSFU,SSFU,6,0),COLOR00FFFF,LINETHICK1;
STICKLINE(C=C,IF(C>O,H-((H-C)/2),H-((H-O)/2)),IF(C>O,H-((H-C)/2),H-((H-O)/2)),1.3,0),COLORYELLOW,LINETHICK1;
STICKLINE(C=C,IF(C<O,L+((C-L)/2),L+((O-L)/2)),IF(C<O,L+((C-L)/2),L+((O-L)/2)),1.3,0),COLORYELLOW,LINETHICK1;
AJ:=AMOUNT/(VOL*100),COLORFFFFFF,LINETHICK0;
DRAWTEXT(C=C,AJ,'←'),COLORFFFFFF;
TT1:=ISLASTBAR=1 AND 角=0;
DRAWTEXTEX(TT1,0,10,17,'   前/现日振幅的1/2   【'+NUMTOSTR(QFU,2)+'】/【'+NUMTOSTR(SSFU,2)+'】'),Color00AAFF;
DRAWTEXTEX(TT1,0,10,30,'  前/现日振幅的:1/3   【'+NUMTOSTR(QDFU,2)+'】/【'+NUMTOSTR(SSFU1,2)+'】'),Color00FF00;
DRAWTEXTEX(TT1,0,10,47,'  前/现日振幅的:2/3   【'+NUMTOSTR(QEFU,2)+'】/【'+NUMTOSTR(SSFU2,2)+'】'),Color00FF00;
DRAWTEXTEX(TT1,0,10,60,'  前上影线幅度的1/2   【'+NUMTOSTR(SYB3,2)+'】'),ColorFFFFFF;
DRAWTEXTEX(TT1,0,10,73,'  前下影线幅度的1/2   【'+NUMTOSTR(XYB3,2)+'】'),ColorFFFFFF;
TTt:=ISLASTBAR=1;
TA1:=BARPOS=SYSPARAM(1);
TA2:=BARPOS=SYSPARAM(3);
T1:=datacount-barpos+0;
T2:=DATEDIFF(date,CURRENTDATE);
A1:=((H-L)/L)*100;
A2:=H-L;
MAI:=C*1.015;
MAII:=C*1.03;
DRAWTEXTEX(TTT AND 调=0,0,310,1,'▼明短线赢利[1.5%--3%:]'+'/'+NUMTOSTR(MAI[SYSPARAM(1)],2)+'--'+NUMTOSTR(MAII [SYSPARAM(1)],2)),Color00dd00;
DRAWTEXTEX(TTt,0,176,1,'【振幅:'+NUMTOSTR(A1[SYSPARAM(1)],2)+'% '+NUMTOSTR(A2[SYSPARAM(1)],2)+'元 】'+''),Colordddd00;
DRAWTEXTEX(TTT,0,1,1,'【代码:'+STKLABEL+' 名称:'+STKNAME+'】'),Color00FFFF;
as:=(o+h+l+c)/4;
BL: eMA(as,F),linethick1,Color208FFF;
BL1: MA(C,F1),linethick1,ColorFFFFFF;
BL2: MA(C,F2),linethick1,Color00FFFF;
PARTLINE(BL<REF(BL,1),BL),colorff0000,linethick2;
PARTLINE(BL1<REF(BL1,1),BL1),color00ff00,linethick1;
PARTLINE(BL2<REF(BL2,1),BL2),color00ff00,linethick1;
TT1:=ISLASTBAR=1 AND 角=1;TT2:=ISLASTBAR=1 AND 角2=1;
QMC:=REF(BL1,1);QMC1:=REF(BL1,2);
QMC2:=REF(BL2,1);QMC3:=REF(BL2,2);
CMC:=BL1-QMC;CMC1:=QMC-QMC1;CPJ:=(CMC+CMC1)/2;
CMD:=BL2-QMC2;CMD1:=QMC2-QMC3;DPJ:=(CMD+CMD1)/2;
Q1:=ATAN((BL1/REF(BL1,1)-1)*100)*180/3.1416;
Q2:=ATAN((QMC/REF(QMC,1)-1)*100)*180/3.1416;
Q3:=ATAN((QMC1/REF(QMC1,1)-1)*100)*180/3.1416;
AQ1:=ATAN((BL2/REF(BL2,1)-1)*100)*180/3.1416;
AQ2:=ATAN((QMC2/REF(QMC2,1)-1)*100)*180/3.1416;
AQ3:=ATAN((QMC3/REF(QMC3,1)-1)*100)*180/3.1416;
DRAWTEXTEX(TT1,0,75,16,'【任意均线角度】'+' '),COLORFFFFFF;
DRAWTEXTEX(TT1,0,2,30,' '+NUMTOSTR(F1,0)+''+'日=; ∠'+NUMTOSTR(Q1,2)+' 度'+'/  前日=;∠'+NUMTOSTR(Q2,2)+' 度'+'/  前2日=;∠'+NUMTOSTR(Q3,2)+' 度'+''),ColorFFffff;
DRAWTEXTEX(TT1,0,2,44,' '+NUMTOSTR(F1,0)+''+'日均值:'+NUMTOSTR(BL1,2)+' 元'+''+'/  前日=:  '+NUMTOSTR(QMC,2)+' 元'+'/  前2日=:  '+NUMTOSTR(QMC1,2)+' 元'),ColorFFffff;
DRAWTEXTEX(TT1,0,2,58,' '+NUMTOSTR(F1,0)+''+'日均线近三日的平均增(减)速;'+NUMTOSTR(CPJ,2)+' 元'+''),ColorFFffff;
DRAWTEXTEX(TT2,0,2,88,' '+NUMTOSTR(F2,0)+''+'日=; ∠'+NUMTOSTR(AQ1,2)+' 度'+'/  前日=;∠'+NUMTOSTR(AQ2,2)+' 度'+'/  前2日=;∠'+NUMTOSTR(AQ3,2)+' 度'+''),Color00ffff;
DRAWTEXTEX(TT2,0,2,102,' '+NUMTOSTR(F2,0)+''+'日均值:'+NUMTOSTR(BL2,2)+' 元'+''+'/  前日=:  '+NUMTOSTR(QMC2,2)+' 元'+'/  前2日=:  '+NUMTOSTR(QMC3,2)+' 元'),Color00ffff;
DRAWTEXTEX(TT2,0,2,116,' '+NUMTOSTR(F2,0)+''+'日均线近三日的平均增(减)速;'+NUMTOSTR(DPJ,2)+' 元'+''),Color00ffff;
BLT:=BARSTATUS=2;
DRAWTEXT(BLT AND BL>REF(BL,1),BL,'↑'+NUMTOSTR(f,0)+':'+NUMTOSTR(BL,2)),COLOR208fff;
DRAWTEXT(BLT AND BL<REF(BL,1),BL,'↓'+NUMTOSTR(f,0)+':'+NUMTOSTR(BL,2)),Color208FFF;
DRAWTEXT(BLT AND BL1>REF(BL1,1),BL1,'↑'+NUMTOSTR(f1,0)+':'+NUMTOSTR(BL1,2)),COLORFFffff;
DRAWTEXT(BLT AND BL1<REF(BL1,1),BL1,'↓'+NUMTOSTR(f1,0)+':'+NUMTOSTR(BL1,2)),ColorFFFDED;
DRAWTEXT(BLT AND BL2>REF(BL2,1),BL2,'↑'+NUMTOSTR(f2,0)+':'+NUMTOSTR(BL2,2)),COLOR00CCCC;
DRAWTEXT(BLT AND BL2<REF(BL2,1),BL2,'↓'+NUMTOSTR(f2,0)+':'+NUMTOSTR(BL2,2)),Color00CCCC;
B:=IF((SYSPARAM(1) = (BARSSINCE((C > 0)) + 1)),1,0);
B1:=(H<REF(L,1));
B2:=(L>REF(H,1));
STICKLINE(B1,o+(c-o)*0.25,O,5,0),colorcc0000;
STICKLINE(B1,o+(c-o)*0.25,O,3,0),colordd0000;
STICKLINE(B1,o+(c-o)*0.25,O,1,0),coloree0000;
STICKLINE(B2,O,o+(c-o)*0.25,6,0),color208AAA;
STICKLINE(B2,O,o+(c-o)*0.25,4,0),color208DDD;
STICKLINE(B2 ,O,o+(c-o)*0.25,2,0),color208FFF;
DRAWTEXT(((B > 0) AND B1),H,'↓缺口'),colorFFFFEE,pxdn10,ALIGN2;
DRAWTEXT(((B > 0) AND B2),L,'↑缺口'),color00FFEE,pxup20,ALIGN1;
//DRAWTEXTEX(TTT,0,2,61,'【创于09.08.02 草根】'),ColorFFFFFF;
X:=SYSPARAM(2);//最初      
X1:=SYSPARAM(3);//最后   
X2:=SYSPARAM(4);//最高      
X3:=SYSPARAM(5);//最低
X4:=SYSPARAM(1);
YG:=REF(H,BARSLAST(TA1));YD:=REF(L,BARSLAST(TA1));
N:=((X1 - X) + 1);
ZG:=ref(H,高);
HH:=HHV(zg,1);
LL:=LLV(L,N);
GG:HH[X1],colorFF00FF;
DD1:LL[X1],colorff0000;
DD:=YD[X1],color005555,LINEDOT;
PARTLINE(YD,YD),LINETHICK1,COLOR00FF00;
//DRAWTEXT(TA2,YD,'K线低--'+NUMTOSTR(YD,2)),COLORFFFFFF,ALIGN2,PXDN5;
//DRAWTEXT(TA2,YG,'K线高--'+NUMTOSTR(YG,2)),COLORFFFFFF,ALIGN2,PXDN5;
DRAWTEXT(TTT ,DD1,'最低'+NUMTOSTR(DD1,2)),ALIGN1,colorFFEE00,,pxup25;
DRAWTEXT(TTT ,GG,' 最高'+NUMTOSTR(GG,2)),ALIGN1,colorffaaaa,,pxDN5;
Q:=(DD + ((GG - DD) * 0.191));
Q2:=(DD + ((GG - DD) * 0.382));
Q3:=(DD + ((GG - DD) * 0.50));
Q4:=(DD + ((GG - DD) * 0.618));
Q5:=(DD + ((GG - DD) * 0.809));
Y_1:=REF(Q,BARSLAST(TA1));
Y_2:=REF(Q2,BARSLAST(TA1));
Y_3:=REF(Q3

地址


软件评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论

说明

* 使用方法:点击上面蓝色块,打开新页面按照提示进行

* 本网站提供的各种股票软件,例如大智慧软件,通达信软件,同花顺软件,东方财富通等等,和各种股票公式指标,例如大智慧公式,通达信公式,同花顺公式,文华公式,博易大师公式,股票价格计算公式等等公式指标等,都来源网上公开来源收集

本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!

* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。

* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程

* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明:本站所有股票公式软件资料均网上公开收集,如侵权请联系删帖。站内所有广告,均与本站无关!
Copyright © 2003-2022 fxjgsw.Com. All Rights Reserved .
页面执行时间:2,079.10200 毫秒