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

註冊日期: Mar 2006
來　　自:
文章數量: 45
[求救] 請教如何改連續為當日

Y:=((HIGH + LOW) / 2);
RED:=SMA(Y,8,1);
R2:=REF(RED,5);
KU1:=IF((HIGH = HHV(HIGH,3)),1,0);
KD1:=IF((LOW = LLV(LOW,3)),1,0);
UL:=IF((((REF(KU1,2) = 1) AND (REF(KU1,1) = 0)) AND (KU1 = 0)),REF(HIGH,2),REF(HIGH,(2 + BARSLAST((((REF(KU1,2) = 1) AND (REF(KU1,1) = 0)) AND (KU1 = 0))))));
上碎型:IF((HIGH >= R2),UL,REF(UL,BARSLAST((HIGH > R2)))),POINTDOT,colorFF00FF;
DL:=IF((((REF(KD1,2) = 1) AND (REF(KD1,1) = 0)) AND (KD1 = 0)),REF(LOW,2),REF(LOW,(2 + BARSLAST((((REF(KD1,2) = 1) AND (REF(KD1,1) = 0)) AND (KD1 = 0))))));
下碎型:IF((LOW <= R2),DL,REF(DL,BARSLAST((LOW <= R2)))),POINTDOT,colorFFFF;
DRAWICON(((HIGH > 上碎型) AND (REF(HIGH,1) < REF(上碎型,1))),(LOW * 0.995),4);
DRAWICON(((LOW < 下碎型) AND (REF(LOW,1) > REF(下碎型,1))),(HIGH * 1.005),5);

--------------------------------------------------------------------------------------------------

1.請教如何讓上述指標(上.下碎型)
只從當天第一根k棒起算
2.買賣箭頭只顯示第一個(而不是連續的買或賣)
而最後13:29顯示"平倉'

謝謝指點 !!

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

註冊日期: Oct 2003
來　　自:
文章數量: 18094
回覆: [求救] 請教如何改連續為當日

引用:
最初由 jeff_6880 發表
Y:=((HIGH + LOW) / 2);
RED:=SMA(Y,8,1);
R2:=REF(RED,5);
KU1:=IF((HIGH = HHV(HIGH,3)),1,0);
KD1:=IF((LOW = LLV(LOW,3)),1,0);
UL:=IF((((REF(KU1,2) = 1) AND (REF(KU1,1) = 0)) AND (KU1 = 0)),REF(HIGH,2),REF(HIGH,(2 + BARSLAST((((REF(KU1,2) = 1) AND (REF(KU1,1) = 0)) AND (KU1 = 0))))));
上碎型:IF((HIGH >= R2),UL,REF(UL,BARSLAST((HIGH > R2)))),POINTDOT,colorFF00FF;
DL:=IF((((REF(KD1,2) = 1) AND (REF(KD1,1) = 0)) AND (KD1 = 0)),REF(LOW,2),REF(LOW,(2 + BARSLAST((((REF(KD1,2) = 1) AND (REF(KD1,1) = 0)) AND (KD1 = 0))))));
下碎型:IF((LOW <= R2),DL,REF(DL,BARSLAST((LOW <= R2)))),POINTDOT,colorFFFF;
DRAWICON(((HIGH > 上碎型) AND (REF(HIGH,1) < REF(上碎型,1))),(LOW * 0.995),4);
DRAWICON(((LOW < 下碎型) AND (REF(LOW,1) > REF(下碎型,1))),(HIGH * 1.005),5);

--------------------------------------------------------------------------------------------------

1.請教如何讓上述指標(上.下碎型)
只從當天第一根k棒起算
2.買賣箭頭只顯示第一個(而不是連續的買或賣)
而最後13:29顯示"平倉'

謝謝指點 !!


ck:=date;
ck:=barslast(ck=ck[datacount])>=0;
HH:=H*ck; LL:=L*ck;

Y:=((HH + LL) / 2);
RED:=SMA(Y,8,1);
R2:=REF(RED,5);
KU1:=IF((HH = HHV(HH,3)),1,0);
KD1:=IF((LL = LLV(LL,3)),1,0);
UL:=IF((((REF(KU1,2) = 1) AND (REF(KU1,1) = 0)) AND (KU1 = 0)),REF(HH,2),REF(HH,(2 + BARSLAST((((REF(KU1,2) = 1) AND (REF(KU1,1) = 0)) AND (KU1 = 0))))));
上碎型:IF((HH >= R2),UL,REF(UL,BARSLAST((HH > R2)))),POINTDOT,colorFF00FF;
DL:=IF((((REF(KD1,2) = 1) AND (REF(KD1,1) = 0)) AND (KD1 = 0)),REF(LL,2),REF(LL,(2 + BARSLAST((((REF(KD1,2) = 1) AND (REF(KD1,1) = 0)) AND (KD1 = 0))))));
下碎型:IF((LL <= R2),DL,REF(DL,BARSLAST((LL <= R2)))),POINTDOT,colorFFFF;

BB:=((HH > 上碎型) AND (REF(HH,1) < REF(上碎型,1)));
SS:=((LL < 下碎型) AND (REF(LL,1) > REF(下碎型,1)));
CK:=BB-SS;
CK:=ref(CK,barslast(CK<>0));
CK:=if(CK<>ref(CK,1) or barpos=lbound(CK),CK,0);
BB:=CK=1;
SS:=CK=-1;
DRAWICON(BB,(LL * 0.995),4);
DRAWICON(SS,(HH * 1.005),5);

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

註冊日期: Mar 2006
來　　自:
文章數量: 45

總版主..對不起~
是我語意不清.....

應該是"每一天"都顯示
也就是說計算值是每一天第一根K棒起算

這項指標是運用在期指一分鐘看盤
所以買賣箭頭最後只有落在13:29之前
13:30後就不再顯示

再次謝謝您的指導!!!

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

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

引用:
最初由 jeff_6880 發表
總版主..對不起~
是我語意不清.....

應該是"每一天"都顯示
也就是說計算值是每一天第一根K棒起算

這項指標是運用在期指一分鐘看盤
所以買賣箭頭最後只有落在13:29之前
13:30後就不再顯示

再次謝謝您的指導!!! 

原碼:


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

StNo:=lbound(BARSSINCE(CK));

TE:=TIME; OutTE:=133000;

HH:=H; LL:=L; ZeroAry:=C*0;

BB:=ZeroAry; SS:=ZeroAry; 

上碎型:ZeroAry colorFF00FF linethick0;

下碎型:ZeroAry color00FFFF linethick0;

for i=StNo to datacount do begin

  if CK[i]=1 then begin

    x:=setlbound(HH,i); x:=setlbound(LL,i);

    Y:=((HH + LL) / 2);

    RED:=SMA(Y,8,1);

    R2:=REF(RED,5);

    KU1:=IF((HH = HHV(HH,3)),1,0);

    KD1:=IF((LL = LLV(LL,3)),1,0);

    UL:=IF((((REF(KU1,2) = 1) AND (REF(KU1,1) = 0)) AND (KU1 = 0)),REF(HH,2),REF(HH,(2 + BARSLAST((((REF(KU1,2) = 1) AND (REF(KU1,1) = 0)) AND (KU1 = 0))))));

    上碎型S:=IF((HH >= R2),UL,REF(UL,BARSLAST((HH > R2))));

    DL:=IF((((REF(KD1,2) = 1) AND (REF(KD1,1) = 0)) AND (KD1 = 0)),REF(LL,2),REF(LL,(2 + BARSLAST((((REF(KD1,2) = 1) AND (REF(KD1,1) = 0)) AND (KD1 = 0))))));

    下碎型S:=IF((LL <= R2),DL,REF(DL,BARSLAST((LL <= R2))));

    DBB:=((HH > 上碎型S) AND (REF(HH,1) < REF(上碎型S,1)));

    DSS:=((LL < 下碎型S) AND (REF(LL,1) > REF(下碎型S,1)));

  end;

  if i>=lbound(DBB) then BB[i]:=DBB[i] and TE[i]<OutTE;

  if i>=lbound(DSS) then SS[i]:=DSS[i] or TE[i]>=OutTE; 

  if i>=lbound(上碎型S) then 上碎型[i]:=上碎型S[i];

  if i>=lbound(下碎型S) then 下碎型[i]:=下碎型S[i];

end;

PARTLINE(sum(上碎型>0,2)=2 ,上碎型),linedot,colorFF00FF;

PARTLINE(sum(下碎型>0,2)=2,下碎型),linedot,color00FFFF;

CK:=BB-SS;

CK:=ref(CK,barslast(CK<>0));

CK:=if(CK<>ref(CK,1) or barpos=lbound(CK),CK,0);

BB:=CK=1;

SS:=CK=-1;

DRAWICON(BB,(L * 0.995),4);

DRAWICON(SS,(H * 1.005),5);

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

註冊日期: Mar 2006
來　　自:
文章數量: 45

非常感謝總版主的熱心指導

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

註冊日期: Mar 2006
來　　自:
文章數量: 45



請教總版主該如何處理
謝謝

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

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

引用:
最初由 jeff_6880 發表


請教總版主該如何處理
謝謝


那根啟動位置並沒有錯唷
您副圖的 "上下碎型" 指標, 並非是只從當天第一根k棒起算
計算起點不同, 結果當然就不一樣囉

另外那根訊號不見是正常的
因為給您的範例是做單邊的範例

把這段過濾動作刪除, 即可見到
CK:=BB-SS;
CK:=ref(CK,barslast(CK<>0));
CK:=if(CK<>ref(CK,1) or barpos=lbound(CK),CK,0);
BB:=CK=1;
SS:=CK=-1;

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

註冊日期: Mar 2006
來　　自:
文章數量: 45



這樣實在看不懂??
單邊改為雙邊.不是晚輩能力所及
還請總版主協助處理~謝謝!!

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

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

引用:
最初由 jeff_6880 發表


這樣實在看不懂??
單邊改為雙邊.不是晚輩能力所及
還請總版主協助處理~謝謝!!


將
CK:=BB-SS;
CK:=ref(CK,barslast(CK<>0));
CK:=if(CK<>ref(CK,1) or barpos=lbound(CK),CK,0);
BB:=CK=1;
SS:=CK=-1;

改為
CK:=BB-SS;
SP1:=barslast(DATE<>REF(DATE,1) or barpos=1);
SP2:=barslast(CK<>0);
FSP:=if(SP2<SP1,SP2,SP1);
CK:=ref(CK,FSP);
CK:=if(CK<>ref(CK,1) or SP1=0 or barpos=lbound(CK),CK,0);
BB:=CK=1;
SS:=CK=-1;

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

註冊日期: Mar 2006
來　　自:
文章數量: 45



謝謝總版主熱心指導
感恩~

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

論壇跳轉:
主題評分:

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