奇狐社區論壇
在這個頁面顯示本主題全部的 8 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 應用交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=33)
-- 超级短线能量----指标原码 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=9719)


由 ahfyxl 在 2008-05-24 20:21 發表:

超级短线能量----指标原码

看看有多少朋友喜欢,再考虑指标的发放.........


由 sky668 在 2008-05-24 23:13 發表:

可否分享 等指標
感恩
並祝操盤勝利順心

sky-timing@umail.hinet.net


由 p0068 在 2008-05-25 05:32 發表:

回覆: 初来,请朋友们多多海涵------图

引用:
最初由 ahfyxl 發表
看看有多少朋友喜欢,再考虑指标的发放.........

3q3q3q!

__________________
shujenwen


由 curiousboy 在 2008-05-25 15:21 發表:

分享有助於學習
3Q


由 gohome743826 在 2008-05-25 20:45 發表:

可否分享等指標

可否分享等指標我ㄉ信箱hhappy999888tw@yahoo.com.tw


由 ahfyxl 在 2008-05-27 09:15 發表:

超级短线能量

{【超级短线能量】--作者:ahfyxl}
{-----------------------☆功能开关------------------------}

V1:=DMA((H+L+C*2)/4,0.9);
HY1:=REF(EMA(V1,3),1);
APP:=V/((H-L)*2-ABS(C-O));
ZL:=IF(C>O,APP*(H-L),IF(C<O,APP*(H-O+C-L),V/2));
SF:=IF(C>O,0-APP*(H-C+O-L),IF(C<O,0-APP*(H-L),0-V/2));
VAR1:=(C-HY1)/HY1*100;
VAR2:=(C-REF(C,1))/REF(C,1)*100;
TS:=BARSLAST(BARSLAST(VAR1>0 AND REF(VAR1,1)>0)>0);
界:SUM(IF(TS>0,VAR2,0),0),PRECISION0,LINETHICK,Color00A6A9;
均量:MA(ZL+SF,5),PRECISION0,LINETHICK,COLORGREEN;
能量A:MA(ZL+SF,2),PRECISION0,LINETHICK,COLORYELLOW;
能量B:MA(ZL+SF,3)*1.5,PRECISION0,LINETHICK,COLOR1D78FF;
{以下是画线部分}
ZJ1:=DMA((H+L+C*2)/4,0.9); ZJ2:=V/((H-L)*2-ABS(C-O));
ZJ3:=IF(C>O,ZJ2*(H-L),IF(C<O,ZJ2*(H-O+(C-L)),V/2))+IF(C>O,0-ZJ2*(H-C+(O-L)),IF(C<O,0-ZJ2*(H-L),0-V/2));
ZJ4:=ZJ3/20/1.15; ZJ5:=ZJ4*0.55+REF(ZJ4,1)*0.33+REF(ZJ4,2)*0.22; ZJ6:=EMA(ZJ5,3);
Nl_1:=CAPITAL*C; Nl_2:=SMA(AMOUNT,10,1)/1000; Nl_3:=MA(C*3,5); Nl_4:=Nl_2*C*3/Nl_3;
Nl_5:=Nl_2*O*3/Nl_3{/10}; Nl_6:=Nl_2*H*3/Nl_3{/10}; Nl_7:=Nl_2*L*3/Nl_3{/10};
Nl_8:=(3*Nl_4+2*Nl_5+Nl_6+Nl_7)/7; Nl_9:=DMA(EMA(Nl_4,2),SUM(V,1)*Nl_8)*IF(CAPITAL,1,0);
Nl_10:=EMA(Nl_1-Nl_9,1); Nl_11:=REF(Nl_10,1); Nl_12:=Nl_10>=Nl_11; Nl_13:=Nl_10<=Nl_11;
Nl_14:=(Nl_10-Nl_11)*15; Nl_15:=IF(Nl_12,Nl_14{/800},0); Nl_16:=IF(Nl_13,Nl_14{/800},0);
Nl_17:=EMA(Nl_15+Nl_16,13)/1000000;
Nl_18:=SMA(Nl_17,3,1); Nl_19:=EMA(Nl_18,8);

n1:=sysparam(3); n2:=sysparam(2); n3:=(n1-n2)+1;
Gh:=hhv(能量B,n3); Gl:=llv(能量B,n3); Ghh:=Gh[n1]; Gll:=Gl[n1]; 个中:=(Ghh+Gll)/2;
JP_1:= EMA(C,7) - EMA(C,19); JP_2:= EMA(JP_1,9); JP_3:=(JP_1<-0.1 and JP_1>JP_2);
{个股划线}
H2:=VALUEWHEN(Nl_18>=Nl_19 and Nl_18>REF(Nl_19,1),Nl_18); HH2:=NOT(H2>Nl_18);
K1:=IF(HH2>0,Gll,IF(HH2=0,Ghh,0));

{-----------------【图解模板】---------------------}
DRAWGBK(DATE>0,COLORRGB(40,40,173),COLORRGB(1,1,14),1);

PARTLINE(C,界),LINEDOT,Color00A6A9;
PARTLINE(C,均量),COLORGREEN;
PARTLINE(C,能量B),COLOR1D78FF;
PARTLINE(C,能量A),COLORYELLOW;
PARTLINE(capital>0,K1),LINEDOT,COLORWHITE;{关注}
PARTLINE(capital>0 and K1<0 and ZJ6>0,K1),LINEDOT,COLORRED;{升}
PARTLINE(capital>0 and K1>0 and ZJ6<0,K1),LINEDOT,ColorFFC800;{降}
STICKLINE(capital>0 and JP_3,Gll*1.1,Gll*1.2,5,0),COLORGRAY;

//


由 gold16889 在 2008-05-27 18:29 發表:

回覆: 超级短线能量

引用:
最初由 ahfyxl 發表
{【超级短线能量】--作者:ahfyxl}
{-----------------------☆功能开关------------------------}

V1:=DMA((H+L+C*2)/4,0.9);
HY1:=REF(EMA(V1,3),1);
APP:=V/((H-L)*2-ABS(C-O));
ZL:=IF(C>O,APP*(H-L),IF(C<O,APP*(H-O+C-L),V/2));
SF:=IF(C>O,0-APP*(H-C+O-L),IF(C<O,0-APP*(H-L),0-V/2));
VAR1:=(C-HY1)/HY1*100;
VAR2:=(C-REF(C,1))/REF(C,1)*100;
TS:=BARSLAST(BARSLAST(VAR1>0 AND REF(VAR1,1)>0)>0);
界:SUM(IF(TS>0,VAR2,0),0),PRECISION0,LINETHICK,Color00A6A9;
均量:MA(ZL+SF,5),PRECISION0,LINETHICK,COLORGREEN;
能量A:MA(ZL+SF,2),PRECISION0,LINETHICK,COLORYELLOW;
能量B:MA(ZL+SF,3)*1.5,PRECISION0,LINETHICK,COLOR1D78FF;
{以下是画线部分}
ZJ1:=DMA((H+L+C*2)/4,0.9); ZJ2:=V/((H-L)*2-ABS(C-O));
ZJ3:=IF(C>O,ZJ2*(H-L),IF(C<O,ZJ2*(H-O+(C-L)),V/2))+IF(C>O,0-ZJ2*(H-C+(O-L)),IF(C<O,0-ZJ2*(H-L),0-V/2));
ZJ4:=ZJ3/20/1.15; ZJ5:=ZJ4*0.55+REF(ZJ4,1)*0.33+REF(ZJ4,2)*0.22; ZJ6:=EMA(ZJ5,3);
Nl_1:=CAPITAL*C; Nl_2:=SMA(AMOUNT,10,1)/1000; Nl_3:=MA(C*3,5); Nl_4:=Nl_2*C*3/Nl_3;
Nl_5:=Nl_2*O*3/Nl_3{/10}; Nl_6:=Nl_2*H*3/Nl_3{/10}; Nl_7:=Nl_2*L*3/Nl_3{/10};
Nl_8:=(3*Nl_4+2*Nl_5+Nl_6+Nl_7)/7; Nl_9:=DMA(EMA(Nl_4,2),SUM(V,1)*Nl_8)*IF(CAPITAL,1,0);
Nl_10:=EMA(Nl_1-Nl_9,1); Nl_11:=REF(Nl_10,1); Nl_12:=Nl_10>=Nl_11; Nl_13:=Nl_10<=Nl_11;
Nl_14:=(Nl_10-Nl_11)*15; Nl_15:=IF(Nl_12,Nl_14{/800},0); Nl_16:=IF(Nl_13,Nl_14{/800},0);
Nl_17:=EMA(Nl_15+Nl_16,13)/1000000;
Nl_18:=SMA(Nl_17,3,1); Nl_19:=EMA(Nl_18,8);

n1:=sysparam(3); n2:=sysparam(2); n3:=(n1-n2)+1;
Gh:=hhv(能量B,n3); Gl:=llv(能量B,n3); Ghh:=Gh[n1]; Gll:=Gl[n1]; 个中:=(Ghh+Gll)/2;
JP_1:= EMA(C,7) - EMA(C,19); JP_2:= EMA(JP_1,9); JP_3:=(JP_1<-0.1 and JP_1>JP_2);
{个股划线}
H2:=VALUEWHEN(Nl_18>=Nl_19 and Nl_18>REF(Nl_19,1),Nl_18); HH2:=NOT(H2>Nl_18);
K1:=IF(HH2>0,Gll,IF(HH2=0,Ghh,0));

{-----------------【图解模板】---------------------}
DRAWGBK(DATE>0,COLORRGB(40,40,173),COLORRGB(1,1,14),1);

PARTLINE(C,界),LINEDOT,Color00A6A9;
PARTLINE(C,均量),COLORGREEN;
PARTLINE(C,能量B),COLOR1D78FF;
PARTLINE(C,能量A),COLORYELLOW;
PARTLINE(capital>0,K1),LINEDOT,COLORWHITE;{关注}
PARTLINE(capital>0 and K1<0 and ZJ6>0,K1),LINEDOT,COLORRED;{升}
PARTLINE(capital>0 and K1>0 and ZJ6<0,K1),LINEDOT,ColorFFC800;{降}
STICKLINE(capital>0 and JP_3,Gll*1.1,Gll*1.2,5,0),COLORGRAY;

//


行33 無法通過VALUEWHEN
H2:=VALUEWHEN(Nl_18>=Nl_19 and Nl_18>REF(Nl_19,1),Nl_18); HH2:=NOT(H2>Nl_18);


由 bin168 在 2008-05-28 12:38 發表:

谢谢LZ。能够通过,能否讲其具体用法!!


全部時間均為台灣時間, 現在時間為08:50
在這個頁面顯示本主題全部的 8 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.

簡愛洋行 製作 Copyright 2003-. All Rights Reserved.