XVAR1:=(HHV(H,13)-LLV(L,13)); XVAR2:=(HHV(H,13)-C);
XVAR3:=(C-LLV(L,13));
XVAR4:=XVAR2/XVAR1*100-70;
XVAR5:=(C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100;
XVAR6:=(2*C+H+L)/4;
XVAR7:=SMA((XVAR3/XVAR1*100),3,1);
XVAR8:=LLV(L,34);
XVAR9:=SMA(XVAR7,3,1)-SMA(XVAR4,9,1);
XVAR10:=IF(XVAR9>100,XVAR9-100,0);
XVARA:=HHV(H,34);
防线:=EMA((XVAR6-XVAR8)/(XVARA-XVAR8)*100,8);
日照:EMA(防线,5),NODRAW;
BB:=EMA(防线,5);
IF(BB>REF(BB,1) AND REF(BB,1)>REF(BB,2),0,DRAWNULL),COLORRED,LINETHICK8;
IF(BB<REF(BB,1) AND REF(BB,1)<REF(BB,2),0,DRAWNULL),COLORLIBLUE,LINETHICK8;
RS:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;
RK:=SMA(RS,6,1);
RD:=SMA(RK,6,1);
温度:3*RK-2*RD,NODRAW;
RJ:=3*RK-2*RD,NODRAW;
IF(RJ<REF(RJ,1) AND REF(RJ,1)<REF(RJ,2),0,DRAWNULL),COLORBLUE,LINETHICK3;
IF(RJ>REF(RJ,1) AND REF(RJ,1)>REF(RJ,2),0,DRAWNULL),COLORGREEN,LINETHICK3;
IF(BB<REF(BB,1) AND REF(BB,1)<REF(BB,2) AND RJ>REF(RJ,1) ,0,DRAWNULL),COLORRED,LINETHICK3;
0,COLORYELLOW;
CC:=FORCAST(C,2); OO:=FORCAST(O,2); HH:=FORCAST(H,2); LL:=FORCAST(L,2);
SHORT:=9; LONG:=27; M:=3;
{1.MACD}
DIFFFF:=EMA(CC,SHORT) - EMA(CC,LONG);
DEAAA:=EMA(DIFFFF,M);
MKCD:=WMA((DIFFFF-DEAAA),3)*400,COLOR00FF00,LINETHICK2;
{IF(MKCD>REF(MKCD,1),MKCD,DRAWNULL),COLOR0000FF,LINETHICK2;}
{2.MACD的BTX}
{差可能是正,是负-----相当与DIFF}
DC:=WMA(CC,SHORT/1.5)-WMA(CC,LONG/1.5); {收盘价的DIFF}
DK:=WMA(OO,SHORT/1.5)-WMA(OO,LONG/1.5); {开盘价的DIFF}
DH:=(WMA(HH,SHORT/1.5)-WMA(HH,LONG/1.5))*1.8; {最高价的DIFF}
DL:=(WMA(LL,SHORT/1.5)-WMA(LL,LONG/1.5))*1.8; {最低价的DIFF}
VARVA1:=DC>REF(DC,1) AND DC>REF(DC,2);
VARVA2:=REF(VARVA1,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
VARVA3:=REF(VARVA2,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
VARVA4:=REF(VARVA3,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
VARVA5:=REF(VARVA4,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
VARVA6:=REF(VARVA5,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
VARVA7:=REF(VARVA6,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
VARVA8:=REF(VARVA7,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
VARVA9:=REF(VARVA8,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
VARA:=REF(VARVA9,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
VARB:=REF(VARA,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
VARC:=REF(VARB,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
STICKLINE(VARVA1 OR VARVA2 OR VARVA3 OR VARVA4 OR VARVA5 OR VARVA6 OR VARVA7 OR VARVA8 OR VARVA9 OR VARA OR VARB OR VARC,DC,REF(DC,1),3,0),COLOR0F33AA;
STICKLINE(VARVA1 OR VARVA2 OR VARVA3 OR VARVA4 OR VARVA5 OR VARVA6 OR VARVA7 OR VARVA8 OR VARVA9 OR VARA OR VARB OR VARC,DC,REF(DC,1),2,0),COLOR0F66CC;
STICKLINE(VARVA1 OR VARVA2 OR VARVA3 OR VARVA4 OR VARVA5 OR VARVA6 OR VARVA7 OR VARVA8 OR VARVA9 OR VARA OR VARB OR VARC,DC,REF(DC,1),1,0),COLOR0F99DD;
VARD:=DC<REF(DC,1) AND DC<REF(DC,2);
VARE:=REF(VARD,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
VARF:=REF(VARE,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
VAR10:=REF(VARF,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
VAR11:=REF(VAR10,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
VAR12:=REF(VAR11,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
VAR13:=REF(VAR12,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
VAR14:=REF(VAR13,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
VAR15:=REF(VAR14,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
VAR16:=REF(VAR15,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
VAR17:=REF(VAR16,1) AND DC<=REF(DC,1) AND DC>=REF(DC,2);
VAR18:=REF(VAR17,1) AND DC>=REF(DC,1) AND DC<=REF(DC,2);
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,DC,REF(DC,1),3,0),COLORFF3322;
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,DC,REF(DC,1),2,0),COLORFF6622;
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,DC,REF(DC,1),1,0),COLORFF9922;
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VARVA1;
STICKLINE(VAR19,REF(DC,1),REF(DH,2),0.1,0),COLOR0000FF;
STICKLINE(VAR19,REF(DC,1),REF(DC,2),4,0),COLOR0000FF;
VAR1A:=REF(VARVA1 OR VARVA2 OR VARVA3 OR VARVA4 OR VARVA5 OR VARVA6 OR VARVA7 OR VARVA8 OR VARVA9 OR VARA OR VARB OR VARC,1) AND VARD;
STICKLINE(VAR1A,REF(DC,1),REF(DL,2),0.1,0),COLOR00FF00;
STICKLINE(VAR1A,REF(DC,1),REF(DC,2),4,0),COLOR00FF00;
DFC:=C-REF(C,1);{收盘价前差值,K线微分 WWW.fxjgsw.com}
WJXS:=(120-60)/10;{微积分系数,可由中值定理导出,为兼顾后面引用及统一标尺,前移至此}
JGL_JF:=WJXS*EMA(DFC,60);{内层积分,隐含积分限[1--SHORT],结果:WJXS*EMA(EMA(CC,SHORT)-REF(EMA(CC,SHORT),1),LONG)}
DIF_JIP:=EMA(JGL_JF,120);{外层积分,重积分,隐含积分限[1--LONG],结果:EMA(CC,SHORT)-EMA(CC,LONG)}
DEA_GEM:=EMA(DIF_JIP,20);{平滑,压制高频}
MACD_LING:=400*(DIF_JIP-DEA_GEM),COLOR1133FF,COLORSTICK;{差值滤波然后作2倍放大,显示红、青色针状线柱}
K_DF_J:=SMA(JGL_JF,13,1),COLORFEDCBA;{平滑,压制超短线杂波}
D_DF_G:=SMA(K_DF_J,13,1),COLOR13F8F9;{再平滑,圆滑超短线造成的扰动}
J_DF_L:=2.5*K_DF_J-1.5*D_DF_G,COLORF813F9;{有源差值滤波,取得中高频短线信号}
RF:=REF(J_DF_L,1);
DJ:=ABS(J_DF_L-RF);
MM:=(HHV(DJ,240)+LLV(DJ,240))/2;
STICKLINE(J_DF_L>RF,J_DF_L,RF,2.3,0),COLORYELLOW;
STICKLINE(J_DF_L>0 AND J_DF_L>RF,J_DF_L,RF,1.0,0),COLORRED;
STICKLINE(J_DF_L<0 AND J_DF_L>RF,J_DF_L,RF,1.0,0),COLORMAGENTA;
STICKLINE( J_DF_L<RF,J_DF_L,RF,2.3,0),COLOR338833;
STICKLINE(J_DF_L>0 AND J_DF_L<RF,J_DF_L,RF,1.0,0),COLORLIRED;
STICKLINE(J_DF_L<0 AND J_DF_L<RF,J_DF_L,RF,1.0,0),COLORWHITE;
STICKLINE(J_DF_L<RF AND DJ<0.2*MM,J_DF_L+0.15*MM,RF-0.15*MM,0.1,0),COLOR33AA33;
STICKLINE(J_DF_L>=RF AND DJ<0.2*MM,RF-0.1*MM,J_DF_L+0.1*MM,0.1,0),COLOR13AADD;
|
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!