奇狐社區論壇 - 請教版主:如何劃出直角的控盤線

奇狐社區論壇 : Powered by vBulletin version 2.3.0

奇狐社區論壇 > 指標公式 > 問題交流 > 請教版主:如何劃出直角的控盤線

上一主題下一主題

作者

主題

sunnyjboy1960
中級會員

註冊日期: Sep 2010
來　　自: 桃園
文章數量: 81

請教版主:如何劃出直角的控盤線

請教版主:如何劃出直角的控盤線

長K判:=if(K長>=長K,1,0);
中K判:=if(K長>=中K AND K長<長K,1,0);
高3:=HHV(H,3); 低3:=LLV(L,3);
SL:=C>ref(高3,1) linethick0;
SH:=C<ref(低3,1) linethick0;
MM:BARSSINCE(SL or SH)*0,ColorMagenta,LINETHICK2; NowMM:=0;
for i=lbound(MM) to datacount do begin
if 長K判[i] then begin
IF K漲跌[i] then begin MM[i]:=K2[i];NowHL:=1;END;
ELSE begin MM[i]:=K2[i];NowHL:=-1;END;
END;
ELSE
IF 中K判[i] then begin
IF SL[i] then begin MM[i]:=K1[i];NowHL:=1;END;
ELSE IF SH[i] then begin MM[i]:=K3[i];NowHL:=-1;END;
ELSE begin MM[i]:=MM[i-1];END;
END;
ELSE begin MM[i]:=MM[i-1];END;
end;
PARTLINE(MM>C,MM) ColorYELLOW,LINETHICK3;
PARTLINE(MM<=C,MM) ColorMagenta,LINETHICK3;

如何在上列控盤程式內使用何讓折線走直角
是否為使用下列指令搭配，能否指導一下
partline(m>0 and CC>=OO,CC);
stickline(m=0 and CC>=OO,OO,CC,1,0);

sunnyjboy1960 附帶上了此圖片:

最後由 sunnyjboy1960 在 2010-12-02 05:04 編輯

向版主報告此篇 |

2010-12-01 19:53

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18091

回覆: 請教版主:如何劃出直角的控盤線

引用:
最初由 sunnyjboy1960 發表
請教版主:如何劃出直角的控盤線

長K判:=if(K長>=長K,1,0);
中K判:=if(K長>=中K AND K長<長K,1,0);
高3:=HHV(H,3); 低3:=LLV(L,3);
SL:=C>ref(高3,1) linethick0;
SH:=C<ref(低3,1) linethick0;
MM:BARSSINCE(SL or SH)*0,ColorMagenta,LINETHICK2; NowMM:=0;
for i=lbound(MM) to datacount do begin
if 長K判[i] then begin
IF K漲跌[i] then begin MM[i]:=K2[i];NowHL:=1;END;
ELSE begin MM[i]:=K2[i];NowHL:=-1;END;
END;
ELSE
IF 中K判[i] then begin
IF SL[i] then begin MM[i]:=K1[i];NowHL:=1;END;
ELSE IF SH[i] then begin MM[i]:=K3[i];NowHL:=-1;END;
ELSE begin MM[i]:=MM[i-1];END;
END;
ELSE begin MM[i]:=MM[i-1];END;
end;
PARTLINE(MM>C,MM) ColorYELLOW,LINETHICK3;
PARTLINE(MM<=C,MM) ColorMagenta,LINETHICK3;

如何在上列控盤程式內使用何讓折線走直角
是否為使用下列指令搭配，能否指導一下
partline(m>0 and CC>=OO,CC);
stickline(m=0 and CC>=OO,OO,CC,1,0);

//處理範例:
ma10:ma(c,10);
ma20:ma(c,20);
ck:=cross(ma10,ma20);
VERTLINE(ck) linethick linedot;
HH:ref(H,barslast(CK));

向版主報告此篇 |

2010-12-02 09:51

sunnyjboy1960
中級會員

註冊日期: Sep 2010
來　　自: 桃園
文章數量: 81

回答非正解

試用了版大的回答，HH在轉折的K棒之間並非走直角轉彎，能否再指導，謝謝

sunnyjboy1960 附帶上了此圖片:

向版主報告此篇 |

2010-12-03 01:03

sunnyjboy1960
中級會員

註冊日期: Sep 2010
來　　自: 桃園
文章數量: 81

加問：在轉折後在本日高低點標示13個向上或向下的箭頭

在本範列中在轉折後的13個K棒標在本日高低點示向上或向下的箭頭

最後由 sunnyjboy1960 在 2010-12-03 02:09 編輯

向版主報告此篇 |

2010-12-03 02:03

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18091

回覆: 回答非正解

引用:
最初由 sunnyjboy1960 發表
試用了版大的回答，HH在轉折的K棒之間並非走直角轉彎，能否再指導，謝謝

一般不會如您所想的那樣畫
既然是控盤線, 一條之一根僅會有一個值, 就是以該數繪製
若於當根畫垂直下來, 也會把K棒的 H和L給壓住看不到

硬要做的話, 可用下列方式處理: (會比前面的程式,多耗用些CPU)

ma10:ma(c,10);
ma20:ma(c,20);
ck:=cross(ma10,ma20);
HH:ref(H,barslast(CK)) linethick;
PARTLINE(HH=ref(HH,1),HH) coloryellow;
PARTLINE(HH=ref(HH,1),HH) shift1 coloryellow;
STICKLINE(HH<>Ref(HH,1),HH,ref(HH,1),0.1,0) coloryellow;

向版主報告此篇 |

2010-12-03 09:15

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18091

回覆: 加問：在轉折後在本日高低點標示13個向上或向下的箭頭

引用:
最初由 sunnyjboy1960 發表
在本範列中在轉折後的13個K棒標在本日高低點示向上或向下的箭頭

定義不明確, 請重新描述問題

向版主報告此篇 |

2010-12-03 09:17

sunnyjboy1960
中級會員

註冊日期: Sep 2010
來　　自: 桃園
文章數量: 81

我要設計的條件為

5分k棒長度超過20點
成交量大於MA20的2倍
第二根K棒收盤小於第一根收盤價
從第一根K棒起在本日最高價標示向下的箭頭
一共標示1 3根K棒才結束

向版主報告此篇 |

2010-12-03 10:43

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18091

引用:
最初由 sunnyjboy1960 發表
我要設計的條件為

5分k棒長度超過20點
成交量大於MA20的2倍
第二根K棒收盤小於第一根收盤價
從第一根K棒起在本日最高價標示向下的箭頭
一共標示1 3根K棒才結束

定義仍然不夠明確
麻煩請再補充描述或繪圖說明

5分k棒長度超過20點 <== 那一根?
成交量大於MA20的2倍 <== 那一根?
第二根K棒收盤小於第一根收盤價 <== 自何處起算?
從第一根K棒起在本日最高價標示向下的箭頭
一共標示1 3根K棒才結束

向版主報告此篇 |

2010-12-03 10:53

sunnyjboy1960
中級會員

註冊日期: Sep 2010
來　　自: 桃園
文章數量: 81

5分k棒長度超過20點 <== 那一根?第一根或條件成立起
成交量大於MA20的2倍 <== 那一根?第一根或條件成立起
第二根K棒收盤小於第一根收盤價 <== 自何處起算?第一根或條件成立後
從第一根K棒起在本日最高價標示向下的箭頭
一共標示1 3根K棒才結束

向版主報告此篇 |

2010-12-03 11:02

sunnyjboy1960
中級會員

註冊日期: Sep 2010
來　　自: 桃園
文章數量: 81

1.前一根5分k棒長度超過20點且成交量大於MA20的2倍且收盤價小於最高價
2.本根5分K棒收盤小於前一根收盤價
3.從本根K棒起在本日最高價位置標示向下的箭頭一共標示1 2根K棒才結束

最後由 sunnyjboy1960 在 2010-12-03 11:31 編輯

向版主報告此篇 |

2010-12-03 11:26

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18091

引用:
最初由 sunnyjboy1960 發表
1.前一根5分k棒長度超過20點且成交量大於MA20的2倍且收盤價小於最高價
2.本根5分K棒收盤小於前一根收盤價
3.從本根K棒起在本日最高價位置標示向下的箭頭一共標示1 2根K棒才結束

//看看是否為您要的結果
DESP:=barslast(date<>ref(date,1));
CK1:=REF(H-L>20 and v>ref(ma(v,20),1)*2 and C<H,1);
CK2:=C<ref(C,1);
CK:=CK1 and CK2;
MH:=HHV(H,DESP+1);
DRAWICON(barslast(CK)<12,MH,5) pxup20;

向版主報告此篇 |

2010-12-03 12:19

sunnyjboy1960
中級會員

註冊日期: Sep 2010
來　　自: 桃園
文章數量: 81

謝謝？我再試試看

向版主報告此篇 |

2010-12-03 12:24

全部時間均為台灣時間, 現在時間為03:23

上一主題下一主題

顯示可列印版本 |

訂閱此主題

論壇跳轉:

主題評分:

論壇規定:

你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章

HTML語法禁止
vB 語法核准
表情符號核准
貼圖語法[IMG]核准

本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。