缠中说禅主图三角形中枢划线主图指标通达信指标公式源码
- 格式:doc
- 大小:369.00 KB
- 文档页数:6
NAA:=10;{源码120.调整时间长短。
最底10、21;}TA:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-L OW));ATR:=EMA(TA,5);{筹码峰高度调整线,源码181。
参数最低21.如果抓大牛把参数加大。
}VAR81:=REF(CLOSE,NAA)-REF(ATR,1);仙界线:=HHV(VAR81,5),COLORYELLOW;{筹码峰高度调整线,最低21.源码181}上:=(1+1/100)*仙界线;下:=(1-1/100)*仙界线;{上:=(1+7/100)*仙界线;下:=(1-7/100)*仙界线;中:=(上+下)/2;}XGD:DRAWBAND(上,RGB(258,88,0),下,RGB(258,88,0));{颜色亮度};{箱体}TC1S:=IF(H=HHV(H,48),H,DRAWNULL);TC2S:=CONST(BARSLAST(TC1S=H))+1;UPPERS:=CONST(IF(TC2S=1,H,REF(H,TC2S-1)));BC1S:=IF(L=LLV(L,48),L,DRAWNULL);BC2S:=CONST(BARSLAST(BC1S=L))+1;LOWERS:=CONST(IF(BC2S=1,L,REF(L,BC2S-1)));LPS:=CURRBARSCOUNT<=BC2S AND L=LOWERS;HPS:=CURRBARSCOUNT<=TC2S AND H=UPPERS;AB1S:=EMA(((2*C+H+L)/4-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,8);BA1S:=EMA(AB1S,5);上轨:=REFDATE(REF(HHV(MAX(C,O),96),5),DATE);下轨:=REFDATE(REF(LLV(MIN(C,O),96),5),DATE);中轨:=((上轨)+(下轨))/2;YXHX:=DATE>=REF(DATE,BARSLAST(IF(BC2S>TC2S,LPS,HPS)));上沿:IF(AB1S>0 AND AB1S-BA1S<=0 AND YXHX,上轨,上轨),COLOR555555,LINETHICK2;中枢:IF(AB1S>0 AND AB1S-BA1S<=0 AND YXHX,中轨,中轨),COLOR555555,LINETHICK2;下沿:IF(AB1S>0 AND AB1S-BA1S<=0 AND YXHX,下轨,下轨),COLOR555555,LINETHICK2;{三K线}三K线:=IF(三K线,1,DRAWNULL);DG:=MAX(MAX(REFX(L,1),REFX(L,2)),REFX(L,3));GD:=MIN(MIN(REFX(H,1),REFX(H,2)),REFX(H,3));AA11:=(DG+GD)/2;A11:=AA11>REFX(L,3) AND REFX(L,2)< AA11 AND REFX(L,1) <AA11 ;A21:=FILTER(A11,BARSLAST(A11)+2);A41:=A11 AND A21;A51:=IF(REF(A41,1),H,0),NODRAW;STICKLINE(三K线=1 &&REF(A41,2),REF(GD,2),REF(DG,2),13,-1),COLORMAGENTA; DRAWKLINE(H,O,L,C);{峰谷}峰谷:=IF(峰谷,1,DRAWNULL);PA:=10;PB:=REF(HIGH,PA)=HHV(HIGH,2*PA+1);PC:=FILTER(PB,PA);PD:=BACKSET(PC,PA+1);PE:=FILTER(PD,PA);{高点}峰线:(REF(HIGH,BARSLAST(PE)))*峰谷,COLORRED,POINTDOT,LINETHICK2; AA21:=REF(LOW,PA)=LLV(LOW,2*PA+1);BB21:=FILTER(AA21,PA);CC21:=BACKSET(BB21,PA+1);DD21:=FILTER(CC21,PA);{低点}谷线:(REF(LOW,BARSLAST(DD21)))*峰谷,COLORGREEN,POINTDOT,LINETHICK2;{三角形中枢}时间:=4;A:=H=HHV(H,时间*5) AND HHV(H,时间*5)>REF(HHV(H,时间*5),1);B:=L=LLV(L,时间*5) AND LLV(L,时间*5)<REF(LLV(L,时间*5),1);CCA:DRAWLINE(A,H,B,L,0),COLORGREEN,LINETHICK2;CCB:DRAWLINE(B,L,A,H,0),COLORRED,LINETHICK2;N:=(0,1,1);{缠论高低点}局部低点预选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) ANDH>REF(L,距前低天YA+1),1,0);预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)!=1) ORREF(高保留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,COLORLIMAGENTA;C1:DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0),COLORMAGENTA;C2:DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0),COLORWHITE;DRAWTEXT(极点保留=1,局部极点,'卖'),COLORGREEN;DRAWTEXT(极点保留=-1,局部极点,'买'),LINETHICK2,COLORRED;{均线}{MA1:EMA(C,M1),LINETHICK2,COLORWHITE;MA2:EMA(C,M2),LINETHICK2,COLORYELLOW;MA3:EMA(C,M3),LINETHICK2,COLORRED;}MC:=100;NN:=0.4;MIDZ:MA(CLOSE,MC),COLORWHITE,LINETHICK3;AN:=EMA((EMA(C,29)+EMA(C,31)+EMA(C,33))/3,3);A1:=EMA((EMA(C,1)+EMA(C,3)+EMA(C,5))/3,3),COLOR1010FF;A15D:IF(K2!=2, AN-(A1-AN*0.977),DRAWNULL),COLORBLUE,LINETHICK3; M5:=MA(C,3),COLORRED,LINETHICK3;{11、变色下插线}B55:=ATAN((A15D/REF(A15D,1)-1)*100)*180/3.1416;IF(55>30 AND A15D>REF(A15D,1),A15D,DRAWNULL),COLORCYAN,LINETHICK3;B100:=ATAN((M5/REF(M5,1)-1)*100)*180/3.1416;IF(B55<0 AND A15D<REF(A15D,1),A15D,DRAWNULL),COLORRED,LINETHICK3;{12、黄色起飞跑道};{13、飓风眼启爆,K线下方蓝色柱,股价启动信号,无函数}AHC1:=CLOSE*VOL;AHC2:=EMA((EXPMA(AHC1,2)/EXPMA(VOL,2)+EXPMA(AHC1,5)/EXPMA(VOL,5 )+EXPMA(AHC1,10)/EXPMA(VOL,10)+EXPMA(AHC1,20)/EXPMA(VOL,20))/4,10),COLOR YELLOW;风向R:=1.06*AHC2,LINETHICK2,COLORWHITE;吹:=1.13*AHC2,LINETHICK2,COLORWHITE;ZT:=REF(C,1)*1.1-C<0.01 AND H=C;飓风:=CROSS(C,风向R) AND ZT;STICKLINE(飓风,L*0.98,L*0.80,2,0),COLORBLUE;OUT1:=CROSS(M5,A15D);DRAWICON(OUT1,L*1.02,13);{红球};。
HB:=COST(99.9); LB:=COST(0.1); B3:=(HB-LB)/50; B31:=HB-B3;B32:=HB-2*B3; B33:=HB-3*B3; B34:=HB-4*B3; B35:=HB-5*B3; B36:=HB-6*B3; B37:=HB-7*B3; B38:=HB-8*B3; B39:=HB-9*B3; B310:=HB-10*B3; B311:=HB-11*B3; B312:=HB-12*B3; B313:=HB-13*B3; B314:=HB-14*B3; B315:=HB-15*B3; B316:=HB-16*B3; B317:=HB-17*B3; B318:=HB-18*B3; B319:=HB-19*B3;B320:=HB-20*B3;B321:=HB-21*B3;B322:=HB-22*B3;B323:=HB-23*B3;B324:=HB-24*B3;B325:=HB-25*B3;B326:=HB-26*B3;B327:=HB-27*B3;B328:=HB-28*B3;B329:=HB-29*B3;B330:=HB-30*B3;B331:=HB-31*B3;B332:=HB-32*B3;B333:=HB-33*B3;B334:=HB-34*B3;B335:=HB-35*B3;B336:=HB-36*B3;B337:=HB-37*B3;B338:=HB-38*B3;B339:=HB-39*B3;B340:=HB-40*B3;B341:=HB-41*B3;B342:=HB-42*B3;B343:=HB-43*B3;B344:=HB-44*B3;B345:=HB-45*B3;B346:=HB-46*B3;B347:=HB-47*B3;B348:=HB-48*B3;B349:=HB-49*B3;A1:=WINNER(HB)*100-WINNER(B31)*100; A2:=WINNER(B31)*100-WINNER(B32)*100; A3:=WINNER(B32)*100-WINNER(B33)*100; A4:=WINNER(B33)*100-WINNER(B34)*100; A5:=WINNER(B34)*100-WINNER(B35)*100; A6:=WINNER(B35)*100-WINNER(B36)*100; A7:=WINNER(B36)*100-WINNER(B37)*100; A8:=WINNER(B37)*100-WINNER(B38)*100;A9:=WINNER(B38)*100-WINNER(B39)*100;A10:=WINNER(B39)*100-WINNER(B310)*100; A11:=WINNER(B310)*100-WINNER(B311)*100; A12:=WINNER(B311)*100-WINNER(B312)*100; A13:=WINNER(B312)*100-WINNER(B313)*100; A14:=WINNER(B313)*100-WINNER(B314)*100; A15:=WINNER(B314)*100-WINNER(B315)*100; A16:=WINNER(B315)*100-WINNER(B316)*100; A17:=WINNER(B316)*100-WINNER(B317)*100; A18:=WINNER(B317)*100-WINNER(B318)*100; A19:=WINNER(B318)*100-WINNER(B319)*100; A20:=WINNER(B319)*100-WINNER(B320)*100; A21:=WINNER(B320)*100-WINNER(B321)*100; A22:=WINNER(B321)*100-WINNER(B322)*100; A23:=WINNER(B322)*100-WINNER(B323)*100; A24:=WINNER(B323)*100-WINNER(B324)*100; A25:=WINNER(B324)*100-WINNER(B325)*100; A26:=WINNER(B325)*100-WINNER(B326)*100; A27:=WINNER(B326)*100-WINNER(B327)*100; A28:=WINNER(B327)*100-WINNER(B328)*100; A29:=WINNER(B328)*100-WINNER(B329)*100; A30:=WINNER(B329)*100-WINNER(B330)*100; A31:=WINNER(B330)*100-WINNER(B331)*100; A32:=WINNER(B331)*100-WINNER(B332)*100; A33:=WINNER(B332)*100-WINNER(B333)*100; A34:=WINNER(B333)*100-WINNER(B334)*100; A35:=WINNER(B334)*100-WINNER(B335)*100; A36:=WINNER(B335)*100-WINNER(B336)*100; A37:=WINNER(B336)*100-WINNER(B337)*100; A38:=WINNER(B337)*100-WINNER(B338)*100; A39:=WINNER(B338)*100-WINNER(B339)*100; A40:=WINNER(B339)*100-WINNER(B340)*100; A41:=WINNER(B340)*100-WINNER(B341)*100; A42:=WINNER(B341)*100-WINNER(B342)*100; A43:=WINNER(B342)*100-WINNER(B343)*100; A44:=WINNER(B343)*100-WINNER(B344)*100; A45:=WINNER(B344)*100-WINNER(B345)*100; A46:=WINNER(B345)*100-WINNER(B346)*100;A47:=WINNER(B346)*100-WINNER(B347)*100;A48:=WINNER(B347)*100-WINNER(B348)*100;A49:=WINNER(B348)*100-WINNER(B349)*100;A50:=WINNER(B349)*100-WINNER(LB)*100;STICKLINE(ISLASTBAR,HB ,HB ,A1*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B31 ,B31 ,A1*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B32 ,B32 ,A2*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B33 ,B33 ,A3*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B34 ,B34 ,A4*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B35 ,B35 ,A5*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B36 ,B36 ,A6*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B37 ,B37 ,A7*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B38 ,B38 ,A8*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B39 ,B39 ,A9*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B310 ,B310 ,A10*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B311 ,B311 ,A11*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B312 ,B312 ,A12*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B313 ,B313 ,A13*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B314 ,B314 ,A14*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B315 ,B315 ,A15*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B316 ,B316 ,A16*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B317 ,B317 ,A17*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B318 ,B318 ,A18*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B319 ,B319 ,A19*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B320 ,B320 ,A20*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B321 ,B321 ,A21*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B322 ,B322 ,A22*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B323 ,B323 ,A23*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B324 ,B324 ,A24*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B325 ,B325 ,A25*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B326 ,B326 ,A26*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B327 ,B327 ,A27*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B328 ,B328 ,A28*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B329 ,B329 ,A29*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B330 ,B330 ,A30*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B331 ,B331 ,A31*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B332 ,B332 ,A32*50 ,0 ),COLOR808080; STICKLINE(ISLASTBAR,B333 ,B333 ,A33*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B334 ,B334 ,A34*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B335 ,B335 ,A35*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B336 ,B336 ,A36*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B337 ,B337 ,A37*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B338 ,B338 ,A38*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B339 ,B339 ,A39*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B340 ,B340 ,A40*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B341 ,B341 ,A41*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B342 ,B342 ,A42*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B343 ,B343 ,A43*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B344 ,B344 ,A44*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B345 ,B345 ,A45*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B346 ,B346 ,A46*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B347 ,B347 ,A47*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,B348 ,B348 ,A48*50 ,0 ),COLOR808080;STICKLINE(ISLASTBAR,LB ,LB ,A50*50 ,0 ),COLOR808080;筹码峰:=MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX( MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(A1,A2),MAX(A3,A4)),MAX(A5,A6)),MAX(A 7,A8)),MAX(A9,A10)),MAX(A11,A12)),MAX(A13,A14)),MAX(A15,A16)),MAX(A17,A18)),MAX(A19,A20)),MAX(A21,A22)),MAX(A23,A24)),MAX(A25,A26)),MAX(A2 7,A28)),MAX(A29,A30)),MAX(A31,A32)),MAX(A33,A34)),MAX(A35,A36)),MAX(A37,A38)),MAX(A39,A40)),MAX(A41,A42)),MAX(A43,A44)),MAX(A45,A46)),MAX(A4 7,A48)),A50);筹码峰价格:=IF(筹码峰=A1,HB OR B31,IF(筹码峰=A2,B32,IF(筹码峰=A3,B33,IF(筹码峰=A4,B34,IF(筹码峰=A5,B35,IF(筹码峰=A6,B36,IF(筹码峰=A7,B37,IF(筹码峰=A8,B38,IF(筹码峰=A9,B39,IF(筹码峰=A10,B310,IF(筹码峰=A11,B311,IF(筹码峰=A12,B312,IF(筹码峰=A13,B313,IF(筹码峰=A14,B314,IF(筹码峰=A15,B315,IF(筹码峰=A16,B316,IF(筹码峰=A17,B317,IF(筹码峰=A18,B318,IF(筹码峰=A19,B319,IF(筹码峰=A20,B320,IF(筹码峰=A21,B321,IF(筹码峰=A22,B322,IF(筹码峰=A23,B323,IF(筹码峰=A24,B324,IF(筹码峰=A25,B325,IF(筹码峰=A26,B326,IF(筹码峰=A27,B327,IF(筹码峰=A28,B328,IF(筹码峰=A29,B329,IF(筹码峰=A30,B330,IF(筹码峰=A31,B331,IF(筹码峰=A32,B332,IF(筹码峰=A33,B333,IF(筹码峰=A34,B334,IF(筹码峰=A35,B335,IF(筹码峰=A36,B336,IF(筹码峰=A37,B337,IF(筹码峰=A38,B338,IF(筹码峰=A39,B339,IF(筹码峰=A40,B340,IF(筹码峰=A41,B341,IF(筹码峰=A42,B342,IF(筹码峰=A43,B343,IF(筹码峰=A44,B344,IF(筹码峰=A45,B345,IF(筹码峰=A46,B346,IF(筹码峰=A47,B347,IF(筹码峰=A48,B348,IF(筹码峰=A50,LB,DRAWNULL))))))))))))))))))))))))))))))))))))))))))))))))); STICKLINE(ISLASTBAR,筹码峰价格,筹码峰价格,筹码峰*50,0 ),COLORBLUE,LINETHICK5;{===================================================== =================================};ZQ:=PERIOD;ZI:=(ZQ=5 OR ZQ=6 OR ZQ=7) AND ISLASTBAR;DRAWTEXT_FIX(ZI,0,0.11,0,STRCAT('风格:',FGBLOCK)),COLORLIGRAY; DRAWTEXT_FIX(ZI,0,0.06,0,STRCAT('概念:',GNBLOCK)),COLORLIGRAY; DRAWTEXT_FIX(ZI,0,0.01,0,STRCAT('行业:',HYBLOCK)),COLORLIGRAY; DRAWTEXT_FIX(ZI,0,0.16,0,STRCAT('地域:',DYBLOCK)),COLORLIGRAY;NOTEXTMA3:EMA(CLOSE,3),COLOR007618;NOTEXTMA5:EMA(CLOSE,5),COLOR007618;NOTEXTMA8:EMA(CLOSE,8),COLOR007618;NOTEXTMA10:EMA(CLOSE,10),COLOR007618;NOTEXTMA12:EMA(CLOSE,12),COLOR007618;NOTEXTMA15:EMA(CLOSE,15),COLOR007618;NOTEXTMA30:EMA(CLOSE,30),COLOR808080;NOTEXTMA35:EMA(CLOSE,35),COLOR808080;NOTEXTMA40:EMA(CLOSE,40),COLOR808080;NOTEXTMA45:EMA(CLOSE,45),COLOR808080;NOTEXTMA50:EMA(CLOSE,50),COLOR808080;NOTEXTMA60:EMA(CLOSE,60),COLOR808080;NOTEXTMID:MA(CLOSE,26),COLORRED;TMP2:=STD(CLOSE,26);NOTEXTTOP:NOTEXTMID+2*TMP2;NOTEXTBOTTOM:NOTEXTMID-2*TMP2;G:=MA(C,5);D:=MA(C,10);HH:=REF(H,5)=HHV(H,11);LL:=REF(L,5)=LLV(L,11);FG01:=BACKSET(HH,6)>BACKSET(HH,5) ;FD01:=BACKSET(LL,6)>BACKSET(LL,5) ;FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>D,FG01,IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0));FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>G,FD01,IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0));FG0:=FG02 AND H=HHV(H,BARSLAST(FD02));FD0:=FD02 AND L=LLV(L,BARSLAST(FG02));GP:=IF(FG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;DP:=IF(FD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;GQ:=L>REF(H,1) AND DAY!=REF(DAY,1);DQ:=H<REF(L,1) AND DAY!=REF(DAY,1);GQL:=REF(L,BARSLAST(GQ));DQH:=REF(H,BARSLAST(DQ));FGH:=REF(H,BARSLAST(FG0));FGL:=REF(L,BARSLAST(FG0));FGH1:=REF(H,BARSLAST(FG0)+1);FGL1:=REF(L,BARSLAST(FG0)+1);FGH2:=REF(H,BARSLAST(FG0)+2);FGL2:=REF(L,BARSLAST(FG0)+2);FDH:=REF(H,BARSLAST(FD0));FDL:=REF(L,BARSLAST(FD0));FDH1:=REF(H,BARSLAST(FD0)+1);FDL1:=REF(L,BARSLAST(FD0)+1);FDH2:=REF(H,BARSLAST(FD0)+2);FDL2:=REF(L,BARSLAST(FD0)+2);FGZH:=IF(FGL<=FGL1,FGH2,FGH1);FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1));FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));FDZL:=IF(FDH>=FDH1,FDL2,FDL1);FG1:=FGH>FDZH AND FG0;FD1:=FDL<FGZL AND FD0;FG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL;FD:=FD1 AND FDL<FGL AND FDH<FGH AND FDH1<FGH;BH0:=(H<=REF(H,1) AND L>=REF(L,1)) OR (H>=REF(H,1) AND L<=REF(L,1)); BHG:=COUNT(BH0,BARSLAST(FD0));BHD:=COUNT(BH0,BARSLAST(FG0));BGQ:=COUNT(GQ,BARSLAST(FD0));BDQ:=COUNT(DQ,BARSLAST(FG0));BK0:=IF(BHG>0,BHG+2,IF(BHD,BHD+2,3));BK:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0));G1X:=(FG AND BARSLAST(FD)>BK);D1X:=(FD AND BARSLAST(FG)>BK);G1:=(FG0 AND REF(H,BARSLAST(FG0))>=REF(H,BARSLAST(G1X)) AND BARSLAST(D1X)>BARSLAST(G1X))OR (FG1 AND COUNT(GQ,BARSLAST(FD1))>0 ANDREF(H,BARSLAST(FG1))>REF(H,BARSLAST(G1X)));D1:=(FD0 AND REF(L,BARSLAST(FD0))<=REF(L,BARSLAST(D1X)) ANDBARSLAST(G1X)>BARSLAST(D1X))OR (FD1 AND COUNT(DQ,BARSLAST(FG1))>0 ANDREF(L,BARSLAST(FD1))<REF(H,BARSLAST(D1X)));G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1))); D1L:=IF(BARSLAST(G1)>BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1))); G2:=G1 AND H=HHV(G1H,BARSLAST(D1)+1) AND H>REF(H,1) ANDBARSLAST(D1)>BARSLAST(G1);D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) AND L<REF(L,1) ANDBARSLAST(G1)>BARSLAST(D1);G3:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));D3:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));NOTEXTGPB:IF(G1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;NOTEXTDPB:IF(D1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;{画线}NN:=G3;UU:=D3;DRAWLINE(UU,L,NN, H,0),COLORWHITE;DRAWLINE(NN,H,UU, L,0),COLORWHITE;AO:=WMA((REF(O,1)+REF(C,1))/2,3);AC:=WMA((H+C+O+L)/4,3);AH:=WMA(MAX(H,MAX(O,C)),3);AL:=WMA(MIN(L,MIN(O,C)),3);{K线}{STICKLINE(AC>=AO,AL,AH,0.00001,0),COLORRED;STICKLINE(AC>AO,AO,AC,2.5,0),COLORRED;STICKLINE(AC>AO,O+(C-O)/4,C-(C-O)/2,2,0),COLORCC66FF;STICKLINE(AC<AO,AO,AC,2.5,0),COLORFF6600;STICKLINE(AC<AO,O+(C-O)/4,C-(C-O)/2,2,0),COLORFF9900;{STICKLINE(AC<AO,AL,AH,0.00001,0),COLORFF9900;}HHA:=HHV(HIGH,5);LLA:=LLV(LOW,5);HH1:=BARSLAST((HHA > REF(HHA,1)));LL1:=BARSLAST((LLA < REF(LLA,1)));STICKLINE(HH1 < LL1,O+(C-O)/4,C-(C-O)/2,2,0),COLORYELLOW;STICKLINE(HH1 > LL1,O+(C-O)/4,C-(C-O)/2,2,0),COLORWHITE;MA5:=MA(CLOSE,5);MA10:=MA(CLOSE,10);MA20:=MA(CLOSE,20);MA60:=MA(CLOSE,60);X1:=(C+L+H)/3;X2:=EMA(X1,6);X3:=EMA(X2,5);XG:=CROSS(X2,X3);STICKLINE(X2>=X3,C-(C-O)/4,O+(C-O)/2,2,0),COLORRED; STICKLINE(X2<X3,C-(C-O)/4,O+(C-O)/2,2,0),COLORGREEN;。
通达信缠论、笔、分型指标公式KX:='CHANLUN@KXIAN';KXG:='CHANLUN@KXG';KXD:='CHANLUN@KXD';KXFX:='CHANLUN@KXFX';笔:='CHANLUN@BI';BILAST:='CHANLUN@BILAST';段:='CHANLUN@DUAN';DUANLAST:='CHANLUN@DUANLAST';中枢:='CHANLUN@ZS';ZSZG:='CHANLUN@ZSZG';ZSZD:='CHANLUN@ZSZD';ZSGG:='CHANLUN@ZSGG';ZSDD:='CHANLUN@ZSDD';ZSZZ:='CHANLUN@ZSZZ';ZSKS:='CHANLUN@ZSKSLAST';ZSJS:='CHANLUN@ZSJSLAST';BIFX:=-REF(笔,BILAST);DUANFX:=-REF(段,DUANLAST);KXQJ:='CHANLUN@KXQJ';STICKLINE(ZSZG>ZSZD AND DUANFX=1, ZSZG, ZSZD, 10, 1),COLOR8E236B;STICKLINE(ZSZG>ZSZD AND DUANFX=-1, ZSZG, ZSZD, 10, 1), COLOR007700;DRAWLINE(ZSKS=1, ZSZZ, ZSJS=1, ZSZZ, 0), COLORFFFFFF;STICKLINE(KX>0, KXG, KXD, 5, 1),COLOR007700,LINETHICK2;STICKLINE(KX<0, KXG, KXD, 5, 1),COLOR00FFFF,LINETHICK2;STICKLINE(笔=1, KXG, KXD, 5, 1), colorgreen, LINETHICK2;STICKLINE(笔=-1, KXG, KXD, 5, 1), colorred, LINETHICK2;STICKLINE(段=1, KXG, KXD, 5, 0), COLOR007700, LINETHICK2;STICKLINE(段=-1, KXG, KXD, 5, 0), COLOR0000CC, LINETHICK2;DRAWLINE(笔=1,H,笔=-1,L,0),colorblue,LINETHICK2;DRAWLINE(笔=-1,L,笔=1,H,0),COLORFF00FF ,LINETHICK2;DRAWLINE(段=1,H,段=-1,L,0),COLOR007700, LINETHICK2;DRAWLINE(段=-1,L,段=1,H,0),colorred, LINETHICK2;DRAWTEXT(笔= 1, H*1.038, ''+H+''), COLORFFFFFF;DRAWTEXT(笔=-1, L*0.96, ''+L+''), COLORFFFFFF;VAR3:=LLV(H,240);VAR4:=100*(C-VAR3)/VAR3;VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;VAR7:=0;VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;VAR10:=IF(TROUGHBARS(3,16,1)=0 AND H>L+0.04,4,0);VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) ANDREF(ZIG(3,22),2)>=REF(ZIG(3,22),3);VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);VAR19:=EMA(C,2)-EMA(C,150);买1:=VAR10;买2:=(VAR11+VAR13+VAR15+VAR17);卖1:=(VAR12+VAR14+VAR16+VAR18);DRAWTEXT(买1>0 OR 买2>0,L*0.985,'买'),COLOR00FFFF;DRAWTEXT(卖1>0,H*1.01,'卖'),COLOR00FFFF;APP:=(VOL)/((H-L)*(2)-ABS(C-O));ZL:=IF((H>O),(APP)*(H-L),IF((L<O),(APP)*(H-O+C-L),(VOL)/(2)));SF:=IF((H>O),0-(APP)*(H-C+O-L),IF((L<O),0-(APP)*(H-L),0-(VOL)/(2)));库存能量:=MA(ZL+SF,2);库存平均:=MA(ZL+SF,5);GET:ZIG(3,5),coloryellow,LINETHICK3;PL5:=ZIG(3,5);EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3);EX1:=PL5<REF(PL5,1) AND REF(PL5,1)>=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3);PL10:=ZIG(3,10);EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3);PL20:=ZIG(3,20);EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3);走强1:=BARSLAST(PL5<REF(PL5,1));走弱1:=BARSLAST(PL5>REF(PL5,1));走强2:=BARSLAST(PL10<REF(PL10,1));走弱2:=BARSLAST(PL10>REF(PL10,1));走强3:=BARSLAST(PL20<REF(PL20,1));走弱3:=BARSLAST(PL20>REF(PL20,1));ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);DRAWTEXT(EN2 AND DTJZ10=1,L*0.93,'[类二买]'),COLORFFFFFF;DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'[一买]'),COLORFF00FF;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.05,'[二卖]'),LINETHICK2,COLORFFFF00;DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.95,'[二买]'),LINETHICK2,COLORFFFF00;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.04,'[一卖]'),LINETHICK3,COLOR00FF00;MA5:MA(CLOSE,5),colorwhite,LINETHICK1;MA10:MA(CLOSE,10),colorgreen,LINETHICK1;MA24:MA(CLOSE,24),colorred,LINETHICK1;趋势:ZIG(3,5);向上:=CROSS(趋势,REF(趋势,1));向下:=CROSS(REF(趋势,1),趋势);上1周期:=SUMBARS(向上,1);上2周期:=SUMBARS(向上,2);上3周期:=SUMBARS(向上,3);下1周期:=SUMBARS(向下,1);下2周期:=SUMBARS(向下,2);下3周期:=SUMBARS(向下,3);A1:=REF(趋势,下1周期);A2:=REF(趋势,下2周期);高点重叠:=MIN(A1,A2);低点重叠:=MAX(REF(趋势,上1周期),REF(趋势,上2周期));高点:=(趋势=高点重叠);连线1:=BARSLAST(高点)>上1周期 OR BARSLAST(高点)>下1周期;连线2:=BARSLAST(高点)<上2周期 OR BARSLAST(高点)<下2周期;低点:=(趋势=低点重叠);高1:=SUMBARS(高点,1);高2:=SUMBARS(高点,2);低1:=SUMBARS(低点,1);低2:=SUMBARS(低点,2); DRAWTEXT(C,高点重叠,'_____'); DRAWTEXT(C,低点重叠,'_____');。
缠中说禅板块强弱指标的实现源码⼀,通达信同花顺板块强弱公式N:=45;VAR2:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;VAR3:=SMA(VAR2,5,1);VAR4:=SMA(VAR3,3,1);个股波:SMA(VAR4,3,1),COLORWHITE,LINETHICK3;VAR22:=(INDEXC-LLV(INDEXL,N))/(HHV(INDEXH,N)-LLV(INDEXL,N))*100;VAR33:=SMA(VAR22,5,1);VAR44:=SMA(VAR33,3,1);指数波:SMA(VAR44,3,1),COLORRED,LINETHICK5;AA:=( "399300$ CLOSE "-LLV("399300$ LOW ",N))/(HHV("399300$ HIGH ",N)-LLV("399300$ LOW ",N))*100; AA1:=SMA(AA,5,1);AA2:=SMA(AA1,3,1);沪深300:SMA(AA2,3,1),COLORMAGENTA,LINETHICK2;BB:=( "399005$ CLOSE "-LLV("399005$ LOW ",N))/(HHV("399005$ HIGH ",N)-LLV("399005$ LOW ",N))*100; BB1:=SMA(BB,5,1);BB2:=SMA(BB1,3,1);中⼩板指:SMA(BB2,3,1),COLORYELLOW,LINETHICK1;CC:=( "399006$ CLOSE "-LLV("399006$ LOW ",N))/(HHV("399006$ HIGH ",N)-LLV("399006$ LOW ",N))*100; CC1:=SMA(CC,5,1);CC2:=SMA(CC1,3,1);创业板指:SMA(CC2,3,1),COLORCYAN,LINETHICK1;DD:=( "399305$ CLOSE "-LLV("399305$ LOW ",N))/(HHV("399305$ HIGH ",N)-LLV("399305$ LOW ",N))*100; DD1:=SMA(DD,5,1);DD2:=SMA(DD1,3,1);基⾦:SMA(DD2,3,1),COLORLICYAN,LINETHICK1;EE:=( "399190$ CLOSE "-LLV("399190$ LOW ",N))/(HHV("399190$ HIGH ",N)-LLV("399190$ LOW ",N))*100; EE1:=SMA(EE,5,1);EE2:=SMA(EE1,3,1);⾦融⾏业:SMA(EE2,3,1),COLORGREEN,LINETHICK2;FF:=( "399200$ CLOSE "-LLV("399200$ LOW ",N))/(HHV("399200$ HIGH ",N)-LLV("399200$ LOW ",N))*100; FF1:=SMA(FF,5,1);FF2:=SMA(FF1,3,1);地产:SMA(FF2,3,1),COLORLIGREEN,LINETHICK1;GG:=( "399110$ CLOSE "-LLV("399110$ LOW ",N))/(HHV("399110$ HIGH ",N)-LLV("399110$ LOW ",N))*100; GG1:=SMA(GG,5,1);GG2:=SMA(GG1,3,1);农林牧渔:SMA(GG2,3,1),COLORLIGRAY,LINETHICK1;HH:=( "399941$ CLOSE "-LLV("399941$ LOW ",N))/(HHV("399941$ HIGH ",N)-LLV("399941$ LOW ",N))*100; HH1:=SMA(HH,5,1);HH2:=SMA(HH1,3,1);新能源:SMA(HH2,3,1),COLORBROWN,LINETHICK1;II:=( "399137$ CLOSE "-LLV("399137$ LOW ",N))/(HHV("399137$ HIGH ",N)-LLV("399137$ LOW ",N))*100; II1:=SMA(II,5,1);II2:=SMA(II1,3,1);有⾊⾦属:SMA(II2,3,1),COLORLIRED,LINETHICK1;JJ:=( "399139$ CLOSE "-LLV("399139$ LOW ",N))/(HHV("399139$ HIGH ",N)-LLV("399139$ LOW ",N))*100; JJ1:=SMA(JJ,5,1);JJ2:=SMA(JJ1,3,1);医药:SMA(JJ2,3,1),COLORLIMAGENTA,LINETHICK1;⼆,通⽤版均线强弱分类公式:MA5:MA(C,5);MA13:MA(C,13);MA21:MA(C,21);MA34:MA(C,34);MA55:MA(C,55);MA89:MA(C,89);MA144:MA(C,144);MA233:MA(C,233);TMP1:=IF(C>MA5,1,0);TMP2:=IF(C>MA13,1,0);TMP3:=IF(C>MA21,1,0);TMP4:=IF(C>MA34,1,0);TMP5:=IF(C>MA55,1,0);TMP6:=IF(C>MA89,1,0);TMP7:=IF(C>MA144,1,0);TMP8:=IF(C>MA233,1,0);类别:TMP1+TMP2+TMP3+TMP4+TMP5+TMP6+TMP7+TMP8+1,LINETHICK0;。
选股指标一缠论主图(指标选股/通达信贴图)我把主图里的黄金分割位换成半对数,这在投资领域里最擅长用的,比黄金分割在投资领域里更合理。
是上班族和平时没空看盘投资者最佳的指标{智能版:=“核心指标.VAR100#DAY”;}智能版:=“指标.核心#DAY“;MA1:MA(CLOSE,M1),COLORWHITE;MA2:MA(CLOSE,M2),COLORYELLOW;MA3:MA(CLOSE,M3),COLORCYAN;MA4:MA(CLOSE,M4),COLORCYAN;日线:=IF(PERIOD=5,1,0);CA3: = REF(C,1)* 日线;A1:=REF(HIGH,3)=HHV(HIGH,笔周期*3+1)* 智能版;B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1);D1: = FILTER(C1,3);{高点}A2:=REF( LOW, 3)=LLV( LOW,笔周期*3+1)* 智能版;B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1);D2:=FILTER(C2,3);{低点}E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}H1:=(D1 AND NOT(D2 AND E1>=E2)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;H2: = D1 AND NOT(D2 AND E1>=E2);L1:=D2 AND NOT(D1 AND E1=E2);X1: = REF(BARSLAST(H1),1)+1;F1:=BACKSET(H1 AND COUNT(L1Z X1)>0/LLVBARS(IF(L1,LOW,10000),X1));G1:=F1>REF(F1,1);I1:=BACKSET(G1,2);LD:=I1>REF(I14);{过滤后低点}L2:=LD OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;X2:=REF(BARSLAST(L2),1)+1;F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));G2:=F2>REF(F2,1);I2:=BACKSET(G2Z2);HD:=I2>REF(I2,1);{过滤后高点}DRAWLINE(LD Z L,HD Z H,O),COLORYELLOW,LINETHICK1;DRAWLINE(HD,H,LD,L,O),COLORYELLOW,LINETHICK1;A3:=H;B3:=REF(H,REF(BARSLAST(HD),l)+l)>REF(H z REF(BARSLAST(HD),l)+2+REF(BARSLAST (HD),REF(BARSLAST(HD),l)+2));D3:=A3 AND B3 AND HD;E3: = BACKSET(D3z REF(BARSLAST(HD),l)+2);HH:=E3>REF(E3,1);{找出全部长期高点}A4:=L>REF(L,REF(BARSLAST(LD),1)+1);B4:=REF(L,REF(BARSLAST(LD),1)+1);D4:=A4 AND B4 AND LD;E4: = BACKSET(D4,REF(BARSLAST(LD),l)+2);LL:=E4>REF(E4,1);{找出全部长期低点}H3:=HH OR BARSTATUS=2 OR BARSCOUNT(C)=1; (后面进行过滤,方法同前。
通达信缠论中枢主图公式源码KX:='CHANLUN@KXIAN';KXG:='CHANLUN@KXG';KXD:='CHANLUN@KXD';KXFX:='CHANLUN@KXFX';笔:='CHANLUN@BI';笔周期:='CHANLUN@BILAST',LINETHICK0, COLORFF00FF;BILAST:='CHANLUN@BILAST';{笔周期};段:='CHANLUN@DUAN';段周期:='CHANLUN@DUANLAST', LINETHICK0, COLORFFFFFF;DUANLAST:='CHANLUN@DUANLAST'; {段周期};中枢:='CHANLUN@ZS';ZSZG:='CHANLUN@ZSZG';ZSZD:='CHANLUN@ZSZD';ZSGG:='CHANLUN@ZSGG';ZSDD:='CHANLUN@ZSDD';ZSZZ:='CHANLUN@ZSZZ';ZSKS:='CHANLUN@ZSKSLAST';ZSJS:='CHANLUN@ZSJSLAST';BIFX:=-REF(笔,BILAST);DUANFX:=-REF(段,DUANLAST);KXQJ:='CHANLUN@KXQJ';{画中枢BEGIN} {以背景方式画}STICKLINE(ZSZG>ZSZD AND DUANFX=1, ZSZG, ZSZD, 10, 1),COLOR8E236B;STICKLINE(ZSZG>ZSZD AND DUANFX=-1, ZSZG, ZSZD, 10, 1), COLOR007700;{中枢震荡监视器}DRAWLINE(ZSKS=1, ZSZZ, ZSJS=1, ZSZZ, 0), COLORFFFFFF;{画笔段}DRAWLINE(笔=1,H,笔=-1,L,0),COLORBLUE,LINETHICK2;DRAWLINE(笔=-1,L,笔=1,H,0),COLORFF00FF ,LINETHICK2;DRAWLINE(段=1,H,段=-1,L,0),COLOR007700, LINETHICK2;DRAWLINE(段=-1,L,段=1,H,0),COLORRED, LINETHICK2;{笔高低点周期力度提示}DRAWTEXT(笔= 1, H*1.038, ''+H+''), COLORFFFFFF;DRAWTEXT(笔=-1, L*0.96, ''+L+''), COLORFFFFFF;VAR3:=LLV(H,240);VAR4:=100*(C-VAR3)/VAR3;VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;VAR7:=0;VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;VAR10:=IF(TROUGHBARS(3,16,1)=0 AND H>L+0.04,4,0);VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) ANDREF(ZIG(3,22),2)>=REF(ZIG(3,22),3);VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);VAR19:=EMA(C,2)-EMA(C,150);买1:=VAR10;买2:=(VAR11+VAR13+VAR15+VAR17);卖1:=(VAR12+VAR14+VAR16+VAR18);DRAWTEXT(买1>0 OR 买2>0,L*0.985,'买'),COLOR00FFFF;DRAWTEXT(卖1>0,H*1.01,'卖'),COLOR00FFFF;APP:=(VOL)/((H-L)*(2)-ABS(C-O));ZL:=IF((H>O),(APP)*(H-L),IF((L<O),(APP)*(H-O+C-L),(VOL)/(2)));SF:=IF((H>O),0-(APP)*(H-C+O-L),IF((L<O),0-(APP)*(H-L),0-(VOL)/(2)));库存能量:=MA(ZL+SF,2);库存平均:=MA(ZL+SF,5);GET:ZIG(3,5),COLORYELLOW,LINETHICK3;PL5:=ZIG(3,5);EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3);EX1:=PL5<REF(PL5,1) AND REF(PL5,1)>=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3);PL10:=ZIG(3,10);EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3);PL20:=ZIG(3,20);EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3);走强1:=BARSLAST(PL5<REF(PL5,1));走弱1:=BARSLAST(PL5>REF(PL5,1));走强2:=BARSLAST(PL10<REF(PL10,1));走弱2:=BARSLAST(PL10>REF(PL10,1));走强3:=BARSLAST(PL20<REF(PL20,1));走弱3:=BARSLAST(PL20>REF(PL20,1));ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);DRAWTEXT(EN2 AND DTJZ10=1,L*0.93,'[类二买]'),COLORFFFFFF;DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'[一买]'),COLORFF00FF;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.05,'[二卖]'),LINETHICK2,COLORFFFF00;DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.95,'[二买]'),LINETHICK2,COLORFFFF00;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.04,'[一卖]'),LINETHICK3,COLOR00FF00;MA5:MA(CLOSE,5),COLORWHITE,LINETHICK1;MA10:MA(CLOSE,10),COLORLIMAGENTA,LINETHICK1;。
主图K线画三角形主图源码通达信A10304:=REF(HIGH,3)=HHV(HIGH,2*3+1);B10304:=FILTER(A10304,3);C10304:=BACKSET(B10304,3+1);D10304:=FILTER(C10304,3);{高点}A20304:=REF(LOW,3)=LLV(LOW,2*3+1);B20304:=FILTER(A20304,3);C20304:=BACKSET(B20304,3+1);D20304:=FILTER(C20304,3);{低点}E10304:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;E20304:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}H10304:=(D10304 AND NOT(D20304 AND E10304>=E20304)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;H20304:=D10304 AND NOT(D20304 AND E10304>=E20304);L10304:=D20304 AND NOT(D10304 AND E10304=E20304);X10304:=REF(BARSLAST(H10304),1)+1;F10304:=BACKSET(H10304 ANDCOUNT(L10304,X10304)>0,LLVBARS(IF(L10304,LOW,10000),X10304));G10304:=F10304>REF(F10304,1);I10304:=BACKSET(G10304,2);LD0304:=I10304>REF(I10304,1);{过滤后低点}L20304:=LD0304 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;X20304:=REF(BARSLAST(L20304),1)+1;F2:=BACKSET(L20304 ANDCOUNT(H20304,X20304)>0,HHVBARS(IF(H20304,HIGH,0),X20304));G20304:=F2>REF(F2,1); I2:=BACKSET(G20304,2);HD0304:=I2>REF(I2,1);{过滤后高点}J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD0304),BARSLAST(LD0304))+1); J2:=J1>REF(J1,1);A3:=H;B3:=REF(H,REF(BARSLAST(HD0304),1)+1)>REF(H,REF(BARSLAST(HD0304), 1)+2+REF(BARSLAST(HD0304),REF(BARSLAST(HD0304),1)+2));D3:=A3 AND B3 AND HD0304;E3:=BACKSET(D3,REF(BARSLAST(HD0304),1)+2);HH:=E3>REF(E3,1);{找出全部长期高点}A4:=L>REF(L,REF(BARSLAST(LD0304),1)+1);B4:=REF(L,REF(BARSLAST(LD0304),1)+1);D4:=A4 AND B4 AND LD0304;E4:=BACKSET(D4,REF(BARSLAST(LD0304),1)+2);LL:=E4>REF(E4,1);{找出全部长期低点}H3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤,方法同前。
通达信缠论中枢指标公式源码1什么是通达信缠论中枢指标?通达信缠论中枢指标是技术分析工具箱中的一种重要分析指标,在常规技术分析工具(如MACD、KDJ示、CCI等)的基础上,以缠论中枢指标作为分析依据来判断行情的有效性,根据缠论中枢指标的枢纽(也称中枢)进行买卖操作。
缠论中枢指标最早出现在纽约股票交易所(NYSE),并由美国投资者克鲁格曼(Richard Demille Wyckoff)创造,其目的是帮助投资者进行股票市场操作,如同今天的技术分析一样。
2缠论中枢指标元素缠论中枢指标包括九个元素,分别是:标准长短期变化率指标、中间位置指标、50日指标、150日指标、长短期变化率指标、100日指标、150日指标长期变化率指标、50日趋势系数指标、100日趋势系数指标。
3缠论中枢指标的计算以上面的九大元素为基础,通达信缠论中枢指标的计算方式可以分为两种:第一种计算方式采用实际价格;第二种计算方式采用上市公司或基金等市场行情因素计算出来的变量,如最高价、最低价、均价等。
根据计算结果,结合市场走势和影响行情的因素,就可以判断出枢纽的出现和转向点的位置,进而把握行情走势,作出有效的交易。
4利用缠论中枢指标来分析行情利用缠论中枢指标进行分析行情时,有一系列的步骤:1、首先应对行情走势作出预测,根据预测结果做出买卖决策;2、然后搜集数据、定量分析,统计此前枢纽的出现情况、和转向点的位置,确定枢纽变化的模式;3、根据枢纽的变化模式,来决定买入或者卖出的时机;4、根据50日、150日以及长期变化率指标,来决定卖出的时机;5、根据50日趋势系数指标和100日趋势系数指标,确定行情走势是否向极大方向发展;6、最后根据实际买入和卖出的时机,将当时买入或卖出的价格和数量记录下来,根据收益率来确定自己的交易策略的优劣。
总的来说,要是把握股票市场的走势,利用通达信缠论中枢指标,将会大大提高投资的成功率,减少投资的风险。
通达信缠论中枢自动画线指标公式
1 什么是中枢自动画线指标
中枢自动画线指标,是指可以自动"判断行情大走势、涨跌趋势及其支撑位和阻力位"的技术分析工具,它使用"均线跌破、均线支撑,涨跌回转点"等指标进行判断,以更加准确把握股票价格判断。
2 中枢自动画线指标的特点
中枢自动画线指标的总体特点是以“均线跌破”为骨干,整合几大判断标准,利用多维度图形多角度联系行情涨跌,并建立稳定的支撑阻力压力位,从而更准确预测行情变化,成为市场交易者的有效投资分析工具,是时下热门的技术指标之一。
3 中枢自动画线的计算公式
均线跌破:
当价格跌破一条设定的均线时,判断为趋势发生变化;
MA(30)>MA(60) AND MA(60)>MA(90):
当30日均线大于60日均线、60日均线大于90日均线时,判断为上涨趋势;
MA(30)<MA(60) AND MA(60)<MA(90):
当30日均线小于60日均线、60日均线小于90日均线时,判断为下跌趋势;
涨跌回转点:
当价格跌落或上涨到前次支撑或阻力位附近时,判断可能出现一定回转;
EXPMA(7,34):
7天指数平均线,34天指数平均线
当7天指数平均线穿越34天指数平均线、或者两者之间形成交叉时,可以判断出股价可能出现趋势变换的最前期信号。
4 中枢自动画线的应用
中枢自动画线指标的使用很受广大交易者的青睐。
此指标功能强大,可以追求陆续参加行情的波段风向,择机加减仓的时点,抓住及时高抛低吸的动向,把握卖出股票的最优考虑时点,从而拿去最佳的利润。
同时,也让参与交易者更加有信心稳定获利。
主图源码:{三角形中枢}时间:=4;A:=H=HHV(H,时间*5) AND HHV(H,时间*5)>REF(HHV(H,时间*5),1);B:=L=LLV(L,时间*5) AND LLV(L,时间*5)<REF(LLV(L,时间*5),1);CC1:DRAWLINE(A,H,B,L,0);CC2:DRAWLINE(B,L,A,H,0);N:=(0,1,1);{缠论高低点}局部低点预选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,COLORLIMAGENTA;C1:DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0),COLORLIGRAY;C2:DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0),COLORLIGRAY;极顶:=IF(N=1,C2=C1 AND 局部高点预选A AND 极点保留=1,DRAWNULL);极底:=IF(N=1,C2=C1 AND 局部低点预选A AND 极点保留=-1,DRAWNULL);A1:=BARSLAST(极顶);B1:=CURRBARSCOUNT=CONST(A1)+1;D1:=BARSLAST(B1);高1:=CONST(REF(H,D1));A2:=REF(A1,A1+1)+A1+1;B2:=CURRBARSCOUNT=CONST(A2)+1;D2:=BARSLAST(B2);高2:=CONST(REF(H,D2));A3:=REF(A2,A1+1)+A1+1;B3:=CURRBARSCOUNT=CONST(A3)+1;D3:=BARSLAST(B3);高3:=CONST(REF(H,D3));DA1:=BARSLAST(极底);DB1:=CURRBARSCOUNT=CONST(DA1)+1;DD1:=BARSLAST(DB1);低1:=CONST(REF(L,DD1));DA2:=REF(DA1,DA1+1)+DA1+1;DB2:=CURRBARSCOUNT=CONST(DA2)+1;DD2:=BARS LAST(DB2);低2:=CONST(REF(L,DD2));DA3:=REF(DA2,DA1+1)+DA1+1;DB3:=CURRBARSCOUNT=CONST(DA3)+1;DD3:=BARS LAST(DB3);低3:=CONST(REF(L,DD3));三角型放大A:=低1<低2 AND 高2>高1 AND DA2>A1 AND A1>DA1 AND A2>DA2 AND CONST(C)>低2;中枢A1:=IF(三角型放大A AND CONST(C)<高1,DB2,DRAWNULL);STICKLINE(中枢A1,CONST(C),低2,0,0),COLORLIMAGENTA;中枢A2:=IF(三角型放大A AND CONST(C)<高1,ISLASTBAR,DRAWNULL); STICKLINE(中枢A2,CONST(C),低2,0,0),COLORLIMAGENTA;DRAWLINE(中枢A1=1,CONST(C),中枢A2=1,CONST(C),0),DOTLINE,COLORLIMAGENTA; DRAWLINE(中枢A1=1,低2,中枢A2=1,低2,0),COLORLIMAGENTA;{成立}中枢AC1:=IF(三角型放大A AND CONST(C)>=高1,DB2,DRAWNULL);STICKLINE(中枢AC1,高1,低1,0,0),COLORLIMAGENTA;中枢AC2:=IF(三角型放大A AND CONST(C)>=高1,ISLASTBAR,DRAWNULL); STICKLINE(中枢AC2,高1,低1,0,0),COLORLIMAGENTA;DRAWLINE(中枢AC1=1,高1,中枢AC2=1,高1,0),COLORLIMAGENTA;DRAWLINE(中枢AC1=1,低1,中枢AC2=1,低1,0),COLORLIMAGENTA;三角型放大B:=低1>低2 AND 高1>高2 AND DA1>A1 AND A2>DA1 AND DA2>A2 AND CONST(C)<高2;中枢B1:=IF(三角型放大B AND CONST(C)>低1,B2,DRAWNULL);STICKLINE(中枢B1,CONST(C),高2,0,0),COLORGREEN;中枢B2:=IF(三角型放大B AND CONST(C)>低1,ISLASTBAR,DRAWNULL); STICKLINE(中枢B2,CONST(C),高2,0,0),COLORGREEN;DRAWLINE(中枢B1=1,高2,中枢B2=1,高2,0),COLORGREEN;DRAWLINE(中枢B1=1,CONST(C),中枢B2=1,CONST(C),0),DOTLINE,COLORGREEN; {成立}中枢BC1:=IF(三角型放大B AND CONST(C)<=低1,B2,DRAWNULL);STICKLINE(中枢BC1,高2,低1,0,0),COLORGREEN;中枢BC2:=IF(三角型放大B AND CONST(C)<=低1,ISLASTBAR,DRAWNULL); STICKLINE(中枢BC2,高2,低1,0,0),COLORGREEN;DRAWLINE(中枢BC1=1,高2,中枢BC2=1,高2,0),COLORGREEN;DRAWLINE(中枢BC1=1,低1,中枢BC2=1,低1,0),COLORGREEN;三角型收敛A:=低1>低2 AND 高2>高1 AND DA2>A1 AND A1>DA1 AND A2>DA2 AND CONST(C)>低1;中枢C1:=IF(三角型收敛A AND CONST(C)<高1,DB2,DRAWNULL);STICKLINE(中枢C1,CONST(C),低1,0,0),COLORYELLOW;中枢C2:=IF(三角型收敛A AND CONST(C)<高1,ISLASTBAR,DRAWNULL); STICKLINE(中枢C2,CONST(C),低1,0,0),COLORYELLOW;DRAWLINE(中枢C1=1,CONST(C),中枢C2=1,CONST(C),0),DOTLINE,COLORYELLOW; DRAWLINE(中枢C1=1,低1,中枢C2=1,低1,0),COLORYELLOW;{成立}中枢CC1:=IF(三角型收敛A AND CONST(C)>=高1,DB2,DRAWNULL);STICKLINE(中枢CC1,高1,低1,0,0),COLORYELLOW;中枢CC2:=IF(三角型收敛A AND CONST(C)>=高1,ISLASTBAR,DRAWNULL); STICKLINE(中枢CC2,高1,低1,0,0),COLORYELLOW;DRAWLINE(中枢CC1=1,高1,中枢CC2=1,高1,0),COLORYELLOW;DRAWLINE(中枢CC1=1,低1,中枢CC2=1,低1,0),COLORYELLOW;三角型收敛B:=低1>低2 AND 高1<高2 AND DA1>A1 AND A2>DA1 AND DA2>A2 AND CONST(C)<高1;中枢D1:=IF(三角型收敛B AND CONST(C)>低1,B2,DRAWNULL);STICKLINE(中枢D1,CONST(C),高1,0,0),COLORLICYAN;中枢D2:=IF(三角型收敛B AND CONST(C)>低1,ISLASTBAR,DRAWNULL); STICKLINE(中枢D2,CONST(C),高1,0,0),COLORLICYAN;DRAWLINE(中枢D1=1,高1,中枢D2=1,高1,0),COLORLICYAN;DRAWLINE(中枢D1=1,CONST(C),中枢D2=1,CONST(C),0),DOTLINE,COLORLICYAN; {成立}中枢DC1:=IF(三角型收敛B AND CONST(C)<=低1,B2,DRAWNULL);STICKLINE(中枢DC1,高1,低1,0,0),COLORLICYAN;中枢DC2:=IF(三角型收敛B AND CONST(C)<=低1,ISLASTBAR,DRAWNULL); STICKLINE(中枢DC2,高1,低1,0,0),COLORLICYAN;DRAWLINE(中枢DC1=1,高1,中枢DC2=1,高1,0),COLORLICYAN; DRAWLINE(中枢DC1=1,低1,中枢DC2=1,低1,0),COLORLICYAN;。
{通达信MA+中枢+分笔公式} {M1,M2 参数自己定,可选5,10} MA1:MA(CLOSE,5); MA2:MA(CLOSE,10); {N1:1,100,10;N2:1,100,10;DISP:=1,3,2};N1:=10;N2:=10;DISP:=2; K:=IF(PERIOD=5,1,{日} IF(PERIOD=6,1,{周} IF(PERIOD=7,1,{月} IF(PERIOD=8,1,{多分钟} IF(PERIOD=9,1,{多日} IF(PERIOD=10,1,{季} IF(PERIOD=11,2,{年} IF(PERIOD=4,1,{60F} IF(PERIOD=3,1,{30F} IF(PERIOD=2,1,{15F}IF(PERIOD=1,1{5F},1{1F})))))))))))/10;P1:=PEAK(1,K*N1,1); P2:=PEAK(1,K*N1,2); WP1:=PEAKBARS(1,K*N1,1); WP2:=PEAKBARS(1,K*N1,2); T1:=TROUGH(2,K*N2,1); T2:=TROUGH(2,K*N2,2); WT1:=TROUGHBARS(2,K*N2,1);WT2:=TROUGHBARS(2,K*N2,2); TJ1:=P1>T1 AND P2>T2 ; ZD:=MAX(T1,T2); ZG:=MIN(P1,P2); LL:=MIN(T1,T2); HH:=MAX(P1,P2); TJ2:=FILTER(ZG>ZD,2); TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));TJ4:=TJ1&&TJ2&&NOT(TJ3);TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF (ZG,REF(BARSLAST(TJ4),1)));TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF( ZG,REF(BARSLAST(TJ4),1)));TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZDREF(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(HREF(距前低天,1) AND LLV(L,距前高天+1)=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)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)=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0); 低保留:=IF((低保留A=-1 OR 低保留B=-1) AND LREF(小值周期,距前低天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)=4 ORLLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0); 低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND LREF(小值周期,距前低天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)=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0); 低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND LREF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L。
通达信缠论自动划线指标源码```python#导入需要的库import numpy as np#定义缠论指标类class ChandelierIndicator:def __init__(self, highs, lows):self.highs = highsself.lows = lowsself.trend_lines = []#判断一个线段是否有效def is_valid_trend_line(self, line):if line[0] == line[1] == line[2] or line[0] == line[1] or line[1] == line[2]:return Falsereturn True#判断一个线段和笔的关系,用于判断是否需要连接线段def is_reversal(self, line, pen):if pen[0] < line[0] and pen[-1] > line[-1]: # 线段下降,笔上升return Trueelif pen[0] > line[0] and pen[-1] < line[-1]: # 线段上升,笔下降return Trueelse:return False#获取最近的一个线段和笔def get_last_trend_line_and_pen(self):if len(self.trend_lines) < 1:return None, Nonelast_trend_line = self.trend_lines[-1]last_pen = last_trend_line[-3:]return last_trend_line, last_pen#判断当前的最后一个线段是否有效def is_last_trend_line_valid(self):last_trend_line, last_pen = self.get_last_trend_line_and_pen if last_trend_line is None:return Falseif not self.is_valid_trend_line(last_trend_line) or not self.is_valid_trend_line(last_pen):return Falsereturn True#获得当前的趋势线def get_current_trend_line(self):last_trend_line, last_pen = self.get_last_trend_line_and_pen if not self.is_last_trend_line_valid(:return Noneif self.is_reversal(last_trend_line, last_pen):return Nonecurrent_trend_line = np.concatenate((last_trend_line[:-1], last_pen))return current_trend_line#更新缠论指标def update(self, high, low):if len(self.trend_lines) < 1:self.trend_lines.append([high, low, low])returncurrent_trend_line = self.get_current_trend_lineif current_trend_line is None:self.trend_lines.append([high, low, low])else:current_trend_line[2] = low```上述代码只是一个简单的示例,实际使用时可能还需要进行更多的优化和完善。
{缠论画笔}黄金柱:=V/REF(V,1)>=1.9;DRAWLINE(黄金柱,L,REF(黄金柱,1),REF(L,1),1),COLORYELLOW;DRAWLINE(黄金柱,H,REF(黄金柱,1),REF(H,1),1),COLORRED;倍缩:=V/REF(V,1)<=0.6;DRAWLINE(倍缩,H,REF(倍缩,1),REF(H,1),1),COLOR1D7300;HH:=REF(H,5)=HHV(H,13);LL:=REF(L,5)=LLV(L,13);FG01:=BACKSET(HH,6)>BACKSET(HH,5) ;FD01:=BACKSET(LL,6)>BACKSET(LL,5) ;FG0:=FG01 AND H=HHV(H,BARSLAST(FD01));FD0:=FD01 AND L=LLV(L,BARSLAST(FG01));J0:=(H+L)/2;FGH:=REF(H,BARSLAST(FG0));FGH1:=REF(H,BARSLAST(FG0)+1);FGL1:=REF(L,BARSLAST(FG0)+1);FGH2:=REF(H,BARSLAST(FG0)+2);FGL2:=REF(L,BARSLAST(FG0)+2);FGJ0:=REF(J0,BARSLAST(FG0));FGL:=REF(L,BARSLAST(FG0));FDH:=REF(H,BARSLAST(FD0));FDL:=REF(L,BARSLAST(FD0));FDH1:=REF(H,BARSLAST(FD0)+1);FDL1:=REF(L,BARSLAST(FD0)+1);FDH2:=REF(H,BARSLAST(FD0)+2);FDL2:=REF(L,BARSLAST(FD0)+2);FDJ0:=REF(J0,BARSLAST(FD0));FGZH:=IF(FGL<FGL1,FGH2,FGH1);FGZL:=IF(FGL<FGL1,FGL2,FGL1);FDZH:=IF(FDH>FDH1,FDH2,FDH1);FDZL:=IF(FDH>FDH1,FDL2,FDL1);FG1:=IF(((FGL>FDH AND FGH>FDZH) OR (FGH>FDH1 AND FDH1>FDH AND FDH>FDH2)),FG0,FG0 AND FGJ0>FDH AND FGH>FDZH);FD1:=IF(((FDH<FGL AND FDL<FGZL) OR (FDL<FGL1 AND FGL1<FGL AND FDL<FGL2)),FD0,FD0 AND FDJ0<FGL AND FDL<FGZL);FG2:=FG1 AND H>=HHV(H,BARSLAST(FD1));FD2:=FD1 AND L<=LLV(L,BARSLAST(FG1));FG:=FG2 AND KDJ.K>40;FD:=FD2 AND KDJ.K<60;BK:=IF((FGL1>=FGL AND FG0) OR (FDH1<=FDH AND FD0),4,3);G1:=FG AND BARSLAST(FD)>BK;D1:=FD AND BARSLAST(FG)>BK;G2:=G1 AND H>=HHV(H,BARSLAST(D1));D2:=D1 AND L<=LLV(L,BARSLAST(G1));G3:=G2 OR (FG0 AND KDJ.J>100);D3:=D2 OR (FD0 AND KDJ.J<0);G4:=G3 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));D4:=D3 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));G5:=G4 AND H=HHV(H,BARSLAST(D4));D5:=D4 AND L=LLV(L,BARSLAST(G4));GPB:=IF(G4,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;DPB:=IF(D4,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;NN:=G5;UU:=D5;DRAWLINE(UU,L,NN, H,0),COLORYELLOW,LINETHICK1;DRAWLINE(NN,H,UU, L,0),COLORYELLOW,LINETHICK1;{涨停板}TB:=(C-REF(C,1))/REF(C,1)*100;STICKLINE(TB>9.9,O,C,2.5,1)COLORMAGENTA;STICKLINE(TB<-9.9,O,C,2.5,0)COLOR1D7300;。
自画中枢缠论指标公式(通达信)已免费开放沙发自己占着~~~嘻嘻{N1:1,100,10;N2:1,100,10;DISP:=1,3,2};N1:=10;N2:=10;DISP:=2;K:=IF(PERIOD=5,1,{日}IF(PERIOD=6,1,{周}IF(PERIOD=7,1,{月}IF(PERIOD=8,1,{多分钟}IF(PERIOD=9,1,{多日}IF(PERIOD=10,1,{季}IF(PERIOD=11,2,{年}IF(PERIOD=4,1,{60F}IF(PERIOD=3,1,{30F}IF(PERIOD=2,1,{15F}IF(PERIOD=1,1{5F},1{1F})))))))))))/10;P1:=PEAK(1,K*N1,1);P2:=PEAK(1,K*N1,2);WP1:=PEAKBARS(1,K*N1,1);WP2:=PEAKBARS(1,K*N1,2);T1:=TROUGH(2,K*N2,1);T2:=TROUGH(2,K*N2,2);WT1:=TROUGHBARS(2,K*N2,1);WT2:=TROUGHBARS(2,K*N2,2);TJ1:=P1>T1 AND P2>T2 ;ZD:=MAX(T1,T2);ZG:=MIN(P1,P2);LL:=MIN(T1,T2);HH:=MAX(P1,P2);TJ2:=FILTER(ZG>ZD,2);TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));TJ4:=TJ1&&TJ2&&NOT(TJ3);TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,RE F(BARSLAST(TJ4),1)));TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,RE F(BARSLAST(TJ4),1)));TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF( BARSLAST(TJ4),1));TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);ZSD:=IF(TJ8,ZD,DRAWNULL);ZSG:=IF(TJ8,ZG,DRAWNULL);ZSH:=IF(TJ8,HH,DRAWNULL);ZSL:=IF(TJ8,LL,DRAWNULL);STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;DRAWTEXT(DISP=2,ZSH,'中枢'),COLORRED;中枢高:PLOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CROSSDOT,COLO RLIRED;中枢低:PLOYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CROSSDOT,COLO RLIGREEN;中枢最高:PLOYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLO RRED;中枢最低:PLOYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLO RGREEN;趋势高:PLOYLINE(DISP=3,ZIG(1,K*N1)),COLORLIBLUE;趋势低:PLOYLINE(DISP=3,ZIG(2,K*N2)),COLORLIBLUE;局部低点预选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;DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0)COLORLIRED;DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0)COLORYELLOW;DD1:=BARSLAST(ABS(极点保留)!=1);DRAWTEXT(极点保留=1,局部极点,'*'),COLORGREEN;DRAWTEXT(极点保留=-1,局部极点,'*'),COLORRED;MA5:MA(CLOSE,5),COLORFF00FF,LINETHICK2;判:IF(MA5<REF(MA5,1),MA5,DRAWNULL),COLORWHITE,LIN ETHICK2;。
【通达信】缠中说禅趋势(主图)-指标公式源码动态翻译:V00赋值: 最高价<昨日最高价 AND 最低价<昨日最低价V01赋值: 最高价<昨日最高价 AND 最低价>昨日最低价V02赋值: 最高价>昨日最高价 AND 最低价<昨日最低价V03赋值: 最高价>昨日最高价 AND 最低价>昨日最低价V04赋值: 2日前的最高价 < 最高价 AND 2日前的最低价 < 最低价 AND 2日前的最高价 > 昨日最高价 AND 2日前的最低价 < 昨日最低价V1赋值: 统计3日中满足V00的天数>=1 AND 3日内最低价距今天数 = 1 AND V03V2赋值: 统计4日中满足V00的天数>=1 AND 4日内最低价距今天数 = 2 AND V04V3赋值: 统计4日中满足V00的天数>=1 AND 统计4日中满足V01ORV02的天数=1 AND 4日内最低价距今天数 = 1 AND V03V4赋值: 统计5日中满足V00的天数>=1 AND 统计5日中满足V01ORV02的天数=2 AND 5日内最低价距今天数 = 2 AND V04输出XG:(V1 OR V2 OR V3 OR V4){参数:SHORT 5/30/7 LONG 10/250/19}T:=PERIOD;D:=IF(T=0,30,{1F}IF(T=1,25,{5F}IF(T=8,25,{多分钟}IF(T=2,20,{15F}IF(T=3,20,{30F}IF(T=4,20,{60F}IF(T=5,10,{日}IF(T=6,10,{周}IF(T=7,10,{月}IF(T=9,10,{多日}IF(T=10,10{季},10{年})))))))))));RMA:EMA(CLOSE,SHORT),COLORLIGRAY;NMA:EMA(CLOSE,LONG),COLORMAGENTA;RISK:IF(NMA>RMA,NMA,DRAWNULL),COLORGREEN;UP:DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1) AND L=LLV(L,D) ANDRMA<=NMA,L,H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1) AND H=HHV(H,D) ANDRMA>=NMA,H,0),COLOR0000FF,LINETHICK2;DOWN:DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1) AND H=HHV(H,D) ANDRMA>=NMA,H,L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1) AND L=LLV(L,D) ANDRMA<=NMA,L,0),COLOR00FF00,LINETHICK2;UH:HHV(H,55),COLORMAGENTA;MID:(HHV(H,55)+LLV(L,55))/2,COLORYELLOW;DL:LLV(L,55),COLORBLUE;“底分型”选股公式,可预警{底分型选股预警}V00:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);V01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);V02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);V03:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);V04:= REF(HIGH,2) < HIGH AND REF(LOW,2) < LOW AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);V1:= COUNT(V00,3)>=1 AND LLVBARS(LOW,3) = 1 AND V03;V2:= COUNT(V00,4)>=1 AND LLVBARS(LOW,4) = 2 AND V04;V3:= COUNT(V00,4)>=1 AND COUNT(V01 OR V02,4)=1 AND LLVBARS(LOW,4) = 1 AND V03;V4:= COUNT(V00,5)>=1 AND COUNT(V01 OR V02,5)=2 AND LLVBARS(LOW,5) = 2 AND V04;XG:CURRENTTIME>092530 AND (V1 OR V2 OR V3 OR V4) AND STRFIND(stkname,'ST',1)=0 AND STRFIND(stkname,'S',1)=0 AND DYNAINFO(4)<>0;通达信:XG: V1 OR V2 OR V3 OR V4;同花顺:XG: (V1 OR V2 OR V3 OR V4) AND STRFIND(stkname,'ST',1)=0 ANDSTRFIND(stkname,'S',1);飞狐:不用替换。
(板块轮动指标)缠中说禅类别公式(板块轮动指标)(2010-02-21 22:09:38)MA5:MA(C,5);MA13:MA(C,13);MA21:MA(C,21);MA34:MA(C,34);MA55:MA(C,55);MA89:MA(C,89);MA144:MA(C,144);TMP1:=IF(C>MA5,10,0);TMP2:=IF(C>MA13,10,0);TMP3:=IF(C>MA21,10,0);TMP4:=IF(C>MA34,10,0);TMP5:=IF(C>MA55,10,0);TMP6:=IF(C>MA89,10,0);TMP7:=IF(C>MA144,10,0);A:TMP1+TMP2+TMP3+TMP4+TMP5+TMP6+TMP7+10;差B:( A-REF (A,1))+10;MA三:MA(A,N1);MA五:MA(A,N2);变盘公式bollA:(((MA(CLOSE,N))+2*STD(CLOSE,N))-((MA(CLOSE,N))-2*STD(CLOSE,N)))/(MA(CLOSE ,N)-2*STD(CLOSE,N))*10;MA5:MA(A,N1);MA13:MA(A,N2);MA21:MA(A,N3);MA34:MA(A,N4);MA55:MA(A,N5);MA89:MA(A,N6);MA144:MA(A,N7);昨55:REF(MA55,1);昨89:REF(MA89,1);昨144:REF(MA144,1);BOLL差:MA(CLOSE,N)-REF(BOLL,N9);MABOLL差:MA(BOLL差,N1);缠中说禅趋势力度:由短线均线与长期均线相交所形成的面积。
通达信的。
MA5:=MA(C,5);MA10:=MA(C,10);MA20:=MA(C,20);趋势力度:MA10-MA20,COLORSTICK;MA10-MA20;拉升变盘拉升成交量空头陷阱。
(板块轮动指标)缠中说禅类别公式(板块轮动指标)(2010-02-21 22:09:38)MA5:MA(C,5);MA13:MA(C,13);MA21:MA(C,21);MA34:MA(C,34);MA55:MA(C,55);MA89:MA(C,89);MA144:MA(C,144);TMP1:=IF(C>MA5,10,0);TMP2:=IF(C>MA13,10,0);TMP3:=IF(C>MA21,10,0);TMP4:=IF(C>MA34,10,0);TMP5:=IF(C>MA55,10,0);TMP6:=IF(C>MA89,10,0);TMP7:=IF(C>MA144,10,0);A:TMP1+TMP2+TMP3+TMP4+TMP5+TMP6+TMP7+10;差B:( A-REF (A,1))+10;MA三:MA(A,N1);MA五:MA(A,N2);变盘公式bollA:(((MA(CLOSE,N))+2*STD(CLOSE,N))-((MA(CLOSE,N))-2*STD(CLOSE,N)))/(MA(CLOSE ,N)-2*STD(CLOSE,N))*10;MA5:MA(A,N1);MA13:MA(A,N2);MA21:MA(A,N3);MA34:MA(A,N4);MA55:MA(A,N5);MA89:MA(A,N6);MA144:MA(A,N7);昨55:REF(MA55,1);昨89:REF(MA89,1);昨144:REF(MA144,1);BOLL差:MA(CLOSE,N)-REF(BOLL,N9);MABOLL差:MA(BOLL差,N1);缠中说禅趋势力度:由短线均线与长期均线相交所形成的面积。
通达信的。
MA5:=MA(C,5);MA10:=MA(C,10);MA20:=MA(C,20);趋势力度:MA10-MA20,COLORSTICK;MA10-MA20;拉升变盘拉升成交量空头陷阱。
主图源码:{三角形中枢}时间:=4;A:=H=HHV(H,时间*5) AND HHV(H,时间*5)>REF(HHV(H,时间*5),1);B:=L=LLV(L,时间*5) AND LLV(L,时间*5)<REF(LLV(L,时间*5),1);CC1:DRAWLINE(A,H,B,L,0);CC2:DRAWLINE(B,L,A,H,0);N:=(0,1,1);{缠论高低点}局部低点预选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,COLORLIMAGENTA;C1:DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0),COLORLIGRAY;C2:DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0),COLORLIGRAY;极顶:=IF(N=1,C2=C1 AND 局部高点预选A AND 极点保留=1,DRAWNULL);极底:=IF(N=1,C2=C1 AND 局部低点预选A AND 极点保留=-1,DRAWNULL);A1:=BARSLAST(极顶);B1:=CURRBARSCOUNT=CONST(A1)+1;D1:=BARSLAST(B1);高1:=CONST(REF(H,D1));A2:=REF(A1,A1+1)+A1+1;B2:=CURRBARSCOUNT=CONST(A2)+1;D2:=BARSLAST(B2);高2:=CONST(REF(H,D2));A3:=REF(A2,A1+1)+A1+1;B3:=CURRBARSCOUNT=CONST(A3)+1;D3:=BARSLAST(B3);高3:=CONST(REF(H,D3));DA1:=BARSLAST(极底);DB1:=CURRBARSCOUNT=CONST(DA1)+1;DD1:=BARSLAST(DB1);低1:=CONST(REF(L,DD1));DA2:=REF(DA1,DA1+1)+DA1+1;DB2:=CURRBARSCOUNT=CONST(DA2)+1;DD2:=BARS LAST(DB2);低2:=CONST(REF(L,DD2));DA3:=REF(DA2,DA1+1)+DA1+1;DB3:=CURRBARSCOUNT=CONST(DA3)+1;DD3:=BARS LAST(DB3);低3:=CONST(REF(L,DD3));三角型放大A:=低1<低2 AND 高2>高1 AND DA2>A1 AND A1>DA1 AND A2>DA2 AND CONST(C)>低2;中枢A1:=IF(三角型放大A AND CONST(C)<高1,DB2,DRAWNULL);STICKLINE(中枢A1,CONST(C),低2,0,0),COLORLIMAGENTA;中枢A2:=IF(三角型放大A AND CONST(C)<高1,ISLASTBAR,DRAWNULL); STICKLINE(中枢A2,CONST(C),低2,0,0),COLORLIMAGENTA;DRAWLINE(中枢A1=1,CONST(C),中枢A2=1,CONST(C),0),DOTLINE,COLORLIMAGENTA; DRAWLINE(中枢A1=1,低2,中枢A2=1,低2,0),COLORLIMAGENTA;{成立}中枢AC1:=IF(三角型放大A AND CONST(C)>=高1,DB2,DRAWNULL);STICKLINE(中枢AC1,高1,低1,0,0),COLORLIMAGENTA;中枢AC2:=IF(三角型放大A AND CONST(C)>=高1,ISLASTBAR,DRAWNULL); STICKLINE(中枢AC2,高1,低1,0,0),COLORLIMAGENTA;DRAWLINE(中枢AC1=1,高1,中枢AC2=1,高1,0),COLORLIMAGENTA;DRAWLINE(中枢AC1=1,低1,中枢AC2=1,低1,0),COLORLIMAGENTA;三角型放大B:=低1>低2 AND 高1>高2 AND DA1>A1 AND A2>DA1 AND DA2>A2 AND CONST(C)<高2;中枢B1:=IF(三角型放大B AND CONST(C)>低1,B2,DRAWNULL);STICKLINE(中枢B1,CONST(C),高2,0,0),COLORGREEN;中枢B2:=IF(三角型放大B AND CONST(C)>低1,ISLASTBAR,DRAWNULL); STICKLINE(中枢B2,CONST(C),高2,0,0),COLORGREEN;DRAWLINE(中枢B1=1,高2,中枢B2=1,高2,0),COLORGREEN;DRAWLINE(中枢B1=1,CONST(C),中枢B2=1,CONST(C),0),DOTLINE,COLORGREEN; {成立}中枢BC1:=IF(三角型放大B AND CONST(C)<=低1,B2,DRAWNULL);STICKLINE(中枢BC1,高2,低1,0,0),COLORGREEN;中枢BC2:=IF(三角型放大B AND CONST(C)<=低1,ISLASTBAR,DRAWNULL); STICKLINE(中枢BC2,高2,低1,0,0),COLORGREEN;DRAWLINE(中枢BC1=1,高2,中枢BC2=1,高2,0),COLORGREEN;DRAWLINE(中枢BC1=1,低1,中枢BC2=1,低1,0),COLORGREEN;三角型收敛A:=低1>低2 AND 高2>高1 AND DA2>A1 AND A1>DA1 AND A2>DA2 AND CONST(C)>低1;中枢C1:=IF(三角型收敛A AND CONST(C)<高1,DB2,DRAWNULL);STICKLINE(中枢C1,CONST(C),低1,0,0),COLORYELLOW;中枢C2:=IF(三角型收敛A AND CONST(C)<高1,ISLASTBAR,DRAWNULL); STICKLINE(中枢C2,CONST(C),低1,0,0),COLORYELLOW;DRAWLINE(中枢C1=1,CONST(C),中枢C2=1,CONST(C),0),DOTLINE,COLORYELLOW; DRAWLINE(中枢C1=1,低1,中枢C2=1,低1,0),COLORYELLOW;{成立}中枢CC1:=IF(三角型收敛A AND CONST(C)>=高1,DB2,DRAWNULL);STICKLINE(中枢CC1,高1,低1,0,0),COLORYELLOW;中枢CC2:=IF(三角型收敛A AND CONST(C)>=高1,ISLASTBAR,DRAWNULL); STICKLINE(中枢CC2,高1,低1,0,0),COLORYELLOW;DRAWLINE(中枢CC1=1,高1,中枢CC2=1,高1,0),COLORYELLOW;DRAWLINE(中枢CC1=1,低1,中枢CC2=1,低1,0),COLORYELLOW;三角型收敛B:=低1>低2 AND 高1<高2 AND DA1>A1 AND A2>DA1 AND DA2>A2 AND CONST(C)<高1;中枢D1:=IF(三角型收敛B AND CONST(C)>低1,B2,DRAWNULL);STICKLINE(中枢D1,CONST(C),高1,0,0),COLORLICYAN;中枢D2:=IF(三角型收敛B AND CONST(C)>低1,ISLASTBAR,DRAWNULL); STICKLINE(中枢D2,CONST(C),高1,0,0),COLORLICYAN;DRAWLINE(中枢D1=1,高1,中枢D2=1,高1,0),COLORLICYAN;DRAWLINE(中枢D1=1,CONST(C),中枢D2=1,CONST(C),0),DOTLINE,COLORLICYAN; {成立}中枢DC1:=IF(三角型收敛B AND CONST(C)<=低1,B2,DRAWNULL);STICKLINE(中枢DC1,高1,低1,0,0),COLORLICYAN;中枢DC2:=IF(三角型收敛B AND CONST(C)<=低1,ISLASTBAR,DRAWNULL); STICKLINE(中枢DC2,高1,低1,0,0),COLORLICYAN;DRAWLINE(中枢DC1=1,高1,中枢DC2=1,高1,0),COLORLICYAN; DRAWLINE(中枢DC1=1,低1,中枢DC2=1,低1,0),COLORLICYAN;。