奇狐社區論壇 (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=17649)

請教劃垂直線&統計區間週期

想在每個多空方轉換的第一天劃一垂直線，目前只能寫出在最近一個成立的條件劃線，並統計區間週期，請教可以如何撰寫呢~


MA20:MA(C,20),COLORYELLOW;
MA60:MA(C,100),COLORWHITE;

多訊:=MA20>MA60;
空訊:=MA20<MA60;

近多:=barslast(多訊);
近空:=barslast(空訊);
近多:=IF(LBOUND(近多)=0,200,近多),colorwhite,linethick0;
近空:=IF(LBOUND(近空)=0,200,近空),colorwhite,linethick0;

g01:=近多<近空;
g02:=近多>近空;
i01:=barslast(g01>ref(g01,1))+1;
i02:=barslast(g02>ref(g02,1))+1;
i01:=IF(LBOUND(i01)=0,300,i01);
i02:=IF(LBOUND(i02)=0,300,i02);
i01:=i01[datacount];
i02:=i02[datacount];

IF i01<i02 then 月訊多:i01,colormagenta,linethick0;
IF i01>i02 then 月訊空:i02,colorcyan,linethick0;
IF i01<i02 then 區漲幅C-ref(o,i01-1))/ref(o,i01-1)*100,precision1,colormagenta,linethick0;
IF i01>i02 then 區跌幅C-ref(o,i02-1))/ref(o,i02-1)*100,precision1,colorcyan,linethick0;
IF i01<i02 then vertline(refx(i01,i01-1)>1 and FILTER(refx(islastbar,i01-1),i01)),colorRED;
IF i01>i02 then vertline(refx(i02,i02-1)>1 and FILTER(refx(islastbar,i02-1),i02-1)),colorGREEN;

__________________
--
忘我無為無不為..

該如何撰寫讓每個週期轉換都劃出如附檔的垂直線並統計週期呢?

__________________
--
忘我無為無不為..

回覆: 請教劃垂直線&統計區間週期

引用:

---

最初由 justdoit829 發表
想在每個多空方轉換的第一天劃一垂直線，目前只能寫出在最近一個成立的條件劃線，並統計區間週期，請教可以如何撰寫呢~


MA20:MA(C,20),COLORYELLOW;
MA60:MA(C,100),COLORWHITE;

多訊:=MA20>MA60;
空訊:=MA20<MA60;

近多:=barslast(多訊);
近空:=barslast(空訊);
近多:=IF(LBOUND(近多)=0,200,近多),colorwhite,linethick0;
近空:=IF(LBOUND(近空)=0,200,近空),colorwhite,linethick0;

g01:=近多<近空;
g02:=近多>近空;
i01:=barslast(g01>ref(g01,1))+1;
i02:=barslast(g02>ref(g02,1))+1;
i01:=IF(LBOUND(i01)=0,300,i01);
i02:=IF(LBOUND(i02)=0,300,i02);
i01:=i01[datacount];
i02:=i02[datacount];

IF i01<i02 then 月訊多:i01,colormagenta,linethick0;
IF i01>i02 then 月訊空:i02,colorcyan,linethick0;
IF i01<i02 then 區漲幅:(C-ref(o,i01-1))/ref(o,i01-1)*100,precision1,colormagenta,linethick0;
IF i01>i02 then 區跌幅:(C-ref(o,i02-1))/ref(o,i02-1)*100,precision1,colorcyan,linethick0;
IF i01<i02 then vertline(refx(i01,i01-1)>1 and FILTER(refx(islastbar,i01-1),i01)),colorRED;
IF i01>i02 then vertline(refx(i02,i02-1)>1 and FILTER(refx(islastbar,i02-1),i02-1)),colorGREEN;

---