 |
santienchang
資深會員
註冊日期: May 2011
來 自: 台中
文章數量: 164 |
引用: 最初由 cgjj 發表
變數 : XX; //顯示數值並畫線
變數 : XX linethick; //顯示數值不畫線
變數 := XX; //不顯示任何東西
DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-36;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,9)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,9)=9-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;
H3MH:IF(BKH>MMH,MAH,MMH) linethick;
L3ML:IF(BKL<MML,MAL,MML) linethick;
LBMH:=LBOUND(H3gM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3gM,SetNewLB); x:=SETLBOUND(L3gM,SetNewLB);
end;
H3gM:=SETVAL(BKLT,H3gM,-BKFTSP,H3gM);
L3gM:=SETVAL(BKLT,L3gM,-BKFTSP,L3gM);
SH1:=(REF(BKH,10)+REF(BKH,1)*2)/3;
SH2:=(SH1*3+(SH1-REF(BKH,1)))/3;
SH:IF(SH1<REF(BKH,1),SH1,SH2),color00ffff shift8;
SL1:=(REF(BKL,10)+REF(BKL,1)*2)/3;
SL2:=(SL1*3-(REF(BKL,1)-SL1))/3;
SL:IF(SL1>REF(BKL,1),SL1,SL2),color00ffff shift8;
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
請版主幫我改開盤起計算在多3分K圖
逆推誇越昨尾13:16~13:42區最高.低+(13:43~13:45區. X2)/3所得畫到今9:12止
次扣抵變昨尾盤13:43~13:45止最高.低
+(今08:45~09:12區X2)/3所得畫在9:13~
9:39止.
9:40以後每27分計8:45~9:12最高.低+(9:39
X2)/3畫9:40~10:06只.......直到收盤
.謝謝!
|
|
向版主報告此篇 |  |
|
2015-08-03 14:06 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18094 |
引用: 最初由 santienchang 發表
DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-36;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,9)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,9)=9-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;
H3MH:IF(BKH>MMH,MAH,MMH) linethick;
L3ML:IF(BKL<MML,MAL,MML) linethick;
LBMH:=LBOUND(H3gM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3gM,SetNewLB); x:=SETLBOUND(L3gM,SetNewLB);
end;
H3gM:=SETVAL(BKLT,H3gM,-BKFTSP,H3gM);
L3gM:=SETVAL(BKLT,L3gM,-BKFTSP,L3gM);
SH1:=(REF(BKH,10)+REF(BKH,1)*2)/3;
SH2:=(SH1*3+(SH1-REF(BKH,1)))/3;
SH:IF(SH1<REF(BKH,1),SH1,SH2),color00ffff shift8;
SL1:=(REF(BKL,10)+REF(BKL,1)*2)/3;
SL2:=(SL1*3-(REF(BKL,1)-SL1))/3;
SL:IF(SL1>REF(BKL,1),SL1,SL2),color00ffff shift8;
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
請版主幫我改開盤起計算在多3分K圖
逆推誇越昨尾13:16~13:42區最高.低+(13:43~13:45區. X2)/3所得畫到今9:12止
次扣抵變昨尾盤13:43~13:45止最高.低
+(今08:45~09:12區X2)/3所得畫在9:13~
9:39止.
9:40以後每27分計8:45~9:12最高.低+(9:39
X2)/3畫9:40~10:06只.......直到收盤
.謝謝!
很抱歉,難以理解您的需求。
請參閱先前答覆您的範例程式碼,自行處理。
謝謝。
|
|
向版主報告此篇 |  |
|
2015-08-03 14:28 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|