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

註冊日期: May 2011
來　　自: 台中
文章數量: 164
[問題]

DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-162;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,6)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,6)=6-1 or ISLASTBAR;
BKH:=HHV(HIGH,BKFTSP+1);
BKL:=LLV(LOW,BKFTSP+1);
BKH:=SETVAL(BKLT,BKH,-BKFTSP,BKH);
BKL:=SETVAL(BKLT,BKL,-BKFTSP,BKL);
BKNSP:=SUMBARS(BKLT,3);
MAH:=SUM(BKH*BKLT,BKNSP)/3;
MAL:=SUM(BKL*BKLT,BKNSP)/3;
MMH:=MAH+(MAH-BKH)/3;
MML:=MAL-(BKL-MAL)/3;
H3KsM:IF(BKH>MMH,MAH,MMH);
L3KsM:IF(BKL<MML,MAL,MML);
LBMH:=LBOUND(H3KsM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3KsM,SetNewLB); x:=SETLBOUND(L3KsM,SetNewLB);
end;
H3KsM:=SETVAL(BKLT,H3KsM,-BKFTSP,H3KsM),colorff00ff;
L3KsM:=SETVAL(BKLT,L3KsM,-BKFTSP,L3KsM),colorff00ff;

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
當白色1~2轉下跌時上階梯線不顯示(只顯示上方數值)一直到
煩下一個紅色下階階梯線1~2轉為上升時.換不顯示下階梯線
請總版主修改謝謝!

santienchang 附帶上了此圖片:

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

註冊日期: Oct 2003
來　　自:
文章數量: 18102
回覆: [問題]

引用:
最初由 santienchang 發表
DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-162;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,6)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,6)=6-1 or ISLASTBAR;
BKH:=HHV(HIGH,BKFTSP+1);
BKL:=LLV(LOW,BKFTSP+1);
BKH:=SETVAL(BKLT,BKH,-BKFTSP,BKH);
BKL:=SETVAL(BKLT,BKL,-BKFTSP,BKL);
BKNSP:=SUMBARS(BKLT,3);
MAH:=SUM(BKH*BKLT,BKNSP)/3;
MAL:=SUM(BKL*BKLT,BKNSP)/3;
MMH:=MAH+(MAH-BKH)/3;
MML:=MAL-(BKL-MAL)/3;
H3KsM:IF(BKH>MMH,MAH,MMH);
L3KsM:IF(BKL<MML,MAL,MML);
LBMH:=LBOUND(H3KsM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3KsM,SetNewLB); x:=SETLBOUND(L3KsM,SetNewLB);
end;
H3KsM:=SETVAL(BKLT,H3KsM,-BKFTSP,H3KsM),colorff00ff;
L3KsM:=SETVAL(BKLT,L3KsM,-BKFTSP,L3KsM),colorff00ff;

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
當白色1~2轉下跌時上階梯線不顯示(只顯示上方數值)一直到
煩下一個紅色下階階梯線1~2轉為上升時.換不顯示下階梯線
請總版主修改謝謝!


起點如何決定要畫哪一個階梯線?

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

註冊日期: May 2011
來　　自: 台中
文章數量: 164

DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-18;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,6)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,6)=6-1 or ISLASTBAR;
BKH:=HHV(HIGH,BKFTSP+1);
BKL:=LLV(LOW,BKFTSP+1);
BKH:=SETVAL(BKLT,BKH,-BKFTSP,BKH);
BKL:=SETVAL(BKLT,BKL,-BKFTSP,BKL);
BKNSP:=SUMBARS(BKLT,3);
MAH:=SUM(BKH*BKLT,BKNSP)/3;
MAL:=SUM(BKL*BKLT,BKNSP)/3;
MMH:=MAH+(MAH-BKH)/3;
MML:=MAL-(BKL-MAL)/3;
H3KsM:IF(BKH>MMH,MAH,MMH);
L3KsM:IF(BKL<MML,MAL,MML);
LBMH:=LBOUND(H3KsM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3KsM,SetNewLB); x:=SETLBOUND(L3KsM,SetNewLB);
end;
H3KsM:=SETVAL(BKLT,H3KsM,-BKFTSP,H3KsM),colorff00ff;
L3KsM:=SETVAL(BKLT,L3KsM,-BKFTSP,L3KsM),colorff00ff;
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
用上公式今日開盤跨越昨尾盤第18根起算.
當H3KsM1<H3KsM2=H3KsM3開始不畫線只畫L3KsM單一線.
一直等到L3KsM2>L3KsM1=L3KsM3開始不畫線只畫H3KsM單一線
如上圖示意謝謝您!

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

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

引用:
最初由 santienchang 發表
DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-18;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,6)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,6)=6-1 or ISLASTBAR;
BKH:=HHV(HIGH,BKFTSP+1);
BKL:=LLV(LOW,BKFTSP+1);
BKH:=SETVAL(BKLT,BKH,-BKFTSP,BKH);
BKL:=SETVAL(BKLT,BKL,-BKFTSP,BKL);
BKNSP:=SUMBARS(BKLT,3);
MAH:=SUM(BKH*BKLT,BKNSP)/3;
MAL:=SUM(BKL*BKLT,BKNSP)/3;
MMH:=MAH+(MAH-BKH)/3;
MML:=MAL-(BKL-MAL)/3;
H3KsM:IF(BKH>MMH,MAH,MMH);
L3KsM:IF(BKL<MML,MAL,MML);
LBMH:=LBOUND(H3KsM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3KsM,SetNewLB); x:=SETLBOUND(L3KsM,SetNewLB);
end;
H3KsM:=SETVAL(BKLT,H3KsM,-BKFTSP,H3KsM),colorff00ff;
L3KsM:=SETVAL(BKLT,L3KsM,-BKFTSP,L3KsM),colorff00ff;
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
用上公式今日開盤跨越昨尾盤第18根起算.
當H3KsM1<H3KsM2=H3KsM3開始不畫線只畫L3KsM單一線.
一直等到L3KsM2>L3KsM1=L3KsM3開始不畫線只畫H3KsM單一線
如上圖示意謝謝您!


定義不完整
未考量 H3KsM1>H3KsM2 and L3KsM2<L3KsM1 這種情況

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

註冊日期: May 2011
來　　自: 台中
文章數量: 164

引用:
最初由 cgjj 發表
定義不完整
未考量 H3KsM1>H3KsM2 and L3KsM2<L3KsM1 這種情況

謝謝指導!
當開盤後L3KsM1<昨尾盤L3KsM 時當日 H3KsM2線不顯示
直到下次L3KsM2>L3KsM1時換L3KsM3線開始不顯示.....
當開盤後H3KsM1>昨尾盤H3KsM時當日 L3KsM2線不顯示
直到下次H3KsM2<H3KsM1時換HKsM3線開始不顯示......

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

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

引用:
最初由 santienchang 發表
謝謝指導!
當開盤後L3KsM1<昨尾盤L3KsM 時當日 H3KsM2線不顯示
直到下次L3KsM2>L3KsM1時換L3KsM3線開始不顯示.....
當開盤後H3KsM1>昨尾盤H3KsM時當日 L3KsM2線不顯示
直到下次H3KsM2<H3KsM1時換HKsM3線開始不顯示......


定義仍是不完整
未考量兩者同時成立的情況

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

註冊日期: May 2011
來　　自: 台中
文章數量: 164

引用:
最初由 cgjj 發表
定義仍是不完整
未考量兩者同時成立的情況

只顧23而未慮1?佩服!
開盤後L3KsM1範圍最後一根收盤<上一次L3KsM
開盤後H3KsM1範圍最後一根收盤>上一次L3KsM
作過濾.或有更好方式?請指導.謝謝總板主!

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

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

引用:
最初由 santienchang 發表
只顧23而未慮1?佩服!
開盤後L3KsM1範圍最後一根收盤<上一次L3KsM
開盤後H3KsM1範圍最後一根收盤>上一次L3KsM
作過濾.或有更好方式?請指導.謝謝總板主!


很抱歉
模糊空間仍是太大, 沒能精確了解您要如何判斷畫線


以下給您一個簡單的範例
示範如何 僅在條件有成立之處畫線段
當 M05>M10 畫 HH 不畫 LL
當 M05<M10 畫 LL 不畫 HH
請先將範例看懂, 再自行去處理您想做的部分

HH:=H; LL:=L;
M05:=MA(C,5);
M10:=MA(C,10);
UU:M05>M10 linethick colormagenta;
DD:M10>M05 linethick colorgreen;
PARTLINE(sum(UU,2)=2,HH) colormagenta;
PARTLINE(sum(DD,2)=2,LL) colorgreen;

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

論壇跳轉:
主題評分:

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