奇狐社區論壇

奇狐社區論壇 : Powered by vBulletin version 2.3.0

奇狐社區論壇 > 指標公式 > 問題交流 > 請教

上一主題下一主題

作者

主題

mori868
資深會員

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

請教

LC:= REF(CLOSE,1);
R3:=SMA(MAX(CLOSE-LC,0),3,1)/SMA(ABS(CLOSE-LC),3,1)*100,COLORWHITE;

AQ:=ref(R3,2)>=ref(R3,1) and ref(R3,1)<R3 and ref(R3,1)<20,linethick0;
BQ:=ref(R3,2)<=ref(R3,1) and ref(R3,1)>R3 and ref(R3,1)>80,linethick0;

轉折點:IF(refx(AQ,1) or refx(BQ,1),if(refx(AQ,1),C,C),0),linethick0;

希望
1:今轉折點與前轉折點一定相差20 點, 20 點以上
2:各轉折點連成一新曲線並顯示記號
敬請幫忙賜教謝謝

向版主報告此篇 |

2011-08-18 06:18

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18121

回覆: 請教

引用:
最初由 mori868 發表
LC:= REF(CLOSE,1);
R3:=SMA(MAX(CLOSE-LC,0),3,1)/SMA(ABS(CLOSE-LC),3,1)*100,COLORWHITE;

AQ:=ref(R3,2)>=ref(R3,1) and ref(R3,1)<R3 and ref(R3,1)<20,linethick0;
BQ:=ref(R3,2)<=ref(R3,1) and ref(R3,1)>R3 and ref(R3,1)>80,linethick0;

轉折點:IF(refx(AQ,1) or refx(BQ,1),if(refx(AQ,1),C,C),0),linethick0;

希望
1:今轉折點與前轉折點一定相差20 點, 20 點以上
2:各轉折點連成一新曲線並顯示記號
敬請幫忙賜教謝謝

原碼:


LC:= REF(CLOSE,1);

R3:=SMA(MAX(CLOSE-LC,0),3,1)/SMA(ABS(CLOSE-LC),3,1)*100,COLORWHITE;

AQ:=ref(R3,2)>=ref(R3,1) and ref(R3,1)<R3 and ref(R3,1)<20,linethick0;

BQ:=ref(R3,2)<=ref(R3,1) and ref(R3,1)>R3 and ref(R3,1)>80,linethick0;

轉折點:IF(refx(AQ,1) or refx(BQ,1),if(refx(AQ,1),C,C),0) linethick;

StNo:=lbound(BARSSINCE(轉折點>0)); Last轉折:=轉折點[StNo];

for i=StNo+1 to datacount do begin

  if 轉折點[i]>0 then begin

    if ABS(轉折點[i]-Last轉折)>20 then begin

      Last轉折:=轉折點[i];

    end else begin

      轉折點[i]:=0;

    end;

  end;

end;

POLYLINE(轉折點>0,轉折點);

VERTLINE(轉折點>0) linedot linethick;

向版主報告此篇 |

2011-08-18 10:10

mori868
資深會員

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

回覆: 回覆: 請教

引用:

最初由 cgjj 發表

原碼:


LC:= REF(CLOSE,1);

R3:=SMA(MAX(CLOSE-LC,0),3,1)/SMA(ABS(CLOSE-LC),3,1)*100,COLORWHITE;

AQ:=ref(R3,2)>=ref(R3,1) and ref(R3,1)<R3 and ref(R3,1)<20,linethick0;

BQ:=ref(R3,2)<=ref(R3,1) and ref(R3,1)>R3 and ref(R3,1)>80,linethick0;

轉折點:IF(refx(AQ,1) or refx(BQ,1),if(refx(AQ,1),C,C),0) linethick;

StNo:=lbound(BARSSINCE(轉折點>0)); Last轉折:=轉折點[StNo];

for i=StNo+1 to datacount do begin

  if 轉折點[i]>0 then begin

    if ABS(轉折點[i]-Last轉折)>20 then begin

      Last轉折:=轉折點[i];

    end else begin

      轉折點[i]:=0;

    end;

  end;

end;

POLYLINE(轉折點>0,轉折點);

VERTLINE(轉折點>0) linedot linethick;

很不錯謝謝
1:垂直線如何改為信號燈10代表做多 12代表做空
2:做多信號一成立轉折點曲線畫紅線相反畫青線

向版主報告此篇 |

2011-08-18 11:03

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18121

回覆: 回覆: 回覆: 請教

引用:
最初由 mori868 發表
很不錯謝謝
1:垂直線如何改為信號燈10代表做多 12代表做空
2:做多信號一成立轉折點曲線畫紅線相反畫青線

做多信號條件未定義唷

您不算是新手了
這兩個簡單的問題, 相信您自己能處理
論壇上類似範例也很多, 就給您自己當功課了

向版主報告此篇 |

2011-08-18 11:09

mori868
資深會員

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

回覆: 回覆: 回覆: 回覆: 請教

引用:
最初由 cgjj 發表
做多信號條件未定義唷

您不算是新手了
這兩個簡單的問題, 相信您自己能處理
論壇上類似範例也很多, 就給您自己當功課了

最後k線會顯示兩個信號如何消除
Drawicon(refx(AQ,1) and 轉折點>0,L,10),PXDN7;
Drawicon(refx(BQ,1) and 轉折點>0,H,12),PXUP17;

畫曲線還是不行
POLYLINE(refx(AQ,1) and 轉折點>0,轉折點),Colorred;

請指導一下謝謝

向版主報告此篇 |

2011-08-18 12:15

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18121

回覆: 回覆: 回覆: 回覆: 回覆: 請教

引用:
最初由 mori868 發表
最後k線會顯示兩個信號如何消除
Drawicon(refx(AQ,1) and 轉折點>0,L,10),PXDN7;
Drawicon(refx(BQ,1) and 轉折點>0,H,12),PXUP17;

畫曲線還是不行
POLYLINE(refx(AQ,1) and 轉折點>0,轉折點),Colorred;

請指導一下謝謝

前面的程式, 同K線是不會有兩個訊號的

畫紅綠折線的方法, 以前就有提供過給您了唷, 請見:
http://www.chiefox.com.tw/bbs/showt...&threadid=10397

向版主報告此篇 |

2011-08-18 12:39

全部時間均為台灣時間, 現在時間為19:19

上一主題下一主題

顯示可列印版本 |

訂閱此主題

論壇跳轉:

主題評分:

論壇規定:

你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章

HTML語法禁止
vB 語法核准
表情符號核准
貼圖語法[IMG]核准

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