 |
tony115722
初級會員
註冊日期: Jan 2007
來 自:
文章數量: 24 |
如何寫預先告知
小弟想寫一個預先告知的公式,但不得其門而入,請前輩幫忙
RSI : 明日收盤價在多少時,R6會向上穿越80 或 向下穿越80
MACD : 明日收盤價收在多少時, MACD.DIFF會穿越0軸 或 MACD.DIFF會向下穿越 MACD.DEA
KD : 明日收盤價在多少時,KD.K會向上穿越80 或 向下穿越80
懇請幫忙,感謝..
|
|
向版主報告此篇 |  |
|
2008-07-25 22:53 |
|
|
|  |
 |
alpha
資深會員
註冊日期: Oct 2006
來 自:
文章數量: 225 |
//////////// RSI
Kline(O,H,L,C,0);
P:= SYSPARAM(1);
Vertline(P=barpos) ,colorcyan ,linedot;
N:=6;
M:=1;
Rate:=80/100;
A1:= MAX(C- REF(CLOSE,1),0);
A2:= ABS(C- REF(CLOSE,1));
Cu:= SMA(A1,N,M);
Cd:= SMA(A2,N,M);
C1:= Close;
A1_s_A2_m_Rate := (N-M)*(Cd[P]*Rate -Cu[P])/M;
狀況_明收_大_今收: A1_s_A2_m_Rate / (1-Rate) + C1[P]; // if 明收 > 今收
狀況_明收_小_今收: A1_s_A2_m_Rate / Rate + C1[P]; // if 明收 < 今收
__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了
|
最後由 alpha 在 2008-07-26 01:50 編輯 |
向版主報告此篇 |  |
|
2008-07-26 01:42 |
|
|
|  |
 |
alpha
資深會員
註冊日期: Oct 2006
來 自:
文章數量: 225 |
////// MACD
Kline(O,H,L,C,0);
P:= SYSPARAM(1);
Vertline(P=barpos) ,colorcyan ,linedot;
SHORT:=12;
LONG:=26;
cS:= EMA(C,SHORT);
cL:= EMA(C,LONG);
C1: (Long-1)*(Short+1)*cL[P] - (Long+1)*(Short-1)*cS[P] ;
C1:= C1/(Long-Short)/2;
__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了
|
|
向版主報告此篇 |  |
|
2008-07-26 01:50 |
|
|
|  |
 |
tony115722
初級會員
註冊日期: Jan 2007
來 自:
文章數量: 24 |
哇,太利害了...
alpha..有你真好...謝謝你....
|
|
向版主報告此篇 |  |
|
2008-07-26 21:44 |
|
|
|  |
 |
tony115722
初級會員
註冊日期: Jan 2007
來 自:
文章數量: 24 |
alpha前輩:
抱歉,我發現我問錯了,
原問題是 MACD.DIFF會穿越0軸
正確應該是 MACD.DEA 會穿越0軸
還有漏了
MACD.DIFF會向下(向上) 穿越 MACD.DEA ,麻煩你了..
|
最後由 tony115722 在 2008-07-26 22:41 編輯 |
向版主報告此篇 |  |
|
2008-07-26 22:05 |
|
|
|  |
 |
alpha
資深會員
註冊日期: Oct 2006
來 自:
文章數量: 225 |
///// MACD
// 數值驗證, 正確無誤
input:
SHORT(12,5,1000),
LONG(26,5,1000),
M(9,1,100);
Kline(O,H,L,C,0);
P:= SYSPARAM(1);
Vertline(P=barpos) ,colorcyan ,linedot;
cS:= EMA(C,SHORT);
cL:= EMA(C,LONG);
DIFF:=cS - cL;
DEA:=EMA(DIFF,M);
value:= (Long-1)*(Short+1)*cL[P] - (Long+1)*(Short-1)*cS[P];
value:= value/(Long-Short)/2;
polyline(barpos>=P OR barpos=datacount-1,value), colorwhite;
明_DIFF_穿0軸: value, colorwhite ,linethick0;
value:= (Long-1)*(Short+1)*cL[P] - (Long+1)*(Short-1)*cS[P] - (M-1)*DEA[P]/2*(Long+1)*(Short+1);
value:= value/(Long-Short)/2;
polyline(barpos>=P OR barpos=datacount-1,value), coloryellow;
明_DEA_穿0軸: value, coloryellow ,linethick0;
value:= (Long-1)*(Short+1)*cL[P] - (Long+1)*(Short-1)*cS[P] + DEA[P]*(Long+1)*(Short+1);
value:= value/(Long-Short)/2;
polyline(barpos>=P OR barpos=datacount-1,value), colormagenta;
明_DIFF_DEA_交會: value,colormagenta ,linethick0;
__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了
|
|
向版主報告此篇 |  |
|
2008-07-27 17:30 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|