 |
Markchu7
資深會員
註冊日期: Nov 2007
來 自:
文章數量: 1518 |
畫最後兩個高點與兩個低點連線
源碼如下:
股票商品:= MARKETLABEL='TW' or MARKETLABEL='TO';
BKH:=REF(H,BARSLAST(IF(股票商品,C<=O,C<O)));
BKHR1:=REF(REF(BKH,1),BARSLAST(BKH<>REF(BKH,1)));
RKL:=REF(L,BARSLAST(IF(股票商品,C>=O,C>O)));
RKLR1:=REF(REF(RKL,1),BARSLAST(RKL<>REF(RKL,1)));
壓力:=MAX(REF(MAX(BKHR1,BKH),1),REF(MIN(RKLR1,RKL),1)),COLORBLUE,LINETHICK;
支撐:=MIN(REF(MAX(BKHR1,BKH),1),REF(MIN(RKLR1,RKL),1)),COLORRED,LINETHICK;
突破:=REF(CLOSE,1)<=壓力 AND CLOSE>壓力;
跌破:=REF(CLOSE,1)>=支撐 AND CLOSE<支撐;
K棒多空:IF(BARSLAST(突破)<BARSLAST(跌破),1,-1),colorBLACK,LINETHICK;
KDUP:=CROSS(K棒多空,0),LINETHICK,COLORYELLOW;
BKDUP:=BARSLAST(KDUP)+1;
價高點:=HHV(H,BKDUP),LINETHICK,COLORRED;
價本高:HHV(價高點,BARSLAST(KDUP)+1),COLORBLUE,LINETHICK1;
價前高:REF(價本高,BARSLAST(KDUP)+1),COLORFF00FF,LINETHICK1;
KDDN:=CROSS(0,K棒多空),LINETHICK,COLORBLUE;
BKDDN:=BARSLAST(KDDN)+1;
價低點:=LLV(L,BKDDN),LINETHICK,COLORGREEN;
價本低:LLV(價低點,BARSLAST(KDDN)+1),COLOR00FF00,LINETHICK1;
價前低:REF(價本低,BARSLAST(KDDN)+1),COLORRED,LINETHICK1;
STICKLINE(K棒多空=1,H,L,0.1,0),COLORRED,LINETHICK2;
STICKLINE(K棒多空=1,O,C,8,0),COLORRED,LINETHICK2;
STICKLINE(K棒多空=1 AND C<O,O,C,8,1),COLORRED,LINETHICK2;
STICKLINE(K棒多空=-1,H,L,0.1,0),COLORBLUE,LINETHICK2;
STICKLINE(K棒多空=-1,O,C,8,0),COLORBLUE,LINETHICK2;
STICKLINE(K棒多空=-1 AND C>O,O,C,8,1),COLORBLUE,LINETHICK2;
請協助劃出貼圖中的紅藍粗線條斜線!
Markchu7 附帶上了此圖片:
|
|
向版主報告此篇 |  |
|
2015-10-22 20:18 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18197 |
回覆: 畫最後兩個高點與兩個低點連線
引用: 最初由 Markchu7 發表
源碼如下:
股票商品:= MARKETLABEL='TW' or MARKETLABEL='TO';
BKH:=REF(H,BARSLAST(IF(股票商品,C<=O,C<O)));
BKHR1:=REF(REF(BKH,1),BARSLAST(BKH<>REF(BKH,1)));
RKL:=REF(L,BARSLAST(IF(股票商品,C>=O,C>O)));
RKLR1:=REF(REF(RKL,1),BARSLAST(RKL<>REF(RKL,1)));
壓力:=MAX(REF(MAX(BKHR1,BKH),1),REF(MIN(RKLR1,RKL),1)),COLORBLUE,LINETHICK;
支撐:=MIN(REF(MAX(BKHR1,BKH),1),REF(MIN(RKLR1,RKL),1)),COLORRED,LINETHICK;
突破:=REF(CLOSE,1)<=壓力 AND CLOSE>壓力;
跌破:=REF(CLOSE,1)>=支撐 AND CLOSE<支撐;
K棒多空:IF(BARSLAST(突破)<BARSLAST(跌破),1,-1),colorBLACK,LINETHICK;
KDUP:=CROSS(K棒多空,0),LINETHICK,COLORYELLOW;
BKDUP:=BARSLAST(KDUP)+1;
價高點:=HHV(H,BKDUP),LINETHICK,COLORRED;
價本高:HHV(價高點,BARSLAST(KDUP)+1),COLORBLUE,LINETHICK1;
價前高:REF(價本高,BARSLAST(KDUP)+1),COLORFF00FF,LINETHICK1;
KDDN:=CROSS(0,K棒多空),LINETHICK,COLORBLUE;
BKDDN:=BARSLAST(KDDN)+1;
價低點:=LLV(L,BKDDN),LINETHICK,COLORGREEN;
價本低:LLV(價低點,BARSLAST(KDDN)+1),COLOR00FF00,LINETHICK1;
價前低:REF(價本低,BARSLAST(KDDN)+1),COLORRED,LINETHICK1;
STICKLINE(K棒多空=1,H,L,0.1,0),COLORRED,LINETHICK2;
STICKLINE(K棒多空=1,O,C,8,0),COLORRED,LINETHICK2;
STICKLINE(K棒多空=1 AND C<O,O,C,8,1),COLORRED,LINETHICK2;
STICKLINE(K棒多空=-1,H,L,0.1,0),COLORBLUE,LINETHICK2;
STICKLINE(K棒多空=-1,O,C,8,0),COLORBLUE,LINETHICK2;
STICKLINE(K棒多空=-1 AND C>O,O,C,8,1),COLORBLUE,LINETHICK2;
請協助劃出貼圖中的紅藍粗線條斜線!
您的高點低點如何判定?
|
|
向版主報告此篇 |  |
|
2015-10-23 11:09 |
|
|
|  |
 |
Markchu7
資深會員
註冊日期: Nov 2007
來 自:
文章數量: 1518 |
當KDDN成立時,在價本高與價前高成立的K棒位置畫價本高與價前高之兩點連線!
低點類推!
感謝!
|
|
向版主報告此篇 |  |
|
2015-10-23 11:35 |
|
|
|  |
 |
Markchu7
資深會員
註冊日期: Nov 2007
來 自:
文章數量: 1518 |
(藍圈規則):當KDDN成立(此時開始畫藍K棒),往前第一段的紅K棒中找到"H=價本高"[最後發生]的那根K棒為高點1,再更往前第二段的紅K棒中找到"H=價前高"[最後發生]的那根K棒為高點2,畫高點連接線!
(紅圈規則)當KDUP成立(此時開始畫紅K棒),往前第一段的藍K棒中找到"L=價本低"[最後發生]的那根K棒為低點1,再更往前第二段的藍K棒中找到"L=價前低"[最後發生]的那根K棒為低點2,畫低點連接線!
感謝!
|
|
向版主報告此篇 |  |
|
2015-10-23 16:54 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18197 |
引用: 最初由 Markchu7 發表
(藍圈規則):當KDDN成立(此時開始畫藍K棒),往前第一段的紅K棒中找到"H=價本高"[最後發生]的那根K棒為高點1,再更往前第二段的紅K棒中找到"H=價前高"[最後發生]的那根K棒為高點2,畫高點連接線!
(紅圈規則)當KDUP成立(此時開始畫紅K棒),往前第一段的藍K棒中找到"L=價本低"[最後發生]的那根K棒為低點1,再更往前第二段的藍K棒中找到"L=價前低"[最後發生]的那根K棒為低點2,畫低點連接線!
感謝!
BlkNO:=sum(K棒多空<>Ref(K棒多空,1),0);
UHP:=SETVAL(refx(KDDN,1),0,-(BKDUP-1),價高點)=H;
UHP:=(UHP and refx(UHP,1)=0)*BlkNO;
DLP:=SETVAL(refx(KDUP,1),0,-(BKDDN-1),價低點)=L;
DLP:=(DLP and refx(DLP,1)=0)*BlkNO;
UNo:=ref(BlkNO,BKDDN); UNo:=UNo[datacount];
DRAWLINE(UHP=UNo-2,H,UHP=UNo,H,1) linethick2;
DNo:=ref(BlkNO,BKDUP); DNo:=DNo[datacount];
DRAWLINE(DLP=DNo-2,L,DLP=DNo,L,1) linethick2;
|
|
向版主報告此篇 |  |
|
2015-10-23 18:11 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|