 |
ivancclai
資深會員
註冊日期: Apr 2017
來 自: New Taipei city
文章數量: 251 |
大平台上 畫線小平台線
版主你好
若我想在 ˊ日k上劃ˊ60分k 及ˊ60 分k劃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 ;
|
|
向版主報告此篇 |  |
|
2025-09-24 01:30 |
|
|
|  |
 |
ivancclai
資深會員
註冊日期: Apr 2017
來 自: New Taipei city
文章數量: 251 |
版主是的
我沒說清楚
我只要劃最後一根15 分K劃現在ˊ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 在 2025-09-24 17:51 編輯 |
向版主報告此篇 |  |
|
2025-09-24 17:48 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18190 |
引用: 最初由 ivancclai 發表
版主是的
我沒說清楚
我只要劃最後一根15 分K劃現在ˊ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
收盤價沒有什麼好畫的~~
60分最新一根的收 與 15分最新一根的收 必然相等
強烈建議您!
不要有在大週期中看小週期的K棒想法~~
下面的公式,雖然可以畫出小週期最末根O、H、L、前收
但會因此付出很沉重的計算代價!
(因為需跨週期引用,且需要四次,很耗CPU的!)
副程式
原碼: KYC:REF(C,1);
KH:H;
KO:O;
KL:L;
主程式
原碼: PPN:=0;
KYC:"KK.KYC#MIN15" COLOR00FFFF linethick;
KH: "KK.KH#MIN15" COLOR0000FF linethick;
KO: "KK.KO#MIN15" COLORFFFFFF linethick;
KL: "KK.KL#MIN15" COLOR00FF00 linethick;
kHa: (KH+KL)/2 COLOR0066FF linethick;
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,KO,KO,16,0.1),SHIFT1 COLORFFFFFF, LINETHICK4 LINEDASHDOT ;
|
|
向版主報告此篇 |  |
|
2025-09-25 08:48 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|