奇狐社區論壇 (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=24343)

大平台上 畫線小平台線

版主你好
若我想在 ˊ日k上劃ˊ60分k 及ˊ60 分ｋ劃15分k線

請版主幫我更正錯誤 我不知錯在哪裡 請版主協助我


副程式

// ===================== KK 0923A02 ==================================
KLINE(OPEN,HIGH,LOW,CLOSE,0);
//============================================

RK:=C>O or C=O and (C>REF(C,1) or BARPOS=1);
BK:=C<O or C=O and C<=REF(C,1);
EXPLAIN (RK ,'紅K'),color0000FF;
EXPLAIN (BK ,'黑k'),color00FF00;

K點位:= H-L;


KYC:=REF(C,1) COLOR00FFFF;
KH:=H COLOR0000FF;
KC:=C COLOR00FFFF;
KO:=O COLORFFFFFF;
KL:=L COLOR00FF00;
kHa:= (H+L)/2 COLOR0066FF;
//=========================


主程式


// =====================Call KK 0923A02 ==================================
PPN:=0;

KYC:"KK.KYC#MIN15" COLOR00FFFF;
KH: "KK.KH#MIN15" COLOR0000FF;
KC: "KK.KC#MIN15" COLOR00FFFF;
KO: "KK.KO#MIN15" COLORFFFFFF;
KL: "KK.KL#MIN15" COLOR00FF00;
kHa: (KH+KL)/2 COLOR0066FF;

STICKLINE(ISLASTBAR,KH,KH,16,0.1),SHIFT1 COLORFF, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KL,KL,16,0.1),SHIFT1 COLORFF00, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KHa,KHa,16,0.1),SHIFT1 COLOR0066FF, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KYC,KYC,24,0.1),SHIFT0 COLOR00FFFF, LINETHICK2 LINEDASHDOT ;
STICKLINE(ISLASTBAR,KC,KC,16,0.1),SHIFT1 COLORFFFF, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KO,KO,16,0.1),SHIFT1 COLORFFFFFF, LINETHICK4 LINEDASHDOT ;

回覆: 大平台上 畫線小平台線

引用:

---

最初由 ivancclai 發表
[B]版主你好
若我想在 ˊ日k上劃ˊ60分k 及ˊ60 分ｋ劃15分k線

請版主幫我更正錯誤 我不知錯在哪裡 請版主協助我
....(略)....

---

版主是的

我沒說清楚

我只要劃最後一根15 分Ｋ劃現在ˊ60 分K上 如程式範例 可是我寫的 不會劃出 才請版主協助



副程式

// ===================== KK 0923A02 ==================================
KLINE(OPEN,HIGH,LOW,CLOSE,0);
//============================================

RK:=C>O or C=O and (C>REF(C,1) or BARPOS=1);
BK:=C<O or C=O and C<=REF(C,1);
EXPLAIN (RK ,'紅K'),color0000FF;
EXPLAIN (BK ,'黑k'),color00FF00;

K點位:= H-L;


KYC:=REF(C,1) COLOR00FFFF;
KH:=H COLOR0000FF;
KC:=C COLOR00FFFF;
KO:=O COLORFFFFFF;
KL:=L COLOR00FF00;
kHa:= (H+L)/2 COLOR0066FF;
//=========================


主程式


// =====================Call KK 0923A02 ==================================
PPN:=0;

KYC:"KK.KYC#MIN15" COLOR00FFFF;
KH: "KK.KH#MIN15" COLOR0000FF;
KC: "KK.KC#MIN15" COLOR00FFFF;
KO: "KK.KO#MIN15" COLORFFFFFF;
KL: "KK.KL#MIN15" COLOR00FF00;
kHa: (KH+KL)/2 COLOR0066FF;

STICKLINE(ISLASTBAR,KH,KH,16,0.1),SHIFT1 COLORFF, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KL,KL,16,0.1),SHIFT1 COLORFF00, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KHa,KHa,16,0.1),SHIFT1 COLOR0066FF, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KYC,KYC,24,0.1),SHIFT0 COLOR00FFFF, LINETHICK2 LINEDASHDOT ;
STICKLINE(ISLASTBAR,KC,KC,16,0.1),SHIFT1 COLORFFFF, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KO,KO,16,0.1),SHIFT1 COLORFFFFFF, LINETHICK4 LINEDASHDOT ;

//========================
在ˊ最後一根60分K上　劃最後一根15分K 開高低收 1/2k

引用:

---

最初由 ivancclai 發表
版主是的

我沒說清楚

我只要劃最後一根15 分Ｋ劃現在ˊ60 分K上 如程式範例 可是我寫的 不會劃出 才請版主協助



副程式

// ===================== KK 0923A02 ==================================
KLINE(OPEN,HIGH,LOW,CLOSE,0);
//============================================

RK:=C>O or C=O and (C>REF(C,1) or BARPOS=1);
BK:=C<O or C=O and C<=REF(C,1);
EXPLAIN (RK ,'紅K'),color0000FF;
EXPLAIN (BK ,'黑k'),color00FF00;

K點位:= H-L;


KYC:=REF(C,1) COLOR00FFFF;
KH:=H COLOR0000FF;
KC:=C COLOR00FFFF;
KO:=O COLORFFFFFF;
KL:=L COLOR00FF00;
kHa:= (H+L)/2 COLOR0066FF;
//=========================


主程式


// =====================Call KK 0923A02 ==================================
PPN:=0;

KYC:"KK.KYC#MIN15" COLOR00FFFF;
KH: "KK.KH#MIN15" COLOR0000FF;
KC: "KK.KC#MIN15" COLOR00FFFF;
KO: "KK.KO#MIN15" COLORFFFFFF;
KL: "KK.KL#MIN15" COLOR00FF00;
kHa: (KH+KL)/2 COLOR0066FF;

STICKLINE(ISLASTBAR,KH,KH,16,0.1),SHIFT1 COLORFF, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KL,KL,16,0.1),SHIFT1 COLORFF00, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KHa,KHa,16,0.1),SHIFT1 COLOR0066FF, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KYC,KYC,24,0.1),SHIFT0 COLOR00FFFF, LINETHICK2 LINEDASHDOT ;
STICKLINE(ISLASTBAR,KC,KC,16,0.1),SHIFT1 COLORFFFF, LINETHICK2 LINEDASHDOT;
STICKLINE(ISLASTBAR,KO,KO,16,0.1),SHIFT1 COLORFFFFFF, LINETHICK4 LINEDASHDOT ;

//========================
在ˊ最後一根60分K上　劃最後一根15分K 開高低收 1/2k

---