到奇狐勝券首頁 奇狐社區論壇 購買奇狐勝券 試用奇狐勝券
 
論壇首頁 你可以在這裡編輯你的資料,查看短訊,訂閱主題和論壇參數等等 免費會員註冊 會員列表 論壇幫助 論壇日曆 論壇搜索 加入我的最愛 登出論壇  
奇狐社區論壇 : Powered by vBulletin version 2.3.0 奇狐社區論壇 > 指標公式 > 應用交流 > 超级短线能量----指标原码
  上一主題   下一主題
作者
主題 發表新主題    回覆主題
ahfyxl
初級會員

註冊日期: May 2008
來  自:
文章數量: 4

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

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

最後由 ahfyxl 在 2008-05-27 09:17 編輯 向版主報告此篇 | 查IP位址
Old Post 2008-05-24 20:21
ahfyxl 現在離線 點選這裡查看 ahfyxl 的個人資料 點選這裡給 ahfyxl 傳送一條短訊 查找更多關於 ahfyxl 的文章 增加 ahfyxl 至你的好友列表 編輯/刪除訊息 引用回覆
sky668
中級會員

註冊日期: Feb 2006
來  自:
文章數量: 90

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

sky-timing@umail.hinet.net

向版主報告此篇 | 查IP位址
Old Post 2008-05-24 23:13
sky668 現在離線 點選這裡查看 sky668 的個人資料 點選這裡給 sky668 傳送一條短訊 查找更多關於 sky668 的文章 增加 sky668 至你的好友列表 編輯/刪除訊息 引用回覆
p0068
資深會員

註冊日期: Jan 2004
來  自: 台中市
文章數量: 564

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

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

3q3q3q!

__________________
shujenwen

向版主報告此篇 | 查IP位址
Old Post 2008-05-25 05:32
p0068 現在離線 點選這裡查看 p0068 的個人資料 點選這裡給 p0068 傳送一條短訊 查找更多關於 p0068 的文章 增加 p0068 至你的好友列表 編輯/刪除訊息 引用回覆
curiousboy
中級會員

註冊日期: Jul 2004
來  自:
文章數量: 79

分享有助於學習
3Q

向版主報告此篇 | 查IP位址
Old Post 2008-05-25 15:21
curiousboy 現在離線 點選這裡查看 curiousboy 的個人資料 點選這裡給 curiousboy 傳送一條短訊 查找更多關於 curiousboy 的文章 增加 curiousboy 至你的好友列表 編輯/刪除訊息 引用回覆
gohome743826
初級會員

註冊日期: Apr 2008
來  自:
文章數量: 11

可否分享等指標

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

向版主報告此篇 | 查IP位址
Old Post 2008-05-25 20:45
gohome743826 現在離線 點選這裡查看 gohome743826 的個人資料 點選這裡給 gohome743826 傳送一條短訊 查找更多關於 gohome743826 的文章 增加 gohome743826 至你的好友列表 編輯/刪除訊息 引用回覆
ahfyxl
初級會員

註冊日期: May 2008
來  自:
文章數量: 4

超级短线能量

{【超级短线能量】--作者: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;

//

ahfyxl 附帶上了此圖片:

向版主報告此篇 | 查IP位址
Old Post 2008-05-27 09:15
ahfyxl 現在離線 點選這裡查看 ahfyxl 的個人資料 點選這裡給 ahfyxl 傳送一條短訊 查找更多關於 ahfyxl 的文章 增加 ahfyxl 至你的好友列表 編輯/刪除訊息 引用回覆
gold16889
中級會員

註冊日期: Nov 2006
來  自: 農村
文章數量: 90

回覆: 超级短线能量

引用:
最初由 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);

向版主報告此篇 | 查IP位址
Old Post 2008-05-27 18:29
gold16889 現在離線 點選這裡查看 gold16889 的個人資料 點選這裡給 gold16889 傳送一條短訊 查找更多關於 gold16889 的文章 增加 gold16889 至你的好友列表 編輯/刪除訊息 引用回覆
bin168
初級會員

註冊日期: May 2008
來  自: 農村
文章數量: 7

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

向版主報告此篇 | 查IP位址
Old Post 2008-05-28 12:38
bin168 現在離線 點選這裡查看 bin168 的個人資料 點選這裡給 bin168 傳送一條短訊 查找更多關於 bin168 的文章 增加 bin168 至你的好友列表 編輯/刪除訊息 引用回覆
全部時間均為台灣時間, 現在時間為17:47 發表新主題    回覆主題
  上一主題   下一主題
顯示可列印版本 | 訂閱此主題

論壇跳轉:
主題評分:

論壇規定:
你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章
HTML語法禁止
vB 語法核准
表情符號核准
貼圖語法[IMG]核准
 

本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。

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

簡愛洋行 製作 Copyright 2003-. All Rights Reserved.  聯絡我們