 |
may158
中級會員
註冊日期: Apr 2004
來 自:
文章數量: 52 |
抄底王
抄底王
原碼:
VAR2:=MA(CLOSE,5);
VAR3:=MA(CLOSE,10);
VAR4:=MA(CLOSE,20);
VAR5:=MA(CLOSE,30);
VAR6:=(VAR2+VAR3+VAR4+VAR5)/(4);
VAR7:=((VAR6-REF(VAR6,週期))/(REF(VAR6,週期)))*(100);
VAR8:=((VAR6-REF(VAR6,週期))/(REF(VAR6,週期)))*(100);
VAR9:=EMA(VAR7,過濾);
紅包:IF((TROUGHBARS(3,15,1)=0) AND (HIGH>LOW+0.01),10,(-5)),Color00FF00;
反轉:(VAR9>(1)*(REF(VAR9,1))),ColorEE00EE;
持股:(VAR7>(1)*(REF(VAR7,1))),Color0000FF;
持幣:(VAR7<(1)*(REF(VAR7,1))),Color008000;
洗盤:(VAR7<(1)*(REF(VAR7,1))) AND (VAR9>(1)*(REF(VAR9,1))),Color00EEFF;
VAR10:=((CLOSE-MA(CLOSE,58))/(MA(CLOSE,58)))*(100);
VAR11:=((VAR10>(1)*(REF(VAR10,1))) AND (VAR10<選股) AND (VAR10>抄底))*(1.5);
VAR12:=((VOL)/(CAPITAL))*(100);
VAR13:=LLVBARS(LOW,50);
VAR14:=SUM(VOL,VAR13);
VAR15:=HHVBARS(HIGH,50);
VAR16:=SUM(VOL,VAR15);
VAR17:=((CLOSE-REF(OPEN,VAR15))/(REF(OPEN,VAR15)))*(100);
VAR18:=((VAR16)/(CAPITAL))*(100);
VAR19:=((CLOSE-REF(OPEN,VAR13))/(REF(OPEN,VAR13)))*(100);
VAR20:=((VAR14)/(CAPITAL))*(100);
VAR21:=MA(CLOSE,3);
VAR22:=(REF(CLOSE,2))*(0.86500001);
VAR23:=(REF(CLOSE,13))*(0.77200001);
VAR24:=MIN(VAR22,VAR23);
VAR25:=MA(CLOSE,13);
抄底王:(IF(((CLOSE-VAR24)/(CLOSE)<0.02999999) AND (VAR17<(-35)) AND ((SUM(VAR12,5))/(5)<1.8),1,0))*(10),ColorFFFFFF;
抄底王,ColorFFAA00;
VAR26:=((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(100);
VAR27:=(EMA(CLOSE,12)-EMA(CLOSE,26))*(100);
VAR28:=EMA(VAR27,9);
VAR29:=(2)*(VAR27-VAR28);
(VAR27<(-50)) AND (VAR26>7) AND (VAR27<VAR28),ColorFFFFFF;
(VAR27<(-50)) AND (VAR26>7) AND (VAR27>=VAR28),ColorFFFFFF;
(VAR27<(-50)) AND (VAR26>7),ColorFFFF66;
|
|
向版主報告此篇 |  |
|
2004-07-30 14:01 |
|
|
|  |
 |
jen50
初級會員
註冊日期: Feb 2004
來 自: 桃園龍潭
文章數量: 8 |
請may158大大幫忙確認參數次序是否正確
為避免錯誤請幫忙確認涮次序是否正確
週期:15
過濾:8
選股:-26
抄底:-40
同時感謝您提供許多程式 正努力學習程式邏輯並推估使用方式中
謝謝 !
|
|
向版主報告此篇 |  |
|
2004-08-02 23:22 |
|
|
|  |
 |
may158
中級會員
註冊日期: Apr 2004
來 自:
文章數量: 52 |
回覆: 請may158大大幫忙確認參數次序是否正確
引用: 最初由 jen50 發表
為避免錯誤請幫忙確認涮次序是否正確
週期:15
過濾:8
選股:-26
抄底:-40
同時感謝您提供許多程式 正努力學習程式邏輯並推估使用方式中
謝謝 !
週期:15,1,100
過濾:8,1,100
選股:-26,-30,-20
抄底:-40,-50,-25
VAR2:=MA(CLOSE,5);
VAR3:=MA(CLOSE,10);
VAR4:=MA(CLOSE,20);
VAR5:=MA(CLOSE,30);
VAR6:=(VAR2+VAR3+VAR4+VAR5)/(4);
VAR7:=((VAR6-REF(VAR6,週期))/(REF(VAR6,週期)))*(100);
VAR8:=((VAR6-REF(VAR6,週期))/(REF(VAR6,週期)))*(100);
VAR9:=EMA(VAR7,過濾);
紅包:IF((TROUGHBARS(3,15,1)=0) AND (HIGH>LOW+0.01),10,(-5)),Color00FF00;
反轉:STICKLINE(Var9>1*REF(Var9, 1), Var7, 0, 5, 0), COLOREE00EE;
持股:STICKLINE(Var7>1*REF(Var7, 1), Var7, Var9, 5, 0), COLORRED;
持幣:STICKLINE(Var7<1*REF(Var7, 1), Var7, Var9, 5, 1), COLORGREEN;
洗盤:STICKLINE(Var7<1*REF(Var7, 1) AND Var9>1*REF(Var9, 1), Var7, Var9, 10, 0), COLOR00EEFF;
VAR10:=((CLOSE-MA(CLOSE,58))/(MA(CLOSE,58)))*(100);
VAR11:=((VAR10>(1)*(REF(VAR10,1))) AND (VAR10<選股) AND (VAR10>抄底))*(1.5);
VAR12:=((VOL)/(CAPITAL))*(100);
VAR13:=LLVBARS(LOW,50);
VAR14:=SUM(VOL,VAR13);
VAR15:=HHVBARS(HIGH,50);
VAR16:=SUM(VOL,VAR15);
VAR17:=((CLOSE-REF(OPEN,VAR15))/(REF(OPEN,VAR15)))*(100);
VAR18:=((VAR16)/(CAPITAL))*(100);
VAR19:=((CLOSE-REF(OPEN,VAR13))/(REF(OPEN,VAR13)))*(100);
VAR20:=((VAR14)/(CAPITAL))*(100);
VAR21:=MA(CLOSE,3);
VAR22:=(REF(CLOSE,2))*(0.86500001);
VAR23:=(REF(CLOSE,13))*(0.77200001);
VAR24:=MIN(VAR22,VAR23);
VAR25:=MA(CLOSE,13);
抄底王:(IF(((CLOSE-VAR24)/(CLOSE)<0.02999999) AND (VAR17<(-35)) AND ((SUM(VAR12,5))/(5)<1.8),1,0))*(10),ColorFFFFFF;
DRAWTEXT(抄底王, 抄底王, ' 成功率90追 '), COLORFFAA00;
VAR26:=((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(100);
VAR27:=(EMA(CLOSE,12)-EMA(CLOSE,26))*(100);
VAR28:=EMA(VAR27,9);
VAR29:=(2)*(VAR27-VAR28);
DRAWTEXT(Var27<(-50) AND Var26>7 AND Var27<Var28, (-10), '底'), COLORWHITE;
DRAWTEXT(Var27<(-50) AND Var26>7 AND Var27>=Var28, 5, '追'), COLORWHITE;
STICKLINE(Var27<(-50) AND Var26>7, 0,(-10), 5, 0), COLORFFFF66;
|
|
向版主報告此篇 |  |
|
2004-08-03 11:12 |
|
|
|  |
 |
南客
初級會員
註冊日期: Aug 2004
來 自:
文章數量: 6 |
在新版本中,参数可以直接写入公式代码,这样,公式就很容易交流了,参考如下:
input:週期(15,1,100), 過濾(8,1,100), 選股(-26,-30,-20), 抄底(-40,-50,-25);
|
|
向版主報告此篇 |  |
|
2004-08-13 17:35 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18166 |
引用: 最初由 南客 發表
在新版本中,参数可以直接写入公式代码,这样,公式就很容易交流了,参考如下:
input:週期(15,1,100), 過濾(8,1,100), 選股(-26,-30,-20), 抄底(-40,-50,-25);
新的奇狐4.0 版已提供此功能, 目前正於公司內部測試除錯中
近期會給大家升級, 敬請期待
|
|
向版主報告此篇 |  |
|
2004-08-13 18:37 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|