奇狐社區論壇 - 如何取平均價

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 如何取平均價 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=17310)

由 w4588 在 2012-12-04 13:10 發表:

如何取平均價

總版主您好

下列程式我上線使用是OK
也非常好用
謝謝

但想在顯示昨日的高YHP、低YLP價畫線
同時也能顯示其平均價畫線
但我試稿了老半天
卻無疾而終
真傷腦經
想麻煩您指導
謝謝

HH:=H; LL:=L;
CK:=date<>ref(date,1);
CKSP:=barslast(CK);
YHSP:=REF(HHVBARS(H,CKSP+1),CKSP+1)+CKSP+1;
YLSP:=REF(LLVBARS(L,CKSP+1),CKSP+1)+CKSP+1;
YHP:datacount-YHSP[datacount];
YLP:datacount-YLSP[datacount];
PARTLINE(barpos>YHP,HH[YHP]);
PARTLINE(barpos>YLP,LL[YLP]);
DRAWNUMBER(barpos=YHP,HH[YHP],HH[YHP],0) ALIGN2 pxup8;
DRAWNUMBER(barpos=YLP,LL[YLP],LL[YLP],0) ALIGN2 pxup8;
NNP:=datacount-CKSP[datacount];
PARTLINE(barpos>NNP,HH[NNP]);
PARTLINE(barpos>NNP,LL[NNP]);
DRAWNUMBER(barpos=NNP,HH[NNP],HH[NNP],0) ALIGN2 pxup8;
DRAWNUMBER(barpos=NNP,LL[NNP],LL[NNP],0) ALIGN2 pxup8;

__________________
ARTHUR

由 cgjj 在 2012-12-04 14:45 發表:

回覆: 如何取平均價

引用:
最初由 w4588 發表
總版主您好

下列程式我上線使用是OK
也非常好用
謝謝

但想在顯示昨日的高YHP、低YLP價畫線
同時也能顯示其平均價畫線
但我試稿了老半天
卻無疾而終
真傷腦經
想麻煩您指導
謝謝

HH:=H; LL:=L;
CK:=date<>ref(date,1);
CKSP:=barslast(CK);
.............................

於尾端加入
YMM:=(HH[YHP]+LL[YLP])/2;
PARTLINE(barpos>NNP,YMM);
DRAWNUMBER(barpos=NNP,YMM,YMM,0) ALIGN2 pxup8;

由 w4588 在 2012-12-04 16:10 發表:

HH:=H; LL:=L;
CK:=date<>ref(date,1);
CKSP:=barslast(CK);
總版主

請問加上三條指令後
卻沒出現昨日平均價
不知哪裡出問題
請指導
謝謝

YHSP:=REF(HHVBARS(H,CKSP+1),CKSP+1)+CKSP+1;
YLSP:=REF(LLVBARS(L,CKSP+1),CKSP+1)+CKSP+1;
YHP:datacount-YHSP[datacount];
YLP:datacount-YLSP[datacount];
PARTLINE(barpos>YHP,HH[YHP]) COLORCYAN;//顯示昨高數據及線
PARTLINE(barpos>YLP,LL[YLP]) COLORCYAN;//顯示昨低數據及線
DRAWNUMBER(barpos=YHP,HH[YHP],HH[YHP],0) ALIGN2 pxup8 COLORCYAN;;
DRAWNUMBER(barpos=YLP,LL[YLP],LL[YLP],0) ALIGN2 pxup8 COLORCYAN;;
NNP:=datacount-CKSP[datacount];
PARTLINE(barpos>NNP,HH[NNP]);
PARTLINE(barpos>NNP,LL[NNP]);
DRAWNUMBER(barpos=NNP,HH[NNP],HH[NNP],0) ALIGN2 pxup8;
DRAWNUMBER(barpos=NNP,LL[NNP],LL[NNP],0) ALIGN2 pxup8;
YMM:=(HH[YHP]+LL[YLP])/2;
PARTLINE(barpos>NNP,YMM);
DRAWNUMBER(barpos=NNP,YMM,YMM,0) ALIGN2 pxup8;

__________________
ARTHUR

由 cgjj 在 2012-12-04 16:14 發表:

引用:
最初由 w4588 發表
HH:=H; LL:=L;
CK:=date<>ref(date,1);
CKSP:=barslast(CK);
總版主

請問加上三條指令後
卻沒出現昨日平均價
不知哪裡出問題
請指導
謝謝

YHSP:=REF(HHVBARS(H,CKSP+1),CKSP+1)+CKSP+1;
YLSP:=REF(LLVBARS(L,CKSP+1),CKSP+1)+CKSP+1;
YHP:datacount-YHSP[datacount];
YLP:datacount-YLSP[datacount];
PARTLINE(barpos>YHP,HH[YHP]) COLORCYAN;//顯示昨高數據及線
PARTLINE(barpos>YLP,LL[YLP]) COLORCYAN;//顯示昨低數據及線
DRAWNUMBER(barpos=YHP,HH[YHP],HH[YHP],0) ALIGN2 pxup8 COLORCYAN;;
DRAWNUMBER(barpos=YLP,LL[YLP],LL[YLP],0) ALIGN2 pxup8 COLORCYAN;;
NNP:=datacount-CKSP[datacount];
PARTLINE(barpos>NNP,HH[NNP]);
PARTLINE(barpos>NNP,LL[NNP]);
DRAWNUMBER(barpos=NNP,HH[NNP],HH[NNP],0) ALIGN2 pxup8;
DRAWNUMBER(barpos=NNP,LL[NNP],LL[NNP],0) ALIGN2 pxup8;
YMM:=(HH[YHP]+LL[YLP])/2;
PARTLINE(barpos>NNP,YMM);
DRAWNUMBER(barpos=NNP,YMM,YMM,0) ALIGN2 pxup8;

試過正常唷
它會畫在今天K棒的範圍
若看不到, 請試著縮放K棒或換個商品看看

有可能是兩個價太相近, 被另一條壓掉了

由 w4588 在 2012-12-04 16:41 發表:

總版主您好
30分最高7647及最低7560
沒顯示平均價
不知問題出在哪裡

__________________
ARTHUR

由 w4588 在 2012-12-04 16:43 發表:

電話聯絡

總版主
我可用電話與您聯絡嗎?

__________________
ARTHUR

由 cgjj 在 2012-12-04 16:52 發表:

引用:
最初由 w4588 發表
總版主您好
30分最高7647及最低7560
沒顯示平均價
不知問題出在哪裡

有呀, 請仔細看

今天範圍它畫了
7604, 7582, 7560 三條線
其中的 7604 就是您要的平均

今7560與昨低7560在同價位, 兩線相疊
所以青色的水平線接綠色的水平線

由 w4588 在 2012-12-04 17:00 發表:

總版主
請問7604可以劃在昨天嗎
這樣看起來會比較一致性
自己也不會看錯線
麻煩你了

__________________
ARTHUR

由 cgjj 在 2012-12-04 17:39 發表:

引用:
最初由 w4588 發表
總版主
請問7604可以劃在昨天嗎
這樣看起來會比較一致性
自己也不會看錯線
麻煩你了

將
PARTLINE(barpos>NNP,YMM);
DRAWNUMBER(barpos=NNP,YMM,YMM,0) ALIGN2 pxup8;

改為
PARTLINE(barpos>MIN(YHP,YLP),YMM) linedot;
DRAWNUMBER(barpos=MIN(YHP,YLP),YMM,YMM,0) ALIGN2 pxup8;

由 w4588 在 2012-12-05 05:51 發表:

總版主您好
已搞定了
非常謝謝

__________________
ARTHUR

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

在這個頁面顯示本主題全部的 10 個文章