由于自己未表達(dá)清楚,再次求助老師完善一個(gè)階段累計(jì)成交量的公式
2020/1/12 18:51:37
公式編寫說明:
老師:我上次求助未講清楚,致使老師誤認(rèn)為是從現(xiàn)在開始向以前累計(jì)換手達(dá)到完全換手,現(xiàn)我再求助。把所需解決的問題講清楚。請老師諒解!請老師完善一個(gè)公式:以下是一個(gè)計(jì)算股票上市以來到現(xiàn)在每完成一次完全換手的計(jì)算公式,它標(biāo)識(shí)出了從上市之日起每次完全換手的位置,及現(xiàn)在到從上市之日起計(jì)算完全換手到最近一次完全換手標(biāo)洼的換手率累計(jì)的情況,我想請老師完善的問題是1、從上市之日起標(biāo)注每次完全換手(下面的公式已解決),求現(xiàn)在距已標(biāo)注的最近一次完全換手的天數(shù),并累計(jì)現(xiàn)在距最近一次完全換手標(biāo)注的成交量,公式應(yīng)該怎樣表達(dá)?2、現(xiàn)在距最近一次完全換手標(biāo)注的上一次完全換手標(biāo)注的天數(shù),并累計(jì)現(xiàn)在距最近一次完全換手的上一次完全換手的成交量。公式應(yīng)該怎樣表達(dá)3、以副圖來表示。下面是計(jì)算完全換手的公式:BASE(0,10000,0)HSL1:= VOL*100/FINANCE(7)*100;HSL:=IF(BASE>=BARSCOUNT(C),0,HSL1);{BASE前的取值取0,相當(dāng)于BASE后1天為起點(diǎn)}WCHS1:=SUMBARS(HSL,100);{完成換手,設(shè)置>99000是因?yàn)橛肍INANCE(7)計(jì)算換手率間隔WCHS1在上市前幾天數(shù)據(jù)異常,直接置0。}WCHS:=IF(WCHS1>99000 OR WCHS1<0,0,WCHS1),LINETHICK3,COLORC000FF;BC:=BARSCOUNT(C);{上市到目前的天數(shù)}SH:=SUM(HSL,0);{上市到目前的總換手率}P:=INTPART(SH/100)*100;{換手滿100%的次數(shù)}CDAY:=IF(P>REF(P,1),BC,0);{把最近一次完全換手后,累計(jì)換手達(dá)到25%,50%,75%,100%位置標(biāo)識(shí)出來}CC25:=SH-REF(SH,BARSLAST(CDAY>0));C25:=CROSS(SH-REF(SH,BARSLAST(CDAY>0)),25),NODRAW;C50:=CROSS(SH-REF(SH,BARSLAST(CDAY>0)),50),NODRAW;C75:=CROSS(SH-REF(SH,BARSLAST(CDAY>0)),75),NODRAW;{換手間隔}HSJG:= IF(CDAY>0 OR C50 OR C25 OR C75,WCHS,0),COLOR22FF33;DRAWTEXT(C25,H*1.03,'25%%'),COLORYELLOW;DRAWTEXT(C50,H*1.03,'50%%'),COLORYELLOW;DRAWTEXT(C75,H*1.03,'75%%'),COLORYELLOW;DRAWTEXT(CDAY>0, H*1.03,'100%%'),COLORWHITE;DRAWICON(CDAY>0, H*1.03 ,3);請老師幫助完善。
公式源碼示例:
hsl1:= vol*100/finance(7)*100;
hsl:=if(base>=barscount(c),0,hsl1);{base前的取值取0,相當(dāng)于base后1天為起點(diǎn)}
wchs1:=sumbars(hsl,100);
{完成換手,設(shè)置>99000是因?yàn)橛胒inance(7)計(jì)算換手率間隔wchs1在上市前幾天數(shù)據(jù)異常,直接置0。}
wchs:=if(wchs1>99000 or wchs1<0,0,wchs1),linethick3,colorc000ff;
bc:=barscount(c);{上市到目前的天數(shù)}
sh:=sum(hsl,0);{上市到目前的總換手率}
p:=intpart(sh/100)*100;{換手滿100%的次數(shù)}
cday:=if(p>ref(p,1),bc,0);
{把最近一次完全換手后,累計(jì)換手達(dá)到25%,50%,75%,100%位置標(biāo)識(shí)出來}
cc25:=sh-ref(sh,barslast(cday>0));
c25:=cross(sh-ref(sh,barslast(cday>0)),25);
c50:=cross(sh-ref(sh,barslast(cday>0)),50);
c75:=cross(sh-ref(sh,barslast(cday>0)),75);
{換手間隔}
hsjg:= if(cday>0 or c50 or c25 or c75,wchs,0);
成交量:vol,volstick;
drawtext(c25,v*1.03,'25'),coloryellow;
drawtext(c50,v*1.03,'50'),coloryellow;
drawtext(c75,v*1.03,'75'),coloryellow;
drawtext(cday>0, v*1.03,'100'),colorwhite;
drawicon(cday>0, 0,3);
天數(shù)1:barslast(cday>0),nodraw;
累積成交量1:sum(v,天數(shù)1),nodraw;
天數(shù)2:ref(barslast(cday>0),天數(shù)1+1)+天數(shù)1,nodraw;
累積成交量2:sum(v,天數(shù)2),nodraw;
看股 吧公式 www.kang uba.com
其它股票公式列表