 |
Markchu7
資深會員
註冊日期: Nov 2007
來 自:
文章數量: 1509 |
[問題]RG中分線,三分線....
外盤:STKINDI('','新盤差引用.外盤(0)',0,0),COLORRED,LINETHICK0;
內盤:STKINDI('','新盤差引用.內盤(1)',0,0),COLORBLUE,LINETHICK0;
盤差:外盤-內盤,COLOR000000,LINETHICK;
U0AH:HHV(EMA(HHV(盤差,2),5),25),COLORBLUE,LINETHICK;
U0AL:LLV(EMA(LLV(盤差,2),5),25),COLORRED,LINETHICK;
RG:=U0AH-U0AL;
規則:
當RG<1000*2,不畫線!
當RG>1000*2 AND RG<1000*3,畫一條中分線將RG均分為上下二部分!
當RG>1000*3 AND RG<1000*ˋ4,畫二條中分線將RG均分為上中下三部分!
當RG>1000*4 AND RG<1000*5,畫三條中分線將RG均分為四部分!....
當RG>1000*4 AND RG<1000*5降回RG>1000*3 AND RG<1000*ˋ4,回復畫二條中分線將RG均分為上中下三部分!
以此類推....
請協助,謝謝!
|
|
向版主報告此篇 |  |
|
2021-04-21 10:23 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18143 |
回覆: [問題]RG中分線,三分線....
引用: 最初由 Markchu7 發表
外盤:STKINDI('','新盤差引用.外盤(0)',0,0),COLORRED,LINETHICK0;
內盤:STKINDI('','新盤差引用.內盤(1)',0,0),COLORBLUE,LINETHICK0;
盤差:外盤-內盤,COLOR000000,LINETHICK;
U0AH:HHV(EMA(HHV(盤差,2),5),25),COLORBLUE,LINETHICK;
U0AL:LLV(EMA(LLV(盤差,2),5),25),COLORRED,LINETHICK;
RG:=U0AH-U0AL;
規則:
當RG<1000*2,不畫線!
當RG>1000*2 AND RG<1000*3,畫一條中分線將RG均分為上下二部分!
當RG>1000*3 AND RG<1000*ˋ4,畫二條中分線將RG均分為上中下三部分!
當RG>1000*4 AND RG<1000*5,畫三條中分線將RG均分為四部分!....
當RG>1000*4 AND RG<1000*5降回RG>1000*3 AND RG<1000*ˋ4,回復畫二條中分線將RG均分為上中下三部分!
以此類推....
請協助,謝謝!
您定義 RG:=U0AH-U0AL;
這是一條線,不是一個區間,無法劃分!
|
|
向版主報告此篇 |  |
|
2021-04-21 10:47 |
|
|
|  |
 |
Markchu7
資深會員
註冊日期: Nov 2007
來 自:
文章數量: 1509 |
不好意思!不太會表述!應該說是U0AH~U0AL這個區間帶寬畫線!
謝謝!
|
|
向版主報告此篇 |  |
|
2021-04-21 11:01 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18143 |
引用: 最初由 Markchu7 發表
上限是5條,感謝!
原碼: 外盤:STKINDI('','新盤差引用.外盤(0)',0,0),COLORRED,LINETHICK0;
內盤:STKINDI('','新盤差引用.內盤(1)',0,0),COLORBLUE,LINETHICK0;
盤差:外盤-內盤,COLOR000000,LINETHICK;
U0AH:HHV(EMA(HHV(盤差,2),5),25),COLORBLUE,LINETHICK1;
U0AL:LLV(EMA(LLV(盤差,2),5),25),COLORRED,LINETHICK1;
RG:U0AH-U0AL linethick;
L1:=RG*0+999999; L2:=L1; L3:=L1; L4:=L1;
for i=lbound(RG) to datacount do begin
ST:=U0AL[i];
if RG[i]>5000 then begin
SP:=RG[i]/5; L4[i]:=ST+SP*4; L3[i]:=ST+SP*3; L2[i]:=ST+SP*2; L1[i]:=ST+SP*1;
end else if RG[i]>4000 then begin
SP:=RG[i]/4; L3[i]:=ST+SP*3; L2[i]:=ST+SP*2; L1[i]:=ST+SP*1;
end else if RG[i]>3000 then begin
SP:=RG[i]/3; L2[i]:=ST+SP*2; L1[i]:=ST+SP*1;
end else if RG[i]>2000 then begin
SP:=RG[i]/2; L1[i]:=ST+SP*1;
end;
end;
PARTLINE(ALL(L1<>999999,2),L1) coloryellow;
PARTLINE(ALL(L2<>999999,2),L2) coloryellow;
PARTLINE(ALL(L3<>999999,2),L3) coloryellow;
PARTLINE(ALL(L4<>999999,2),L4) coloryellow;
|
|
向版主報告此篇 |  |
|
2021-04-21 13:12 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|