奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 如何劃出月跟週的高低點 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=19682)
由 steven 在 2016-01-02 15:52 發表:
如何劃出月跟週的高低點
cgjj大
麻煩您幫忙，要如何將每個月跟週的第一個交易日的日K線高低點，向右延伸一條線至當月跟當週的最後一天的日K線，並可以在分線週期中顯示? 謝謝您
由 cgjj 在 2016-01-02 22:28 發表:
回覆: 如何劃出月跟週的高低點
引用:
最初由 steven 發表
cgjj大
麻煩您幫忙，要如何將每個月跟週的第一個交易日的日K線高低點，向右延伸一條線至當月跟當週的最後一天的日K線，並可以在分線週期中顯示? 謝謝您
MHCK:=month<>ref(month,1);
MHSP:=barslast(MHCK);
DECK:=date<>ref(date,1);
DESP:=barslast(DECK);
DH:=HHV(H,DESP+1);
DL:=LLV(L,DESP+1);
SP:=barslast(sum(DECK,MHSP+1)=1);
MH:ref(DH,SP);
ML:ref(DL,SP);
NW:=FLOOR((DAYS1970-3)/7);//第N週
WKCK:=NW<>ref(NW,1);
WKSP:=barslast(WKCK);
SP:=barslast(sum(DECK,WKSP+1)=1);
WH:ref(DH,SP);
WL:ref(DL,SP);
由 steven 在 2016-01-03 08:59 發表:
感恩Cgjj大大在假日還出手幫忙，謝謝!!
能否麻煩Cgjj大能再幫忙修改一下，能做出像我畫出的圖一樣的效果，在下只畫出周的訊號，月的訊號也同時要有一樣的效果，麻煩您費神了，真的非常感謝
由 cgjj 在 2016-01-04 09:17 發表:
引用:
最初由 steven 發表
感恩Cgjj大大在假日還出手幫忙，謝謝!!
能否麻煩Cgjj大能再幫忙修改一下，能做出像我畫出的圖一樣的效果，在下只畫出周的訊號，月的訊號也同時要有一樣的效果，麻煩您費神了，真的非常感謝
MHCK:=month<>ref(month,1);
MHSP:=barslast(MHCK);
DECK:=date<>ref(date,1);
DESP:=barslast(DECK);
DH:=HHV(H,DESP+1);
DL:=LLV(L,DESP+1);
SP:=barslast(sum(DECK,MHSP+1)=1);
MH:ref(DH,SP) linethick0 color0066CC;
ML:ref(DL,SP) linethick0 color0066CC;
NW:=FLOOR((DAYS1970-3)/7);//第N週
WKCK:=NW<>ref(NW,1);
WKSP:=barslast(WKCK);
SP:=barslast(sum(DECK,WKSP+1)=1);
WH:ref(DH,SP) linethick0 coloryellow;
WL:ref(DL,SP) linethick0 coloryellow;
DWMM:=sum(DECK,MHSP)>0 and MHSP>ref(MHSP,1);
PARTLINE(DWMM,MH) color0066CC;
PARTLINE(DWMM,ML) color0066CC;
DWWW:=sum(DECK,WKSP)>0 and WKSP>ref(WKSP,1);
PARTLINE(DWWW,WH) coloryellow;
PARTLINE(DWWW,WL) coloryellow;
由 steven 在 2016-01-04 10:00 發表:
謝謝cgjj大的幫忙，感恩!!
