五线布林通达信主图是通达信的! 温习一品老师的五线布林,发觉奥妙无穷 源码如下:
N1:=10;P1:=3; BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4; 上:BBI+P1*STD(BBI,N1),COLORYELLOW; 险:IF(BBI*1.15>上*1.03,上*1.06,上*1.03),COLOR0000FF,POINTDOT; 下:BBI-P1*STD(BBI,N1),COLORFF00FF; 中:BBI,COLORWHITE; AA:BBI+P1*STD(BBI,N1)/2,COLOR88FF88; BB:BBI-P1*STD(BBI,N1)/2,COLOR88FF88; MA30:MA(C,30),POINTDOT,COLOR00FF00; QSXS1:=AA>REF(AA,1) AND BBI>REF(BBI,1); QSXS2:=COUNT(MA30>REF(MA30,1),5)=5; FLSZ:=C>O AND V>REF(V,1); RMG:=FLSZ AND (C/REF(C,1)-1)*100>=2; SCAA:=CROSS(C,AA) OR (O<AA AND C>AA); BLK:=LLV((上-下),2)=LLV((上-下),10); XBLK:=(上/下-1)*100<=N; BLKSJ:=BARSLAST(BLK)+1; 拉升:=FILTER(SCAA AND FLSZ AND (QSXS1 OR (QSXS2 AND BLKSJ<5)),3),COLORFF00FF,POINTDOT,LINETHICK0; 优选:=拉升 AND COUNT(XBLK,4)>=1 AND RMG,COLOR00FF00,POINTDOT,LINETHICK0; XZF:=(C/REF(C,1)-1)*100<=1; XPL:=ABS(C-BBI)/BBI*100<=2 OR ABS(L-BBI)/BBI*100<=2; 回:=COUNT(QSXS1,8)>=6 AND XZF AND XPL,COLORFFFFFF,POINTDOT,LINETHICK0; {以下设置主图显示方式} STICKLINE(拉升,(O+C)/2,(O+C)/2+0.02,4,0),COLORFF00FF; STICKLINE(拉升,H,L,0,1),COLORFF00FF; DRAWTEXT(拉升,L*0.99,'拉升'),COLORFF00FF; DRAWTEXT(回,L*0.99,'回'),COLORFFFFFF; {DRAWTEXT(XBLK,BBI*1.01,'口'),COLOR00FF00;} STICKLINE(优选,H,L,1,0),COLORFF00FF; DRAWICON(优选,L*0.99,1); 高:=((H/BBI-1)*100>=15 AND (H/上-1)*100>=3) OR (H/上-1)*100>=6; STICKLINE(高,H*1.01,H*1.02,4,0),COLOR00FFFF; DRAWICON(高,H*1.05,12); M1:FORCAST((2*C+H+L)/4,8); M2:FORCAST((2*C+H+L)/4,13);{点击看本软件截图:58股票 公式网 http://www. 58gu. com 整理} |