贝忻德命苦 发表于 2023-11-1 21:55:05

通达信转折点主图有未来函数

<div class="stock-fc-code-box"><p>MA10:=MA(C,10),COLOR009B9B,LINETHICK1;</p><p>MA20:=MA(C,20),COLOR009B9B,LINETHICK1;</p><p>HX:=MAX(REF(C,1),H);</p><p>LX:=MIN(REF(C,1),L);</p><p>DRAWBAND(MA10,RGB(231,150,69),MA20,RGB(18,128,144));DRAWKLINE(HX,O,LX,C);&nbsp; &nbsp;</p><p>G:=MA(C,5);</p><p>D:=MA(C,10);</p><p>HH:=REF(H,5)=HHV(H,11);</p><p>LL:=REF(L,5)=LLV(L,11);</p><p>FG01:=BACKSET(HH,6)&gt;BACKSET(HH,5) ;</p><p>FD01:=BACKSET(LL,6)&gt;BACKSET(LL,5) ;</p><p>FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G&gt;D,FG01,</p><p>&nbsp; &nbsp;IF(BARSLAST(FD01)&gt;BARSLAST(FG01),FG01,0));</p><p>FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D&gt;G,FD01,</p><p>&nbsp; &nbsp;IF(BARSLAST(FG01)&gt;BARSLAST(FD01),FD01,0));</p><p>FG0:=FG02 AND H=HHV(H,BARSLAST(FD02));</p><p>FD0:=FD02 AND L=LLV(L,BARSLAST(FG02));</p><p>GP:=IF(FG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;</p><p>DP:=IF(FD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;</p><p>GQ:=L&gt;REF(H,1) AND DAY!=REF(DAY,1);</p><p>DQ:=H&lt;REF(L,1) AND DAY!=REF(DAY,1);</p><p>GQL:=REF(L,BARSLAST(GQ));</p><p>DQH:=REF(H,BARSLAST(DQ));</p><p>FGH:=REF(H,BARSLAST(FG0));</p><p>FGL:=REF(L,BARSLAST(FG0));</p><p>FGH1:=REF(H,BARSLAST(FG0)+1);</p><p>FGL1:=REF(L,BARSLAST(FG0)+1);</p><p>FGH2:=REF(H,BARSLAST(FG0)+2);</p><p>FGL2:=REF(L,BARSLAST(FG0)+2);</p><p>FDH:=REF(H,BARSLAST(FD0));</p><p>FDL:=REF(L,BARSLAST(FD0));</p><p>FDH1:=REF(H,BARSLAST(FD0)+1);</p><p>FDL1:=REF(L,BARSLAST(FD0)+1);</p><p>FDH2:=REF(H,BARSLAST(FD0)+2);</p><p>FDL2:=REF(L,BARSLAST(FD0)+2);</p><p>FGZH:=IF(FGL&lt;=FGL1,FGH2,FGH1);</p><p>FGZL:=IF(FGH1&lt;FGL,FGL,IF(FGL&lt;=FGL1,FGL2,FGL1));</p><p>FDZH:=IF(FDL1&gt;FDH,FDH,IF(FDH&gt;=FDH1,FDH2,FDH1));</p><p>FDZL:=IF(FDH&gt;=FDH1,FDL2,FDL1);</p><p>FG1:=FGH&gt;FDZH AND FG0;</p><p>FD1:=FDL&lt;FGZL AND FD0;</p><p>FG:=FG1 AND FGH&gt;FDH AND FGL&gt;FDL AND FGL1&gt;FDL;</p><p>FD:=FD1 AND FDL&lt;FGL AND FDH&lt;FGH AND FDH1&lt;FGH;</p><p>BH0:=(H&lt;=REF(H,1) AND L&gt;=REF(L,1)) OR (H&gt;=REF(H,1) AND L&lt;=REF(L,1));</p><p>BHG:=COUNT(BH0,BARSLAST(FD0));</p><p>BHD:=COUNT(BH0,BARSLAST(FG0));</p><p>BGQ:=COUNT(GQ,BARSLAST(FD0));</p><p>BDQ:=COUNT(DQ,BARSLAST(FG0));</p><p>BK0:=IF(BHG&gt;0,BHG+2,IF(BHD,BHD+2,3));</p><p>BK:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0));</p><p>G1X:=(FG AND BARSLAST(FD)&gt;BK);</p><p>D1X:=(FD AND BARSLAST(FG)&gt;BK);</p><p>G1:=(FG0 AND REF(H,BARSLAST(FG0))&gt;=REF(H,BARSLAST(G1X)) AND BARSLAST(D1X)&gt;BARSLAST(G1X))</p><p>OR (FG1 AND COUNT(GQ,BARSLAST(FD1))&gt;0 AND REF(H,BARSLAST(FG1))&gt;REF(H,BARSLAST(G1X)));</p><p>D1:=(FD0 AND REF(L,BARSLAST(FD0))&lt;=REF(L,BARSLAST(D1X)) AND BARSLAST(G1X)&gt;BARSLAST(D1X))</p><p>OR (FD1 AND COUNT(DQ,BARSLAST(FG1))&gt;0 AND REF(L,BARSLAST(FD1))&lt;REF(H,BARSLAST(D1X)));</p><p>G1H:=IF(BARSLAST(D1)&gt;BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1))),;</p><p>D1L:=IF(BARSLAST(G1)&gt;BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1)));</p><p>G2:=G1 AND H=HHV(G1H,BARSLAST(D1)+1) AND H&gt;REF(H,1) AND BARSLAST(D1)&gt;BARSLAST(G1);</p><p>D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) AND L&lt;REF(L,1) AND BARSLAST(G1)&gt;BARSLAST(D1);</p><p>G3:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))&gt;REF(H,BARSLAST(G2)) AND BARSLAST(D2)&gt;BARSLAST(G2));</p><p>D3:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))&lt;REF(L,BARSLAST(D2)) AND BARSLAST(G2)&gt;BARSLAST(D2));</p><p>GPB:=IF(G1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;</p><p>DPB:=IF(D1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;</p><p>{画折线}</p><p>NN:=G3;</p><p>UU:=D3;</p><p>L1:DRAWLINE(NN,H,UU, L,0),COLORDAC272,LINETHICK1;</p><p>L2:DRAWLINE(UU,L,NN, H,0),COLOR009393,LINETHICK1;</p><p><br></p><p>三一:H-(H-L)*0.333,NODRAW;</p><p>二一:H-(H-L)*0.5,NODRAW;</p><p>三二:H-(H-L)*0.666,NODRAW;</p><p>实体三一:O+(C-O)*0.666,NODRAW;</p><p>实体腰线:O+(C-O)*0.5,NODRAW;</p><p>DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK);{在屏幕左上角显示所属行业板块}</p><p>DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,DYBLOCK);{在屏幕左上角显示所属地域板块}</p><p>DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,GNBLOCK);{在屏幕左上角显示所属概念板块}</p><p><br></p><p>C_: CONST(C),COLORLIRED,POINTDOT;{现价线}</p><p>MA5:=MA(C,5);</p><p>MA5角度: ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,NODRAW;</p><p>DRAWKLINE(H,O,L,C);{重绘K线}</p><p>RC1:=REF(C,1);</p><p>CS:=IF(C&gt;=1,10000,100000);</p><p>C涨停10:=1.10*RC1-49/CS;{考虑到4舍5入}</p><p>C涨停5 :=1.05*RC1-49/CS;</p><p>C跌停10:=0.90*RC1+51/CS;</p><p>C跌停5 :=0.95*RC1+51/CS;</p><p>ST:=NAMELIKE('S') OR NAMELIKE('*S');</p><p>涨停:= IF(ST, C&gt;=C涨停5, C&gt;=C涨停10);</p><p>跌停:= IF(ST, C&lt;=C跌停5, C&lt;=C跌停10);</p><p>盘中涨停:=IF(ST, H&gt;=C涨停5, H&gt;=C涨停10);</p><p>盘中跌停:=IF(ST, L&lt;=C跌停5, L&lt;=C跌停10);</p><p>STICKLINE(盘中涨停,H,MAX(C,O),0,0),COLORMAGENTA;{涨停后回落}</p><p>STICKLINE(盘中跌停,L,MIN(C,O),0,0),COLORLICYAN;{跌停后回升}</p><p>大阳线:=C&gt;O AND (C&gt;=C涨停5 OR C&gt;(1.05*O-51/CS) ) OR (C&gt;1000 AND C&gt;RC1*1.024);</p><p>STICKLINE(大阳线,O,C,1,0),COLOR0000BB;</p><p>大阴线:=C&lt;O AND (C&lt;=C跌停5 OR C&lt;(0.95*O+49/CS) ) OR (C&gt;1000 AND C&lt;RC1*0.976);</p><p>STICKLINE(大阴线,O,C,1,0),COLORLIGREEN;</p><p>STICKLINE(涨停,O,C,1,0),COLORMAGENTA;</p><p>STICKLINE(跌停,O,C,1,0),COLORLICYAN;</p><p>假阴:=C&lt;O AND C&gt;REF(C,1);</p><p>STICKLINE(假阴,O,C,0,0),COLORRED;{假阴柱};</p><p>假阳:=C&gt;O AND C&lt;REF(C,1);</p><p>STICKLINE(假阳,O,C,0,0),COLORGREEN;{假阳柱};</p><p>大盘TJ:=PERIOD=5 AND NAMELIKE('上证指数')&nbsp;</p><p>&nbsp; &nbsp; &nbsp; &nbsp; AND (ABS((C-REF(C,1)))/REF(C,1)&gt;=0.025 OR ABS(C-O)&gt;=60);</p><p>STICKLINE(大盘TJ,(H+L)/2,(H+L)/2,2,0),COLORYELLOW;{显示大盘日线的60点大K线中值};</p><p>STICKLINE((大阳线 OR 大阴线 OR 涨停 OR 跌停)&nbsp;</p><p>&nbsp; AND BETWEEN(C,1,500),L+(H-L)/2,L+(H-L)/2,1,0),COLORYELLOW;{大K线画中点线};<br/>宣传:DRAWTEXT_FIX(1,0.99,5,1,'~☆~更多精选指标请访问:995168.cn'),COLORRED; </p><p><br></p></div>
页: [1]
查看完整版本: 通达信转折点主图有未来函数