编写要求：


股票网解答：
网友求助：
写一个“B”点选股公式，请问B点有没有未来函数？公式如下：

MA3:MA(CLOSE,5),PRECIS2;

MA7:MA(CLOSE,10),PRECIS2;

MA18:MA(CLOSE,18),PRECIS2;

MA30:MA(CLOSE,30),PRECIS2;

MA55:MA(CLOSE,60),PRECIS2;

MA144:MA(CLOSE,120),PRECIS2;

{彩带}

FILLRGN(MA55,MA144,MA55>MA144,RGB(86,0,0),MA55<MA144,RGB(0,86,0)),LAYER7;

FILLRGN(MA3,MA7,MA3>MA7,RGB(128,0,128),MA3<MA7,RGB(20,92,100)),LAYER7;

{DRAWTEXTREL(0,980,'【细雨无声自用指标】'),Color999933,linethick1;}

A:=BARSLAST(DISPSTATUS=1)+1; HH:=HHV(H,A); LL:=LLV(L,A);

上涨:BARSSINCE(BACKSET(DISPSTATUS=2,BARSLAST(L=LL)+1)),COLOR3333CC,linethick0;

↑空间％:(C/REF(L,上涨)-1)*100,COLOR339999,linethick0;

最高％:(HHVALL(HH)/REF(L,上涨)-1)*100,COLORDD66DD,linethick0;

下跌:BARSSINCE(BACKSET(DISPSTATUS=2,BARSLAST(H=HH)+1)),COLOR008800,linethick0;

↓空间％:(C/REF(H,下跌)-1)*100,COLOR998888,linethick0;

最低％:(LLVALL(LL)/REF(H,下跌)-1)*100,COLORFF9900,linethick0;

DRAWTEXTABS(40,26,'流通盘：'+CAPITAL/1000000+'亿股，利润增长：'+FINANCE2(10)+'%。每股收益：'+FINANCE2(3)+'元'+' 市盈率：'+DYNAINFO(39)+'%'),ColorFFBB33,linethick1,LAYER6;

{买卖指示}

Var0:=SMA(MAX(CLOSE-ref(c,1),0),12,1)/SMA(ABS(CLOSE-ref(c,1)),15,1)*100;   

DRAWTEXT(CROSS(82,Var0),high,'卖'),colorwhite;   

s:=C-REF(C,1);   

DX:=100*EMA(EMA(s,6),6)/EMA(EMA(ABS(s),6),6);   

买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);   

DRAWTEXT(filter(买=1,5),LOW-0.03,'升'),ColorFFDE00;   

da:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4;   

db:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4;   

DRAWTEXT(CROSS(da-db,0),L*0.99,'B'),ALIGN1,VALIGN0,COLOR00FFFF,linethick5;   

JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;   

DRAWTEXT(CROSS(84,JH),H*1.02,'S'),ALIGN1,VALIGN0,COLORGREEN,linethick4;   

YC:=REF(CLOSE,1);   

止损价位:(YC*1.0035*97+0.2)/99.65,PRECIS2,ColorFFCC33,LINETHICK0;

盘子:CAPITAL/1000000,linethick0;

盘子1:CAPITAL/100,linethick0;

盘子2:FINANCE2(37),linethick0;

{缺口}

STICKLINE(L>REF(H,1),L,REF(H,1),50,1001),Color408080;

STICKLINE(REF(L,1)>H,ref(L,1),H,50,1001),Color808040;

DRAWTEXT(L>REF(H,1),REF(H,1),NUMTOSTRN(REF(H,1),2)+'-'+NUMTOSTRN(L,2)),Color408080;

DRAWTEXT(REF(L,1)>H,REF(L,1),NUMTOSTRN(ref(l,1),2)+'-'+NUMTOSTRN(h,2)),VALIGN2,Color808040;

{K线}

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0),COLOR5454FF;

STICKLINE(CLOSE<OPEN,CLOSE,OPEN,7,0),COLORFFFF00;

STICKLINE(CLOSE>OPEN,HIGH,CLOSE,0.1,0),COLOR5454FF;

STICKLINE(CLOSE>OPEN,LOW,OPEN,0.1,0),COLOR5454FF;

STICKLINE(CLOSE<OPEN,HIGH,OPEN,0.1,0),COLORFFFF00;

STICKLINE(CLOSE<OPEN,LOW,CLOSE,0.1,0),COLORFFFF00;

STICKLINE(CLOSE=OPEN AND CLOSE>REF(CLOSE,1),CLOSE,OPEN,7,0),COLOR5454FF;

STICKLINE(CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),CLOSE,OPEN,7,0),COLORFFFF00;

STICKLINE(CLOSE=OPEN AND CLOSE>REF(CLOSE,1),HIGH,LOW,0.1,0),COLOR5454FF;

STICKLINE(CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),HIGH,LOW,0.1,0),COLORFFFF00;

{操作提示} 

均价:=(3*C+H+L+O)/6;