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

註冊日期: May 2004
來  自: 台灣
文章數量: 557

傳說中的-倚天劍

這是網友提供給我的.有加密.
試用期限至2004.11.30止.手腳要快喔.

附件: 倚天劍.alg
此文件已被下載 517 次。

__________________
人外有人 天外有天 不懼不貪 亦富亦安

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

註冊日期: May 2004
來  自: 台灣
文章數量: 557

傳說中的-倚天劍
這是網友提供給我的.有加密.
試用期限至2004.11.30止.手腳要快喔.

ifuian 附帶上了此圖片:

__________________
人外有人 天外有天 不懼不貪 亦富亦安

向版主報告此篇 | 查IP位址
Old Post 2004-10-12 15:18
ifuian 現在離線 點選這裡查看 ifuian 的個人資料 點選這裡給 ifuian 傳送一條短訊 查找更多關於 ifuian 的文章 增加 ifuian 至你的好友列表 編輯/刪除訊息 引用回覆
godhorse
JOHN

註冊日期: Jan 2004
來  自:
文章數量: 27

我這邊好像有原碼,無時間限制
提供大家參考,讓有需要的研究一下!!
=======================================

p:EMA(CLOSE,7)Color00FF00;
E21:EMA(CLOSE,21)Color008000;
E38:EMA(CLOSE,38)ColorFFFFFF;
E55:EMA(CLOSE,55)ColorFFFF00;
E89:EMA(CLOSE,89)Color0000FF;
E157:EMA(CLOSE,157)ColorFF00FF;
MA241:MA(CLOSE,241)ColorFF0000;
A:=(REF(p,1));
STICKLINE((p>A),A,p,6,0),Color00FF00;
STICKLINE((p<=A),A,p,6,0),Color0000FF;
VARA:=IF((CLOSE>150),91.3,0.91299998);
箱下沿:(INTPART((CLOSE)/(VARA)))*(VARA),ColorF0F000,POINTDOT;
箱上沿:箱下沿+VARA,Color00FFFF,POINTDOT;
箱中沿:(箱下沿+箱上沿)/(2),ColorFFFFFF,POINTDOT;
VAR31:=(HHVBARS((ZIG(1,19)>REF(ZIG(1,19),1)) AND (REF(ZIG(1,19),1)<REF(ZIG(1,19),3)),0));
LC:=(REF(CLOSE,1));
動力:=(((SUM(IF((CLOSE>LC),VOL,0),26))/(SUM(IF((CLOSE<=LC),VOL,0),26)))*(100));
WVAD10:=(MA(((CLOSE-OPEN)/(HIGH-LOW))*(VOL),10))/(1000)+(50);
神奇數字:=(0)ColorFFFFFF;
DRAWTEXT((VAR31=20),(LOW)*(0.99000001),'↑21'),Color00FFFF;
DRAWTEXT((VAR31=33),(HIGH)*(1.04),'↓34'),Color00FFFF;
DRAWTEXT((VAR31=54),(LOW)*(0.99000001),'↑55'),Color00FFFF;
DRAWTEXT((VAR31=88),(HIGH)*(1.05),'↓89'),Color00FFFF;
DRAWTEXT((VAR31=143),(LOW)*(0.99000001),'↑144'),Color00FFFF;
DRAWTEXT((VAR31=232),(HIGH)*(1.05),'↓233'),Color00FFFF;
DRAWTEXT((VAR31=376),(LOW)*(0.99000001),'↑377'),Color00FFFF;
M9:=(MA(CLOSE,9));
Y:=((HIGH+LOW)/(2));
AO:=MA(Y,5)-(MA(Y,34));
DU0:=(CROSS(AO,0));
UD0:=(CROSS(0,AO));
TDU0:=(BARSLAST(DU0));
TUD0:=(BARSLAST(UD0));
DU3:=(REF(DU0,1));
UD3:=(REF(UD0,1));
TDU3:=(BARSLAST(DU3));
TUD3:=(BARSLAST(UD3));
UDGLINE:=(IF((TDU3<TUD3),REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3)));
JDU0:=(REF(CLOSE,1)<=REF(UDGLINE,1)) AND (CLOSE>UDGLINE) AND (TDU0<(TUD0));
JUD0:=(REF(CLOSE,1)>=REF(UDGLINE,1)) AND (CLOSE<UDGLINE) AND (TUD0<(TDU0));
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=(1);
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=(1);
JDU2:=JDU1 AND (REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1));
JUD2:=JUD1 AND (REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1));
JDU3:=JDU1 AND (REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1));
JUD3:=JUD1 AND (REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1));
DRAWTEXT(JDU2,(M9)*(0.94999998),'▲買▲'),Color;
VAR1:=(((CLOSE-MA(CLOSE,30))/(MA(CLOSE,30)))*(100));
VAR2:=(CLOSE>OPEN) AND OPEN-LOW>HIGH-(CLOSE);
VAR3:=(REF(VAR1,1)<(-20)) AND (VAR2);
VAR4:=(REF(VAR1,1)<(-20)) AND (CLOSE>OPEN) AND (((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(1000)>20);
VAR5:=(FILTER((VAR3 or VAR4),3));
VAR6:=(OPEN>CLOSE) AND (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN)>IF((OPEN<CLOSE),OPEN,CLOSE)-(LOW));
VAR7:=(REF(VAR1,1)>ABS((-20))) AND (VAR6);
VAR8:=(REF(VAR1,1)>ABS((-20))) AND (CLOSE<OPEN) AND (((REF(CLOSE,1)-CLOSE)/(REF(CLOSE,1)))*(1000)>20);
VAR9:=(FILTER((VAR7 or VAR8),3));
VAARA:=(REF(VAR1,1)<(-13)) AND (VAR2);
VARB:=(REF(VAR1,1)<(-13)) AND (CLOSE>OPEN) AND (((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(1000)>20);
VARC:=(FILTER((VAARA or VARB),3));
VARD:=(REF(VAR1,1)>ABS((-13))) AND (VAR6);
VARE:=(REF(VAR1,1)>ABS((-13))) AND (CLOSE<OPEN) AND (((REF(CLOSE,1)-CLOSE)/(REF(CLOSE,1)))*(1000)>(20));
VARF:=(FILTER((VARD or VARE),3));
DRAWTEXT(((VARF)*(VAR1)>0),(1)*(REF(CLOSE,1)),'▼賣▼'),Color

godhorse 附帶上了此圖片:

__________________
JOHN

最後由 godhorse 在 2004-10-12 16:57 編輯 向版主報告此篇 | 查IP位址
Old Post 2004-10-12 16:44
godhorse 現在離線 點選這裡查看 godhorse 的個人資料 點選這裡給 godhorse 傳送一條短訊 查找更多關於 godhorse 的文章 增加 godhorse 至你的好友列表 編輯/刪除訊息 引用回覆
ifuian
資深會員

註冊日期: May 2004
來  自: 台灣
文章數量: 557

因為這指標是網友提供.本人無權公布原碼.
感謝godhouse兄提供原碼...................

__________________
人外有人 天外有天 不懼不貪 亦富亦安

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

註冊日期: Apr 2004
來  自:
文章數量: 40

微笑

謝謝各位大大無私的分享

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

註冊日期: Oct 2004
來  自: tai
文章數量: 10

倚天劍

原碼與倚天劍.alg好像不太一樣,要如何改才能一樣

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

註冊日期: May 2004
來  自: 台灣
文章數量: 557

這是我修改過的.可參考網友的原碼

__________________
人外有人 天外有天 不懼不貪 亦富亦安

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

註冊日期: Jan 2007
來  自:
文章數量: 23

引用:
最初由 godhorse 發表
我這邊好像有原碼,無時間限制
提供大家參考,讓有需要的研究一下!!
=======================================

p:EMA(CLOSE,7)Color00FF00;
E21:EMA(CLOSE,21)Color008000;
E38:EMA(CLOSE,38)ColorFFFFFF;
E55:EMA(CLOSE,55)ColorFFFF00;
E89:EMA(CLOSE,89)Color0000FF;
E157:EMA(CLOSE,157)ColorFF00FF;
MA241:MA(CLOSE,241)ColorFF0000;
A:=(REF(p,1));
STICKLINE((p>A),A,p,6,0),Color00FF00;
STICKLINE((p<=A),A,p,6,0),Color0000FF;
VARA:=IF((CLOSE>150),91.3,0.91299998);
箱下沿:(INTPART((CLOSE)/(VARA)))*(VARA),ColorF0F000,POINTDOT;
箱上沿:箱下沿+VARA,Color00FFFF,POINTDOT;
箱中沿:(箱下沿+箱上沿)/(2),ColorFFFFFF,POINTDOT;
VAR31:=(HHVBARS((ZIG(1,19)>REF(ZIG(1,19),1)) AND (REF(ZIG(1,19),1)<REF(ZIG(1,19),3)),0));
LC:=(REF(CLOSE,1));
動力:=(((SUM(IF((CLOSE>LC),VOL,0),26))/(SUM(IF((CLOSE<=LC),VOL,0),26)))*(100));
WVAD10:=(MA(((CLOSE-OPEN)/(HIGH-LOW))*(VOL),10))/(1000)+(50);
神奇數字:=(0)ColorFFFFFF;
DRAWTEXT((VAR31=20),(LOW)*(0.99000001),'↑21'),Color00FFFF;
DRAWTEXT((VAR31=33),(HIGH)*(1.04),'↓34'),Color00FFFF;
DRAWTEXT((VAR31=54),(LOW)*(0.99000001),'↑55'),Color00FFFF;
DRAWTEXT((VAR31=88),(HIGH)*(1.05),'↓89'),Color00FFFF;
DRAWTEXT((VAR31=143),(LOW)*(0.99000001),'↑144'),Color00FFFF;
DRAWTEXT((VAR31=232),(HIGH)*(1.05),'↓233'),Color00FFFF;
DRAWTEXT((VAR31=376),(LOW)*(0.99000001),'↑377'),Color00FFFF;
M9:=(MA(CLOSE,9));
Y:=((HIGH+LOW)/(2));
AO:=MA(Y,5)-(MA(Y,34));
DU0:=(CROSS(AO,0));
UD0:=(CROSS(0,AO));
TDU0:=(BARSLAST(DU0));
TUD0:=(BARSLAST(UD0));
DU3:=(REF(DU0,1));
UD3:=(REF(UD0,1));
TDU3:=(BARSLAST(DU3));
TUD3:=(BARSLAST(UD3));
UDGLINE:=(IF((TDU3<TUD3),REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3)));
JDU0:=(REF(CLOSE,1)<=REF(UDGLINE,1)) AND (CLOSE>UDGLINE) AND (TDU0<(TUD0));
JUD0:=(REF(CLOSE,1)>=REF(UDGLINE,1)) AND (CLOSE<UDGLINE) AND (TUD0<(TDU0));
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=(1);
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=(1);
JDU2:=JDU1 AND (REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1));
JUD2:=JUD1 AND (REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1));
JDU3:=JDU1 AND (REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1));
JUD3:=JUD1 AND (REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1));
DRAWTEXT(JDU2,(M9)*(0.94999998),'▲買▲'),Color;
VAR1:=(((CLOSE-MA(CLOSE,30))/(MA(CLOSE,30)))*(100));
VAR2:=(CLOSE>OPEN) AND OPEN-LOW>HIGH-(CLOSE);
VAR3:=(REF(VAR1,1)<(-20)) AND (VAR2);
VAR4:=(REF(VAR1,1)<(-20)) AND (CLOSE>OPEN) AND (((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(1000)>20);
VAR5:=(FILTER((VAR3 or VAR4),3));
VAR6:=(OPEN>CLOSE) AND (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN)>IF((OPEN<CLOSE),OPEN,CLOSE)-(LOW));
VAR7:=(REF(VAR1,1)>ABS((-20))) AND (VAR6);
VAR8:=(REF(VAR1,1)>ABS((-20))) AND (CLOSE<OPEN) AND (((REF(CLOSE,1)-CLOSE)/(REF(CLOSE,1)))*(1000)>20);
VAR9:=(FILTER((VAR7 or VAR8),3));
VAARA:=(REF(VAR1,1)<(-13)) AND (VAR2);
VARB:=(REF(VAR1,1)<(-13)) AND (CLOSE>OPEN) AND (((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(1000)>20);
VARC:=(FILTER((VAARA or VARB),3));
VARD:=(REF(VAR1,1)>ABS((-13))) AND (VAR6);
VARE:=(REF(VAR1,1)>ABS((-13))) AND (CLOSE<OPEN) AND (((REF(CLOSE,1)-CLOSE)/(REF(CLOSE,1)))*(1000)>(20));
VARF:=(FILTER((VARD or VARE),3));
DRAWTEXT(((VARF)*(VAR1)>0),(1)*(REF(CLOSE,1)),'▼賣▼'),Color



有未来函数,不用为好

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

論壇跳轉:
主題評分:

論壇規定:
你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章
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.  聯絡我們