到奇狐勝券首頁 奇狐社區論壇 購買奇狐勝券 試用奇狐勝券
 
論壇首頁 你可以在這裡編輯你的資料，查看短訊，訂閱主題和論壇參數等等 免費會員註冊 會員列表 論壇幫助 論壇日曆 論壇搜索 加入我的最愛 登出論壇  
奇狐社區論壇 : Powered by vBulletin version 2.3.0 奇狐社區論壇 > 指標公式 > 問題交流 > [問題]求低為支撐高為壓力
  上一主題   下一主題
作者
主題 發表新主題    回覆主題
Markchu7
資深會員

註冊日期: Nov 2007
來　　自:
文章數量: 1501
[問題]求低為支撐高為壓力

CK:=DATE<>REF(DATE,1);
SP:=BARSLAST(CK)+1;

MM:=IF(SP>3,3,SP);
NN:=IF(SP>9,9,SP);
XC:=(3*C+H+L+O)/6;
L34SP:BARSLAST(RL=LLV(RL,IF(DATATYPE<4,NN,9)))+1,COLORRED,LINETHICK;
L34RH:=hhv(RL,L34SP),COLORRED,LINETHICK;
L34RL:=llv(RL,L34SP),COLORRED,LINETHICK;

H34SP:BARSLAST(RH=HHV(RH,IF(DATATYPE<4,NN,9)))+1,COLORBLUE,LINETHICK;
H34RH:=hhv(RH,H34SP),COLORBLUE,LINETHICK;
H34RL:=llv(RH,H34SP),COLORBLUE,LINETHICK;
高:REF(H34RH,BARSLAST(REFX(H34RH<>H34RL,1)=1)),COLORBLUE,LINEDOT;
低:REF(L34RL,BARSLAST(REFX(L34RH<>L34RL,1)=1)),COLORRED,LINEDOT;
求貼圖中符合條件的低為支撐,相同規則高為壓力,請指導,感謝!

Markchu7 附帶上了此圖片:

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

註冊日期: Oct 2003
來　　自:
文章數量: 18121
回覆: [問題]求低為支撐高為壓力

引用:
最初由 Markchu7 發表
CK:=DATE<>REF(DATE,1);
SP:=BARSLAST(CK)+1;

MM:=IF(SP>3,3,SP);
NN:=IF(SP>9,9,SP);
XC:=(3*C+H+L+O)/6;
L34SP:BARSLAST(RL=LLV(RL,IF(DATATYPE<4,NN,9)))+1,COLORRED,LINETHICK;
L34RH:=hhv(RL,L34SP),COLORRED,LINETHICK;
L34RL:=llv(RL,L34SP),COLORRED,LINETHICK;

H34SP:BARSLAST(RH=HHV(RH,IF(DATATYPE<4,NN,9)))+1,COLORBLUE,LINETHICK;
H34RH:=hhv(RH,H34SP),COLORBLUE,LINETHICK;
H34RL:=llv(RH,H34SP),COLORBLUE,LINETHICK;
高:REF(H34RH,BARSLAST(REFX(H34RH<>H34RL,1)=1)),COLORBLUE,LINEDOT;
低:REF(L34RL,BARSLAST(REFX(L34RH<>L34RL,1)=1)),COLORRED,LINEDOT;
求貼圖中符合條件的低為支撐,相同規則高為壓力,請指導,感謝!


要像黑線那樣的畫法, 需要向後Check( 未來數據)唷
您可要先想清楚

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

註冊日期: Nov 2007
來　　自:
文章數量: 1501

是的!感謝總版主提醒!運用上自己會小心!

向版主報告此篇 | 查IP位址
Old Post 2014-01-13 09:48
Markchu7 現在離線 點選這裡查看 Markchu7 的個人資料 點選這裡給 Markchu7 傳送一條短訊 查找更多關於 Markchu7 的文章 增加 Markchu7 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

引用:
最初由 Markchu7 發表
是的!感謝總版主提醒!運用上自己會小心!

尾端加入
原碼:


MCK:=0; M低:=C*0; Old高:=高[datacount];

StNo:=lbound(低); 

for i=datacount downto StNo do begin

  if Old高<>高[i] then begin

    Old高:=高[i]; MCK:=1;

  end;

  if i>StNo then begin

    if 低[i]<>低[i-1] then M低[i]:=MCK;

  end else begin

    M低[i]:=MCK;

  end;

  if M低[i] then MCK:=0;

end;

M低:ref(低,barslast(M低));

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

註冊日期: Nov 2007
來　　自:
文章數量: 1501

感謝指導,來去學習學習!

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

註冊日期: Nov 2007
來　　自:
文章數量: 1501

感謝總版主指導支撐線的部分!
有關壓力線自己依樣畫葫蘆試了一下,結果出現'指標數組下標越界....'的警語,可否請指導要如何改正?(因為您指導的源碼還不太懂,所以我的做法就是'高'的部分全部改成'低','低'的部分全部改成'高'!)

向版主報告此篇 | 查IP位址
Old Post 2014-01-13 11:31
Markchu7 現在離線 點選這裡查看 Markchu7 的個人資料 點選這裡給 Markchu7 傳送一條短訊 查找更多關於 Markchu7 的文章 增加 Markchu7 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

引用:
最初由 Markchu7 發表
感謝總版主指導支撐線的部分!
有關壓力線自己依樣畫葫蘆試了一下,結果出現'指標數組下標越界....'的警語,可否請指導要如何改正?(因為您指導的源碼還不太懂,所以我的做法就是'高'的部分全部改成'低','低'的部分全部改成'高'!) 


原碼:


MCK:=0; M低:=C*0; Old高:=高[datacount];

StNo:=lbound(低); 

for i=datacount downto StNo do begin

  if Old高<>高[i] then begin

    Old高:=高[i]; MCK:=1;

  end;

  if i>StNo then begin

    if 低[i]<>低[i-1] then M低[i]:=MCK;

  end else begin

    M低[i]:=MCK;

  end;

  if M低[i] then MCK:=0;

end;

M低:ref(低,barslast(M低));

MCK:=0; M高:=C*0; Old低:=低[datacount];

StNo:=lbound(低); 

for i=datacount downto StNo do begin

  if Old低<>低[i] then begin

    Old低:=低[i]; MCK:=1;

  end;

  if i>StNo then begin

    if 高[i]<>高[i-1] then M高[i]:=MCK;

  end else begin

    M高[i]:=MCK;

  end;

  if M高[i] then MCK:=0;

end;

M高:ref(高,barslast(M高));

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

註冊日期: Nov 2007
來　　自:
文章數量: 1501

一樣出現'指標數組下標越界....'的警語!

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

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

引用:
最初由 Markchu7 發表
一樣出現'指標數組下標越界....'的警語!


若您的 高 與 低 起點各自不同
就會產生應用上的問題

偷懶的解決方式, 是將
StNo:=lbound(低);

改為
StNo:=MAX( lbound(低) , lbound(高));

這樣改, 算出的歷史首個壓力線請不要看

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

註冊日期: Nov 2007
來　　自:
文章數量: 1501

OK!我試試!

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

論壇跳轉:
主題評分:

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