缠论主图源码分享通达信公式——免费指标分享——彩虹桥-投资充电站

小妖花满楼满fx 发表于 2024-5-9 00:05:11

缠论主图源码分享通达信公式

{缠论主图,参数:N1 最小0 最大1 缺省1,公众号:缠论君} TIM:=TDXDLL3(100,PERIOD,H,L); {初始化周期} KX:=TDXDLL3(1,H,L,C); {解决包含K线的问题} VALID:=TDXDLL3(15,H,L,C); BI:=TDXDLL3(4,H,L,C); { BI类型} KXG:=TDXDLL3(2,H,L,C); {高点} KXD:=TDXDLL3(3,H,L,C); {低点} BILAST:=TDXDLL3(6,H,L,C);{上一笔的距离}{画笔,LCY去的,为了更准 DRAWLINE(BI=1, KXG, BI=-1, KXD,0),COLORYELLOW; DRAWLINE(BI=-1, KXD, BI=1, KXG,0),COLORYELLOW;} BILIST:=TDXDLL3(5,H,L,C);{BILIST} DUANLAST:=TDXDLL3(7,H,L,C);{上一段的距离} ZS:=TDXDLL3(8,H,L,C);{中枢处理} ZSZG:=TDXDLL3(9,H,L,C);{得到中枢ZG} ZSZD:=TDXDLL3(10,H,L,C);{得到中枢ZD} ZSKS:=TDXDLL3(11,H,L,C);{得到中枢开始} ZSJS:=TDXDLL3(12,H,L,C);{得到中枢结束} BIFX:=-REF(BI,BILAST);{下跌笔中枢} DRAWLINE(ZSKS=1,ZSZG,ZSJS=1,ZSZG,0),COLORGREEN,LINETHICK2; DRAWLINE(ZSKS=1,ZSZD,ZSJS=1,ZSZD,0),COLORGREEN,LINETHICK2; DRAWLINE(ZSKS=1,(ZSZG+ZSZD)/2,ZSJS=1,(ZSZG+ZSZD)/2,0),COLORGREEN,DOTLINE; STICKLINE(ZSKS=1,ZSZG,ZSZD,0.1,0),COLORGREEN; STICKLINE(ZSJS=1,ZSZG,ZSZD,0.1,0),COLORGREEN;{上涨笔中枢} DRAWLINE(ZSKS=2,ZSZG, ZSJS=2,ZSZG,0),COLORRED,LINETHICK2; DRAWLINE(ZSKS=2,ZSZD, ZSJS=2,ZSZD,0),COLORRED,LINETHICK2; DRAWLINE(ZSKS=2,(ZSZG+ZSZD)/2,ZSJS=2,(ZSZG+ZSZD)/2,0),COLORRED,DOTLINE; STICKLINE(ZSKS=2,ZSZG,ZSZD,0.1,0),COLORRED; STICKLINE(ZSJS=2,ZSZG,ZSZD,0.1,0),COLORRED;{绘制最后当下的力度} DRAWNUMBER(BI=1 AND N1=0,H,H-REF(L,BILAST)),COLORMAGENTA; DRAWNUMBER(BI=-1 AND N1=0,L,L-REF(H,BILAST)),COLORCYAN;{平滑移动平均} MA26:=EMA(C,26); MA13:=EMA(C,13); VAR1:=KX; VAR2:=BI; 分型:=VAR1; 笔:=VAR2; A1:=BARSLAST(VAR2<>0);{上个顶底到现在的时间} A2:=REF(VAR2,A1); {是顶还是底} AA1:=REF(A1+1,1); {上个顶底到现在的时间} AA2:=-REF(A2,1); {1 上涨, -1下跌} 方向:=AA2; AA3:=AA1+REF(AA1+1,AA1); AA4:=AA3+REF(AA1+1,AA3); H1:=BARSLAST(VAR2=1); H2:=REF(VAR2,H1); HH1:=REF(H1+1,1); HH2:=-REF(H2,1); L1:=BARSLAST(VAR2=-1); L2:=REF(VAR2,L1); LL1:=REF(L1+1,1); LL2:=-REF(L2,1); {高低点} GG:=REF(H,H1); GG1:=REF(H,HH1); GG2:=REF(GG1,HH1); GG3:=REF(GG2,HH1); GG4:=REF(GG3,HH1); GG5:=REF(GG4,HH1); DD:=REF(L,L1); DD1:=REF(L,LL1); DD2:=REF(DD1,LL1); DD3:=REF(DD2,LL1); DD4:=REF(DD3,LL1); DD5:=REF(DD4,LL1);{买点}{主要是从形态考虑TJA，空间做为次要条件KJ提高成功率 } {一买} {反弹高点站不上26天线就} {利用形态抓下+盘+下} 一买TJ1:=方向=1 AND L<MA13 AND LL1<=5; 一五段下跌:=DD1<GG1 AND DD1<DD2 AND DD1<DD3 AND GG1<GG2 AND GG1<GG3; 一买TJA:=GG1<DD3; {存在缺口} 一买A:=一买TJ1 AND 一五段下跌 AND 一买TJA, LINETHICK0, COLORRED; {89%} 一买KJA:=GG1-DD1<GG2-DD2 AND GG1-DD1>GG3-DD3 AND GG3-DD3<GG2-DD2 AND GG2-DD2>(GG1-DD1)*1.618; 一买AAA:=一买TJ1 AND 一五段下跌 AND 一买TJA AND 一买KJA, LINETHICK0, COLORRED; {93%} 一买TJB:=GG1>DD3; {不存在缺口} 一买KJB:=GG3-DD3>GG1-DD1 AND GG3-DD3>GG2-DD2 AND GG2-DD2<GG1-DD1; 一买B:=一买TJ1 AND 一五段下跌 AND 一买TJB AND 一买KJB, LINETHICK0, COLORRED; {85} {类二买} {思路是利用形态抓上+盘+(上)}{注意有这两个条件成功率提高很多 GG1>GG2 AND DD1>DD2} 类二买TJ:=方向=1 AND C<MA13 AND LL1<=8; 类二买TJ2:=DD1<GG1 AND DD3<DD2 AND DD3<DD1 AND DD3<DD4; 类二买KJ:=GG2-DD3>GG2-DD2 AND GG2-DD3>GG1-DD1; 类二买A:=类二买TJ AND 类二买TJ2 AND类二买KJ,COLORRED; {85} 类二买TJA:=GG1>GG2 AND DD1>DD2 AND GG2-DD3>(GG2-DD2)*1.618;{力度大概影响3个点左右} 类二买AAA:=类二买A AND 类二买TJA,COLORRED; {最强买} {90} {二买1:OK:PASS} {二买} 买TJ1:=方向=1 AND L<MA26 AND LL1<=8; 二买TJ:=DD1<GG1 AND DD1>DD2; {二买形态} 三段下跌:=GG3>GG2 AND DD3>DD2; {三段式下跌} 二买TJA1:=GG1>DD3; {第一段上涨至少回到前中枢内} 二买A:=买TJ1 AND 二买TJ AND 三段下跌 AND 二买TJA1, LINETHICK0, COLORYELLOW; {77.5} 五段下跌:=GG4>GG3 AND GG4>GG2 AND DD2<DD3 AND DD2<DD4; {五段下跌} 二买TJB1:=GG2<DD4 AND GG1>DD3; {存在缺口} 二买TJB2:=GG2>DD4; {不存在缺口} 二买B1:=买TJ1 AND 二买TJ AND 五段下跌 AND 二买TJB1, LINETHICK0, COLORYELLOW;{91.7 - 3} 二买B2:=买TJ1 AND 二买TJ AND 五段下跌 AND 二买TJB2, LINETHICK0, COLORYELLOW;{75.8} 二买AAA:=二买B1, LINETHICK0, COLORYELLOW; {三买} 三买TJ:=DD1<GG1 AND DD1>DD2; 三买TJA1:=方向=1 AND L<MA13 AND LL1<=5; 三买TJA2:=DD1>MIN(GG2,GG3) AND GG3>DD2 AND DD4<MAX(DD2,DD3) AND DD1>DD4 ; {GG2 GG3 在同一中枢内} 三买A:=三买TJ AND 三买TJA1 AND 三买TJA2,COLORMAGENTA; {如果DD1>GG4成功率更高}{卖点}{主要是从形态考虑买点的逆向思维不考虑空间} {一卖} 一卖TJ1:=方向=-1 AND H>MA13 AND HH1<=5; 一五段上涨:=GG1>GG2 AND GG1>GG3 AND DD1>DD2 AND DD1>DD3; 一卖TJA:=DD1>GG3; {缺口} 一卖A:=一卖TJ1 AND 一五段上涨 AND 一卖TJA,COLORGREEN; 一卖TJB:=DD1<GG3 AND GG1-DD1>GG2-DD2 AND GG3-DD3-GG2-DD2; 一卖B:=一卖TJ1 AND 一五段上涨 AND 一卖TJB,COLORGREEN; 一卖TJC:=GG1>GG2 AND GG2>GG3 AND GG3>GG4 AND GG4>GG5 AND DD1>DD2 AND DD2>DD3 AND DD3>DD4 AND DD4>DD5; {连涨4段} 一卖C:=一卖TJ1 AND 一卖TJC,COLORGREEN; {27 - 68}{二卖} 卖TJ1:=方向=-1 AND H>MA13 AND HH1<=8; 二卖TJ:=GG1>DD1 AND GG1<GG2; {二卖形态} 三段上涨:=GG3<GG2 AND DD3<DD2; {三段式上涨} 二卖TJA1:=DD1>GG3; {第一段下跌至少回到前中枢内} 二卖A:=卖TJ1 AND 二卖TJ AND 三段上涨 AND 二卖TJA1, LINETHICK0, COLORF0F000; {44-50} 五段上涨:=GG2>GG3 AND GG2>GG4 AND DD4<DD3 AND DD4<DD2; {五段上涨} 二卖TJB1:=GG4<DD2 AND DD1<GG3; {存在缺口} 二卖TJB2:=GG4>DD2; {不存在缺口} 二卖B1:=卖TJ1 AND 二卖TJ AND 五段上涨 AND 二卖TJB1, LINETHICK0, COLORF0F000;{38 - 48} 二卖B2:=卖TJ1 AND 二卖TJ AND 五段上涨 AND 二卖TJB2, LINETHICK0, COLORF0F000;{39 - 48} 一段上涨:=GG2>GG3 AND GG2>GG4 AND DD1>MIN(GG3, GG4); {在下跌时有点三卖的感觉} 二卖C1:=卖TJ1 AND 二卖TJ AND 一段上涨, LINETHICK0, COLORF0F000; {41 47}{三卖} 三卖TJ:=DD1<GG1 AND GG1<GG2; 三卖TJA1:=方向=-1 AND H>MA13 AND HH1<=5; 三卖TJA2:=GG1<MAX(DD2,DD3) AND GG2>DD3 AND GG4>MIN(GG2,GG3) AND GG1<GG4 ; {GG2 GG3 在同一中枢内} 三卖A:=三卖TJ AND 三卖TJA1 AND 三卖TJA2 , LINETHICK0, COLORWHITE; {GG1<DD4成功率更高}{买卖点提示} 一买:=一买A OR 一买B, COLORRED; 类二买:=类二买A, COLORRED; 二买:=二买A OR 二买B1 OR 二买B2, COLORYELLOW; 三买:=三买A, COLORMAGENTA; 一卖:=一卖A OR 一卖B OR 一卖C, COLORGREEN; 二卖:=二卖A OR 二卖B1 OR 二卖B2 OR 二卖C1, COLORF0F000; 三卖:=三卖A, COLORWHITE; 二三买合:=二买 AND 三买,COLORMAGENTA; {85 信号量少} 二三卖合:=二卖 AND 三卖, COLORF0F000; {13-87} 高成功率:=一买AAA OR 二买AAA OR 类二买AAA; 次高成功:=二三买合; 清仓:=二三卖合; DRAWTEXT(一买 AND FILTER(一买, 8),REF(L,1), '①'),COLORYELLOW; DRAWTEXT(类二买 AND FILTER(类二买, 8) , REF(L,1), '类②'),COLORYELLOW; DRAWTEXT(二买 AND FILTER(二买, 8), REF(L,1), '②'), COLORYELLOW; DRAWTEXT(三买 AND FILTER(三买, 8), REF(L,1), '③'),COLORYELLOW; DRAWTEXT(一卖 AND FILTER(一卖, 8),REF(H,1), '①'), COLORGREEN ; DRAWTEXT(二卖 AND FILTER(二卖, 8) , REF(H,1), '②'), COLORGREEN; DRAWTEXT(三卖 AND FILTER(三卖, 8) ,REF(H,1), '③'), COLORGREEN;{涨停板}TB:=(C-REF(C,1))/REF(C,1)*100;STICKLINE(TB>9.9,O,C,2.5,0)COLORMAGENTA;STICKLINE(TB<-9.9,O,C,2.5,0)COLORGREEN;DRAWNUMBER(ISLASTBAR,C,C),COLORYELLOW;{为了极点画线更准，LCY增加以下}局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));距前高天:=BARSLAST(局部高点预选C=1);距前低天:=BARSLAST(局部低点预选C=-1);小值周期:=LOWRANGE(L);大值周期:=TOPRANGE(H);低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0);判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);距前高天A:=BARSLAST(高保留=1);距前低天A:=BARSLAST(低保留=-1);预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0);高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);距前高天YA:=BARSLAST(高保留X=1);距前低天YA:=BARSLAST(低保留X=-1);预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0);高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0); AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);{局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW;高低点都画黄圈}局部极低:IF(极点保留=-1,L,DRAWNULL), CIRCLEDOT COLORYELLOW;局部极高:IF(极点保留=1,H,DRAWNULL), CIRCLEDOT COLORCYAN,LINETHICK2; DRAWLINE(极点保留=-1,局部极低,极点保留=1,局部极高,0),COLORYELLOW;{极点画线} DRAWLINE(极点保留=1,局部极高,极点保留=-1,局部极低,0),COLORCYAN;{极点画线}{ DD1:=BARSLAST(ABS(极点保留)!=1);} DRAWTEXT(极点保留=1,局部极高*1.03,'↓卖'),COLORCYAN; STICKLINE(极点保留=1,局部极高,局部极高,20,0),COLORCYAN; DRAWNUMBER(极点保留=1,局部极高,局部极高)COLORCYAN; DRAWTEXT(极点保留=-1,局部极低*0.97,'↖买'),COLORYELLOW; STICKLINE(极点保留=-1,局部极低,局部极低,20,0),COLORRED; DRAWNUMBER(极点保留=-1,局部极低,局部极低),COLORRED;DRAWTEXT_FIX(1,0.980,20,1,'★云指标公式网'),COLOR666666; {缠论均线提示}重心:=(H+L+O+C*3)/6;NX:=(3*CLOSE+LOW+OPEN+HIGH)/6; 牛线:=(20*NX+19*REF(NX,1)+18*REF(NX,2)+17*REF(NX,3)+16*REF(NX,4) +15*REF(NX,5)+14*REF(NX,6)+13*REF(NX,7)+12*REF(NX,8)+11*REF(NX,9) +10*REF(NX,10)+9*REF(NX,11)+8*REF(NX,12)+7*REF(NX,13)+6*REF(NX,14) +5*REF(NX,15)+4*REF(NX,16)+3*REF(NX,17) +2*REF(NX,18)+REF(NX,20))/210;牛熊线:MA(牛线,4),COLORGREEN,LINETHICK2;IF(牛熊线<=牛线,牛熊线,DRAWNULL),LINETHICK2,COLORRED;MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;DKX:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5) +14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11) +8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17) +2*REF(MID,18)+REF(MID,20))/210,COLORRED,LINETHICK1;MADKX:MA(DKX,10),COLORFFCC18,LINETHICK1;湿吻:=CROSS(DKX,MADKX) AND DKX>MADKX;DRAWTEXT(湿吻,DKX*0.98,' 湿吻'),COLORYELLOW;{唇吻:=REF(DKX,1)<REF(DKX,2) AND DKX>REF(DKX,1 )AND REF(DKX,1)<牛熊线 AND DKX>MADKX;}唇吻:=CROSS(MADKX,DKX) AND DKX<MADKX;DRAWTEXT(唇吻,DKX*0.98,' 唇吻'),COLORYELLOW;

页: [1]

彩虹桥-投资充电站's Archiver

缠论主图源码分享通达信公式