缠中说禅主图三角形中枢划线主图指标通达信指标公式源码
通达信指标公式源码缠论主神优化主图指标
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);买１:=VAR10;买２:=(VAR11+VAR13+VAR15+VAR17);卖１:=(VAR12+VAR14+VAR16+VAR18);DRAWTEXT(买１>0 OR 买２>0,L*0.985,'买'),COLOR00FFFF;DRAWTEXT(卖１>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;。
缠论主图通达信指标公式源码.doc
选股指标一缠论主图（指标选股/通达信贴图）我把主图里的黄金分割位换成半对数，这在投资领域里最擅长用的，比黄金分割在投资领域里更合理。
是上班族和平时没空看盘投资者最佳的指标｛智能版:=“核心指标.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);买１:=VAR10;买２:=(VAR11+VAR13+VAR15+VAR17);卖１:=(VAR12+VAR14+VAR16+VAR18);DRAWTEXT(买１>0 OR 买２>0,L*0.985,'买'),COLOR00FFFF;DRAWTEXT(卖１>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线画三角形 主图源码 通达信
主图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、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
主图源码：{三角形中枢}时间:=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;。